OSDN Git Service

fixed an issue of bakapi.exe while in pan mode you cannot escape until you press...
[proj16/16.git] / src / bakapi.c
index a94cf39..2d5837a 100755 (executable)
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~\r
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ * Copyright (C) 2012-2021 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
  *\r
  * This file is part of Project 16.\r
  *\r
 /*\r
  * BAKAPEE!\r
  */\r
-global_game_variables_t gvar;\r
 static bakapee_t bakapee;\r
 word key,d,xpos,ypos,xdir,ydir;\r
-sword vgamodex_mode = 1; // 320x240 default\r
-int ch=0x0;\r
+sword vgamodex_mode = 1; //    1 = 320x240 with buffer\r
+void TL_VidInit(global_game_variables_t *gvar){}\r
+//int ch=0x0;\r
+\r
 \r
 void\r
 main(int argc, char *argvar[])\r
 {\r
+       static global_game_variables_t gvar;\r
+       struct glob_game_vars   *ggvv;\r
        char *a;\r
-       int i;\r
-       word panq=1, pand=0;\r
-       boolean panswitch=0;\r
+       int i,c;\r
+       word panq=1, pand=0,showding=0;\r
+       boolean panswitch=0,bptest=1,runding=1;\r
+\r
+       ggvv=&gvar;\r
 \r
        // allow changing default mode from command line\r
        for (i=1;i < argc;) {\r
@@ -66,64 +71,111 @@ main(int argc, char *argvar[])
                }\r
        }\r
 \r
-       // DOSLIB: check our environment\r
-       probe_dos();\r
-\r
-       // DOSLIB: what CPU are we using?\r
-       // NTS: I can see from the makefile Sparky4 intends this to run on 8088 by the -0 switch in CFLAGS.\r
-       //      So this code by itself shouldn't care too much what CPU it's running on. Except that other\r
-       //      parts of this project (DOSLIB itself) rely on CPU detection to know what is appropriate for\r
-       //      the CPU to carry out tasks. --J.C.\r
-       cpu_probe();\r
-\r
-       // DOSLIB: check for VGA\r
-       if (!probe_vga()) {\r
-               printf("VGA probe failed\n");\r
-               return;\r
-       }\r
-       // hardware must be VGA or higher!\r
-       if (!(vga_state.vga_flags & VGA_IS_VGA)) {\r
-               printf("This program requires VGA or higher graphics hardware\n");\r
-               return;\r
-       }\r
+       // initiate doslib //\r
+       TL_DosLibStartup(&gvar);\r
 \r
        // main variables values\r
        d=4; // switch variable\r
        key=2; // default screensaver number\r
-       xpos=TILEWHD;\r
-       ypos=TILEWHD;\r
-       xdir=1;\r
-       ydir=1;\r
+       xpos=TILEWHD; ypos=TILEWHD; xdir=1; ydir=1;\r
 \r
-       VGAmodeX(vgamodex_mode, 1, &gvar); // TODO: Suggestion: Instead of magic numbers for the first param, might I suggest defining an enum or some #define constants that are easier to remember? --J.C.\r
+       VGAmodeX(vgamodex_mode, 0, &gvar); // TODO: Suggestion: Instead of magic numbers for the first param, might I suggest defining an enum or some #define constants that are easier to remember? --J.C.\r
                // 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
+       bakapee.xx = rand()&0%gvar.video.page[0].width; bakapee.yy = rand()&0%gvar.video.page[0].height;\r
+       bakapee.gq = 0; bakapee.sx=bakapee.sy=0; bakapee.bakax=bakapee.bakay=0; bakapee.coor=0;\r
+       //once where #defines\r
+       bakapee.tile=0; bakapee.bonk=400; bakapee.lgq=32; bakapee.hgq=55;\r
+\r
+       switch(WCPU_detectcpu())\r
+       {\r
+               case 0:\r
+                       bakapee.tile=1;\r
+               break;\r
+               default:\r
+                       bakapee.tile=0;\r
+               break;\r
+       }\r
+\r
+       // setup camera and screen~ //\r
+       SETUPPAGEBAKAPI\r
 \r
-       bakapee.xx = rand()&0%gvar.video.page[0].width;\r
-       bakapee.yy = rand()&0%gvar.video.page[0].height;\r
-       bakapee.gq = 0;\r
-       bakapee.sx=0;\r
-       bakapee.sy=0;\r
-       bakapee.bakax=0;\r
-       bakapee.bakay=0;\r
-       bakapee.coor=0;\r
-       bakapee.tile=0;\r
+       VL_ShowPage(&gvar.video.page[0], 1, 0);\r
+       BAKAPIINITFIZZTEST\r
 \r
-       /* setup camera and screen~ */\r
-       gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]);\r
-       textInit();\r
+       while (bptest)\r
+       {\r
+/*             if (key > 0)\r
+               {*/\r
+               while (!kbhit() && runding)\r
+                       {\r
+                               //{ word w; for(w=0;w<(gvar.video.page[0].width*gvar.video.page[0].height);w++) {}}\r
+                               ding(&gvar.video.page[showding], &bakapee, 4);\r
+                       }\r
+               if (kbhit())\r
+//                     {\r
+                       getch(); // eat keyboard input\r
+//                             break;\r
+//                     }\r
+//             }*/\r
+\r
+               {\r
+\r
+                       c = getch();\r
+                       switch (c)\r
+                       {\r
+                               case 27: // Escape key //\r
+                               case '0':\r
+                               default:\r
+                                       bptest = false;\r
+                               break;\r
+                               case 'b': // test tile change //\r
+                                       switch (bakapee.tile)\r
+                                       {\r
+                                               case 0:\r
+                                                       bakapee.tile=1;\r
+                                               break;\r
+                                               case 1:\r
+                                                       bakapee.tile=0;\r
+                                               break;\r
+                                       }\r
+                               break;\r
+                               case 'r':\r
+                                       runding = false;\r
+                                       BAKAPIINITFIZZTEST\r
+                               break;\r
+                               case 'e':\r
+                                       runding = 1;\r
+                               break;\r
+                               case 'z':\r
+                                       runding = false;\r
+                                       FIZZFADEFUN\r
+//                                     runding = true;\r
+                               break;\r
+                               case '3':\r
+                               case '4':\r
+                                       runding = 1;\r
+                                       showding = c - '0' - 3;\r
+                               break;\r
+                               case '1':\r
+                               case '2':\r
+       //                      case '5':\r
+       //                      case '6':\r
+       //                      case '9':\r
+                                       key = c - '0' - 1;\r
+                                       VL_ShowPage(&gvar.video.page[key], 1, 0);\r
+                               break;\r
+                       }\r
+               }\r
+       }\r
 \r
-       //modexPalUpdate(bmp.palette); //____\r
-       //modexDrawBmp(VGA, 0, 0, &bmp, 0); //____\r
-       //getch(); //____\r
 \r
-       modexShowPage(&gvar.video.page[0]);\r
+//while(!kbhit()){}\r
 \r
 // screen savers\r
-#ifdef BOINK\r
+//#ifdef BOINK\r
        while(d>0)      // on!\r
        {\r
-               int c;\r
                /* run screensaver routine until keyboard input */\r
                while (key > 0) {\r
                        if (kbhit()) {\r
@@ -134,7 +186,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
+                                       FIZZFADEFUN\r
+                               }else ding(&gvar.video.page[0], &bakapee, key); }\r
                        else                    ding(&gvar.video.page[0], &bakapee, 2);\r
                        if(panswitch!=0)\r
                        {\r
@@ -145,7 +203,7 @@ main(int argc, char *argvar[])
                                        if(panq<=(TILEWH/(4)))\r
                                        {\r
                                                gvar.video.page[0].dx++;\r
-                                               modexShowPage(&gvar.video.page[0]);\r
+                                               VL_ShowPage(&gvar.video.page[0], 0, 0);\r
                                                panq++;\r
                                        } else { panq = 1; pand = 0; }\r
                                }\r
@@ -156,7 +214,7 @@ main(int argc, char *argvar[])
                                        if(panq<=(TILEWH/(4)))\r
                                        {\r
                                                gvar.video.page[0].dx--;\r
-                                               modexShowPage(&gvar.video.page[0]);\r
+                                               VL_ShowPage(&gvar.video.page[0], 0, 0);\r
                                                panq++;\r
                                        } else { panq = 1; pand = 0; }\r
                                }\r
@@ -167,7 +225,7 @@ main(int argc, char *argvar[])
                                        if(panq<=(TILEWH/(4)))\r
                                        {\r
                                                gvar.video.page[0].dy++;\r
-                                               modexShowPage(&gvar.video.page[0]);\r
+                                               VL_ShowPage(&gvar.video.page[0], 0, 0);\r
                                                panq++;\r
                                        } else { panq = 1; pand = 0; }\r
                                }\r
@@ -178,11 +236,29 @@ main(int argc, char *argvar[])
                                        if(panq<=(TILEWH/(4)))\r
                                        {\r
                                                gvar.video.page[0].dy--;\r
-                                               modexShowPage(&gvar.video.page[0]);\r
+                                               VL_ShowPage(&gvar.video.page[0], 0, 0);\r
                                                panq++;\r
                                        } else { panq = 1; pand = 0; }\r
                                }\r
-                               if(c==0x71 || c==0xb1 || c=='p')\r
+                               if((c==0x4d && pand == 0) || pand == 2)\r
+                               {\r
+                                       if(pand == 0){ pand = 2; }\r
+                                       if(panq<=(TILEWH/(4)))\r
+                                       {\r
+                                               gvar.video.page[0].dx++;\r
+                                               VL_ShowPage(&gvar.video.page[0], 0, 0);\r
+                                               panq++;\r
+                                       } else { panq = 1; pand = 0; }\r
+                               }\r
+                               if(c==0x01+1)\r
+                               {\r
+                                       VL_ShowPage(&gvar.video.page[0], 0, 0);\r
+                               }\r
+                               if(c==0x02+1)\r
+                               {\r
+                                       VL_ShowPage(&gvar.video.page[1], 0, 0);\r
+                               }\r
+                               if(c==27 || c==0x71 || c==0xb1 || c=='p')\r
                                {\r
                                        //getch(); // eat keyboard input\r
                                        panswitch=0;\r
@@ -196,6 +272,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
@@ -209,17 +286,18 @@ main(int argc, char *argvar[])
                                        printf("on.     ");\r
                                break;\r
                        }\r
-                       //printf("\n");\r
                        printf("Pan mode is ");\r
                        switch (panswitch)\r
                        {\r
                                case 0:\r
-                                       printf("off.\n");\r
+                                       printf("off.");\r
                                break;\r
                                case 1:\r
-                                       printf("on.\n");\r
+                                       printf("on.");\r
                                break;\r
                        }\r
+                       printf("\n");\r
+                       printf("Incrementation of color happens at every %uth plot.\n", bakapee.bonk);\r
                        printf("Enter 1, 2, 3, 4, 5, 6, 8, or 9 to run a screensaver, or enter 0 to quit.\n");\r
 pee:\r
                        c = getch();\r
@@ -229,16 +307,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
@@ -251,7 +330,7 @@ pee:
                                                break;\r
                                        }\r
                                        key=0;\r
-                                       break;\r
+                               break;\r
                                case '8':\r
                                        c+=8;\r
                                case '1':\r
@@ -263,20 +342,31 @@ pee:
                                case '9':\r
                                        key = c - '0';\r
                                        VGAmodeX(vgamodex_mode, 0, &gvar);\r
-                                       gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]);\r
+                                       SETUPPAGEBAKAPI\r
                // 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
-                                       modexShowPage(&gvar.video.page[0]);\r
-                                       break;\r
+                                       VL_ShowPage(&gvar.video.page[0], 0, 0);\r
+                               break;\r
+                               case '-':\r
+                                       if(bakapee.bonk>0)\r
+                                               bakapee.bonk-=100;\r
+                               break;\r
+                               case '=':\r
+                               case '+':\r
+                                       if(bakapee.bonk<1000)\r
+                                               bakapee.bonk+=100;\r
+                               break;\r
                                default:\r
                                        key=0;\r
-                                       break;\r
+                               break;\r
                        }\r
                }\r
        }\r
-#else // !defined(BOINK)\r
+       clrscr();       //added to clear screen wwww\r
+#if 0\r
+//#else // !defined(BOINK)\r
 // FIXME: Does not compile. Do you want to remove this?\r
-// TODO: This is a testing sextion for textrendering and panning for project 16 --sparky4\r
+// INFO: This is a testing section for textrendering and panning for project 16 --sparky4\r
        while(1)\r
        { // conditions of screen saver\r
 //             while(!kbhit())\r
@@ -310,5 +400,7 @@ pee:
 //     printf("page.width=%u   ", gvar.video.page[0].width); printf("page.height=%u\n", gvar.video.page[0].height);\r
        printf("bakapi ver. 1.04.16.04\nis made by sparky4\81i\81\86\83Ö\81\85\81j feel free to use it ^^\nLicence: GPL v3\n");\r
        printf("compiled on 2016/04/04\n");\r
+//     printf("[%u]%dx%d       [%dx%d] %u %u %u\n[%u   %u      %u]", key, bakapee.bakax, bakapee.bakay, bakapee.xx, bakapee.yy,\r
+//bakapee.coor, bakapee.tile, bakapee.gq, bakapee.bonk, bakapee.lgq, bakapee.hgq);\r
 }\r
 //pee!\r