Prev: 65042 Up: Map Next: 65170
65060: Do some shading
Used by the routines at DO_SHADE_3 and PERFORM_SHADE.
DO_SHADE 65060 CALL 65196
65063 RET NZ
65064 PUSH BC
65065 LD HL,65535
65068 LD (64216),HL
DO_SHADE_0 65071 CALL 65196
65074 PUSH AF
65075 CALL 65212
65078 POP AF
65079 JR NZ,DO_SHADE_1
65081 CALL DO_SHADE_4
65084 INC B
65085 JR DO_SHADE_0
DO_SHADE_1 65087 POP BC
65088 PUSH BC
65089 DEC B
DO_SHADE_2 65090 CALL 65196
65093 PUSH AF
65094 CALL 65212
65097 POP AF
65098 JR NZ,DO_SHADE_3
65100 CALL DO_SHADE_4
65103 DEC B
65104 JR DO_SHADE_2
DO_SHADE_3 65106 POP BC
65107 LD BC,(64216)
65111 LD A,B
65112 AND C
65113 CP 255
65115 RET Z
65116 JR DO_SHADE
DO_SHADE_4 65118 LD DE,(64216)
65122 LD A,D
65123 AND E
65124 CP 255
65126 RET NZ
65127 PUSH BC
65128 DEC C This instruction is sometimes rewritten to INC C
65129 LD A,C
65130 CP 255
65132 JR Z,DO_SHADE_8
65134 CP 0
65136 JR Z,DO_SHADE_9
This entry point is used by the routines at DO_SHADE_8 and DO_SHADE_9.
DO_SHADE_5 65138 CALL 65196
65141 JR Z,DO_SHADE_7
This entry point is used by the routines at DO_SHADE_8 and DO_SHADE_9.
DO_SHADE_6 65143 LD BC,65535
DO_SHADE_7 65146 LD (64216),BC
65150 POP BC
65151 RET
DO_SHADE_8 65152 LD A,(65128)
65155 CP 13 Are we doing DEC C?
65157 JR Z,DO_SHADE_6
65159 JR DO_SHADE_5
DO_SHADE_9 65161 LD A,(65128)
65164 CP 12 Are we doing INC C?
65166 JR Z,DO_SHADE_6
65168 JR DO_SHADE_5
Prev: 65042 Up: Map Next: 65170