/* 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
/*\r
exmm test\r
*/\r
-#include <malloc.h> // for _memavl()\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_dbg.h"\r
-\r
-#pragma hdrstop\r
-\r
-#pragma warn -pro\r
-#pragma warn -use\r
-\r
-//file load or read definition\r
-#define FILEREADLOAD\r
-#define FILEREAD\r
-//#define EXMMVERBOSE\r
-//#define BUFFDUMPPAUSE\r
-//#define EXMMVERBOSE__\r
-// #define PRINTBBDUMP\r
-#define BUFFDUMP\r
-#ifdef __BORLANDC__\r
-#define NOVID\r
-#endif\r
-#ifdef __WATCOMC__\r
-#define NOVID\r
-#endif\r
-\r
-\r
-#define KEYP IN_Shutdown(&gvar); printf("\n\npress any key to continue!\n"); getch(); IN_Startup(&gvar);\r
-\r
-#define BBUFNAME gvar.mm.bufferseg//bigbuffer\r
-//#define INITBBUF static memptr BBUFNAME;\r
-#define BBUFPTR MEMPTR BBUFNAME\r
-\r
-#ifdef __BORLANDC__\r
-#define BBUF (memptr *)BBUFPTR\r
-#define BBUFSTRING (memptr *)BBUFNAME\r
-#endif\r
-#ifdef __WATCOMC__\r
-#define BBUF BBUFNAME\r
-#define BBUFSTRING BBUF\r
-#endif\r
+#include "src/exmmtest.h"\r
\r
////////////////////////////////////////////////////////////////////////////\r
#ifdef NOVID\r
-void VL_Startup (global_game_variables_t *gvar){}\r
-void VL_Shutdown (global_game_variables_t *gvar){}\r
+void VL_Startup (global_game_variables_t *gvar){ gvar=gvar; }\r
+void VL_Shutdown (global_game_variables_t *gvar){ gvar=gvar; }\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
\r
-word modexPalOverscan(word col)\r
+word\r
+VL_modexPalOverscan(byte *p, word col)\r
{\r
+ int i;\r
//modexWaitBorder();\r
+// vga_wait_for_vsync();\r
outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */\r
- outp(PAL_DATA_REG, col);\r
+ for(i=col; i<(3+col); i++)\r
+ {\r
+ outp(PAL_DATA_REG, p[i]);\r
+ }\r
+// modexPalSave(p);\r
return col;\r
}\r
void TL_VidInit(global_game_variables_t *gvar)\r
{\r
gvar->video.old_mode = 3;\r
}\r
+\r
+void VL_print(const byte *str, nibble pagenum, global_game_variables_t *gvar){ printf("%s\n", str); }\r
+\r
+#ifdef __WATCOMC__\r
+void VL_ShowPage(page_t *page, boolean vsync, boolean sr){}\r
+void modexClearRegion(page_t *page, int x, int y, int w, int h, byte color){}\r
+void modexprint(page_t *page, sword x, sword y, word t, boolean tlsw, word color, word bgcolor, boolean vidsw, const byte *str){ printf("%s\n", str); }\r
+void modexpdump(nibble pagenum, global_game_variables_t *gvar){}\r
+#endif\r
#endif\r
\r
-//printf("* %Fp\t", *BBUF);\r
-//printf("* %04x\t", *BBUF);\r
-#define PRINTBB {\\r
- printf("-------------------------------------------------------------------------------\n");\\r
- printf("&main()= %Fp\n", argv[0]);\\r
- printf("buffer:\n");\\r
- printf(" %Fp\t", BBUF);\\r
- printf("&%Fp\n", BBUFPTR);\\r
- printf(" %04x\t", BBUF);\\r
- printf("& %04x\n", BBUFPTR);\\r
- printf("-------------------------------------------------------------------------------\n");\\r
-}\r
- //printf("&main()= %Fp\n", *argv[0]);\r
- //printf("bigbuffer= %Fp\n", bigbuffer);\r
- //printf("&bigbuffer= %Fp\n", &bigbuffer);\r
- //printf("bigbuffer= %04x\n", bigbuffer);\r
- //printf("&bigbuffer= %04x\n", &bigbuffer);\r
#ifdef __WATCOMC__\r
void segatesuto()\r
{\r
}\r
#endif\r
\r
+#ifdef SCROLLLOAD\r
+#define FILENAME_1 "data/spri/chikyuu.vrs"\r
+#define FILENAME_2 "data/test.map"\r
+#else\r
+#define FILENAME_1 "data/spri/chikyuu.sht"\r
+#define FILENAME_2 "data/test.map"\r
+#endif\r
+\r
//===========================================================================//\r
\r
//=======================================//\r
void\r
main(int argc, char *argv[])\r
{\r
- byte w;\r
- #ifndef NOVID\r
- boolean done;\r
- ScanCode scan;\r
- #endif\r
static global_game_variables_t gvar;\r
#ifdef INITBBUF\r
INITBBUF\r
#endif\r
-#if 0\r
-//#ifdef __WATCOMC__\r
- __segment sega;\r
-#endif\r
- char bakapee1[64] = "data/koishi~.pcx";\r
- char bakapee2[64] = "data/test.map";\r
- word baka;\r
+\r
+ char bakapee1[64] = FILENAME_1;\r
+ char bakapee2[64] = FILENAME_2;\r
\r
#ifdef __BORLANDC__\r
argc=argc;\r
\r
if(argv[1]){ strcpy(bakapee1, argv[1]);//bakapee1[] = *argv[1];\r
if(argv[2]) strcpy(bakapee2, argv[2]); }//bakapee2[] = argv[2]; }\r
-#if 0\r
- else{\r
- //{ printf("filename!: "); scanf("%[^\n]", &bakapee); }\r
- strcpy(bakapee1, "data/koishi~.pcx"); //bakapee1 = "data/koishi~.pcx";\r
- strcpy(bakapee2, "data/test.map"); //bakapee2 = "data/test.map";\r
- }\r
-#endif\r
+\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
+ modexPalSave(&gvar.video.dpal); //modexFadeOff(4, &gvar.video.dpal); //modexPalBlack();\r
#else //NOVID\r
- //printf("main()=%Fp start MM\n", *argv[0]);\r
- MM_Startup(&gvar);\r
- #ifdef __16_PM__\r
- #ifdef __DEBUG_PM__\r
- if(dbg_debugpm>0)\r
- {\r
- #endif //__DEBUG_PM__\r
- PM_Startup(&gvar); PM_CheckMainMem(&gvar); PM_UnlockMainMem(&gvar);\r
- //0000printf("PM Started\n"); KEYP\r
- #ifdef __DEBUG_PM__\r
- }\r
- #endif //__DEBUG_PM__\r
- #endif //__16_PM__\r
+ StartupCAMMPM(&gvar);\r
#endif //elsed NOVID\r
-\r
- CA_Startup(&gvar);\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
if(CA_LoadFile(bakapee1, BBUFPTR, &gvar)) baka=1; else baka=0;\r
printf("====================================load end===================================\n");\r
}\r
- //#ifdef __WATCOMC__\r
- // printf("\nsize of big buffer~=%u\n", _bmsize(sega, BBUF));\r
- //#endif\r
#ifdef BUFFDUMP\r
- printf("contents of the buffer\n[\n%s\n]\n", BBUFSTRING);\r
- #endif// #else\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
- //endif // BUFFDUMP\r
-\r
//printf("dark purple = purgable\n");\r
//printf("medium blue = non purgable\n");\r
//printf("red = locked\n");\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
-#ifdef __WATCOMC__\r
#ifndef NOVID\r
- VGAmodeX(1, 0, &gvar);\r
-// modexPalUpdate0(&gvar.video.palette);\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
-\r
+#endif\r
+//0000++++ 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
IN_ClearKey(scan);\r
switch (scan)\r
{\r
- case sc_Space:\r
- MM_ShowMemory(&gvar);\r
- break;\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
}\r
}\r
- VGAmodeX(0, 0, &gvar);\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
-// MM_ShowMemory(&gvar);\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
#ifndef NOVID\r
Shutdown16(&gvar);\r
#else //novid\r
- #ifdef __16_PM__\r
- #ifdef __DEBUG_PM__\r
- if(dbg_debugpm>0)\r
- #endif //__DEBUG_PM__\r
- PM_Shutdown(&gvar);\r
- #endif //__16_PM__\r
- CA_Shutdown(&gvar);\r
- MM_Shutdown(&gvar);\r
+ ShutdownCAMMPM(&gvar);\r
#endif //NOVID\r
IN_Shutdown(&gvar);\r
printf("========================================\n");\r
printf("========================================\n");\r
\r
#ifdef EXMMVERBOSE__\r
- printf("coreleft(): %u\n", _memavl());\r
- printf("farcoreleft(): %lu\n", (dword)HC_farcoreleft());\r
+ printf("coreleft(): %u\n", coreleft());\r
+ printf("farcoreleft(): %ld\n", farcoreleft());\r
#endif\r
#ifdef __WATCOMC__\r
//this is far printf("Total free: %lu\n", (dword)(HC_GetFreeSize()));\r
// printf("HC_farcoreleft(): %lu\n", (dword)HC_farcoreleft());\r
//printf("HC_GetNearFreeSize(): %u\n", HC_GetNearFreeSize());\r
//printf("HC_GetFarFreeSize(): %lu\n", (dword)HC_GetFarFreeSize());\r
- HC_heapdump(&gvar);\r
// segatesuto();\r
#endif\r
-/*#ifdef __BORLANDC__\r
- //printf("core left: %lu\n", (dword)HC_coreleft());\r
- //printf("far core left: %lu\n", (dword)HC_farcoreleft());\r
-// printf("\nfarcoreleft(): %lu\n", farcoreleft());\r
-#endif*/\r
+#ifdef __BORLANDC__\r
+// printf("HC_coreleft: %lu\n", (dword)HC_coreleft());\r
+// printf("HC_farcoreleft: %lu\n", (dword)HC_farcoreleft());\r
+// printf("HC_Newfarcoreleft(): %lu\n", (dword)HC_Newfarcoreleft());\r
+#endif\r
+ HC_heapdump(&gvar);\r
printf("Project 16 ");\r
#ifdef __WATCOMC__\r
printf("exmmtest");\r
#endif\r
printf("\n");\r
#endif\r
+// printf("curr_mode=%u\n", gvar.video.curr_mode);\r
+// VL_PrintmodexmemInfo(&gvar.video);\r
//printf("old_mode=%u VL_Started=%u", gvar.video.old_mode, gvar.video.VL_Started);\r
//printf("based core left: %lu\n", (dword)_basedcoreleft());\r
//printf("huge core left: %lu\n", (dword)_hugecoreleft());\r
OSDN Git Service
