Routines
Prev: F33E Up: Map Next: F4C6
F410: Hall Of Fame
Used by the routine at GameInitialisation.
HallOfFame F410 LD A,$47
F412 LD C,$08
F414 LD HL,$5900
F417 LD B,$40
F419 LD (HL),A
F41A INC HL
F41B DJNZ $F419
F41D DEC A
F41E CP $41
F420 JR NZ,$F424
F422 LD A,$44
F424 DEC C
F425 JR NZ,$F417
Handle printing "THE ULTIMATE" messaging.
F427 LD HL,$1850 HL=1850 (screen buffer location).
F42A LD DE,$F4AA DE=F4AA.
F42D CALL PrintStringColour Call PrintStringColour.
Handle printing "HALL OF FAME" messaging.
F430 LD HL,$2850 HL=2850 (screen buffer location).
F433 LD DE,$F4B8 DE=F4B8.
F436 CALL PrintStringColour Call PrintStringColour.
F439 LD HL,$4048 HL=4048 (screen buffer location).
F43C XOR A
F43D LD C,$31
F43F LD B,$08
F441 PUSH HL
F442 CALL ScreenAddress
F445 LD A,C
F446 CALL PrintScreen
F449 POP HL
F44A LD A,H
F44B ADD A,$10
F44D LD H,A
F44E INC C
F44F DJNZ $F441
F451 LD HL,$4060
F454 LD DE,$5E20
F457 LD C,$08
HallOfFame_0 F459 PUSH HL
F45A CALL ScreenAddress
F45D LD B,$03
HallOfFame_1 F45F LD A,(DE)
F460 CALL PrintScreen
F463 INC DE
F464 DJNZ HallOfFame_1
F466 POP HL
F467 LD A,H
F468 ADD A,$10
F46A LD H,A
F46B DEC C
F46C JR NZ,HallOfFame_0
F46E LD C,$08
F470 LD DE,$5E06
F473 LD HL,$4088
HallOfFame_2 F476 LD B,$03
F478 PUSH HL
F479 CALL ScreenAddress
F47C CALL PrintScore_Loop
F47F POP HL
F480 LD A,H
F481 ADD A,$10
F483 LD H,A
F484 DEC C
F485 JR NZ,HallOfFame_2
F487 LD A,$01
F489 LD ($5E74),A
F48C LD HL,$0400
F48F LD ($5E6D),HL
HallOfFame_3 F492 EI Enable interrupts.
F493 HALT
F494 LD HL,($5E6D)
F497 DEC HL
F498 LD ($5E6D),HL
F49B LD A,$E7 Read from the keyboard;
Port Number Bit
0 1 2 3 4
E7 Q W E R T Y U I O P
F49D OUT ($FD),A
F49F IN A,($FE)
F4A1 CPL Flip the bits.
F4A2 AND %00011111 Keep only bits 0-4.
F4A4 RET NZ
F4A5 LD A,H
F4A6 OR L
F4A7 JR NZ,HallOfFame_3
F4A9 RET Return.
F4AA DEFM $45 Attribute: 45 + "THE ULTIMATE ".
F4AB DEFM "THE ULTIMATE"," "+$80
F4B8 DEFM $45 Attribute: 45 + "HALL OF FAME ".
F4B9 DEFM "HALL OF FAME"," "+$80
Prev: F33E Up: Map Next: F4C6