X-Git-Url: http://4ch.mooo.com/gitweb/?p=16.git;a=blobdiff_plain;f=src%2Flib%2F16_tail.c;h=7b5fdcb4de0c44ea65d8a5809290383c367d39d7;hp=a602a62b9d380e1b3fc89faa8647f10ac7e325e4;hb=af2715fef8681d909afe82f7baaf5e13baabb76f;hpb=16cb74317c1591986b9d856beb4c70ce875db179

diff --git a/src/lib/16_tail.c b/src/lib/16_tail.c
index a602a62b..7b5fdcb4 100755
--- a/src/lib/16_tail.c
+++ b/src/lib/16_tail.c
@@ -81,8 +81,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 +103,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,7 +114,9 @@ void Shutdown16(global_game_variables_t *gvar)
 #endif
 	CA_Shutdown(gvar);
 	MM_Shutdown(gvar);
+#ifdef __WATCOMC__
 	VGAmodeX(0, 1, gvar);
+#endif
 }
 
 
@@ -311,7 +318,9 @@ void DebugMemory_(global_game_variables_t *gvar, boolean q)
 
 void ClearMemory (global_game_variables_t *gvar)
 {
+#ifdef __16_PM__
 	PM_UnlockMainMem(gvar);
+#endif
 	//snd
 	MM_SortMem (gvar);
 }
@@ -372,56 +381,6 @@ void Quit (global_game_variables_t *gvar, char *error)
 }
 
 //===========================================================================
-//from http://stackoverflow.com/questions/2736753/how-to-remove-extension-from-file-name
-
-// remove_ext: removes the "extension" from a file spec.
-//   mystr is the string to process.
-//   dot is the extension separator.
-//   sep is the path separator (0 means to ignore).
-// Returns an allocated string identical to the original but
-//   with the extension removed. It must be freed when you're
-//   finished with it.
-// If you pass in NULL or the new string can't be allocated,
-//   it returns NULL.
-
-char *remove_ext (char* mystr, char dot, char sep) {
-	char *retstr, *lastdot, *lastsep;
-
-	// Error checks and allocate string.
-
-	if (mystr == NULL)
-		return NULL;
-	if ((retstr = malloc (strlen (mystr) + 1)) == NULL)
-		return NULL;
-
-	// Make a copy and find the relevant characters.
-
-	strcpy (retstr, mystr);
-	lastdot = strrchr (retstr, dot);
-	lastsep = (sep == 0) ? NULL : strrchr (retstr, sep);
-
-	// If it has an extension separator.
-
-	if (lastdot != NULL) {
-		// and it's before the extenstion separator.
-
-		if (lastsep != NULL) {
-			if (lastsep < lastdot) {
-				// then remove it.
-
-				*lastdot = '\0';
-			}
-		} else {
-			// Has extension separator with no path separator.
-
-			*lastdot = '\0';
-		}
-	}
-
-	// Return the modified string.
-
-	return retstr;
-}
 
 #ifndef __WATCOMC__
 char global_temp_status_text[512];
@@ -470,6 +429,19 @@ void turboXT(byte bakapee)
 }
 #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)
 {
 	static char b[9];