X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2F16_dbg.c;h=854615b0fb3b02c3db97325c873f09a00518da30;hb=fd22359b3cf8abccf814365b79906b15a98c8e4e;hp=8fa25c3fd8d6385da2f46be082b5c52d6836a623;hpb=62a51803dc18b07a6d1c298220c2aaf553c802e7;p=16.git
diff --git a/src/lib/16_dbg.c b/src/lib/16_dbg.c
index 8fa25c3f..854615b0 100755
--- a/src/lib/16_dbg.c
+++ b/src/lib/16_dbg.c
@@ -1,3 +1,25 @@
+/* Project 16 Source Code~
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
+ *
+ * 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 , or
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,
+ * Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ */
+
#include "src/lib/16_dbg.h"
#ifdef __DEBUG__
@@ -11,7 +33,7 @@ boolean dbg_debugpm=0;
boolean dbg_debugca=0;
#endif
#ifdef __DEBUG_InputMgr__
-boolean dbg_testkeyin=0,dbg_testcontrolnoisy=0,dbg_nointest=0;
+boolean dbg_testkeyin=0,dbg_testcontrolnoisy=0,dbg_nointest=0,dbg_joymousedelta=0;
#endif
#ifdef __DEBUG_MAP__
boolean dbg_maptext=0;
@@ -25,80 +47,7 @@ boolean dbg_delayanimation=0;
#endif
#endif //debug
-#ifdef __WATCOMC__
-// TODO: Could we also provide a build mode to emit debug to the "Bochs E9 hack?"
-#ifdef DEBUGSERIAL
-# include
-# include
-# include
-
-unsigned char _DEBUG_INITed = 0;
-struct info_8250 *_DEBUG_uart = NULL;
-
-int _DEBUG_INIT() {
- if (!_DEBUG_INITed) {
- unsigned int i;
- uint16_t port;
-
- if (!init_8250()) return 0;
-
- // what does the BIOS say the serial ports are?
- probe_8250_bios_ports();
- for (i=0;i < bios_8250_ports;i++) {
- port = get_8250_bios_port(i);
- if (port == 0) continue;
- probe_8250(port);
- }
-
- // what about the standard serial ports?
- for (i=0;i < (sizeof(standard_8250_ports)/sizeof(standard_8250_ports[0]));i++) {
- port = standard_8250_ports[i];
- if (port == 0) continue;
- probe_8250(port);
- }
-
- // pick the first port, which is probably COM1
- if (base_8250_ports == 0) return 0; // FIXME: You know "base_8250_ports" is probably a bad variable name for the max entries in info_8250_port[]
- _DEBUG_uart = &info_8250_port[0];
- _DEBUG_INITed = 1;
-
- // init the COM port.
- // in DOSBox-X, the "log" mode will receive our text and print it into the log file
- // on real hardware, our text will likely go over a null modem cable to another PC running a serial terminal program like PuTTY or minicom.
- // if nothing is connected, then the bytes go off into the ether to get lost and life goes on.
- uart_8250_enable_interrupt(_DEBUG_uart,0); // disable interrupts
- uart_8250_set_FIFO(_DEBUG_uart,0x07); // enable FIFO (why not?), also clear xmit/recv FIFO buffers, set threshhold to 1 byte
- uart_8250_set_MCR(_DEBUG_uart,3); // RTS and DTS on
- uart_8250_set_line_control(_DEBUG_uart,UART_8250_LCR_8BIT | UART_8250_LCR_PARITY); // 8 bit 1 stop bit odd parity
- uart_8250_set_baudrate(_DEBUG_uart,uart_8250_baud_to_divisor(_DEBUG_uart,9600)); // 9600 baud
- }
-
- return _DEBUG_INITed;
-}
-void _DEBUG(const char *msg) {
- if (_DEBUG_uart != NULL) {
- char c;
-
- while ((c=(*msg++)) != 0/*NUL*/) {
- while (!uart_8250_can_write(_DEBUG_uart)); // wait for the UART to indicate readiness for our output
- uart_8250_write(_DEBUG_uart,(uint8_t)c); // then write it
- }
- }
-}
-
-static char _DEBUGF_TMP[256];
-
-void _DEBUGF(const char *fmt,...) {
- va_list va;
-
- va_start(va,fmt);
- vsnprintf(_DEBUGF_TMP,sizeof(_DEBUGF_TMP),fmt,va);
- _DEBUG(_DEBUGF_TMP);
- va_end(va);
-}
-#endif //serial
-#endif //watcomc
/*
================
=
@@ -108,7 +57,7 @@ void _DEBUGF(const char *fmt,...) {
*/
#pragma warn -pia
-void ShapeTest (global_game_variables_t *gvar)
+void ShapeTest_(global_game_variables_t *gvar)
{
extern word NumDigi;
extern word _seg *DigiList;
@@ -266,8 +215,6 @@ static char buf[10];
{}
// SD_Poll();
-//if(IN_KeyDown(sc_Escape)) break;
-
IN_ClearKey(scan);
switch (scan)
{
@@ -310,3 +257,157 @@ static char buf[10];
//SD_StopDigitized();
}
#pragma warn +pia
+
+#ifdef __WATCOMC__
+#ifdef __DEBUG_VL__
+
+//===========================================================================
+
+/*
+================
+=
+= ShowPalVarSync
+=
+================
+*/
+
+//#define SHOWPALVARIMODQUAD ((spv.i)%QUADWH)
+#define SHOWPALVARIMOD ((spv.i)%TILEWH)
+#define SHOWPALVARIDIV ((spv.i)/TILEWH)
+#define SHOWPALVARIMODIFCOND if((!SHOWPALVARIMOD) && spv.i)
+#define SHOWPALVARIDIVIFCOND if((!SHOWPALVARIDIV) && spv.i)
+//video.page[0], result.palx+TILEWH, result.paly+TILEWH, result.mult, result.mult, result.i);
+ return result;
+}
+
+/*
+================
+=
+= ShowPalVal
+=
+================
+*/
+
+void ShowPalVal (global_game_variables_t *gvar)
+{
+ boolean done ,err;
+ ScanCode scan;
+ spv_t spv;
+ word ccolor = 3, xpos = gvar->video.page[0].dx, ypos = gvar->video.page[0].dy;
+
+ spv.mult=(QUADWH);
+ spv.palq=(spv.mult)*TILEWH;
+ spv.i = 0;
+
+// IN_UserInput(1, gvar);
+ modexpdump(0, gvar);
+
+ for (spv.oi = 1,done = false;!done;)
+ {
+ SHOWPALVARIMODIFCOND
+ {
+ if(err) printf("SHOWPALVARIMODIFCOND\n");
+ if(spv.i==SHOWPALVARPALSIZELIMIT) spv.paly=(TILEWH*8)+spv.mult*SHOWPALVARIDIV;
+ spv.palx=(TILEWH*12);
+ }else spv.palx=(TILEWH*12)+spv.mult*SHOWPALVARIMOD;
+ if(spv.ivideo.page[0], spv.palx+TILEWH, spv.paly+TILEWH, spv.mult, spv.mult, 5);
+ modexClearRegion(&gvar->video.page[0], spv.palx+TILEWH+1, spv.paly+TILEWH+1, spv.mult-2, spv.mult-2, spv.i);
+ spv.oi = spv.i;
+ }
+
+#define SHOWPALVARPRINT modexprint(&(gvar->video.page[0]), xpos, ypos, 1, 1, ccolor, 8, gvar->video.VL_Started, global_temp_status_text); ypos+=8;
+ sprintf(global_temp_status_text, "%03u", spv.i); SHOWPALVARPRINT
+ sprintf(global_temp_status_text, "r %03u", gvar->video.palette[(spv.i*3)+0]/*>>2*/); SHOWPALVARPRINT
+ sprintf(global_temp_status_text, "g %03u", gvar->video.palette[(spv.i*3)+1]/*>>2*/); SHOWPALVARPRINT
+ sprintf(global_temp_status_text, "b %03u", gvar->video.palette[(spv.i*3)+2]/*>>2*/); SHOWPALVARPRINT
+ xpos = gvar->video.page[0].dx; ypos = gvar->video.page[0].dy;
+
+ while (!(scan = gvar->in.inst->LastScan))
+ {}
+
+ IN_ClearKey(scan);
+ switch (scan)
+ {
+ case sc_LeftArrow:
+ if (spv.i > 0)
+ {
+ spv.i--;
+ }
+ else
+ {
+ spv.palx=gvar->video.page[0].sw-spv.mult;
+ spv.paly=gvar->video.page[0].sh-spv.mult;
+ spv.i = SHOWPALVARPALSIZELIMIT;
+ }
+ break;
+ case sc_RightArrow:
+ if (spv.i < SHOWPALVARPALSIZELIMIT)
+ {
+ spv.i++;
+ }
+ else
+ {
+ spv.palx=TILEWH*12;
+ spv.paly=TILEWH*8;
+ spv.i = 0;
+ }
+ break;
+ case sc_UpArrow:
+ if (spv.i > 0)
+ {
+ spv.i-=16;
+ }
+ else
+ {
+ spv.palx=gvar->video.page[0].sw-spv.mult;
+ spv.paly=gvar->video.page[0].sh-spv.mult;
+ spv.i = SHOWPALVARPALSIZELIMIT;
+ }
+ break;
+ case sc_DownArrow:
+ if (spv.i < SHOWPALVARPALSIZELIMIT)
+ {
+ spv.i+=16;
+ }
+ else
+ {
+ spv.palx=TILEWH*12;
+ spv.paly=TILEWH*8;
+ spv.i = 0;
+ }
+ break;
+ case sc_W: // Walls
+ spv.i = 0;
+ break;
+ case sc_Escape:
+ done = true;
+ break;
+ }
+ }
+// IN_UserInput(1, gvar);
+}
+#endif //debug vl
+#endif //watcomc