/* Project 16 Source Code~\r
- * Copyright (C) 2012-2017 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
void TL_VidInit(global_game_variables_t *gvar){}\r
//int ch=0x0;\r
\r
-#define SETUPPAGEBAKAPI \\r
-gvar.video.page[0] = modexDefaultPage(&gvar.video.page[0]/*, &gvar.video*/); \\r
-gvar.video.page[1] = modexNextPage(&gvar.video.page[0]);\r
-\r
\r
void\r
main(int argc, char *argvar[])\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
}\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
- textInit();\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, 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
-\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= bakapee.sy=0;\r
- bakapee.bakax= bakapee.bakay=0;\r
- bakapee.coor=0;\r
-\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;\r
- bakapee.bonk=400;\r
- bakapee.lgq=32;\r
- bakapee.hgq=55;\r
+ bakapee.tile=0; bakapee.bonk=400; bakapee.lgq=32; bakapee.hgq=55;\r
\r
switch(WCPU_detectcpu())\r
{\r
break;\r
}\r
\r
- /* setup camera and screen~ */\r
+ // setup camera and screen~ //\r
SETUPPAGEBAKAPI\r
\r
- //modexPalUpdate(bmp.palette); //____\r
- //modexDrawBmp(VGA, 0, 0, &bmp, 0); //____\r
- //getch(); //____\r
- //VL_SetLineWidth (40, &gvar);\r
-\r
VL_ShowPage(&gvar.video.page[0], 1, 0);\r
+ BAKAPIINITFIZZTEST\r
+\r
+ while (bptest)\r
{\r
- word w;\r
- for(w=0;w<64000;w++)\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
- ding(&gvar.video.page[0], &bakapee, 2);\r
- ding(&gvar.video.page[1], &bakapee, 2);\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
-#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
- baka_FizzleFade (&gvar.video.page[1], &gvar.video.page[0], vga_state.vga_width, vga_state.vga_height, 70, true, &gvar);\r
-#endif\r
}\r
- while(!kbhit()){}\r
+\r
+\r
+//while(!kbhit()){}\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
}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
{\r
VL_ShowPage(&gvar.video.page[1], 0, 0);\r
}\r
- if(c==0x71 || c==0xb1 || c=='p')\r
+ if(c==27 || c==0x71 || c==0xb1 || c=='p')\r
{\r
//getch(); // eat keyboard input\r
panswitch=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
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
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
break;\r
default:\r
key=0;\r
- clrscr(); //added to clear screen wwww\r
break;\r
}\r
}\r
OSDN Git Service
