*\r
*/\r
/*\r
- * 16 library\r
+ * 16 tail library\r
*/\r
\r
#include "src/lib/16_tail.h"\r
==========================\r
*/\r
\r
-void Startup16(global_game_variables_t *gvar)\r
+void Startup16 (global_game_variables_t *gvar)\r
{\r
-#ifdef __WATCOMC__\r
- start_timer(gvar);\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
- if (_DEBUG_INIT() == 0) {\r
-#ifdef DEBUGSERIAL\r
- //printf("WARNING: Failed to initialize DEBUG output\n");\r
-#endif\r
- }\r
- _DEBUG("Serial debug output started\n"); // NTS: All serial output must end messages with newline, or DOSBox-X will not emit text to log\r
- _DEBUGF("Serial debug output printf test %u %u %u\n",1U,2U,3U);\r
-\r
- textInit();\r
-#endif\r
+ gvar->video.VL_Started=0;\r
+ TL_VidInit(gvar);\r
gvar->mm.mmstarted=0;\r
gvar->pm.PMStarted=0;\r
- MM_Startup(gvar);\r
+ StartupCAMMPM(gvar);\r
#ifdef __WATCOMC__\r
#ifdef __DEBUG_InputMgr__\r
if(!dbg_nointest)\r
#endif\r
IN_Startup(gvar);\r
#endif\r
- PM_Startup(gvar);\r
- PM_UnlockMainMem(gvar);\r
- CA_Startup(gvar);\r
}\r
\r
//===========================================================================\r
==========================\r
*/\r
\r
-void Shutdown16(global_game_variables_t *gvar)\r
+void Shutdown16 (global_game_variables_t *gvar)\r
{\r
- PM_Shutdown(gvar);\r
#ifdef __WATCOMC__\r
#ifdef __DEBUG_InputMgr__\r
if(!dbg_nointest)\r
#endif\r
IN_Shutdown(gvar);\r
+#endif\r
+ ShutdownCAMMPM(gvar);\r
+#ifdef __WATCOMC__\r
+ if(gvar->video.VL_Started)\r
+ VL_Shutdown (gvar);//VGAmodeX(0, 1, gvar);\r
+#endif\r
+}\r
+\r
+//===========================================================================\r
+\r
+/*\r
+==========================\r
+=\r
+= StartupCAMMPM\r
+=\r
+==========================\r
+*/\r
+\r
+void StartupCAMMPM (global_game_variables_t *gvar)\r
+{\r
+/*\r
+ MM_Startup (); // so the signon screen can be freed\r
+\r
+ SignonScreen ();\r
+\r
+ VW_Startup ();\r
+ IN_Startup ();\r
+ PM_Startup ();\r
+ PM_UnlockMainMem ();\r
+ SD_Startup ();\r
+ CA_Startup ();\r
+ US_Startup ();\r
+*/\r
+ MM_Startup(gvar);\r
+#ifdef __16_PM__\r
+ PM_Startup(gvar);\r
+//???? PM_CheckMainMem(gvar);\r
+ PM_UnlockMainMem(gvar);\r
+#endif\r
+ CA_Startup(gvar);\r
+}\r
+\r
+//===========================================================================\r
+\r
+/*\r
+==========================\r
+=\r
+= ShutdownCAMMPM\r
+=\r
+==========================\r
+*/\r
+\r
+void ShutdownCAMMPM (global_game_variables_t *gvar)\r
+{\r
+/*\r
+ US_Shutdown ();\r
+ SD_Shutdown ();\r
+ PM_Shutdown ();\r
+ IN_Shutdown ();\r
+ VW_Shutdown ();\r
+ CA_Shutdown ();\r
+ MM_Shutdown ()\r
+*/\r
+#ifdef __16_PM__\r
+ PM_Shutdown(gvar);\r
#endif\r
CA_Shutdown(gvar);\r
MM_Shutdown(gvar);\r
- VGAmodeX(0, 1, gvar);\r
}\r
\r
-\r
//===========================================================================\r
\r
/*\r
\r
/*void ReadConfig(void)\r
{\r
- int file;\r
- SDMode sd;\r
- SMMode sm;\r
- SDSMode sds;\r
+ int file;\r
+ SDMode sd;\r
+ SMMode sm;\r
+ SDSMode sds;\r
\r
\r
if ( (file = open(configname,O_BINARY | O_RDONLY)) != -1)\r
\r
/*void WriteConfig(void)\r
{\r
- int file;\r
+ int file;\r
\r
file = open(configname,O_CREAT | O_BINARY | O_WRONLY,\r
S_IREAD | S_IWRITE | S_IFREG);\r
\r
//===========================================================================\r
\r
+/*\r
+===================\r
+=\r
+= FizzleFade\r
+=\r
+===================\r
+*/\r
+\r
+boolean FizzleFade (unsigned source, unsigned dest, unsigned width, unsigned height, unsigned frames, boolean abortable, global_game_variables_t *gvar)\r
+{\r
+ word p,pixperframe;\r
+ unsigned drawofs,pagedelta;\r
+ byte mask,maskb[8] = {1,2,4,8};\r
+ unsigned x,y,frame;\r
+ long rndval;\r
+ word screenseg;\r
+#ifdef __WATCOMC__\r
+ unsigned esorig;//,q;\r
+#endif\r
+\r
+ pagedelta = dest-source;\r
+ rndval = 1;\r
+#ifdef __WATCOMC__\r
+ esorig = 0;// q = 16;\r
+#endif\r
+ x = y = 0;\r
+ pixperframe = (dword)(gvar->video.page[0].width*gvar->video.page[0].height)/frames;\r
+ screenseg = SCREENSEG;\r
+\r
+ IN_StartAck (gvar);\r
+\r
+// modexClearRegion(&(gvar->video.page[0]), 0, 0, gvar->video.page[0].width, gvar->video.page[0].height, 0);\r
+// modexClearRegion(&(gvar->video.page[1]), 0, 0, gvar->video.page[0].width, gvar->video.page[0].height, 15);\r
+\r
+#ifdef __WATCOMC__\r
+ __asm {\r
+ mov [esorig],es\r
+ }\r
+#endif\r
+// TimeCount=\r
+ frame=0;\r
+ do // while (1)\r
+ {\r
+ if (abortable && IN_CheckAck (gvar) )\r
+ return true;\r
+\r
+ __asm {\r
+ mov es,[screenseg]\r
+ }\r
+\r
+ for (p=0;p<pixperframe;p++)\r
+ {\r
+ __asm {\r
+ //\r
+ // seperate random value into x/y pair\r
+ //\r
+ mov ax,[WORD PTR rndval]\r
+ mov dx,[WORD PTR rndval+2]\r
+ mov bx,ax\r
+ dec bl\r
+ mov [BYTE PTR y],bl // low 8 bits - 1 = y xoordinate\r
+ mov bx,ax\r
+ mov cx,dx\r
+ mov [BYTE PTR x],ah // next 9 bits = x xoordinate\r
+ mov [BYTE PTR x+1],dl\r
+ //\r
+ // advance to next random element\r
+ //\r
+ shr dx,1\r
+ rcr ax,1\r
+ jnc noxor\r
+ xor dx,0x0001\r
+ xor ax,0x2000\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
+noxor:\r
+#ifdef __BORLANDC__\r
+ __asm {\r
+#endif\r
+ mov [WORD PTR rndval],ax\r
+ mov [WORD PTR rndval+2],dx\r
+ }\r
+\r
+ if (x>width || y>height)\r
+// if ((x>width || y>height) && (x<width*2 && y<height*2))\r
+ continue;\r
+// drawofs = source+(gvar->video.ofs.ylookup[y]) + (x>>2);\r
+ drawofs = source+(y*gvar->video.page[0].stridew) + (x>>2);\r
+\r
+ //\r
+ // copy one pixel\r
+ //\r
+ mask = x&3;\r
+ VGAREADMAP(mask);\r
+ mask = maskb[mask];\r
+ VGAMAPMASK(mask);\r
+\r
+ __asm {\r
+ mov di,[drawofs]\r
+ mov al,[es:di]\r
+ add di,[pagedelta]\r
+ mov [es:di],al\r
+ }\r
+\r
+ if (rndval == 1) // entire sequence has been completed\r
+ return false;\r
+ }\r
+ frame++;\r
+//-- while (TimeCount<frame){}//; // don't go too fast\r
+ delay(1);\r
+ } while (1);\r
+#ifdef __WATCOMC__\r
+ __asm {\r
+ mov es,[esorig]\r
+ }\r
+ return false;\r
+#endif\r
+}\r
+\r
+//===========================================================================\r
+\r
/*\r
==================\r
=\r
\r
US_CPrint ("Memory Usage");\r
US_CPrint ("------------");\r
- US_Print ("Total :");\r
+ US_Print ("Total :");\r
US_PrintUnsigned (mminfo.mainmem/1024);\r
- US_Print ("k\nFree :");\r
+ US_Print ("k\nFree :");\r
US_PrintUnsigned (MM_UnusedMemory()/1024);\r
US_Print ("k\nWith purge:");\r
US_PrintUnsigned (MM_TotalFree()/1024);\r
#ifdef __WATCOMC__\r
//IN_Ack ();\r
#endif\r
- if(q) MM_ShowMemory (gvar);\r
+// if(q) MM_ShowMemory (gvar);\r
}\r
\r
/*\r
\r
void ClearMemory (global_game_variables_t *gvar)\r
{\r
+#ifdef __16_PM__\r
PM_UnlockMainMem(gvar);\r
- //snd\r
+#endif\r
+ //sd\r
MM_SortMem (gvar);\r
}\r
\r
==========================\r
*/\r
\r
-void Quit (global_game_variables_t *gvar, char *error)\r
+void Quit (char *error)\r
{\r
- //unsigned finscreen;\r
+\r
+ //unsigned finscreen;\r
memptr screen=0;\r
\r
- ClearMemory (gvar);\r
+ ClearMemory (ggvv);\r
if (!*error)\r
{\r
// #ifndef JAPAN\r
// CA_CacheGrChunk (ERRORSCREEN);\r
// screen = grsegs[ERRORSCREEN];\r
}\r
- Shutdown16(gvar);\r
+ Shutdown16(ggvv);\r
\r
if (error && *error)\r
{\r
}\r
\r
//===========================================================================\r
+\r
#ifndef __WATCOMC__\r
char global_temp_status_text[512];\r
+char global_temp_status_text2[512];\r
#else\r
//\r
// for mary4 (XT)\r
void turboXT(byte bakapee)\r
{\r
__asm {\r
- push ax\r
- push bx\r
- push cx\r
- in al, 61h //; Read equipment flags\r
- xor al, bakapee //; toggle speed\r
- out 61h, al //; Write new flags back\r
-\r
- mov bx, 0F89h //; low pitch blip\r
- and al, 4 //; Is turbo mode set?\r
- jz @@do_beep\r
- mov bx, 52Eh //; high pitch blip\r
-\r
-@@do_beep:\r
- mov al, 10110110b //; Timer IC 8253 square waves\r
- out 43h, al //; channel 2, speaker\r
- mov ax, bx\r
- out 42h, al //; send low order\r
- mov al, ah //; load high order\r
- out 42h, al //; send high order\r
- in al, 61h //; Read IC 8255 machine status\r
- push ax\r
- or al, 00000011b\r
- out 61h, al //; Turn speaker on\r
- mov cx, 2000h\r
-@@delay:\r
- loop @@delay\r
- pop ax\r
- out 61h, al //; Turn speaker off\r
- pop cx\r
- pop bx\r
- pop ax\r
+ push ax\r
+ push bx\r
+ push cx\r
+ in al, 61h //; Read equipment flags\r
+ xor al, bakapee //; toggle speed\r
+ out 61h, al //; Write new flags back\r
+\r
+ mov bx, 0F89h //; low pitch blip\r
+ and al, 4 //; Is turbo mode set?\r
+ jz @@do_beep\r
+ mov bx, 52Eh //; high pitch blip\r
+\r
+ @@do_beep:\r
+ mov al, 10110110b //; Timer IC 8253 square waves\r
+ out 43h, al //; channel 2, speaker\r
+ mov ax, bx\r
+ out 42h, al //; send low order\r
+ mov al, ah //; load high order\r
+ out 42h, al //; send high order\r
+ in al, 61h //; Read IC 8255 machine status\r
+ push ax\r
+ or al, 00000011b\r
+ out 61h, al //; Turn speaker on\r
+ mov cx, 2000h\r
+ @@delay:\r
+ loop @@delay\r
+ pop ax\r
+ out 61h, al //; Turn speaker off\r
+ pop cx\r
+ pop bx\r
+ pop ax\r
}\r
}\r
#endif\r
\r
+const char *word_to_binary(word x)\r
+{\r
+ static char b[17];\r
+ int z;\r
+\r
+ b[0] = '\0';\r
+ for (z = 16; z > 0; z >>= 1)\r
+ {\r
+ strcat(b, ((x & z) == z) ? "1" : "0");\r
+ }\r
+ return b;\r
+}\r
+\r
const char *nibble_to_binary(nibble x)\r
{\r
static char b[9];\r
projects / 16.git / blobdiff