Prev: D962 Up: Map Next: DB27
DAC0: Main loop for the tile screen
Used by the routine at 9470.
DAC0 LD A,$00 Set screen border color to black
DAC2 OUT ($FE),A
DAC4 LD DE,$4000 Copy the contents of the screen buffer to the display and attribute file
DAC7 LD HL,$E4FF
DACA LD BC,$1B00
DACD LDIR
DACF LD B,$05 Set B to the number of lines for the windows
DAD1 LD IX,$DFC6 Point IX to the input select text definition windows
DAD5 CALL $A2E6 Draws the windows for input select
DAD8 LD DE,$E4FF Copy display and attribute file to screen buffer
DADB LD HL,$4000
DADE LD BC,$1B00
DAE1 LDIR
Handle password input
DAE3 LD DE,$4000 Copy screen buffer to display and attribute file
DAE6 LD HL,$E4FF
DAE9 LD BC,$1B00
DAEC LDIR
DAEE CALL $DB27 Enter and decode password
Check input key methods
DAF1 LD DE,$4000 Copy screen buffer to display and attribute file
DAF4 LD HL,$E4FF
DAF7 LD BC,$1B00
DAFA LDIR
DAFC LD BC,$F7FE Read keys 1-2-3-4-5 into A
DAFF IN A,(C)
DB01 BIT 3,A Key 4 is pressed?
DB03 JP Z,$DF20 Jump if so
DB06 LD BC,$F7FE Read keys 1-2-3-4-5 into A
DB09 IN A,(C)
DB0B BIT 2,A Key 3 is pressed?
DB0D JP Z,$DF59 Jump if so
DB10 LD BC,$F7FE Read keys 1-2-3-4-5 into A
DB13 IN A,(C)
DB15 BIT 1,A Key 2 is pressed?
DB17 JP Z,$DEE6 Jump if so
DB1A LD BC,$F7FE Read keys 1-2-3-4-5 into A
DB1D IN A,(C)
DB1F BIT 0,A Key 1 is pressed?
DB21 JP Z,$DE19 Jump if so
DB24 JP $DAFC Jump back and continue to check for input key method
Prev: D962 Up: Map Next: DB27