Fix deo ops and add system and screen deo/dei funcs

1 files changed, 16 insertions, 4 deletions

diff --git a/src/uxn-core.s b/src/uxn-core.s
index 318b258..362f0d4 100644
--- a/src/uxn-core.s
+++ b/src/uxn-core.s
@@ -547,8 +547,11 @@ deo2:
     ldr     r0, =device_data
     lsl     r4, #4
     add     r0, r4
-    strh    r5, [r0, r3]
     mov     r1, r3
+    add     r3, r0
+    strb    r5, [r3, #1]
+    lsr     r5, #8
+    strb    r5, [r3]
     mov     lr, pc
     bx      r6
 
@@ -659,8 +662,11 @@ deo2r:
     ldr     r0, =device_data
     lsl     r4, #4
     add     r0, r4
-    strh    r5, [r0, r3]
     mov     r1, r3
+    add     r3, r0
+    strb    r5, [r3, #1]
+    lsr     r5, #8
+    strb    r5, [r3]
     mov     lr, pc
     bx      r6
 
@@ -755,8 +761,11 @@ deo2k:
     ldr     r0, =device_data
     lsl     r4, #4
     add     r0, r4
-    strh    r5, [r0, r3]
     mov     r1, r3
+    add     r3, r0
+    strb    r5, [r3, #1]
+    lsr     r5, #8
+    strb    r5, [r3]
     mov     lr, pc
     bx      r6
     ldmfd   sp!, {r0, r7, lr}
@@ -849,8 +858,11 @@ deo2kr:
     ldr     r0, =device_data
     lsl     r4, #4
     add     r0, r4
-    strh    r5, [r0, r3]
     mov     r1, r3
+    add     r3, r0
+    strb    r5, [r3, #1]
+    lsr     r5, #8
+    strb    r5, [r3]
     mov     lr, pc
     bx      r6
     ldmfd   sp!, {r0, r7, lr}