From: rs <>
Date: Sun, 29 Jun 2025 09:37:41 +0000 (-0500)
Subject: Update cpu0 test programs
X-Git-Url: https://git.the-white-hart.net/?a=commitdiff_plain;h=1a4c52566c06da4d174050d931a0ef968b407025;p=vhdl

Update cpu0 test programs
---

diff --git a/projects/cpu_0/asm/hellorld.asm b/projects/cpu_0/asm/hellorld.asm
index 70eba67..389c0a1 100644
--- a/projects/cpu_0/asm/hellorld.asm
+++ b/projects/cpu_0/asm/hellorld.asm
@@ -25,7 +25,17 @@ rs232_data=0x02004015
 
 ( ivec -- )
 isr:
+	#8 0xa5i8 #32 host_swled !8
+
+	#8 0x3ci8 #32 host_sseg0 !8
+	#8 0xa5i8 #32 host_sseg1 !8
+	#8 0x5ai8 #32 host_sseg2 !8
+	#8 0xc3i8 #32 host_sseg3 !8
+
+	#8 0x14i8 #32 rs232_baudh !8
+	#8 0x58i8 #32 rs232_baudl !8
+	#8 0x03i8 #32 rs232_ctrl  !8
+	#8 0x41i8 #32 rs232_data  !8
 
 halt:
-	#8 0xa5i8 drop
 	jmp halt
diff --git a/projects/cpu_0/asm/test.asm b/projects/cpu_0/asm/test.asm
index 7470ba5..711a01b 100644
--- a/projects/cpu_0/asm/test.asm
+++ b/projects/cpu_0/asm/test.asm
@@ -49,8 +49,8 @@ isr_0:
     #8 0xc3i8 #32 host_sseg3 !8
 
     ( write 0x1458 to baud register - 9600 baud )
-    #8 0x14i8 #32 rs232_baudl !8
-    #8 0x58i8 #32 rs232_baudh !8
+    #8 0x14i8 #32 rs232_baudh !8
+    #8 0x58i8 #32 rs232_baudl !8
 
     ( enable rx ready interrupt )
     #8 0x01i8 #32 rs232_imask !8