X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Fexmmtest.c;h=7e3bd8de5e46b49a7029ec360f266a5869793113;hb=6cb7af40446a399db9f56ba66d8db74a1a1f3181;hp=f3871eadebe45611d53a8c7d4314fbfc4a92037d;hpb=981ffd8bd2be618a691c663df8436244175b96ef;p=16.git

diff --git a/src/exmmtest.c b/src/exmmtest.c
index f3871ead..7e3bd8de 100755
--- a/src/exmmtest.c
+++ b/src/exmmtest.c
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
  *
  * This file is part of Project 16.
  *
@@ -22,21 +22,45 @@
 /*
 	exmm test
 */
-#include "src/lib/16_head.h"
-#include "src/lib/16_ca.h"
-#include "src/lib/16_mm.h"
-#include "src/lib/16_hc.h"
-//#include "src/lib/modex16.h"
-#pragma hdrstop
+#include "src/exmmtest.h"
 
-#pragma warn -pro
-#pragma warn -use
+////////////////////////////////////////////////////////////////////////////
+#ifdef NOVID
+void VL_Startup (global_game_variables_t *gvar){ gvar=gvar; }
+void VL_Shutdown (global_game_variables_t *gvar){ gvar=gvar; }
+void VGAmodeX(sword vq, boolean cmem, global_game_variables_t *gv)
+{
+	printf("VGAmodeX dummy:\n	%Fp	%Fp	%Fp\n", &vq, &cmem, gv);
+}
 
-//file load or read definition
-#define FILERL
-//#define FILEREAD
+word
+VL_modexPalOverscan(byte *p, word col)
+{
+	int i;
+	//modexWaitBorder();
+//	vga_wait_for_vsync();
+	outp(PAL_WRITE_REG, 0);  /* start at the beginning of palette */
+	for(i=col; i<(3+col); i++)
+	{
+		outp(PAL_DATA_REG, p[i]);
+	}
+//	modexPalSave(p);
+	return col;
+}
+void	TL_VidInit(global_game_variables_t *gvar)
+{
+	gvar->video.old_mode = 3;
+}
 
-#define PRINTBB { printf("&main()=	%Fp\n", argv[0]);printf("bigbuffer=	%Fp\n", bigbuffer);printf("&bigbuffer=	%Fp\n", &bigbuffer);printf("bigbuffer=	%04x\n", bigbuffer);printf("&bigbuffer=	%04x\n", &bigbuffer); }
+void VL_print(const byte *str, nibble pagenum, global_game_variables_t *gvar){ printf("%s\n", str); }
+
+#ifdef __WATCOMC__
+void VL_ShowPage(page_t *page, boolean vsync, boolean sr){}
+void modexClearRegion(page_t *page, int x, int y, int w, int h, byte color){}
+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); }
+void modexpdump(nibble pagenum, global_game_variables_t *gvar){}
+#endif
+#endif
 
 #ifdef __WATCOMC__
 void segatesuto()
@@ -47,134 +71,294 @@ void segatesuto()
 	screen = 0xB800;
 	scrptr = 0;
 	printf( "Top left character is '%c'.\n", *(screen:>scrptr) );
-	printf("Next string is: [");
-	while(*scrptr<16)
-	{
-		printf("%c", *(screen:>scrptr));
-		//printf("\b");
-		scrptr++;
-
-	}
-	printf("]\n");
-	printf("press any key to continue!\n");
-	getch();
+// 	printf("Next string is: [");
+// 	while(*scrptr<16)
+// 	{
+// 		printf("%c", *(screen:>scrptr));
+// 		//printf("\b");
+// 		scrptr++;
+//
+// 	}
+// 	printf("]\n");
+//	KEYP
 }
 #endif
 
+#ifdef SCROLLLOAD
+#define FILENAME_1	"data/spri/chikyuu.vrs"
+#define FILENAME_2	"data/test.map"
+#else
+#define FILENAME_1	"data/spri/chikyuu.sht"
+#define FILENAME_2	"data/test.map"
+#endif
+
+//===========================================================================//
+
+//=======================================//
+
+//	main
+
+//=======================================//
 void
 main(int argc, char *argv[])
 {
-	global_game_variables_t gvar;
-#ifdef __WATCOMC__
-	__segment sega;
+	static global_game_variables_t gvar;
+								#ifdef INITBBUF
+	INITBBUF
+								#endif
+
+	char bakapee1[64] = FILENAME_1;
+	char bakapee2[64] = FILENAME_2;
+
+		#ifdef __BORLANDC__
+			argc=argc;
+		#endif
+
+								#ifdef PRINTBBDUMP
+								//0000PRINTBB; KEYP
+								#endif
+#ifdef __16_PM__
+#ifdef __DEBUG_PM__
+	dbg_debugpm=1;	//debug pm
+#endif
+#endif
+#ifdef __DEBUG_CA__
+	dbg_debugca=1;
+#endif
+#ifdef __DEBUG_MM__
+	dbg_debugmm=1;
+#endif
+
+	if(argv[1]){ strcpy(bakapee1, argv[1]);//bakapee1[] = *argv[1];
+	if(argv[2]) strcpy(bakapee2, argv[2]); }//bakapee2[] = argv[2]; }
+
+	printf("bakapee1[%s]\n", bakapee1);
+	printf("bakapee2[%s]\n", bakapee2);
+								#ifdef EXMMVERBOSE__
+	printf("coreleft():		%u\n", coreleft());
+	printf("farcoreleft():		%ld\n", farcoreleft());
+								#endif
+	printf("stackavail()=%u\n", stackavail());
+	KEYP
+
+								#ifndef NOVID
+	Startup16(&gvar);
+	// save the palette
+	modexPalSave(&gvar.video.dpal); //modexFadeOff(4, &gvar.video.dpal); //modexPalBlack();
+								#else //NOVID
+	StartupCAMMPM(&gvar);
+								#endif //elsed NOVID
+								#ifdef PRINTBBDUMP
+								//0000
+PRINTBB; KEYP
+								#endif
+
+	IN_Default(0,&gvar.player[0],ctrl_Keyboard1, &gvar);
+	IN_SetControlType(&gvar.player[0],ctrl_Keyboard1);
+
+	{
+	byte w;	word baka;
+	w=0;
+								#ifdef FILEREADLOAD
+								#ifdef FILEREAD
+	for(;w<2;w++)
+	{
+	//	printf("size of big buffer~=%u\n", _bmsize(segu, BBUF));
+		if(w>0)
+		{
+			printf("======================================read=====================================\n");
+			if(CA_ReadFile(bakapee2, BBUFPTR, &gvar)) baka=1; else baka=0;
+			printf("====================================read end===================================\n");
+		}
+								#endif //FILEREAD
+		if(w==0)
+		{
+			printf("======================================load=====================================\n");
+			if(CA_LoadFile(bakapee1, BBUFPTR, &gvar)) baka=1; else baka=0;
+			printf("====================================load end===================================\n");
+		}
+								#ifdef BUFFDUMP
+		{
+			size_t file_s;
+			FILE *fh;
+
+			if(!w)	fh = fopen(bakapee1, "r");
+			else	fh = fopen(bakapee2, "r");
+			file_s = filesize(fh);
+			fclose(fh);
+		printf("contents of the buffer\n[\n%.*s\n]\n", file_s, BBUFSTRING);
+#if 0
+//0000
+// 			mmblocktype far *scan;
+// 			scan = gvar.mm.mmhead;
+// 			while (scan->useptr != &BBUFNAME && scan)
+// 			{
+// 				scan = scan->next;
+// 			}
+// 			printf("\n	%Fp	%Fp\n", scan->useptr, &BBUFNAME);
+			printf("\nstrlen of buffer = %zu\n", strlen(BBUFSTRING));
+			printf("length of buffer = %zu\n", file_s);
+//			printf("length of buffer = %lu\n", scan->length);
 #endif
-	memptr bigbuffer;
+		}
+								#endif
+								#ifdef PRINTBBDUMP
+		PRINTBB;
+								#endif
 
-#ifdef FILERL
-	//static byte bakapee[64];
-	char *bakapee;
-	word baka;
+		//printf("dark purple = purgable\n");
+		//printf("medium blue = non purgable\n");
+		//printf("red = locked\n");
+	//	KEYP
+	//	DebugMemory_(&gvar, 1);
+		if(baka) printf("\nyay!\n");
+		else printf("\npoo!\n");
+								#ifdef BUFFDUMPPAUSE
+		KEYP
+								#endif
+								#ifdef FILEREAD
+	}
+								#endif
+								#endif	//filereadload
+	}
+
+							#ifdef SCROLLLOAD
+	CA_loadmap(bakapee2, &gvar.map, &gvar);	//BREAKS!
+//	newloadmap(bakapee2, &gvar.map);
+	VRS_LoadVRS(bakapee1, &gvar.player[0].enti, &gvar);
+//	HC_heapdump(&gvar);
+	KEYP
+							#endif	//scrollload
+
+#ifndef NOVID
+	VGAmodeX(8, 0, &gvar); VL_LoadPalFileCore(&gvar.video.palette, &gvar);
+	VL_ClearVideo (0);
+	modexHiganbanaPageSetup(&gvar);
+	gvar.video.page[0].dx = gvar.video.page[0].dy = 0;
+//	VL_modexPalScramble(&gvar.video.palette);
+	{
+		unsigned temp;
+		temp = BDOFSCONV gvar.video.BOFS;
+		gvar.video.BOFS = gvar.video.DOFS;
+		MU_IntroScreen(&gvar);
+		gvar.video.BOFS = (byte __far *)temp;
+	}
+//	ShapeTest_(&gvar);
 #endif
+	MM_ShowMemory(&gvar);
+#if 0
+	{
+	boolean			done;
+	ScanCode		scan;
+	for (done = false;!done;)
+	{
+		while (!(scan = gvar.in.inst->LastScan))
+		{}
+	//			SD_Poll();
 
-#ifdef __BORLANDC__
-	argc=argc;
-#endif
-#ifdef FILERL
-	bakapee = malloc(64);
-#endif
-	gvar.mm.mmstarted=0;
-
-	//PRINTBB
-#ifdef FILERL
-	if(argv[1]) bakapee = argv[1];
-	else
-	//{ printf("filename!: "); scanf("%[^\n]", &bakapee); }
-	bakapee = "data/koishi~.pcx";
-#endif
-
-//	printf("main()=%Fp	start MM\n", *argv[0]);
-	MM_Startup(&gvar.mm, &gvar.mmi);
-	//PM_Startup();
-	//PM_UnlockMainMem();
-	CA_Startup(&gvar);
-//	printf("		done!\n");
-	PRINTBB;
-	printf("press any key to continue!\n");
-	getch();
-#ifdef FILERL
-//	bakapeehandle = open(bakapee,O_RDONLY | O_BINARY, S_IREAD);
-//	printf("size of big buffer~=%u\n", _bmsize(segu, bigbuffer));
-//	if(CA_FarRead(bakapeehandle,(void far *)&bigbuffer,sizeof(bigbuffer),&gvar.mm))
-#ifdef FILEREAD
-	printf("		read\n");
-	if(CA_ReadFile(bakapee, &bigbuffer, &gvar))
-#else
-	printf("		load\n");
-	if(CA_LoadFile(bakapee, &bigbuffer, &gvar))
-#endif
-		baka=1;
-	else
-		baka=0;
-//	close(bakapeehandle);
-	//hmm functions in cache system use the buffered stuff
-#ifdef __WATCOMC__
-	printf("\nsize of big buffer~=%u\n", _bmsize(sega, bigbuffer));
-#endif
-#endif
-	printf("press any key to continue!\n");
-	getch();
-	printf("\n\ncontents of the buffer\n[\n%s\n]\n", bigbuffer);
-	//printf("dark purple = purgable\n");
-	//printf("medium blue = non purgable\n");
-	//printf("red = locked\n");
-	printf("press any key to continue!\n");
-	getch();
-	MM_ShowMemory(&gvar, &gvar.mm);
-	//getch();
-	MM_DumpData(&gvar.mm);
-	MM_Report(&gvar);
-//	printf("		stop!\n");
-	printf("press any key to continue!\n");
-	getch();
-#ifdef FILERL
-	MM_FreePtr(&bigbuffer, &gvar.mm);
-#endif
-	//PM_Shutdown();
-	CA_Shutdown(&gvar);
-	MM_Shutdown(&gvar.mm);
-//	printf("		done!\n");
-#ifdef FILERL
-	free(bakapee);
-	if(baka) printf("\nyay!\n");
-	else printf("\npoo!\n");
+		IN_ClearKey(scan);
+		switch (scan)
+		{
+//			case sc_Space:
+//				MM_ShowMemory(&gvar);
+//			break;
+//#ifdef __WATCOMC__
+			case sc_O:
+				VL_modexPalScramble(&gvar.video.palette); modexpdump(&gvar.video.page);
+			break;
+			case sc_P:
+				modexpdump(&gvar.video.page[0]);
+			break;
+			case sc_V:
+				VL_PatternDraw(&gvar.video, 0, 1, 1);
+			break;
+//#endif
+			default:
+			case sc_Escape:
+				done = true;
+			break;
+		}
+	}
+}
 #endif
+#ifndef NOVID
+	if(gvar.video.VL_Started)
+		VL_Shutdown (&gvar);//VGAmodeX(0, 0, gvar);
+	modexFadeOn(4, gvar.video.dpal);
+#endif
+	DebugMemory_(&gvar, 1);
+	MM_DumpData(&gvar);
+	KEYP
+	MM_Report_(&gvar);
+	//printf("bakapee1=%s\n", bakapee1);
+	//printf("bakapee2=%s\n", bakapee2);
+	MM_FreePtr(BBUFPTR, &gvar);
+								#ifndef NOVID
+	Shutdown16(&gvar);
+								#else //novid
+	ShutdownCAMMPM(&gvar);
+								#endif //NOVID
+	IN_Shutdown(&gvar);
 	printf("========================================\n");
-	printf("near=	%Fp ", gvar.mm.nearheap);
-	printf("far=	%Fp", gvar.mm.farheap);
+	printf("near=	%Fp ",	gvar.mm.nearheap);
+	printf("far=	%Fp",			gvar.mm.farheap);
 	printf("\n");
-	printf("&near=	%Fp ", &(gvar.mm.nearheap));
-	printf("&far=	%Fp", &(gvar.mm.farheap));
+	printf("&near=	%Fp ",	&(gvar.mm.nearheap));
+	printf("&far=	%Fp",		&(gvar.mm.farheap));
 	printf("\n");
-#ifdef EXMMVERBOSE
-	printf("bigb=	%Fp ", bigbuffer);
-	//printf("bigbr=	%04x", bigbuffer);
+								#ifdef EXMMVERBOSE
+	printf("bigb=	%Fp ",	BBUF);
+	//printf("bigbr=	%04x",	BBUF);
 	//printf("\n");
-	printf("&bigb=%Fp ", &bigbuffer);
-	//printf("&bigb=%04x", &bigbuffer);
+	printf("&bigb=%Fp ",		BBUFPTR);
+	//printf("&bigb=%04x",		BBUFPTR);
 	printf("\n");
-#endif
+								#endif
 	printf("========================================\n");
+
+								#ifdef EXMMVERBOSE__
+	printf("coreleft():		%u\n", coreleft());
+	printf("farcoreleft():		%ld\n", farcoreleft());
+								#endif
+#ifdef __WATCOMC__
+//this is far	printf("Total free:			%lu\n", (dword)(HC_GetFreeSize()));
+//super buggy	printf("HC_coreleft():			%u\n", HC_coreleft());
+//	printf("HC_farcoreleft():			%lu\n", (dword)HC_farcoreleft());
+	//printf("HC_GetNearFreeSize():		%u\n", HC_GetNearFreeSize());
+	//printf("HC_GetFarFreeSize():			%lu\n", (dword)HC_GetFarFreeSize());
+//	segatesuto();
+#endif
+#ifdef __BORLANDC__
+//	printf("HC_coreleft:			%lu\n", (dword)HC_coreleft());
+//	printf("HC_farcoreleft:			%lu\n", (dword)HC_farcoreleft());
+//	printf("HC_Newfarcoreleft():		%lu\n", (dword)HC_Newfarcoreleft());
+#endif
+	HC_heapdump(&gvar);
+	printf("Project 16 ");
 #ifdef __WATCOMC__
-//this is far	printf("Total free:			%lu\n", (dword)(GetFreeSize()));
-	printf("Total near free:		%lu\n", (dword)(GetNearFreeSize()));
-	printf("Total far free:			%lu\n", (dword)(GetFarFreeSize()));
-	heapdump(&gvar);
-	segatesuto();
+	printf("exmmtest");
+#endif
+#ifdef __BORLANDC__
+	printf("bcexmm");
 #endif
-	printf("Project 16 emmtest.exe. This is just a test file!\n");
+	printf(".exe. This is just a test file!\n");
 	printf("version %s\n", VERSION);
-	//printf("core left:			%lu\n", (dword)_coreleft());
-	//printf("far core left:			%lu\n", (dword)_farcoreleft());
+
+//end of program
+
+
+#if defined(__DEBUG__) && ( defined(__DEBUG_PM__) || defined(__DEBUG_MM__) )
+#ifdef __DEBUG_MM__
+	printf("debugmm: %u\t", dbg_debugmm);
+#endif
+#ifdef __DEBUG_PM__
+	printf("debugpm: %u", dbg_debugpm);
+#endif
+	printf("\n");
+#endif
+//	printf("curr_mode=%u\n", gvar.video.curr_mode);
+//	VL_PrintmodexmemInfo(&gvar.video);
+	//printf("old_mode=%u	VL_Started=%u", gvar.video.old_mode, gvar.video.VL_Started);
 	//printf("based core left:			%lu\n", (dword)_basedcoreleft());
 	//printf("huge core left:			%lu\n", (dword)_hugecoreleft());
 }