mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 08:58:06 +11:00
sms: use CELL! directly in Pad driver
This commit is contained in:
parent
b1e162b8a3
commit
74d2a5d722
@ -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 <
|
||||
;
|
||||
|
Loading…
Reference in New Issue
Block a user