@@ 505,11 505,11 @@ JMP2r
#2710 LIT2r 00fb
&w
- DIV2k #000a DIV2k MUL2 SUB2 NIP SWPr
- DUP STHkr ORA #00 EQU ?&skip
+ DIV2k #000a DIV2k MUL2 SUB2 SWPr
+ EQUk OVR STHkr EQU AND ?&skip
DUP LIT "0 ADD #19 DEO INCr
&skip
- POP #000a DIV2
+ POP2 #000a DIV2
SWPr INCr STHkr ?&w
POP2r POP2 POP2