]> git.the-white-hart.net Git - vhdl/commitdiff
Update cpu0 test programs
authorrs <>
Sun, 29 Jun 2025 09:37:41 +0000 (04:37 -0500)
committerrs <>
Sun, 29 Jun 2025 09:37:41 +0000 (04:37 -0500)
projects/cpu_0/asm/hellorld.asm
projects/cpu_0/asm/test.asm

index 70eba67104b5a0a3aa023c9077d326e323ac244b..389c0a12e9640487208c1fe98216b53870fcbc18 100644 (file)
@@ -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
index 7470ba5118a568296153cb17c37b42385a1f8d6e..711a01bab51a48eb3c832d010b28556b1495d326 100644 (file)
@@ -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