Prev: 60360 Up: Map Next: 60638
60580: Routine at ECA4
Used by the routines at 60360 and 60688.
60580 LD HL,16384 HL=16384.
60583 LD DE,16385 DE=16385 (screen buffer location).
60586 LD BC,6144 BC=6144.
60589 LD (HL),0 Write 0 to *HL.
60591 LDIR LDIR.
60593 LD BC,768 BC=768.
60596 LD (HL),A Write A to *HL.
60597 LDIR LDIR.
60599 AND %00111000 Keep only bits 3-5.
60601 BIT 5,A Test bit 5 of A.
60603 JR NZ,60607 Jump to 60607 if ?? is not equal to 0.
60605 XOR %00000111 Flip bits 0-2.
60607 LD (23624),A Write A to *BORDCR.
60610 AND %00111000 Keep only bits 3-5.
60612 RRCA Rotate right with carry three positions.
60613 RRCA
60614 RRCA
60615 OUT (254),A Set border to the colour held by A.
60617 RET Return.
This entry point is used by the routine at 60360.
60618 ADD A,A A+=A.
60619 ADD A,A A+=A.
60620 ADD A,A A+=A.
60621 ADD A,B A+=B.
60622 CALL 60939 Call 60939.
60625 CALL 60957 Call 60957.
60628 RET Return.
This entry point is used by the routine at 60360.
60629 ADD A,A A+=A.
60630 ADD A,1 A+=1.
60632 LD L,A L=A.
60633 LD H,89 H=89.
60635 LD (HL),71 Write 71 to *HL.
60637 RET Return.
Prev: 60360 Up: Map Next: 60638