X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2F16_tail.c;h=6b08e0fb9180cd4e7fac221625cc7aba8ecf455b;hb=243e22dc4fb6ae069348ac984f79ae7827747be1;hp=ece035e2a59980447a6dad7c4d2330e8e3c5a725;hpb=701917b90fcc490c3c8ab645be369a7aad5c1b45;p=16.git

diff --git a/src/lib/16_tail.c b/src/lib/16_tail.c
index ece035e2..6b08e0fb 100755
--- a/src/lib/16_tail.c
+++ b/src/lib/16_tail.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.
  *
@@ -20,7 +20,7 @@
  *
  */
 /*
- * 16 library
+ * 16 tail library
  */
 
 #include "src/lib/16_tail.h"
@@ -38,40 +38,8 @@
 
 void Startup16(global_game_variables_t *gvar)
 {
-#ifdef __WATCOMC__
-	start_timer(gvar);
-
-	// DOSLIB: check our environment
-	probe_dos();
-
-	// DOSLIB: what CPU are we using?
-	// NTS: I can see from the makefile Sparky4 intends this to run on 8088 by the -0 switch in CFLAGS.
-	//      So this code by itself shouldn't care too much what CPU it's running on. Except that other
-	//      parts of this project (DOSLIB itself) rely on CPU detection to know what is appropriate for
-	//      the CPU to carry out tasks. --J.C.
-	cpu_probe();
-
-	// DOSLIB: check for VGA
-	if (!probe_vga()) {
-		printf("VGA probe failed\n");
-		return;
-	}
-	// hardware must be VGA or higher!
-	if (!(vga_state.vga_flags & VGA_IS_VGA)) {
-		printf("This program requires VGA or higher graphics hardware\n");
-		return;
-	}
-
-	if (_DEBUG_INIT() == 0) {
-#ifdef DEBUGSERIAL
-		printf("WARNING: Failed to initialize DEBUG output\n");
-#endif
-	}
-	_DEBUG("Serial debug output started\n"); // NTS: All serial output must end messages with newline, or DOSBox-X will not emit text to log
-	_DEBUGF("Serial debug output printf test %u %u %u\n",1U,2U,3U);
-
-	textInit();
-#endif
+	gvar->video.VL_Started=0;
+	TL_VidInit(gvar);
 	gvar->mm.mmstarted=0;
 	gvar->pm.PMStarted=0;
 	MM_Startup(gvar);
@@ -81,8 +49,11 @@ void Startup16(global_game_variables_t *gvar)
 #endif
 	IN_Startup(gvar);
 #endif
+#ifdef __16_PM__
 	PM_Startup(gvar);
+	PM_CheckMainMem(gvar);
 	PM_UnlockMainMem(gvar);
+#endif
 	CA_Startup(gvar);
 }
 
@@ -100,7 +71,9 @@ void Startup16(global_game_variables_t *gvar)
 
 void Shutdown16(global_game_variables_t *gvar)
 {
+#ifdef __16_PM__
 	PM_Shutdown(gvar);
+#endif
 #ifdef __WATCOMC__
 #ifdef __DEBUG_InputMgr__
 	if(!dbg_nointest)
@@ -109,9 +82,12 @@ void Shutdown16(global_game_variables_t *gvar)
 #endif
 	CA_Shutdown(gvar);
 	MM_Shutdown(gvar);
+#ifdef __WATCOMC__
+	if(gvar->video.VL_Started)
+		VL_Shutdown (gvar);//VGAmodeX(0, 1, gvar);
+#endif
 }
 
-
 //===========================================================================
 
 /*
@@ -124,10 +100,10 @@ void Shutdown16(global_game_variables_t *gvar)
 
 /*void ReadConfig(void)
 {
-	int                     file;
-	SDMode          sd;
-	SMMode          sm;
-	SDSMode         sds;
+	int					 file;
+	SDMode		  sd;
+	SMMode		  sm;
+	SDSMode		 sds;
 
 
 	if ( (file = open(configname,O_BINARY | O_RDONLY)) != -1)
@@ -226,7 +202,7 @@ void Shutdown16(global_game_variables_t *gvar)
 
 /*void WriteConfig(void)
 {
-	int                     file;
+	int					 file;
 
 	file = open(configname,O_CREAT | O_BINARY | O_WRONLY,
 				S_IREAD | S_IWRITE | S_IFREG);
@@ -259,6 +235,128 @@ void Shutdown16(global_game_variables_t *gvar)
 
 //===========================================================================
 
+/*
+===================
+=
+= FizzleFade
+=
+===================
+*/
+
+boolean FizzleFade (unsigned source, unsigned dest, unsigned width, unsigned height, unsigned frames, boolean abortable, global_game_variables_t *gvar)
+{
+	word		p,pixperframe;
+	unsigned	drawofs,pagedelta;
+	byte 		mask,maskb[8] = {1,2,4,8};
+	unsigned	x,y,frame;
+	long		rndval;
+	word		screenseg;
+#ifdef __WATCOMC__
+	unsigned	esorig;//,q;
+#endif
+
+	pagedelta = dest-source;
+	rndval = 1;
+#ifdef __WATCOMC__
+	esorig = 0;// q = 16;
+#endif
+	x = y = 0;
+	pixperframe = (dword)(gvar->video.page[0].width*gvar->video.page[0].height)/frames;
+	screenseg = SCREENSEG;
+
+	IN_StartAck (gvar);
+
+//	modexClearRegion(&(gvar->video.page[0]), 0, 0, gvar->video.page[0].width, gvar->video.page[0].height, 0);
+//	modexClearRegion(&(gvar->video.page[1]), 0, 0, gvar->video.page[0].width, gvar->video.page[0].height, 15);
+
+#ifdef __WATCOMC__
+	__asm {
+		mov	[esorig],es
+	}
+#endif
+//	TimeCount=
+	frame=0;
+	do	// while (1)
+	{
+		if (abortable && IN_CheckAck (gvar) )
+			return true;
+
+		__asm {
+			mov	es,[screenseg]
+		}
+
+		for (p=0;p<pixperframe;p++)
+		{
+			__asm {
+				//
+				// seperate random value into x/y pair
+				//
+				mov	ax,[WORD PTR rndval]
+				mov	dx,[WORD PTR rndval+2]
+				mov	bx,ax
+				dec	bl
+				mov	[BYTE PTR y],bl			// low 8 bits - 1 = y xoordinate
+				mov	bx,ax
+				mov	cx,dx
+				mov	[BYTE PTR x],ah			// next 9 bits = x xoordinate
+				mov	[BYTE PTR x+1],dl
+				//
+				// advance to next random element
+				//
+				shr	dx,1
+				rcr	ax,1
+				jnc	noxor
+				xor	dx,0x0001
+				xor	ax,0x2000
+#ifdef __BORLANDC__
+			}
+#endif
+noxor:
+#ifdef __BORLANDC__
+			__asm {
+#endif
+				mov	[WORD PTR rndval],ax
+				mov	[WORD PTR rndval+2],dx
+			}
+
+			if (x>width || y>height)
+//			if ((x>width || y>height) && (x<width*2 && y<height*2))
+				continue;
+//			drawofs = source+(gvar->video.ofs.ylookup[y]) + (x>>2);
+			drawofs = source+(y*gvar->video.page[0].stridew) + (x>>2);
+
+			//
+			// copy one pixel
+			//
+			mask = x&3;
+			VGAREADMAP(mask);
+			mask = maskb[mask];
+			VGAMAPMASK(mask);
+
+			__asm {
+				mov	di,[drawofs]
+				mov	al,[es:di]
+				add	di,[pagedelta]
+				mov	[es:di],al
+			}
+
+			if (rndval == 1)		// entire sequence has been completed
+				return false;
+		}
+		frame++;
+//--		while (TimeCount<frame){}//;		// don't go too fast
+		delay(1);
+	} while (1);
+#ifdef __WATCOMC__
+	__asm {
+		mov	es,[esorig]
+	}
+	return false;
+#endif
+}
+
+//===========================================================================
+
 /*
 ==================
 =
@@ -274,9 +372,9 @@ void DebugMemory_(global_game_variables_t *gvar, boolean q)
 
 	US_CPrint ("Memory Usage");
 	US_CPrint ("------------");
-	US_Print ("Total     :");
+	US_Print ("Total	 :");
 	US_PrintUnsigned (mminfo.mainmem/1024);
-	US_Print ("k\nFree      :");
+	US_Print ("k\nFree	  :");
 	US_PrintUnsigned (MM_UnusedMemory()/1024);
 	US_Print ("k\nWith purge:");
 	US_PrintUnsigned (MM_TotalFree()/1024);
@@ -297,7 +395,7 @@ void DebugMemory_(global_game_variables_t *gvar, boolean q)
 #ifdef __WATCOMC__
 	//IN_Ack ();
 #endif
-	if(q) MM_ShowMemory (gvar);
+//	if(q) MM_ShowMemory (gvar);
 }
 
 /*
@@ -310,8 +408,10 @@ void DebugMemory_(global_game_variables_t *gvar, boolean q)
 
 void ClearMemory (global_game_variables_t *gvar)
 {
+#ifdef __16_PM__
 	PM_UnlockMainMem(gvar);
-	//snd
+#endif
+	//sd
 	MM_SortMem (gvar);
 }
 
@@ -325,7 +425,7 @@ void ClearMemory (global_game_variables_t *gvar)
 
 void Quit (global_game_variables_t *gvar, char *error)
 {
-	//unsigned        finscreen;
+	//unsigned		finscreen;
 	memptr	screen=0;
 
 	ClearMemory (gvar);
@@ -346,7 +446,7 @@ void Quit (global_game_variables_t *gvar, char *error)
 
 	if (error && *error)
 	{
-		movedata((unsigned)screen,7,0xb800,0,7*160);
+		//movedata((unsigned)screen,7,0xb800,0,7*160);
 		gotoxy (10,4);
 		fprintf(stderr, "%s\n", error);
 		gotoxy (1,8);
@@ -372,21 +472,64 @@ void Quit (global_game_variables_t *gvar, char *error)
 
 //===========================================================================
 
-void walktypeinfo(player_t *player, word pn)
+#ifndef __WATCOMC__
+char global_temp_status_text[512];
+char global_temp_status_text2[512];
+#else
+//
+// for mary4 (XT)
+// this is from my XT's BIOS
+// http://www.phatcode.net/downloads.php?id=101
+//
+void turboXT(byte bakapee)
 {
-	switch(player[pn].walktype)
-	{
-		case 0:	//bump
-			sprintf(global_temp_status_text, "%s", "b");
-		break;
-		case 1:	//walk no scroll
-			sprintf(global_temp_status_text, "%s", "w");
-		break;
-		case 2:	//scrolling walk
-			sprintf(global_temp_status_text, "%s", "s");
-		break;
+	__asm {
+		push	ax
+		push	bx
+		push	cx
+		in	al, 61h 			//; Read equipment flags
+		xor	al, bakapee			//;   toggle speed
+		out	61h, al 			//; Write new flags back
+
+		mov	bx, 0F89h			//; low pitch blip
+		and	al, 4				//; Is turbo mode set?
+		jz	@@do_beep
+		mov	bx, 52Eh			//; high pitch blip
+
+	@@do_beep:
+		mov	al, 10110110b		//; Timer IC 8253 square waves
+		out	43h, al 			//;   channel 2, speaker
+		mov	ax, bx
+		out	42h, al 			//;   send low order
+		mov	al, ah				//;   load high order
+		out	42h, al 			//;   send high order
+		in	al, 61h 			//; Read IC 8255 machine status
+		push	ax
+		or	al, 00000011b
+		out	61h, al 			//; Turn speaker on
+		mov	cx, 2000h
+	@@delay:
+		loop	@@delay
+		pop	ax
+		out	61h, al 			//; Turn speaker off
+		pop	cx
+		pop	bx
+		pop	ax
 	}
+}
+#endif
+
+const char *word_to_binary(word x)
+{
+	static char b[17];
+	int z;
 
+	b[0] = '\0';
+	for (z = 16; z > 0; z >>= 1)
+	{
+		strcat(b, ((x & z) == z) ? "1" : "0");
+	}
+	return b;
 }
 
 const char *nibble_to_binary(nibble x)