Prev: 7382 Up: Map Next: 73BE
738D: Reset Drawing Origin
Used by the routine at DispatchShape.
Opcode F3 zeroes the origin and restores the default margins.
ResetOrigin 738D XOR A
738E LD ($7337),A
7391 LD ($7339),A
7394 LD ($7338),A
7397 LD A,$0B
7399 LD ($733A),A
739C LD A,$20
739E LD ($7319),A
73A1 LD ($72E6),A
73A4 LD A,$05
73A6 CALL SetOrigin_0
73A9 INC IX
73AB JP PictureRecord
This entry point is used by the routines at ShapeIfPresent, DrawFixedShift and VerticalRun.
ResetOrigin_0 73AE LD H,$00
73B0 LD L,B
73B1 ADD HL,HL
73B2 ADD HL,HL
73B3 ADD HL,HL
73B4 ADD HL,HL
73B5 ADD HL,HL
73B6 LD DE,$6C7A
73B9 ADD HL,DE
73BA LD B,$00
73BC ADD HL,BC
73BD RET
Prev: 7382 Up: Map Next: 73BE