sms: use CELL! directly in Pad driver

2020-11-16 09:19:55 -05:00 · 2020-11-16 09:19:55 -05:00 · 74d2a5d722
parent b1e162b8a3
commit 74d2a5d722
1 changed files with 1 additions and 1 deletions
--- a/arch/z80/sms/blk.fs
+++ b/arch/z80/sms/blk.fs
@ -105,7 +105,7 @@ CREATE _ '0' C, ':' C, 'A' C, '[' C, 'a' C, 0xff C,
    0x08 ( RIGHT ) OVER AND NOT IF 5 _sel +! THEN
    0x10 ( BUTB ) OVER AND NOT IF _nxtcls THEN
    ( update sel in VDP )
-    _chk _sel C@ (emit) -1 XYPOS +!
+    _chk _sel C@ XYPOS @ CELL!
    ( return whether any of the high 3 bits is low )
    0xe0 AND 0xe0 <
 ;