Prev: 9060 Up: Map Next: 9301
9088: Routine at 9088
9088 LD HL,$4000
908B LD DE,$4001
908E LD BC,$17FF
9091 LD (HL),$00
9093 LDIR
9095 LD HL,$5800
9098 LD DE,$5801
909B LD (HL),$07
909D LD BC,$02FF
90A0 LDIR
90A2 XOR A
90A3 OUT ($FE),A
Open the upper screen channel.
90A5 LD A,$02 A=02.
90A7 CALL $1601 Call CHAN_OPEN.
90AA LD DE,$90D4 DE=90D4 (text).
90AD LD BC,$01FD BC=01FD (counter).
90B0 CALL $203C Call PR_STRING.
90B3 CALL $92E9 Call 92E9.
90B6 LD A,($5BA8)
90B9 CP $02
90BB JP Z,$92F9
90BE LD A,$7F
90C0 IN A,($FE)
90C2 AND $01
90C4 RET Z
90C5 LD A,$EF
90C7 IN A,($FE)
90C9 AND $01
90CB RET Z
90CC IN A,($1F)
90CE AND $10
90D0 RET NZ
90D1 JP $90BE
90D4 DEFB $11,$00
90D6 DEFB $16,$00,$00
90D9 DEFB $10,$06
90DB DEFB $54,$48,$45,$20,$45,$50,$49,$54
90E3 DEFB $41,$50,$48,$20,$49,$4E,$53,$43
90EB DEFB $52,$49,$42,$45,$44,$20,$4F,$4E
90F3 DEFB $20,$50,$4F,$4F,$52,$16,$01,$13
90FB DEFB $4A,$41,$53,$4F,$4E,$27,$53,$20
9103 DEFB $54,$4F,$4D,$42,$2C,$10,$05,$44
910B DEFB $4F,$45,$53,$20,$4E,$4F,$54,$20
9113 DEFB $53,$50,$45,$41,$4B,$20,$4F,$46
911B DEFB $20,$48,$49,$53,$20,$45,$56,$45
9123 DEFB $4E,$54,$46,$55,$4C,$16,$03,$1A
912B DEFB $20,$4C,$49,$46,$45,$2C,$16,$04
9133 DEFB $01,$10,$06,$42,$55,$54,$20,$4F
913B DEFB $46,$20,$48,$49,$53,$20,$43,$41
9143 DEFB $52,$45,$4C,$45,$53,$53,$20,$44
914B DEFB $4F,$4F,$4D,$2E,$2E,$2E,$16,$07
9153 DEFB $00,$10,$05,$27,$4F,$4E,$20,$45
915B DEFB $4D,$42,$41,$52,$4B,$49,$4E,$47
9163 DEFB $20,$4F,$4E,$20,$48,$49,$53,$20
916B DEFB $4D,$49,$53,$53,$49,$4F,$4E,$20
9173 DEFB $48,$45,$16,$08,$09,$57,$41,$53
917B DEFB $20,$47,$49,$56,$45,$4E,$20,$43
9183 DEFB $48,$41,$4E,$43,$45,$53,$20,$46
918B DEFB $4F,$55,$52,$2C,$16,$09,$00,$10
9193 DEFB $06,$42,$55,$54,$20,$54,$48,$45
919B DEFB $20,$47,$45,$4D,$20,$57,$41,$53
91A3 DEFB $20,$55,$4E,$44,$49,$53,$54,$55
91AB DEFB $52,$42,$45,$44,$16,$0A,$01,$28
91B3 DEFB $46,$4F,$52,$20,$48,$45,$20,$4E
91BB DEFB $45,$45,$44,$45,$44,$20,$53,$4F
91C3 DEFB $4D,$45,$57,$48,$41,$54,$20,$4D
91CB DEFB $4F,$52,$45,$21,$29,$27,$16,$0C
91D3 DEFB $00,$10,$05,$48,$4F,$57,$20,$53
91DB DEFB $41,$44,$20,$41,$20,$54,$41,$4C
91E3 DEFB $45,$20,$4F,$46,$20,$46,$41,$49
91EB DEFB $4C,$55,$52,$45,$20,$46,$4F,$52
91F3 DEFB $20,$16,$0D,$0A,$4F,$4E,$45,$20
91FB DEFB $53,$4F,$20,$43,$4C,$4F,$53,$45
9203 DEFB $20,$54,$4F,$20,$47,$4C,$4F,$52
920B DEFB $59,$21,$16,$0E,$01,$10,$06,$42
9213 DEFB $55,$54,$20,$59,$4F,$55,$20,$43
921B DEFB $4F,$55,$4C,$44,$20,$59,$45,$54
9223 DEFB $20,$52,$45,$57,$52,$49,$54,$45
922B DEFB $20,$54,$48,$45,$16,$0F,$07,$20
9233 DEFB $48,$49,$53,$54,$4F,$52,$59,$20
923B DEFB $4F,$46,$20,$54,$48,$49,$53,$20
9243 DEFB $53,$54,$4F,$52,$59,$2E,$2E,$2E
924B DEFB $16,$11,$00,$10,$05,$53,$4F,$20
9253 DEFB $50,$52,$45,$53,$53,$20,$54,$48
925B DEFB $45,$20,$13,$01,$10,$06,$11,$02
9263 DEFB $12,$01,$53,$50,$41,$43,$45,$13
926B DEFB $00,$10,$05,$11,$00,$12,$00,$20
9273 DEFB $4B,$45,$59,$20,$46,$4F,$52,$16
927B DEFB $12,$09,$4A,$41,$53,$4F,$4E,$27
9283 DEFB $53,$20,$52,$45,$49,$4E,$43,$41
928B DEFB $52,$4E,$41,$54,$49,$4F,$4E,$2C
9293 DEFB $16,$13,$00,$10,$06,$41,$4E,$44
929B DEFB $20,$54,$48,$45,$4E,$20,$59,$4F
92A3 DEFB $55,$20,$4D,$41,$59,$20,$42,$45
92AB DEFB $47,$49,$4E,$20,$41,$20,$42,$52
92B3 DEFB $41,$4E,$44,$16,$14,$07,$4E,$45
92BB DEFB $57,$20,$4D,$49,$53,$53,$49,$4F
92C3 DEFB $4E,$20,$45,$4D,$42,$41,$52,$4B
92CB DEFB $41,$54,$49,$4F,$4E,$2E,$13,$01
92D3 DEFB $10,$06,$11,$02,$12,$01,$16,$11
92DB DEFB $0D,$46,$49,$52,$45,$13,$00,$10
92E3 DEFB $05,$11,$00,$12,$00,$20
92E9 LD A,($5BA8)
92EC CP $01
92EE RET Z
92EF LD DE,$92D1
92F2 LD BC,$0018
92F5 CALL $203C
92F8 RET
92F9 IN A,($1F)
92FB AND $10
92FD RET NZ
92FE JP $92F9
Prev: 9060 Up: Map Next: 9301