-/* Project 16 Source Code~
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
- *
- * This file is part of Project 16.
- *
- * Project 16 is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * Project 16 is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You screen.heightould have received a copy of the GNU General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>, or
- * write to the Free Software Foundation, Inc., 51 Franklin Street,
- * Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-
-#include "src/bakapi.h"
-
-/*
- * BAKAPEE!
- */
-global_game_variables_t gvar;
-static bakapee_t bakapee;
-word key,d,xpos,ypos,xdir,ydir;
-sword vgamodex_mode = 1; // 320x240 default
-int ch=0x0;
-
-void
-main(int argc, char *argvar[])
-{
- char *a;
- int i;
- word panq=1, pand=0;
- boolean panswitch=0;
-
- // allow changing default mode from command line
- for (i=1;i < argc;) {
- a = argvar[i++];
-
- if (*a == '-') {
- do { a++; } while (*a == '-');
-
- if (!strcmp(a,"mx")) {
- // (based on src/lib/modex16.c)
- // 1 = 320x240
- // 2 = 160x120
- // 3 = 320x200
- // 4 = 192x144
- // 5 = 256x192
- vgamodex_mode = (sword)strtoul(argvar[i++],NULL,0);
- }
- else {
- fprintf(stderr,"Unknown switch %s\n",a);
- return;
- }
- }
- else {
- fprintf(stderr,"Unknown command arg %s\n",a);
- return;
- }
- }
-
- // DOSLIB: check our environment
- probe_dos();
-
- // DOSLIB: what CPU are we using?
- // NTS: I can see from the makefile Sparky4 intends this to run on 8088 by the -0 switch in CFLAGS.
- // So this code by itself shouldn't care too much what CPU it's running on. Except that other
- // parts of this project (DOSLIB itself) rely on CPU detection to know what is appropriate for
- // the CPU to carry out tasks. --J.C.
- cpu_probe();
-
- // DOSLIB: check for VGA
- if (!probe_vga()) {
- printf("VGA probe failed\n");
- return;
- }
- // hardware must be VGA or higher!
- if (!(vga_state.vga_flags & VGA_IS_VGA)) {
- printf("This program requires VGA or higher graphics hardware\n");
- return;
- }
-
- // main variables values
- d=4; // switch variable
- key=2; // default screensaver number
- xpos=TILEWHD;
- ypos=TILEWHD;
- xdir=1;
- ydir=1;
-
- 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.
- // this code is written around modex16 which so far is a better fit than using DOSLIB vga directly, so leave MXLIB code in.
- // we'll integrate DOSLIB vga into that part of the code instead for less disruption. -- J.C.
-
- bakapee.xx = rand()&0%gvar.video.page[0].width;
- bakapee.yy = rand()&0%gvar.video.page[0].height;
- bakapee.gq = 0;
- bakapee.sx=0;
- bakapee.sy=0;
- bakapee.bakax=0;
- bakapee.bakay=0;
- bakapee.coor=0;
- bakapee.tile=0;
-
- /* setup camera and screen~ */
- gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]);
- textInit();
-
- //modexPalUpdate(bmp.palette); //____
- //modexDrawBmp(VGA, 0, 0, &bmp, 0); //____
- //getch(); //____
-
- modexShowPage(&gvar.video.page[0]);
-
-// screen savers
-#ifdef BOINK
- while(d>0) // on!
- {
- int c;
- /* run screensaver routine until keyboard input */
- while (key > 0) {
- if (kbhit()) {
- if(!panswitch)
- {
- getch(); // eat keyboard input
- break;
- }else c=getch();
- }
-
- if(!panswitch) ding(&gvar.video.page[0], &bakapee, key);
- else ding(&gvar.video.page[0], &bakapee, 2);
- if(panswitch!=0)
- {
- //right movement
- if((c==0x4d && pand == 0) || pand == 2)
- {
- if(pand == 0){ pand = 2; }
- if(panq<=(TILEWH/(4)))
- {
- gvar.video.page[0].dx++;
- modexShowPage(&gvar.video.page[0]);
- panq++;
- } else { panq = 1; pand = 0; }
- }
- //left movement
- if((c==0x4b && pand == 0) || pand == 4)
- {
- if(pand == 0){ pand = 4; }
- if(panq<=(TILEWH/(4)))
- {
- gvar.video.page[0].dx--;
- modexShowPage(&gvar.video.page[0]);
- panq++;
- } else { panq = 1; pand = 0; }
- }
- //down movement
- if((c==0x50 && pand == 0) || pand == 3)
- {
- if(pand == 0){ pand = 3; }
- if(panq<=(TILEWH/(4)))
- {
- gvar.video.page[0].dy++;
- modexShowPage(&gvar.video.page[0]);
- panq++;
- } else { panq = 1; pand = 0; }
- }
- //up movement
- if((c==0x48 && pand == 0) || pand == 1)
- {
- if(pand == 0){ pand = 1; }
- if(panq<=(TILEWH/(4)))
- {
- gvar.video.page[0].dy--;
- modexShowPage(&gvar.video.page[0]);
- panq++;
- } else { panq = 1; pand = 0; }
- }
- if(c==0x71 || c==0xb1 || c=='p')
- {
- //getch(); // eat keyboard input
- panswitch=0;
- break; // 'q' or 'ESC' or 'p'
- }
- }
- }
-
- {
-
- // this code is written around modex16 which so far is a better fit than using DOSLIB vga directly, so leave MXLIB code in.
- // we'll integrate DOSLIB vga into that part of the code instead for less disruption. -- J.C.
- VGAmodeX(0, 0, &gvar);
- // user imput switch
- //fprintf(stderr, "xx=%d yy=%d tile=%d\n", bakapee.xx, bakapee.yy, bakapee.tile);
- //fprintf(stderr, "dx=%d dy=%d ", gvar.video.page[0].dx, gvar.video.page[0].dy);
- printf("Tiled mode is ");
- switch (bakapee.tile)
- {
- case 0:
- printf("off. ");
- break;
- case 1:
- printf("on. ");
- break;
- }
- //printf("\n");
- printf("Pan mode is ");
- switch (panswitch)
- {
- case 0:
- printf("off.\n");
- break;
- case 1:
- printf("on.\n");
- break;
- }
- printf("Enter 1, 2, 3, 4, 5, 6, 8, or 9 to run a screensaver, or enter 0 to quit.\n");
-pee:
- c = getch();
- switch (c) {
- case 27: /* Escape key */
- case '0':
- d=0;
- break;
- case 'p': // test pan
- switch (panswitch)
- {
- case 0:
- panswitch=1;
- break;
- case 1:
- panswitch=0;
- break;
- }
- goto pee;
- break;
- case 'b': // test tile change
- switch (bakapee.tile)
- {
- case 0:
- bakapee.tile=1;
- break;
- case 1:
- bakapee.tile=0;
- break;
- }
- key=0;
- break;
- case '8':
- c+=8;
- case '1':
- case '2':
- case '3':
- case '4':
- case '5':
- case '6':
- case '9':
- key = c - '0';
- VGAmodeX(vgamodex_mode, 0, &gvar);
- gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]);
- // this code is written around modex16 which so far is a better fit than using DOSLIB vga directly, so leave MXLIB code in.
- // we'll integrate DOSLIB vga into that part of the code instead for less disruption. -- J.C.
- modexShowPage(&gvar.video.page[0]);
- break;
- default:
- key=0;
- break;
- }
- }
- }
-#else // !defined(BOINK)
-// FIXME: Does not compile. Do you want to remove this?
-// TODO: This is a testing sextion for textrendering and panning for project 16 --sparky4
- while(1)
- { // conditions of screen saver
-// while(!kbhit())
-// {
-// ding(&gvar.video.page[0], &bakapee, key);
-// }
- //end of screen savers
- //pdump(&gvar.video.page[0]);
-
-// mxOutText(xpos+1, ypos+gvar.video.page[0].height-48, "========================================");
-// mxOutText(xpos+1, ypos+gvar.video.page[0].height-40, "| |Chikyuu:$line1");
-// mxOutText(xpos+1, ypos+gvar.video.page[0].height-32, "| |$line2");
-// mxOutText(xpos+1, ypos+gvar.video.page[0].height-24, "| |$line3");
-// mxOutText(xpos+1, ypos+gvar.video.page[0].height-16, "| |$line4");
-// mxOutText(xpos+1, ypos+gvar.video.page[0].height-8, "========================================");
-
- ding(&gvar.video.page[0], &bakapee, key);
- modexPanPage(&gvar.video.page[0], xpos, ypos);
- c = getch();
-
-// xpos+=xdir;
-// ypos+=ydir;
-// if( (xpos>(gvar.video.page[0].sw-gvar.video.page[0].width-1)) || (xpos<1)){xdir=-xdir;}
-// if( (ypos>(gvar.video.page[0].sh-gvar.video.page[0].height-1)) || (ypos<1)){ydir=-ydir;}
-// ch=getch();
- if(ch==0x71)break; // 'q'
- if(ch==0x1b)break; // 'ESC'
- }
- VGAmodeX(0, 1, &gvar);
-#endif // defined(BOINK)
-// printf("page.width=%u ", gvar.video.page[0].width); printf("page.height=%u\n", gvar.video.page[0].height);
- 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");
- printf("compiled on 2016/04/04\n");
-}
-//pee!
+/* Project 16 Source Code~\r
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ *\r
+ * This file is part of Project 16.\r
+ *\r
+ * Project 16 is free software; you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation; either version 3 of the License, or\r
+ * (at your option) any later version.\r
+ *\r
+ * Project 16 is distributed in the hope that it will be useful,\r
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
+ * GNU General Public License for more details.\r
+ *\r
+ * You screen.heightould have received a copy of the GNU General Public License\r
+ * along with this program. If not, see <http://www.gnu.org/licenses/>, or\r
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,\r
+ * Fifth Floor, Boston, MA 02110-1301 USA.\r
+ *\r
+ */\r
+\r
+#include "src/bakapi.h"\r
+\r
+/*\r
+ * BAKAPEE!\r
+ */\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
+\r
+void\r
+main(int argc, char *argvar[])\r
+{\r
+ static global_game_variables_t gvar;\r
+ char *a;\r
+ int i;\r
+ word panq=1, pand=0;\r
+ boolean panswitch=0;\r
+\r
+ // allow changing default mode from command line\r
+ for (i=1;i < argc;) {\r
+ a = argvar[i++];\r
+\r
+ if (*a == '-') {\r
+ do { a++; } while (*a == '-');\r
+\r
+ if (!strcmp(a,"mx")) {\r
+ // (based on src/lib/modex16.c)\r
+ // 1 = 320x240\r
+ // 2 = 160x120\r
+ // 3 = 320x200\r
+ // 4 = 192x144\r
+ // 5 = 256x192\r
+ vgamodex_mode = (sword)strtoul(argvar[i++],NULL,0);\r
+ }\r
+ else {\r
+ fprintf(stderr,"Unknown switch %s\n",a);\r
+ return;\r
+ }\r
+ }\r
+ else {\r
+ fprintf(stderr,"Unknown command arg %s\n",a);\r
+ return;\r
+ }\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
+\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
+\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
+ // 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
+\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
+\r
+ //once where #defines\r
+ bakapee.tile=0;\r
+ bakapee.bonk=400;\r
+ bakapee.lgq=32;\r
+ bakapee.hgq=55;\r
+\r
+ /* setup camera and screen~ */\r
+ gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]);\r
+ textInit();\r
+\r
+ //modexPalUpdate(bmp.palette); //____\r
+ //modexDrawBmp(VGA, 0, 0, &bmp, 0); //____\r
+ //getch(); //____\r
+\r
+ VL_ShowPage(&gvar.video.page[0], 0, 0);\r
+\r
+// screen savers\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
+ if(!panswitch)\r
+ {\r
+ getch(); // eat keyboard input\r
+ break;\r
+ }else c=getch();\r
+ }\r
+\r
+ if(!panswitch) ding(&gvar.video.page[0], &bakapee, key);\r
+ else ding(&gvar.video.page[0], &bakapee, 2);\r
+ if(panswitch!=0)\r
+ {\r
+ //right movement\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
+ //left movement\r
+ if((c==0x4b && pand == 0) || pand == 4)\r
+ {\r
+ if(pand == 0){ pand = 4; }\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
+ //down movement\r
+ if((c==0x50 && pand == 0) || pand == 3)\r
+ {\r
+ if(pand == 0){ pand = 3; }\r
+ if(panq<=(TILEWH/(4)))\r
+ {\r
+ gvar.video.page[0].dy++;\r
+ VL_ShowPage(&gvar.video.page[0], 0, 0);\r
+ panq++;\r
+ } else { panq = 1; pand = 0; }\r
+ }\r
+ //up movement\r
+ if((c==0x48 && pand == 0) || pand == 1)\r
+ {\r
+ if(pand == 0){ pand = 1; }\r
+ if(panq<=(TILEWH/(4)))\r
+ {\r
+ gvar.video.page[0].dy--;\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
+ {\r
+ //getch(); // eat keyboard input\r
+ panswitch=0;\r
+ break; // 'q' or 'ESC' or 'p'\r
+ }\r
+ }\r
+ }\r
+\r
+ {\r
+\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
+ VGAmodeX(0, 0, &gvar);\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
+ printf("Tiled mode is ");\r
+ switch (bakapee.tile)\r
+ {\r
+ case 0:\r
+ printf("off. ");\r
+ break;\r
+ case 1:\r
+ 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
+ break;\r
+ case 1:\r
+ printf("on.\n");\r
+ break;\r
+ }\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
+ switch (c) {\r
+ case 27: /* Escape key */\r
+ case '0':\r
+ 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
+ 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
+ key=0;\r
+ break;\r
+ case '8':\r
+ c+=8;\r
+ case '1':\r
+ case '2':\r
+ case '3':\r
+ case '4':\r
+ case '5':\r
+ case '6':\r
+ case '9':\r
+ key = c - '0';\r
+ VGAmodeX(vgamodex_mode, 0, &gvar);\r
+ gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]);\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
+ 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
+ }\r
+ }\r
+ }\r
+#else // !defined(BOINK)\r
+// FIXME: Does not compile. Do you want to remove this?\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
+// {\r
+// ding(&gvar.video.page[0], &bakapee, key);\r
+// }\r
+ //end of screen savers\r
+ //pdump(&gvar.video.page[0]);\r
+\r
+// mxOutText(xpos+1, ypos+gvar.video.page[0].height-48, "========================================");\r
+// mxOutText(xpos+1, ypos+gvar.video.page[0].height-40, "| |Chikyuu:$line1");\r
+// mxOutText(xpos+1, ypos+gvar.video.page[0].height-32, "| |$line2");\r
+// mxOutText(xpos+1, ypos+gvar.video.page[0].height-24, "| |$line3");\r
+// mxOutText(xpos+1, ypos+gvar.video.page[0].height-16, "| |$line4");\r
+// mxOutText(xpos+1, ypos+gvar.video.page[0].height-8, "========================================");\r
+\r
+ ding(&gvar.video.page[0], &bakapee, key);\r
+ modexPanPage(&gvar.video.page[0], xpos, ypos);\r
+ c = getch();\r
+\r
+// xpos+=xdir;\r
+// ypos+=ydir;\r
+// if( (xpos>(gvar.video.page[0].sw-gvar.video.page[0].width-1)) || (xpos<1)){xdir=-xdir;}\r
+// if( (ypos>(gvar.video.page[0].sh-gvar.video.page[0].height-1)) || (ypos<1)){ydir=-ydir;}\r
+// ch=getch();\r
+ if(ch==0x71)break; // 'q'\r
+ if(ch==0x1b)break; // 'ESC'\r
+ }\r
+ VGAmodeX(0, 1, &gvar);\r
+#endif // defined(BOINK)\r
+// 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
+}\r
+//pee!\r