Enable 65C02 ConstantNybble

2024-10-04 03:59:49 +00:00 · 2018-03-05 12:19:47 -08:00 · 2018-03-05 12:19:47 -08:00 · f3ef1b4820
commit f3ef1b4820
parent 334bf1ec4d
1 changed files with 10 additions and 9 deletions
--- a/src/vmsrc/apple/plvm02.s
+++ b/src/vmsrc/apple/plvm02.s
@ -1728,15 +1728,16 @@ CDINTRP PLY
        JMP     FETCHOP
 CDINTRPEND
 ;
-;        LDA     #<ZERO
+        LDA     #<CN
-;        LDX     #>ZERO
+        LDX     #>CN
-;        LDY     #(CZEROEND-CZERO)
+        LDY     #(CCNEND-CCN)
-;        JSR     OPCPY
+        JSR     OPCPY
-;CZERO   DEX
+CCN     DEX
-;        STZ     ESTKL,X
+        LSR
-;        STZ     ESTKH,X
+        STA     ESTKL,X
-;        JMP     NEXTOP
+        STZ     ESTKH,X
-;CZEROEND
+        JMP     NEXTOP
 CCNEND
 ;
        LDA     #<CB
        LDX     #>CB