Imported pristine psxsdk-20190410 from official repo

1 files changed, 249 insertions, 0 deletions

diff --git a/examples/memview/memview.c b/examples/memview/memview.c
new file mode 100644
index 0000000..bf2e04a
--- /dev/null
+++ b/examples/memview/memview.c
@@ -0,0 +1,249 @@
+/**
+ * PlayStation Memory Viewer
+ * by Giuseppe Gatta a.k.a. nextvolume
+ *
+ * PSXSDK Example - released to the Public Domain
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <psx.h>
+
+unsigned int cur_addr = 0x80000000;
+unsigned int prim_list[0x20000];
+
+int display_is_old = 1;
+volatile int should_read_pad = 1;
+
+void pshex_vblank_handler()
+{
+	should_read_pad = 1;
+}
+
+int main()
+{
+	unsigned short padbuf;
+	int y, f, x, x1;
+	int highres_mode=0;
+	int srp=0;
+	int wasup=0, wasdown=0, wasleft=0, wasright=0, wasl1=0, wasr1=0,
+		wasl2=0;
+	int wascross=0, wascircle=0, wasstart=0,wasselect=0;
+	unsigned int go_address = 0x80000000;
+	int go_pos = 0;
+	GsRectangle pshex_rect;
+	
+
+	PSX_InitEx(0);
+	
+	GsInit();
+	GsClearMem();
+
+	GsSetVideoMode(640, 240, VMODE_PAL);
+	GsSetList(prim_list);
+	GsSetDispEnvSimple(0, 0);
+	GsSetDrawEnvSimple(0, 0, 640, 240);
+	GsLoadFont(768, 0, 768, 256);
+
+	SetVBlankHandler(pshex_vblank_handler);
+
+	GsPrintFont(16, 16, "PAL/NTSC SELECTION");
+	GsPrintFont(16, 32, "X - PAL");
+	GsPrintFont(16, 40, "O - NTSC");
+	GsDrawList();
+	while(GsIsDrawing());
+
+	while(1)
+	{
+		if(should_read_pad)
+		{
+			PSX_ReadPad(&padbuf, NULL);
+
+			if((padbuf & PAD_CROSS))
+			{
+				GsSetVideoModeEx(640, 480, VMODE_PAL, 0, 1, 0);
+				wascross=1;
+				break;
+			}
+
+			if((padbuf & PAD_CIRCLE))
+			{
+				GsSetVideoModeEx(640, 480, VMODE_NTSC, 0, 1, 0);
+				wascircle=1;
+				break;
+			}
+
+			should_read_pad=0;
+		}
+	}
+
+	GsSetDrawEnvSimple(0, (GsScreenM==VMODE_PAL?8:0), 640, 480);
+
+	while(1)
+	{
+		if(display_is_old)
+		{
+			GsSortCls(0, 0, 255);
+
+			for(y = 0; y < (highres_mode?58:28); y++)
+			{
+				f = GsPrintFont(24, y*8, "%08x", cur_addr + (y*0x10));
+				x1 = prfont_get_fx(f) + 16;
+
+				for(x = 0; x < 16; x++)
+				{
+					if(( (x&3) == 0) && x>0)
+						x1+=16;
+
+					f = GsPrintFont(x1, y*8, "%02x", *((unsigned char*)(cur_addr + (y*0x10) + x)));
+					x1 = prfont_get_fx(f) + 8;
+				}
+	
+				x1+=8;
+
+				for(x=0;x<16;x++)
+				{
+					GsPrintFont(x1, y*8, "%c", *((unsigned char*)(cur_addr + (y*0x10) + x)));
+					x1+=8;
+				}
+			}
+
+			pshex_rect.x = (go_pos * 8)+24;
+			pshex_rect.y = highres_mode?472:232;
+			pshex_rect.r = 255;
+			pshex_rect.g = 69;
+			pshex_rect.b = 0;
+			pshex_rect.attribute = 0;
+			pshex_rect.w = 8;
+			pshex_rect.h = 8;
+			GsSortRectangle(&pshex_rect);
+	
+			GsPrintFont(24, highres_mode?472:232, "%08X", go_address);
+
+			GsDrawList();
+			while(GsIsDrawing());
+			display_is_old = 0;
+		}
+
+		if(should_read_pad)
+		{
+			PSX_ReadPad(&padbuf, NULL);
+
+			if((padbuf & PAD_UP) && !wasup)
+			{
+				cur_addr -= 0x10;
+				display_is_old = 1;
+				wasup = 1;
+			}
+			
+			if((padbuf & PAD_DOWN) && !wasdown)
+			{
+				cur_addr += 0x10;
+				display_is_old = 1;
+				wasdown = 1;
+			}
+
+			if((padbuf & PAD_LEFT) && !wasleft)
+			{
+				cur_addr -= 0x100;
+				display_is_old = 1;
+				wasleft=1;
+			}
+
+			if((padbuf & PAD_RIGHT) && !wasright)
+			{
+				cur_addr += 0x100;
+				display_is_old = 1;
+				wasright=1;
+			}
+
+			if((padbuf & PAD_L1) && !wasl1)
+			{
+				if(go_pos>0)go_pos--;
+				display_is_old = 1;
+				wasl1=1;
+			}
+
+			if((padbuf & PAD_R1) && !wasr1)
+			{
+				if(go_pos<7)go_pos++;
+				display_is_old = 1;
+				wasr1=1;
+			}
+			
+			if((padbuf & PAD_L2) && !wasl2)
+			{
+				go_pos = 0;
+				wasl2 = 1;
+			}
+
+			if((padbuf & PAD_CROSS) && !wascross)
+			{
+				if(((go_address >> ((7-go_pos)<<2))&0xf) < 0xf)
+					go_address += 1 << ((7-go_pos)<<2);
+
+				display_is_old = 1;
+				wascross=1;
+			}
+
+			if((padbuf & PAD_CIRCLE) && !wascircle)
+			{
+				if(((go_address >> ((7-go_pos)<<2))&0xf) > 0)
+					go_address -= 1 << ((7-go_pos)<<2);
+
+				display_is_old = 1;
+				wascircle = 1;
+			}
+
+			if((padbuf & PAD_START) && !wasstart)
+			{
+				cur_addr = go_address;
+				display_is_old = 1;
+				wasstart=1;
+			}
+
+			if((padbuf & PAD_SELECT) && !wasselect)
+			{
+				highres_mode = !highres_mode;
+
+				GsSortCls(0,0,255);
+				GsDrawList();
+				while(GsIsDrawing());
+
+				if(highres_mode)
+				{
+					GsSetVideoModeEx(640, 480, GsScreenM, 0, 1, 0);
+					GsSetDrawEnvSimple(0, (GsScreenM==VMODE_PAL)?8:0, 640, 480);
+				}
+				else
+				{
+					GsSetVideoMode(640, 240, GsScreenM);
+					GsSetDrawEnvSimple(0, (GsScreenM==VMODE_PAL)?8:0, 640, 240);
+				}
+
+				display_is_old = 1;
+				wasselect = 1;
+			}
+
+			if(!(padbuf & PAD_UP) || srp==5)wasup=0;
+			if(!(padbuf & PAD_DOWN) || srp==5)wasdown=0;
+			if(!(padbuf & PAD_LEFT) || srp==5)wasleft=0;
+			if(!(padbuf & PAD_RIGHT) || srp==5)wasright=0;
+			if(!(padbuf & PAD_L1))wasl1=0;
+			if(!(padbuf & PAD_R1))wasr1=0;
+			if(!(padbuf & PAD_L2))wasl2=0;
+			if(!(padbuf & PAD_CROSS) || srp==5)wascross=0;
+			if(!(padbuf & PAD_CIRCLE) || srp==5)wascircle=0;
+			if(!(padbuf & PAD_START)) wasstart=0;
+			if(!(padbuf & PAD_SELECT)) wasselect=0;
+
+			should_read_pad = 0;
+			srp++;
+			if(srp > 5) srp=0;
+		}
+	}
+}
+
+//AAAAAAAA 00 11 22 33    44 55 66 77    88 99 AA BB    CC DD EE FF        abcd