p16 is being worked on a bunch by me wwww [16_ca needs huge amounts of work and I...

diff --git a/src/bakapi.c b/src/bakapi.c
index fa03d40373e5a427343da57ad2e89888556d7d3e..cc26c64cf767874b1abb3b2d1a538d64ef0d0d8e 100755 (executable)
--- a/src/bakapi.c
+++ b/src/bakapi.c
@@ -32,7 +32,7 @@ void TL_VidInit(global_game_variables_t *gvar){}
 //int ch=0x0;\r
 \r
 #define SETUPPAGEBAKAPI \\r
-gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]/*, &gvar.video*/); \\r
+gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]); \\r
 gvar.video.page[1] = modexNextPage(&gvar.video.page[0]);\r
 \r
 \r
@@ -146,8 +146,12 @@ main(int argc, char *argvar[])
                for(w=0;w<64000;w++)\r
                {\r
                        ding(&gvar.video.page[0], &bakapee, 2);\r
-                       ding(&gvar.video.page[1], &bakapee, 2);\r
+//                     ding(&gvar.video.page[1], &bakapee, 2);\r
                }\r
+               modexClearRegion(&(gvar.video.page[1]), 0, 0, gvar.video.page[0].width, gvar.video.page[0].height, 14);\r
+               VL_ShowPage(&gvar.video.page[1], 0, 0);\r
+               while(!kbhit()){} getch();\r
+               VL_ShowPage(&gvar.video.page[0], 0, 0);\r
 #ifdef BAKAFIZZUNSIGNED\r
                baka_FizzleFade (gvar.video.ofs.bufferofs, gvar.video.ofs.displayofs, gvar.video.page[0].width, gvar.video.page[0].height, 70, true, &gvar);\r
 #else\r
@@ -171,7 +175,13 @@ main(int argc, char *argvar[])
                                }else c=getch();\r
                        }\r
 \r
-                       if(!panswitch)  ding(&gvar.video.page[0], &bakapee, key);\r
+                       if(!panswitch){\r
+                               if(key==9)\r
+                               {\r
+                                       ding(&gvar.video.page[1], &bakapee, 4);\r
+                                       ding(&gvar.video.page[0], &bakapee, 4);\r
+                                       baka_FizzleFade (gvar.video.ofs.bufferofs, gvar.video.ofs.displayofs, gvar.video.page[0].width, gvar.video.page[0].height, 70, true, &gvar);\r
+                               }else ding(&gvar.video.page[0], &bakapee, key); }\r
                        else                    ding(&gvar.video.page[0], &bakapee, 2);\r
                        if(panswitch!=0)\r
                        {\r
@@ -251,6 +261,7 @@ main(int argc, char *argvar[])
                // this code is written around modex16 which so far is a better fit than using DOSLIB vga directly, so leave MXLIB code in.\r
                // we'll integrate DOSLIB vga into that part of the code instead for less disruption. -- J.C.\r
                        VGAmodeX(0, 0, &gvar);\r
+                       clrscr();       //added to clear screen wwww\r
                        // user imput switch\r
                        //fprintf(stderr, "xx=%d        yy=%d   tile=%d\n", bakapee.xx, bakapee.yy, bakapee.tile);\r
                        //fprintf(stderr, "dx=%d        dy=%d   ", gvar.video.page[0].dx, gvar.video.page[0].dy);\r
@@ -285,16 +296,17 @@ pee:
                                        d=0;\r
                                        break;\r
                                case 'p': // test pan\r
-                               switch (panswitch)\r
-                               {\r
-                                       case 0:\r
-                                               panswitch=1;\r
-                                       break;\r
-                                       case 1:\r
-                                               panswitch=0;\r
-                                       break;\r
-                               }\r
-                               goto pee;\r
+                                       switch (panswitch)\r
+                                       {\r
+                                               case 0:\r
+                                                       panswitch=1;\r
+                                               break;\r
+                                               case 1:\r
+                                                       panswitch=0;\r
+                                               break;\r
+                                       }\r
+                                       key=0;\r
+                                       goto pee;\r
                                break;\r
                                case 'b': // test tile change\r
                                        switch (bakapee.tile)\r
@@ -335,7 +347,6 @@ pee:
                                break;\r
                                default:\r
                                        key=0;\r
-                                       clrscr();       //added to clear screen wwww\r
                                break;\r
                        }\r
                }\r

diff --git a/src/lib/bakapee.c b/src/lib/bakapee.c
index d9fd1e5c3226e0237dfbec27b0cb4eba6a9b07e9..26d7c8026d7685ca4920726a5893b64f93d5a533 100755 (executable)
--- a/src/lib/bakapee.c
+++ b/src/lib/bakapee.c
@@ -166,6 +166,7 @@ modexprint(&(gvar->video.page[0]), PIXPOSX, q+PIXPOSY, 1, 0, 47, 0, 1, global_te
                }\r
                frame++;\r
 //--           while (TimeCount<frame){}//;            // don't go too fast\r
+               delay(10);\r
        } while (1);\r
        __asm {\r
                mov     es,[esorig]\r
@@ -697,13 +698,15 @@ void ding(page_t *page, bakapee_t *pee, word q)
                        colorz(page, pee);\r
                        modexprint(page, page->sw/2, page->sh/2, 1, 0, 47, 0, 1, "bakapi");\r
                break;\r
-               case 9:\r
+/*             case 9:\r
+                       modexClearRegion(&(ggvv->video.page[0]), 0, 0, ggvv->video.page[0].width/2, ggvv->video.page[0].height/2, 15);\r
 #ifdef BAKAFIZZUNSIGNED\r
-                       baka_FizzleFade (ggvv->video.ofs.bufferofs, ggvv->video.ofs.displayofs, vga_state.vga_width, vga_state.vga_height, 70, true, ggvv);\r
+//                     baka_FizzleFade (ggvv->video.ofs.bufferofs, ggvv->video.ofs.displayofs, vga_state.vga_width, vga_state.vga_height, 70, true, ggvv);\r
+                       baka_FizzleFade (ggvv->video.ofs.bufferofs, ggvv->video.ofs.displayofs, ggvv->video.page[0].width, ggvv->video.page[0].height, 70, true, ggvv);\r
 #else\r
                        baka_FizzleFade (&ggvv->video.page[1], &ggvv->video.page[0], vga_state.vga_width, vga_state.vga_height, 70, true, ggvv);\r
 #endif\r
-               break;\r
+               break;*/\r
                case 10:\r
                        ssd(page, pee, q); /*printf("%d\n", pee->coor);*/\r
                break;\r