Prev: 6926 Up: Map Next: 6A23
696A: Routine at 696A
Used by the routine at 72C9.
test
696A LD HL,$6538 Call CustomFont_PrintString using Table_MothershipUDGs; printing 02 characters in CYAN.
696D LD DE,$408F
6970 LD BC,$0205
6973 CALL CustomFont_PrintString
6976 LD E,$AF Call CustomFont_PrintString using 653A; printing 02 characters in CYAN.
6978 LD B,$02
697A CALL CustomFont_PrintString
697D LD E,$CA Call CustomFont_PrintString using 653C; printing 02 characters in YELLOW.
697F LD BC,$0206
6982 CALL CustomFont_PrintString
6985 LD E,$CC Call CustomFont_PrintString using 653E; printing 08 characters in INK:RED, PAPER:YELLOW.
6987 LD BC,$0832
698A CALL CustomFont_PrintString
698D LD E,$D4 E=D4.
698F LD BC,$0206 BC=0206.
6992 CALL CustomFont_PrintString Call CustomFont_PrintString.
6995 LD E,$E9 E=E9.
6997 INC B Increment B by one.
6998 CALL CustomFont_PrintString Call CustomFont_PrintString.
699B INC E Increment E by one.
699C LD BC,$0C31 BC=0C31.
699F CALL SpectrumFont_PrintString Call SpectrumFont_PrintString.
69A2 LD E,$F6 E=F6.
69A4 LD BC,$0106 BC=0106.
69A7 CALL CustomFont_PrintString Call CustomFont_PrintString.
69AA LD DE,$4808 DE=4808 (screen buffer location).
69AD INC B Increment B by one.
69AE CALL CustomFont_PrintString Call CustomFont_PrintString.
69B1 INC E Increment E by one.
69B2 LD BC,$0E31 BC=0E31.
69B5 CALL CustomFont_PrintString Call CustomFont_PrintString.
69B8 LD E,$17 E=17.
69BA LD BC,$0106 BC=0106.
69BD CALL CustomFont_PrintString Call CustomFont_PrintString.
69C0 LD E,$27 E=27.
69C2 LD BC,$120F BC=120F.
69C5 CALL CustomFont_PrintString Call CustomFont_PrintString.
69C8 LD E,$47 E=47.
69CA LD BC,$0102 BC=0102.
69CD CALL CustomFont_PrintString Call CustomFont_PrintString.
69D0 INC B Increment B by one.
69D1 LD E,$68 E=68.
69D3 CALL CustomFont_PrintString Call CustomFont_PrintString.
69D6 LD E,$89 E=89.
69D8 LD B,$02 B=02.
69DA CALL CustomFont_PrintString Call CustomFont_PrintString.
69DD LD E,$AB E=AB.
69DF LD B,$0A B=0A.
69E1 CALL CustomFont_PrintString Call CustomFont_PrintString.
69E4 LD E,$95 E=95.
69E6 LD B,$02 B=02.
69E8 CALL CustomFont_PrintString Call CustomFont_PrintString.
69EB LD E,$77 E=77.
69ED INC B Increment B by one.
69EE CALL CustomFont_PrintString Call CustomFont_PrintString.
69F1 LD E,$58 E=58.
69F3 INC B Increment B by one.
69F4 CALL CustomFont_PrintString Call CustomFont_PrintString.
69F7 LD HL,$0404 Write 0404 to *58EF (attribute buffer location).
69FA LD ($58EF),HL
69FD LD HL,$4242 Write 4242 to *590F (attribute buffer location).
6A00 LD ($590F),HL
6A03 LD A,$10 A=INK:BLACK, PAPER:RED.
6A05 LD HL,$5948 HL=5948 (attribute buffer location).
6A08 LD DE,$5949 DE=5949 (attribute buffer location).
6A0B LD (HL),A Write A to *HL.
6A0C LD C,$0F C=0F.
6A0E LDIR LDIR.
6A10 LD L,$69 L=69.
6A12 LD E,$6A E=6A.
6A14 LD (HL),A Write A to *HL.
6A15 LD C,$0D C=0D.
6A17 LDIR LDIR.
6A19 LD L,$8A L=8A.
6A1B LD E,$8B E=8B.
6A1D LD (HL),A Write A to *HL.
6A1E LD C,$0B C=0B.
6A20 LDIR LDIR.
6A22 RET Return.
Prev: 6926 Up: Map Next: 6A23