-/* Project 16 Source Code~
- * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669
- *
- * 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 should 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.
- *
- */
-/*
- input test
-*/
-#include "src/lib/16_mm.h"
-
-void
-main(int argc, char *argv[])
-{
- mminfo_t mm; mminfotype mmi;
- memptr bigbuffer;
- __segment segu;
- mm.mmstarted=0;
- printf("start!\n");
- MM_Startup(&mm, &mmi);
- printf("done!\n");
- printf("&main()=%Fp\n", *argv[0]);
- MM_GetPtr(&bigbuffer, mmi.nearheap, &mm, &mmi);
- //hmm functions in cache system use the buffered stuff
- printf("size of big buffer~=%ul\n", _bmsize(segu, bigbuffer));
- MM_ShowMemory(&mm);
- MM_Report(&mm, &mmi);
- printf("stop!\n");
- MM_FreePtr(&bigbuffer, &mm);
- MM_Shutdown(&mm);
- printf("done!\n");
-}
+/* 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 should 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
+ exmm test\r
+*/\r
+#include "src/lib/16_head.h"\r
+#include "src/lib/16_tail.h"\r
+#include "src/lib/16_pm.h"\r
+#include "src/lib/16_ca.h"\r
+#include "src/lib/16_mm.h"\r
+#include "src/lib/16_hc.h"\r
+//#include "src/lib/16_vl.h"\r
+#pragma hdrstop\r
+\r
+#pragma warn -pro\r
+#pragma warn -use\r
+\r
+//file load or read definition\r
+#define FILEREAD\r
+//#define EXMMVERBOSE\r
+\r
+void VGAmodeX(sword vq, boolean cmem, global_game_variables_t *gv)\r
+{\r
+ printf("VGAmodeX dummy:\n %Fp %Fp %Fp\n", &vq, &cmem, gv);\r
+}\r
+#define PRINTBB { printf("&main()= %Fp\n", argv[0]);printf("gvar.ca.tinf[0]= %Fp\n", gvar.ca.tinf[0]);printf("&gvar.ca.tinf[0]= %Fp\n", &gvar.ca.tinf[0]);printf("gvar.ca.tinf[0]= %04x\n", gvar.ca.tinf[0]);printf("&gvar.ca.tinf[0]= %04x\n", &gvar.ca.tinf[0]); }\r
+\r
+#ifdef __WATCOMC__\r
+void segatesuto()\r
+{\r
+ __segment screen;\r
+ char __based( void ) * scrptr;\r
+\r
+ screen = 0xB800;\r
+ scrptr = 0;\r
+ printf( "Top left character is '%c'.\n", *(screen:>scrptr) );\r
+// printf("Next string is: [");\r
+// while(*scrptr<16)\r
+// {\r
+// printf("%c", *(screen:>scrptr));\r
+// //printf("\b");\r
+// scrptr++;\r
+//\r
+// }\r
+// printf("]\n");\r
+// printf("press any key to continue!\n");\r
+// getch();\r
+}\r
+#endif\r
+//static global_game_variables_t gvar;\r
+\r
+void\r
+main(int argc, char *argv[])\r
+{\r
+ byte w=1;\r
+ static global_game_variables_t gvar;\r
+//#ifdef __WATCOMC__\r
+// __segment sega;\r
+//#endif\r
+ //static byte bakapee[64];\r
+ char *bakapee1, *bakapee2;\r
+ word baka;\r
+\r
+#ifdef __BORLANDC__\r
+ argc=argc;\r
+#endif\r
+ //file name //\r
+ bakapee1 = malloc(64);\r
+ bakapee2 = malloc(64);\r
+ //file name //\r
+\r
+#ifdef __DEBUG_PM__\r
+ dbg_debugpm=1; //debug pm\r
+#endif\r
+\r
+ //PRINTBB\r
+ if(argv[1]){ bakapee1 = argv[1];\r
+ if(argv[2]) bakapee2 = argv[2]; }\r
+ else{\r
+ //{ printf("filename!: "); scanf("%[^\n]", &bakapee); }\r
+ bakapee1 = "data/koishi~.pcx";\r
+ bakapee2 = "data/test.map";\r
+ }\r
+ //printf("main()=%Fp start MM\n", *argv[0]);\r
+ MM_Startup(&gvar);\r
+ //printf("ok\n");\r
+//#ifdef __WATCOMC__\r
+#ifdef __DEBUG_PM__\r
+ if(dbg_debugpm>0)\r
+ {\r
+#endif\r
+ PM_Startup(&gvar); PM_CheckMainMem(&gvar); PM_UnlockMainMem(&gvar);\r
+#ifdef __DEBUG_PM__\r
+ }\r
+#endif\r
+//#endif\r
+ CA_Startup(&gvar);\r
+// printf(" done!\n");\r
+ //0000PRINTBB;\r
+// printf("press any key to continue!\n");\r
+// getch();\r
+#ifdef FILEREAD\r
+for(w=0;w<2;w++)\r
+{\r
+// bakapeehandle = open(bakapee,O_RDONLY | O_BINARY, S_IREAD);\r
+// printf("size of big buffer~=%u\n", _bmsize(segu, gvar.ca.tinf[0]));\r
+// if(CA_FarRead(bakapeehandle,(void far *)&gvar.ca.tinf[0],sizeof(gvar.ca.tinf[0]),&gvar.mm))\r
+ if(w>0)\r
+ {\r
+ printf(" read\n");\r
+ if(CA_ReadFile(bakapee2, &gvar.ca.tinf[0], &gvar)) baka=1; else baka=0;\r
+ }\r
+#endif\r
+ if(w==0)\r
+ {\r
+ printf(" load\n");\r
+ if(CA_LoadFile(bakapee1, &gvar.ca.tinf[0], &gvar)) baka=1; else baka=0;\r
+ }\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, gvar.ca.tinf[0]));\r
+//#endif\r
+\r
+ printf("contents of the buffer\n[\n%s\n]\n", gvar.ca.tinf[0]);\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
+// DebugMemory_(&gvar, 1);\r
+ if(baka) printf("\nyay!\n");\r
+ else printf("\npoo!\n");\r
+ printf("press any key to continue!\n");\r
+ getch();\r
+#ifdef FILEREAD\r
+}\r
+#endif\r
+ DebugMemory_(&gvar, 1);\r
+ MM_DumpData(&gvar);\r
+ MM_Report_(&gvar);\r
+ //printf("bakapee1=%s\n", bakapee1);\r
+ //printf("bakapee2=%s\n", bakapee2);\r
+ MM_FreePtr(&gvar.ca.tinf[0], &gvar);\r
+//#ifdef __WATCOMC__\r
+#ifdef __DEBUG_PM__\r
+ if(dbg_debugpm>0)\r
+#endif\r
+ PM_Shutdown(&gvar);\r
+//#endif\r
+ CA_Shutdown(&gvar);\r
+ MM_Shutdown(&gvar);\r
+ free(bakapee1); free(bakapee2);\r
+ printf("========================================\n");\r
+ printf("near= %Fp ", gvar.mm.nearheap);\r
+ printf("far= %Fp", gvar.mm.farheap);\r
+ printf("\n");\r
+ printf("&near= %Fp ", &(gvar.mm.nearheap));\r
+ printf("&far= %Fp", &(gvar.mm.farheap));\r
+ printf("\n");\r
+#ifdef EXMMVERBOSE\r
+ printf("bigb= %Fp ", gvar.ca.tinf[0]);\r
+ //printf("bigbr= %04x", gvar.ca.tinf[0]);\r
+ //printf("\n");\r
+ printf("&bigb=%Fp ", &gvar.ca.tinf[0]);\r
+ //printf("&bigb=%04x", &gvar.ca.tinf[0]);\r
+ printf("\n");\r
+ printf("========================================\n");\r
+#endif\r
+#ifdef __WATCOMC__\r
+//this is far printf("Total free: %lu\n", (dword)(GetFreeSize()));\r
+ printf("Total near free: %lub\n", (dword)(GetNearFreeSize()));\r
+ printf("Total far free: %lub\n", (dword)(GetFarFreeSize()));\r
+ heapdump(&gvar);\r
+ segatesuto();\r
+#endif\r
+ printf("Project 16 exmmtest.exe. This is just a test file!\n");\r
+ printf("version %s\n", VERSION);\r
+ //printf("core left: %lu\n", (dword)_coreleft());\r
+ //printf("far core left: %lu\n", (dword)_farcoreleft());\r
+ //printf("based core left: %lu\n", (dword)_basedcoreleft());\r
+ //printf("huge core left: %lu\n", (dword)_hugecoreleft());\r
+}\r