-/* 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.
- *
- */
-
-#include "src/lib/16_head.h"
-
+/* Project 16 Source Code~\r
+ * Copyright (C) 2012-2016 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
+#include "src/lib/16_head.h"\r
+\r
/* Function: Wait **********************************************************\r
*\r
* Parameters: wait - time in microseconds\r
\r
goal = wait + clock();\r
while((goal > clock()) && !kbhit()) ;\r
-} /* End of wait */
-
-long int
+} /* End of wait */\r
+\r
+long int\r
filesize(FILE *fp)\r
{\r
long int save_pos, size_of_file;\r
size_of_file = ftell(fp);\r
fseek(fp, save_pos, SEEK_SET);\r
return(size_of_file);\r
-}
-
-void printmeminfoline(byte *strc, const byte *pee, size_t h_total, size_t h_used, size_t h_free)
-{
- byte str[64];
- strcat(strc,pee); strcat(strc," "); ultoa((dword)h_total,str,10); strcat(strc,str); strcat(strc," "); ultoa((dword)h_used,str,10); strcat(strc,str); strcat(strc," "); ultoa((dword)h_free,str,10); strcat(strc,str);
- strcat(strc,"\n");
-}
-
-void print_normal_entry(char *text, dword total, dword used, dword free, byte *str)
-{
- printf("%-17s", text);
- convert("%8sB ", total);
- convert("%9sB ", used);
- convert("%9sB\n", free);
-}
-
-/*
- * As for printf(), but format may only contain a single format specifier,
- * which must be "%s" and is replaced with the string form of num with commas
- * separating groups of three digits.
- *
- * e.g. convert("%s bytes", 1234567) -> "1,234,567 bytes"
- */
-void convert(const char *format, dword num)
-{
- int c, i, j, n;
- char des[4*sizeof(dword)+3];
- union REGS regs;
- struct SREGS sregs;
- char mycountry[48]; /* probably 34 bytes are enough... */
- char ksep = ','; /* or . */
-
- regs.x.ax = 0x3800;
- sregs.ds = FP_SEG(&mycountry);
- regs.x.dx = FP_OFF(&mycountry);
- intdosx(®s,®s,&sregs);
- if (regs.x.cflag == 0) {
- ksep = mycountry[7]; /* 1000's separator */
- /* dsep = mycountry[9]; ** decimal separator */
- }
-
- n = sprintf(des, "%lu", num);
- /* insert commas in the string */
- c = 3;
- for (i = n - 3; i > 0; i--) {
- if (c%3==0) {
- for (j = n; j >= i; j--)
- des[j+1] = des[j];
- des[i]=ksep; /* ',' */
- n++;
- }
- c++;
- }
- printf(format, des);
-}
-
+}\r
+\r
+void printmeminfoline(byte *strc, const byte *pee, size_t h_total, size_t h_used, size_t h_free)\r
+{\r
+ byte str[64];\r
+ strcat(strc,pee); strcat(strc," "); ultoa((dword)h_total,str,10); strcat(strc,str);\r
+ if(strlen(str)<=4) strcat(strc," "); //printf("%u\n", strlen(str));\r
+ strcat(strc," "); ultoa((dword)h_used,str,10); strcat(strc,str); strcat(strc," "); strcat(strc," ");\r
+ ultoa((dword)h_free,str,10); strcat(strc,str);\r
+ strcat(strc,"\n");\r
+}\r
+\r
///////////////////////////////////////////////////////////////////////////\r
//\r
// US_CheckParm() - checks to see if a string matches one of a set of\r
}\r
}\r
return(-1);\r
-}
-
+}\r
+#ifdef __BORLANDC__\r
+//===========================================================================\r
+\r
/*\r
==========================\r
=\r
==========================\r
*/\r
\r
-/*void Quit(char *error, ...)\r
+void Quit (char *error)\r
{\r
- short exit_code=0;\r
- unsigned finscreen;\r
-\r
- va_list ap;\r
-\r
- va_start(ap,error);\r
+ unsigned finscreen;\r
+ memptr screen;\r
+ union REGS in, out;\r
\r
-#ifndef CATALOG\r
- if (!error)\r
+ //ClearMemory ();\r
+ if (!*error)\r
{\r
- CA_SetAllPurge ();\r
- CA_CacheGrChunk (PIRACY);\r
- finscreen = (unsigned)grsegs[PIRACY];\r
+ //WriteConfig ();\r
+ }\r
+ else\r
+ {\r
+ //CA_CacheGrChunk (ERRORSCREEN);\r
+ //screen = grsegs[ERRORSCREEN];\r
}\r
-#endif\r
\r
//ShutdownId ();\r
+ //IN_Shutdown();\r
+ //modexLeave();\r
+ in.h.ah = 0x00;\r
+ in.h.al = 0x3;\r
+ int86(0x10, &in, &out);\r
\r
if (error && *error)\r
{\r
- vprintf(error,ap);\r
- exit_code = 1;\r
+ movedata ((unsigned)screen,7,0xb800,0,7*160);\r
+ //gotoxy (10,4);\r
+ puts(error);\r
+ //gotoxy (1,8);\r
+ exit(1);\r
}\r
-#ifndef CATALOG\r
else\r
- if (!NoWait)\r
+ if (!error || !(*error))\r
{\r
- movedata (finscreen,0,0xb800,0,4000);\r
- bioskey (0);\r
+ //clrscr();\r
+ //#ifndef JAPAN\r
+ movedata ((unsigned)screen,7,0xb800,0,4000);\r
+ //gotoxy(1,24);\r
+ //#endif\r
+//asm mov bh,0\r
+//asm mov dh,23 // row\r
+//asm mov dl,0 // collumn\r
+//asm mov ah,2\r
+//asm int 0x10\r
}\r
-#endif\r
\r
- va_end(ap);\r
+ exit(0);\r
+}\r
\r
-#ifndef CATALOG\r
- if (!error)\r
- {\r
- _argc = 2;\r
- _argv[1] = "LAST.SHL";\r
- _argv[2] = "ENDSCN.SCN";\r
- _argv[3] = NULL;\r
- if (execv("LOADSCN.EXE", _argv) == -1)\r
- {\r
- clrscr();\r
- puts("Couldn't find executable LOADSCN.EXE.\n");\r
- exit(1);\r
- }\r
- }\r
+//===========================================================================\r
#endif\r
\r
- exit(exit_code);\r
-}*/
+byte dirchar(byte in)\r
+{\r
+ byte out;\r
+ switch(in)\r
+ {\r
+ case 0: //up\r
+ out = 0x1E;\r
+ break;\r
+ case 4: //down\r
+ out = 0x1F;\r
+ break;\r
+ case 1: //left\r
+ out = 0x11;\r
+ break;\r
+ case 3: //right\r
+ out = 0x10;\r
+ break;\r
+ default: //null\r
+ out = 0xB3;\r
+ break;\r
+ }\r
+ return out;\r
+}\r
projects / 16.git / blobdiff