Prev: B3AB Up: Map Next: B451
B3BE: Routine at B3BE
B3BE DEFB $B0,$88,$60,$38,$10
This entry point is used by the routine at EDC6.
B3C3 LD DE,$131C DE=131C.
B3C6 LD HL,$CCF2 HL=graphic_39.
B3C9 CALL Switch_DrawSprite_Functions Call Switch_DrawSprite_Functions.
B3CC LD IY,$BC67 IY=FrameId_Wally.
B3D0 LD HL,$B3BE HL=B3BE.
B3D3 LD B,$05 B=05.
B3D5 PUSH BC Stash BC on the stack.
B3D6 LD (IY+$0A),$98 Write 98 to IY+0A.
B3DA LD A,(IY+$05)
B3DD CP (HL)
B3DE JR Z,$B41D
B3E0 PUSH AF Stash AF on the stack.
B3E1 LD A,(IY+$0F)
B3E4 CP $16
B3E6 JR Z,$B3F3
B3E8 LD (IY+$0F),$16
B3EC LD (IY+$05),$00
B3F0 POP AF
B3F1 SCF
B3F2 PUSH AF
B3F3 POP AF
B3F4 PUSH HL
B3F5 JR NC,$B404
B3F7 LD (IY+$3C),$01
B3FB LD (IY+$41),$01
B3FF CALL $B288
B402 JR $B40F
B404 LD (IY+$3C),$FF
B408 LD (IY+$41),$FF
B40C CALL $B288
B40F POP HL
B410 POP BC
B411 LD IY,$BC67
B415 CALL $EEC1
B418 CALL Draw_Characters_CurrentRoom
B41B JR $B3CC
B41D LD A,(IY+$0F)
B420 CP $16
B422 JR NZ,$B3E0
B424 POP BC
B425 INC HL
B426 INC IY
B428 DJNZ $B3D5
B42A LD A,($F6DB)
B42D OR A
B42E JR Z,$B411
B430 LD DE,$0400 DE=0400.
B433 LD HL,$7E68 HL=Messaging_Banner_Underline.
B436 CALL Controller_Tile Call Controller_Tile.
B439 CALL PressAnyKey Call PressAnyKey.
B43C CALL Clear_Screen Call Clear_Screen.
B43F LD DE,$0002 DE=0002.
B442 LD HL,$7C76 HL=Messaging_Congratulations.
B445 CALL PrintString Call PrintString.
B448 CALL PressAnyKey Call PressAnyKey.
B44B CALL PrintWages Call PrintWages.
B44E JP GameLoop Jump to GameLoop.
Prev: B3AB Up: Map Next: B451