Prev: 7069 Up: Map Next: 7200
70E7: Routine at 70E7
Used by the routine at 6CEE.
70E7 LD HL,$669E
70EA POP BC
70EB PUSH BC
70EC INC HL
70ED DJNZ $70EC
70EF LD A,(HL)
70F0 PUSH AF
70F1 PUSH DE
70F2 CALL ConvertScreenToAttributeBufferAddress
70F5 LD A,(DE)
70F6 CP $47
70F8 POP DE
70F9 JR NZ,$7134
70FB BIT 2,D
70FD JR Z,$710C
70FF POP AF
7100 RES 2,D
7102 PUSH DE
7103 LD B,$04
7105 LD (DE),A
7106 INC D
7107 DJNZ $7105
7109 XOR A
710A JR $7147
710C LD B,$04
710E XOR A
710F LD (DE),A
7110 INC D
7111 DJNZ $710F
7113 CALL ConvertScreenToAttributeBufferAddress
7116 EX DE,HL
7117 LD (HL),$00
7119 LD A,H
711A CP $58
711C JR NZ,$712B
711E LD A,L
711F AND $E0
7121 CP $20
7123 JR NZ,$712B
7125 POP AF
7126 LD DE,$0000
7129 JR $714E
712B LD C,$20
712D AND A
712E SBC HL,BC
7130 LD A,(HL)
7131 OR A
7132 JR Z,$713D
7134 CALL $7159
7137 POP AF
7138 LD DE,$0000
713B JR $714E
713D LD (HL),$47
713F CALL ConvertAttributeToScreenBufferAddress
7142 EX DE,HL
7143 SET 2,D
7145 POP AF
7146 PUSH DE
This entry point is used by the routine at 7069.
7147 LD B,$04
7149 LD (DE),A
714A INC D
714B DJNZ $7149
714D POP DE
This entry point is used by the routines at 6CEE and 7069.
714E POP BC
714F POP HL
7150 LD (HL),E
7151 INC HL
7152 LD (HL),D
7153 INC HL
7154 DEC B
7155 JP NZ,$7040
7158 RET
7159 LD A,($66F1)
715C AND $02
715E JR NZ,$7176
7160 LD DE,($667D)
7164 LD A,(HL)
7165 CP D
7166 JR NZ,$7176
7168 INC HL
7169 LD A,(HL)
716A DEC HL
716B CP E
716C JR Z,$717F
716E DEC HL
716F LD A,(HL)
7170 DEC HL
7171 CP E
7172 JR Z,$717F
7174 INC HL
7175 INC HL
7176 LD A,(HL)
7177 CP $06
7179 JR NZ,$71BE
717B DEC HL
717C AND A
717D SBC HL,BC
717F PUSH HL
7180 CALL ConvertAttributeToScreenBufferAddress
7183 EX DE,HL
7184 LD HL,$65DD
7187 LD A,($66F1)
718A AND $06
718C LD B,$08
718E JR NZ,$7192
7190 LD B,$0F
7192 LD A,(HL)
7193 CP E
7194 JR Z,$719C
7196 INC HL
7197 INC HL
7198 DJNZ $7192
719A POP HL
719B RET
719C INC HL
719D PUSH DE
719E LD D,(HL)
719F RES 7,D
71A1 LD A,D
71A2 POP DE
71A3 CP D
71A4 JR Z,$71A8
71A6 JR $7197
71A8 LD (HL),$00
71AA POP DE
This entry point is used by the routine at 7616.
71AB LD HL,$66D5
71AE LD A,(HL)
71AF OR A
71B0 JR Z,$71B7
71B2 INC HL
71B3 INC HL
71B4 INC HL
71B5 JR $71AE
71B7 LD (HL),$01
71B9 INC HL
71BA LD (HL),E
71BB INC HL
71BC LD (HL),D
71BD RET
71BE LD A,($66F1)
71C1 BIT 1,A
71C3 JR Z,$71EC
71C5 LD A,(HL)
71C6 CP $43
71C8 JR Z,$71D1
71CA CP $41
71CC JR Z,$71D1
71CE CP $05
71D0 RET NZ
71D1 LD A,($66F3)
71D4 OR A
71D5 RET NZ
71D6 LD B,$18
71D8 LD HL,$0122
71DB PUSH BC
71DC PUSH HL
71DD LD DE,$0001
71E0 CALL $03B5
71E3 DI
71E4 POP HL
71E5 INC HL
71E6 INC HL
71E7 INC HL
71E8 POP BC
71E9 DJNZ $71DB
71EB RET
71EC CP $04
71EE RET NZ
71EF LD A,(HL)
71F0 CP $01
71F2 JR NZ,$71F8
71F4 LD (HL),$40
71F6 JR $721E
71F8 CP $0F
71FA JR NZ,$7200
71FC LD (HL),$01
71FE JR $7229
Prev: 7069 Up: Map Next: 7200