Prev: 29268 Up: Map Next: 29860
29385: Routine at 72C9
Used by the routine at 29268.
29385 LD A,(26355)
29388 OR A
29389 JP NZ,29708
29392 LD A,(26353)
29395 CP 4
29397 CALL NZ,PrintHeader
29400 JR NZ,29450
29402 CALL PrintLives
29405 LD HL,22848
29408 LD C,2
29410 LD B,224
29412 PUSH BC
29413 PUSH HL
29414 LD A,(HL)
29415 CP 2
29417 JR Z,29442
29419 CP 16
29421 JR Z,29442
29423 CP 22
29425 LD A,0
29427 JR NZ,29431
29429 LD A,16
29431 LD (HL),A
29432 CALL ConvertAttributeToScreenBufferAddress
29435 XOR A
29436 LD B,8
29438 LD (HL),A
29439 INC H
29440 DJNZ 29438
29442 POP HL
29443 INC HL
29444 POP BC
29445 DJNZ 29412
29447 DEC C
29448 JR NZ,29410
29450 CALL DrawShip
This entry point is used by the routine at 29268.
29453 LD A,(26276)
29456 CP 1
29458 RET Z
29459 LD A,(26353)
29462 CP 4
29464 JP NZ,29703
29467 LD A,(26323)
29470 OR A
29471 RET Z
fgkjfdg
29472 CALL ClearScreen Call ClearScreen.
29475 LD DE,25051 DE=Graphics_StarLarge.
29478 CALL FillScreenWithUDG Call FillScreenWithUDG.
29481 LD DE,18542 DE=18542 (screen buffer location).
29484 LD BC,1093 BC=1093.
29487 LD HL,25899 HL=25899.
29490 LD A,(26239) A=*26239.
29493 SRA A Shift A right (with carry).
29495 ADD A,52 A+=52.
29497 LD (HL),A Write A to *HL.
29498 CALL Configurable_PrintString Call Configurable_PrintString.
29501 LD HL,25899 HL=25899.
29504 LD E,142 E=142.
29506 LD B,4 B=4.
29508 CALL Configurable_PrintString Call Configurable_PrintString.
29511 LD C,4
29513 LD HL,20075
29516 LD DE,20331
29519 LD B,8
29521 PUSH BC
29522 PUSH HL
29523 LD BC,10
29526 LDIR
29528 POP DE
29529 PUSH DE
29530 POP HL
29531 DEC H
29532 POP BC
29533 DJNZ 29521
29535 DEC C
29536 JR NZ,29513
29538 LD C,4
29540 LD HL,18827
29543 LD DE,18571
29546 LD B,7
29548 PUSH BC
29549 PUSH HL
29550 LD BC,10
29553 LDIR
29555 POP DE
29556 PUSH DE
29557 POP HL
29558 INC H
29559 POP BC
29560 DJNZ 29548
29562 DEC C
29563 JR NZ,29540
29565 CALL Handler_Score
29568 LD IX,0
29572 LD B,16
29574 PUSH BC
29575 LD B,11
29577 PUSH BC
29578 PUSH IX
29580 LD HL,22858
29583 LD DE,779
29586 LD A,12
29588 SUB B
29589 LD B,A
29590 PUSH BC
29591 LD A,IXl
29593 AND 63
29595 LD B,E
29596 LD (HL),A
29597 INC HL
29598 DJNZ 29596
29600 LD B,D
29601 PUSH BC
29602 LD (HL),A
29603 LD BC,32
29606 ADD HL,BC
29607 POP BC
29608 DJNZ 29601
29610 LD B,E
29611 LD (HL),A
29612 DEC HL
29613 DJNZ 29611
29615 LD B,D
29616 PUSH BC
29617 LD (HL),A
29618 LD BC,32
29621 SBC HL,BC
29623 POP BC
29624 DJNZ 29616
29626 LD C,33
29628 SBC HL,BC
29630 INC E
29631 INC E
29632 INC D
29633 INC D
29634 INC IX
29636 POP BC
29637 DJNZ 29590
29639 POP HL
29640 PUSH HL
29641 LD A,L
29642 AND 15
29644 LD L,A
29645 LD H,B
29646 ADD HL,HL
29647 ADD HL,HL
29648 ADD HL,HL
29649 ADD HL,HL
29650 ADD HL,HL
29651 ADD HL,HL
29652 LD B,7
29654 PUSH BC
29655 PUSH HL
29656 LD DE,2
29659 CALL 949
29662 DI
29663 POP HL
29664 LD BC,20
29667 ADD HL,BC
29668 POP BC
29669 DJNZ 29654
29671 POP IX
29673 DEC IX
29675 POP BC
29676 DJNZ 29577
29678 POP BC
29679 DJNZ 29574
29681 CALL ClearScreen
29684 LD BC,200
29687 DJNZ 29687
29689 DEC C
29690 JR NZ,29687
29692 LD HL,26776
29695 LD A,(HL)
29696 CP 4
29698 JR C,29708
29700 DEC (HL)
29701 JR 29708
29703 LD A,(26239)
29706 OR A
29707 RET NZ
This entry point is used by the routines at TitleScreen and StartGame.
29708 LD HL,26240
29711 LD DE,26241
29714 LD BC,108
29717 LD (HL),B
29718 LDIR
29720 LD HL,26353
29723 LD A,(HL)
29724 SUB 4
29726 LD DE,28735
29729 JR NZ,29741
29731 LD (HL),A
29732 INC A
29733 LD (DE),A
29734 PUSH HL
29735 CALL GameIntro
29738 POP HL
29739 JR 29745
29741 INC (HL)
29742 LD A,4
29744 LD (DE),A
29745 LD A,(HL)
29746 PUSH AF
29747 AND 6
29749 LD HL,26239
29752 LD (HL),8
29754 JR NZ,29758
29756 LD (HL),15
29758 LD HL,26167
29761 POP AF
29762 OR A
29763 JR NZ,29770
29765 LD HL,26107
29768 JR 29786
29770 CP 1
29772 JR NZ,29779
29774 LD HL,26137
29777 JR 29786
29779 CP 4
29781 JR NZ,29786
29783 LD HL,26183
29786 LD DE,26077
29789 LD A,(26239)
29792 ADD A,A
29793 LD C,A
29794 LDIR
29796 LD A,(26353)
29799 CP 1
29801 JR NZ,29808
29803 LD BC,17156
29806 JR 29829
29808 CP 2
29810 JR NZ,29817
29812 LD B,65
29814 LD C,B
29815 JR 29829
29817 CP 3
29819 JR NZ,29826
29821 LD B,67
29823 LD C,B
29824 JR 29829
29826 LD BC,1603
29829 LD (26237),BC
29833 LD HL,26349
29836 LD (HL),206
29838 LD A,(26353)
29841 PUSH AF
29842 AND 6
29844 CALL NZ,TransitionEffect
29847 CALL PrintHeader
29850 POP AF
29851 CP 4
29853 CALL Z,26986
29856 CALL DrawShip
29859 RET
Prev: 29268 Up: Map Next: 29860