@@ 729,18 729,18 @@ RTN
( find focus ) GET-POSITION STH2 STH2
;pixel-icn .Screen/addr DEO2
- #00 VER
+ VER #00
&ver
- OVR #08 * TOS .tileview/y1 LDZ2 ++ .Screen/y DEO2
- #00 HOR
+ DUP #08 * TOS .tileview/y1 LDZ2 ++ .Screen/y DEO2
+ HOR #00
&hor
- OVR #08 * TOS .tileview/x1 LDZ2 ++ .Screen/x DEO2
- ( get pixel offset ) GET-ITERATORS SWP TOS ROT TOS
+ DUP #08 * TOS .tileview/x1 LDZ2 ++ .Screen/x DEO2
+ ( get pixel offset ) GET-ITER SWP TOS ROT TOS
( add focus ) STH2kr SWP2r STH2kr SWP2r ADD-POSITIONS
;get-pixel JSR2 #00 + .Screen/sprite DEO
- INCR LTHk ,&hor JCN
+ #01 + GTHk ,&hor JCN
POP2
- INCR LTHk ,&ver JCN
+ #01 + GTHk ,&ver JCN
POP2
POP2r POP2r