OSDN Git Service

updated copyleft and need to test and fix newer version of open watcom
[proj16/16.git] / src / lib / 16_head.c
index b371d10..593d572 100755 (executable)
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~\r
- * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ * Copyright (C) 2012-2022 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
  *\r
  * This file is part of Project 16.\r
  *\r
 \r
 #include "src/lib/16_head.h"\r
 \r
+//cpu reg stuff for _AX, _BX, _CX, _DX\r
+#ifdef __WATCOMC__\r
+union regs CPURegs;\r
+#endif\r
+\r
 // big global status text buffer\r
 char global_temp_status_text[512];\r
 char global_temp_status_text2[512];\r
@@ -210,3 +215,143 @@ void hres (void)
                int     10h\r
        }\r
 }\r
+\r
+//#define REGIDUMP_HEX\r
+#define REGIDUMP_DUMPFLAGS\r
+//#define REGIDUMP_USE_CAPS    //uncomment to use the assembly\r
+//regester dump~\r
+void regidump()\r
+{\r
+       //GENERAL PURPOSE\r
+       unsigned short _ax,_bx,_cx,_dx;\r
+#ifndef __BORLANDC__\r
+       unsigned short _cflag;\r
+#endif\r
+       unsigned char _al,_ah,_bl,_bh,_cl,_ch,_dl,_dh;\r
+\r
+       unsigned short _bp,_si,_di,_sp;\r
+\r
+       unsigned short _cs_,_ds_,_es_,_ss_;     //SEGMENT\r
+//     unsigned short _ip;     //SPECIAL PURPOSE\r
+       _ax=_bx=_cx=_dx=_si=_di=_bp=_sp=_cs_=_ds_=_es_=_ss_=0;\r
+#ifndef __BORLANDC__\r
+       _cflag=0;\r
+#endif\r
+       _ah=_al=_bh=_bl=_ch=_cl=_dh=_dl=0;\r
+\r
+#ifndef REGIDUMP_USE_CAPS\r
+       __asm {\r
+               mov _ax,ax\r
+               mov _bx,bx\r
+               mov _cx,cx\r
+               mov _dx,dx\r
+\r
+               mov _si,si\r
+               mov _di,di\r
+\r
+               /*mov _ip,ip\r
+\r
+               mov _cf,cf\r
+               mov _pf,pf\r
+               mov _af,af\r
+               mov _zf,zf\r
+               mov _sf,sf\r
+               mov _tf,tf\r
+               mov _if,if\r
+               mov _df,df\r
+               mov _of,of*/\r
+               mov _ah,ah\r
+               mov _al,al\r
+               mov _bh,bh\r
+               mov _bl,bl\r
+               mov _ch,ch\r
+               mov _cl,cl\r
+               mov _dh,dh\r
+               mov _dl,dl\r
+       }\r
+#else\r
+_ax=_AX;\r
+_bx=_BX;\r
+_cx=_CX;\r
+_dx=_DX;\r
+\r
+_si=_SI;\r
+_di=_DI;\r
+\r
+_ah=_AH;\r
+_al=_AL;\r
+_bh=_BH;\r
+_bl=_BL;\r
+_ch=_CH;\r
+_cl=_CL;\r
+_dh=_DH;\r
+_dl=_DL;\r
+#endif\r
+#ifndef __BORLANDC__\r
+       _cflag=_CFLAG;\r
+#endif\r
+       __asm {\r
+               mov _bp,bp\r
+               mov _sp,sp\r
+\r
+               mov _cs_,cs\r
+               mov _ds_,ds\r
+               mov _es_,es\r
+               mov _ss_,ss\r
+       }\r
+//     printf("integer values: ax=%04d bx=%04d cx=%04d dx=%04d\n", a, b, c, d);\r
+//     printf("unsigned values:ax=%04u bx=%04u cx=%04u dx=%04u\n", a, b, c, d);\r
+       printf("================================================================================");\r
+       printf("16 bit 8088 register values\n");\r
+       printf("================================================================================");\r
+       printf("general purpose:\n");\r
+#ifndef REGIDUMP_HEX\r
+       printf("        ax=%04u\n       bx=%04u\n       cx=%04u\n       dx=%04u\n\n", _ax, _bx, _cx, _dx);\r
+       printf("        si=%04u\n       di=%04u\n       bp=%04u\n       sp=%04u\n", _si, _di, _bp, _sp);\r
+#else\r
+       printf("        ax=%04x\n       bx=%04x\n       cx=%04x\n       dx=%04x\n\n", _ax, _bx, _cx, _dx);\r
+       printf("        si=%04x\n       di=%04x\n       bp=%04x\n       sp=%04x\n", _si, _di, _bp, _sp);\r
+#endif\r
+       printf("                ---------------------------------------\n");\r
+\r
+\r
+\r
+       printf("segment:\n");\r
+#ifndef REGIDUMP_HEX\r
+       //printf("      cs=%04u\n       ds=%04u\n       es=%04u\n       ss=%04u\n", _cs_, _ds, _es_, _ss_);\r
+       printf("        cs=%04u\n", _cs_);      printf("        ds=%04u\n", _ds_);      printf("        es=%04u\n", _es_);      printf("        ss=%04u\n", _ss_);\r
+#else\r
+       //printf("      cs=%04x\n       ds=%04x\n       es=%04x\n       ss=%04x\n", _cs_, _ds_, _es_, _ss_);\r
+       printf("        cs=%04x\n", _cs_);      printf("        ds=%04x\n", _ds_);      printf("        es=%04x\n", _es_);      printf("        ss=%04x\n", _ss_);\r
+#endif\r
+       printf("                ---------------------------------------\n");\r
+\r
+\r
+#ifndef __BORLANDC__\r
+       printf("cflags:\n");\r
+/*     printf("        ip=%04u\n\n", _ip);\r
+       printf("        cf=%04u\npf=%04u\naf=%04u\nzf=%04u\nsf=%04u\ntf=%04u\nif=%04u\ndf=%04u\nof=%04u\n", _cf, _pf, _af, _zf, _sf, _tf, _if, _df, _of);\r
+       printf("                ---------------------------------------\n");*/\r
+#ifdef REGIDUMP_DUMPFLAGS\r
+#ifndef REGIDUMP_HEX\r
+//     printf("        ip=%04u\n\n", _IP);\r
+//     printf("        cf=%04u\npf=%04u\naf=%04u\nzf=%04u\nsf=%04u\ntf=%04u\nif=%04u\ndf=%04u\nof=%04u\n", _CF, _PF, _AF, _ZF, _SF, _TF, _IF, _DF, _OF);\r
+\r
+       printf("cflag: "BYTE_TO_BINARY_PATTERN""BYTE_TO_BINARY_PATTERN"\n",             BYTE_TO_BINARY(_cflag>>8), BYTE_TO_BINARY(_cflag));\r
+#else\r
+//     printf("        ip=%04x\n\n", _IP);\r
+//     printf("        cf=%04x\npf=%04x\naf=%04x\nzf=%04x\nsf=%04x\ntf=%04x\nif=%04x\ndf=%04x\nof=%04x\n", _CF, _PF, _AF, _ZF, _SF, _TF, _IF, _DF, _OF);\r
+       printf("cflag: %016x\n",(_cflag));\r
+       printf("        ahl=%016x", _al|(_ah<<4));\r
+#endif\r
+       printf("testing\n");\r
+//     printf("dx: "NIBBLE_TO_BINARY_PATTERN""NIBBLE_TO_BINARY_PATTERN"\n",            NIBBLE_TO_BINARY(_dx>>4), NIBBLE_TO_BINARY(_dx));\r
+//     printf("dx: "BYTE_TO_BINARY_PATTERN""BYTE_TO_BINARY_PATTERN"\n",                BYTE_TO_BINARY(_dx>>8), BYTE_TO_BINARY(_dx));\r
+       printf("dx: "WORD_TO_BINARY_PATTERN"\n",                WORD_TO_BINARY(_dx));\r
+       printf("                ---------------------------------------\n");\r
+#endif\r
+#endif\r
+\r
+       printf("for more info see\n     http://stackoverflow.com/questions/9130349/how-many-registers-are-there-in-8086-8088\n");\r
+       printf("================================================================================");\r
+}\r