-#ifdef __BORLANDC__\r
- argc=argc;\r
-#endif\r
- bakapee = malloc(64);\r
- gvar.mm.mmstarted=0;\r
-\r
- //PRINTBB\r
- if(argv[1]) bakapee = argv[1];\r
- else\r
- //{ printf("filename!: "); scanf("%[^\n]", &bakapee); }\r
- bakapee = "data/koishi~.pcx";\r
-\r
-// printf("main()=%Fp start MM\n", *argv[0]);\r
- MM_Startup(&gvar.mm, &gvar.mmi);\r
- //PM_Startup();\r
- //PM_UnlockMainMem();\r
- CA_Startup(&gvar);\r
-// printf(" done!\n");\r
- PRINTBB;\r
-// printf("press any key to continue!\n");\r
-// getch();\r
-\r
-// bakapeehandle = open(bakapee,O_RDONLY | O_BINARY, S_IREAD);\r
-// printf("size of big buffer~=%u\n", _bmsize(segu, bigbuffer));\r
-// if(CA_FarRead(bakapeehandle,(void far *)&bigbuffer,sizeof(bigbuffer),&gvar.mm))\r
-#ifdef FILEREAD\r
- printf(" read\n");\r
- if(CA_ReadFile(bakapee, &bigbuffer, &gvar))\r
-#else\r
- printf(" load\n");\r
- if(CA_LoadFile(bakapee, &bigbuffer, &gvar))\r
-#endif\r
- baka=1;\r
- else\r
- baka=0;\r
-// close(bakapeehandle);\r
- //hmm functions in cache system use the buffered stuff\r
-#ifdef __WATCOMC__\r
- printf("\nsize of big buffer~=%u\n", _bmsize(sega, bigbuffer));\r
-#endif\r
-\r
- printf("contents of the buffer\n[\n%s\n]\n", bigbuffer);\r
- //printf("dark purple = purgable\n");\r
- //printf("medium blue = non purgable\n");\r
- //printf("red = locked\n");\r
- printf("press any key to continue!\n");\r
- getch();\r
- MM_ShowMemory(&gvar, &gvar.mm);\r
- MM_DumpData(&gvar.mm);\r
- MM_Report(&gvar);\r
- printf("press any key to continue!\n");\r
- getch();\r
- MM_FreePtr(&bigbuffer, &gvar.mm);\r
- //PM_Shutdown();\r
- CA_Shutdown(&gvar);\r
- MM_Shutdown(&gvar.mm);\r
- free(bakapee);\r
- if(baka) printf("\nyay!\n");\r
- else printf("\npoo!\n");\r
+ printf("bakapee1[%s]\n", bakapee1);\r
+ printf("bakapee2[%s]\n", bakapee2);\r
+ #ifdef EXMMVERBOSE__\r
+ printf("coreleft(): %u\n", coreleft());\r
+ printf("farcoreleft(): %ld\n", farcoreleft());\r
+ #endif\r
+ printf("stackavail()=%u\n", stackavail());\r
+ KEYP\r
+\r
+ #ifndef NOVID\r
+ Startup16(&gvar);\r
+ // save the palette\r
+ modexPalSave(&gvar.video.dpal); //modexFadeOff(4, &gvar.video.dpal); //modexPalBlack();\r
+ #else //NOVID\r
+ StartupCAMMPM(&gvar);\r
+ #endif //elsed NOVID\r
+ #ifdef PRINTBBDUMP\r
+ //0000\r
+PRINTBB; KEYP\r
+ #endif\r
+\r
+ IN_Default(0,&gvar.player[0],ctrl_Keyboard1, &gvar);\r
+ IN_SetControlType(&gvar.player[0],ctrl_Keyboard1);\r
+\r
+ {\r
+ byte w; word baka;\r
+ w=0;\r
+ #ifdef FILEREADLOAD\r
+ #ifdef FILEREAD\r
+ for(;w<2;w++)\r
+ {\r
+ // printf("size of big buffer~=%u\n", _bmsize(segu, BBUF));\r
+ if(w>0)\r
+ {\r
+ printf("======================================read=====================================\n");\r
+ if(CA_ReadFile(bakapee2, BBUFPTR, &gvar)) baka=1; else baka=0;\r
+ printf("====================================read end===================================\n");\r
+ }\r
+ #endif //FILEREAD\r
+ if(w==0)\r
+ {\r
+ printf("======================================load=====================================\n");\r
+ if(CA_LoadFile(bakapee1, BBUFPTR, &gvar)) baka=1; else baka=0;\r
+ printf("====================================load end===================================\n");\r
+ }\r
+ #ifdef BUFFDUMP\r
+ {\r
+ size_t file_s;\r
+ FILE *fh;\r
+\r
+ if(!w) fh = fopen(bakapee1, "r");\r
+ else fh = fopen(bakapee2, "r");\r
+ file_s = filesize(fh);\r
+ fclose(fh);\r
+ printf("contents of the buffer\n[\n%.*s\n]\n", file_s, BBUFSTRING);\r
+#if 0\r
+//0000\r
+// mmblocktype far *scan;\r
+// scan = gvar.mm.mmhead;\r
+// while (scan->useptr != &BBUFNAME && scan)\r
+// {\r
+// scan = scan->next;\r
+// }\r
+// printf("\n %Fp %Fp\n", scan->useptr, &BBUFNAME);\r
+ printf("\nstrlen of buffer = %zu\n", strlen(BBUFSTRING));\r
+ printf("length of buffer = %zu\n", file_s);\r
+// printf("length of buffer = %lu\n", scan->length);\r
+#endif\r
+ }\r
+ #endif\r
+ #ifdef PRINTBBDUMP\r
+ PRINTBB;\r
+ #endif\r
+\r
+ //printf("dark purple = purgable\n");\r
+ //printf("medium blue = non purgable\n");\r
+ //printf("red = locked\n");\r
+ // KEYP\r
+ // DebugMemory_(&gvar, 1);\r
+ if(baka) printf("\nyay!\n");\r
+ else printf("\npoo!\n");\r
+ #ifdef BUFFDUMPPAUSE\r
+ KEYP\r
+ #endif\r
+ #ifdef FILEREAD\r
+ }\r
+ #endif\r
+ #endif //filereadload\r
+ }\r
+\r
+ #ifdef SCROLLLOAD\r
+ CA_loadmap(bakapee2, &gvar.map, &gvar); //BREAKS!\r
+// newloadmap(bakapee2, &gvar.map);\r
+ VRS_LoadVRS(bakapee1, &gvar.player[0].enti, &gvar);\r
+// HC_heapdump(&gvar);\r
+ KEYP\r
+ #endif //scrollload\r
+\r
+#ifndef NOVID\r
+ VGAmodeX(8, 0, &gvar); VL_LoadPalFileCore(&gvar.video.palette, &gvar);\r
+ VL_ClearVideo (0);\r
+ modexHiganbanaPageSetup(&gvar);\r
+ gvar.video.page[0].dx = gvar.video.page[0].dy = 0;\r
+// VL_modexPalScramble(&gvar.video.palette);\r
+ {\r
+ unsigned temp;\r
+ temp = BDOFSCONV gvar.video.BOFS;\r
+ gvar.video.BOFS = gvar.video.DOFS;\r
+ MU_IntroScreen(&gvar);\r
+ gvar.video.BOFS = (byte __far *)temp;\r
+ }\r
+// ShapeTest_(&gvar);\r
+#endif\r
+//0000++++\r
+ MM_ShowMemory(&gvar);\r
+#if 0\r
+ {\r
+ boolean done;\r
+ ScanCode scan;\r
+ for (done = false;!done;)\r
+ {\r
+ while (!(scan = gvar.in.inst->LastScan))\r
+ {}\r
+ // SD_Poll();\r
+\r
+ IN_ClearKey(scan);\r
+ switch (scan)\r
+ {\r
+// case sc_Space:\r
+// MM_ShowMemory(&gvar);\r
+// break;\r
+//#ifdef __WATCOMC__\r
+ case sc_O:\r
+ VL_modexPalScramble(&gvar.video.palette); modexpdump(&gvar.video.page);\r
+ break;\r
+ case sc_P:\r
+ modexpdump(&gvar.video.page[0]);\r
+ break;\r
+ case sc_V:\r
+ VL_PatternDraw(&gvar.video, 0, 1, 1);\r
+ break;\r
+//#endif\r
+ default:\r
+ case sc_Escape:\r
+ done = true;\r
+ break;\r
+ }\r
+ }\r
+}\r
+#endif\r
+#ifndef NOVID\r
+ if(gvar.video.VL_Started)\r
+ VL_Shutdown (&gvar);//VGAmodeX(0, 0, gvar);\r
+ modexFadeOn(4, gvar.video.dpal);\r
+#endif\r
+ DebugMemory_(&gvar, 1);\r
+ MM_DumpData(&gvar);\r
+ KEYP\r
+ MM_Report_(&gvar);\r
+ //printf("bakapee1=%s\n", bakapee1);\r
+ //printf("bakapee2=%s\n", bakapee2);\r
+ MM_FreePtr(BBUFPTR, &gvar);\r
+ #ifndef NOVID\r
+ Shutdown16(&gvar);\r
+ #else //novid\r
+ ShutdownCAMMPM(&gvar);\r
+ #endif //NOVID\r
+ IN_Shutdown(&gvar);\r