; $8687: Initialisation AI - enemy $EC7F (Mother Brain) ;;; { $A9:8687 8B PHB $A9:8688 F4 7E 7E PEA $7E7E $A9:868B AB PLB $A9:868C AB PLB $A9:868D A9 38 03 LDA #$0338 $A9:8690 A2 FE 0F LDX #$0FFE $A9:8693 9D 00 20 STA $2000,x[$7E:2FFE] $A9:8696 CA DEX $A9:8697 CA DEX $A9:8698 10 F9 BPL $F9 [$8693] $A9:869A AB PLB $A9:869B A9 13 9C LDA #$9C13 $A9:869E 20 2D C4 JSR $C42D [$A9:C42D] $A9:86A1 9C 98 0F STZ $0F98 [$7E:0F98] $A9:86A4 AD 86 0F LDA $0F86 [$7E:0F86] $A9:86A7 09 00 15 ORA #$1500 $A9:86AA 8D 86 0F STA $0F86 [$7E:0F86] $A9:86AD A9 00 00 LDA #$0000 $A9:86B0 8D 96 0F STA $0F96 [$7E:0F96] $A9:86B3 A0 14 95 LDY #$9514 $A9:86B6 A2 62 01 LDX #$0162 $A9:86B9 A9 0F 00 LDA #$000F $A9:86BC 22 F6 D2 A9 JSL $A9D2F6[$A9:D2F6] ; Copy 2*A bytes from Y to 7E:C200,X $A9:86C0 A0 F4 94 LDY #$94F4 $A9:86C3 A2 E2 01 LDX #$01E2 $A9:86C6 A9 0F 00 LDA #$000F $A9:86C9 22 F6 D2 A9 JSL $A9D2F6[$A9:D2F6] ; Copy 2*A bytes from Y to 7E:C200,X $A9:86CD A9 00 00 LDA #$0000 $A9:86D0 8F 00 78 7E STA $7E7800[$7E:7800] $A9:86D4 8F 44 78 7E STA $7E7844[$7E:7844] $A9:86D8 A9 02 00 LDA #$0002 $A9:86DB 8F 08 78 7E STA $7E7808[$7E:7808] $A9:86DF A9 D0 87 LDA #$87D0 $A9:86E2 8D E8 0F STA $0FE8 [$7E:0FE8] ; Main AI Script (enemy #2)? $A9:86E5 A9 E1 87 LDA #$87E1 $A9:86E8 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:86EB A9 01 00 LDA #$0001 $A9:86EE 22 02 AB 89 JSL $89AB02[$89:AB02] ; FX1? $A9:86F2 A9 00 00 LDA #$0000 $A9:86F5 48 PHA $A9:86F6 A0 7E C1 LDY #$C17E $A9:86F9 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:86FD 68 PLA $A9:86FE 1A INC A $A9:86FF C9 0C 00 CMP #$000C $A9:8702 90 F1 BCC $F1 [$86F5] $A9:8704 6B RTL } ; $8705: Initialisation AI - enemy $EC3F (Mother Brain) ;;; { $A9:8705 A2 40 00 LDX #$0040 $A9:8708 A0 08 DE LDY #$DE08 $A9:870B 20 5F DC JSR $DC5F [$A9:DC5F] $A9:870E A9 B8 0B LDA #$0BB8 $A9:8711 8D CC 0F STA $0FCC [$7E:0FCC] $A9:8714 A9 13 9C LDA #$9C13 $A9:8717 20 3A C4 JSR $C43A [$A9:C43A] $A9:871A 9C D8 0F STZ $0FD8 [$7E:0FD8] $A9:871D AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:8720 09 00 11 ORA #$1100 $A9:8723 8D C6 0F STA $0FC6 [$7E:0FC6] $A9:8726 A9 00 02 LDA #$0200 $A9:8729 8D D6 0F STA $0FD6 [$7E:0FD6] $A9:872C 8F 18 78 7E STA $7E7818[$7E:7818] $A9:8730 8F 1A 78 7E STA $7E781A[$7E:781A] $A9:8734 A9 21 9C LDA #$9C21 $A9:8737 20 47 C4 JSR $C447 [$A9:C447] $A9:873A 20 F8 D1 JSR $D1F8 [$A9:D1F8] $A9:873D 6B RTL } ; $873E: Main AI / hurt AI - enemy $EC7F (Mother Brain) ;;; { $A9:873E 20 1C D0 JSR $D01C [$A9:D01C] $A9:8741 F4 46 87 PEA $8746 $A9:8744 6C A8 0F JMP ($0FA8)[$A9:87E1] ; Main AI Script $A9:8747 20 E4 D1 JSR $D1E4 [$A9:D1E4] $A9:874A 20 B6 B3 JSR $B3B6 [$A9:B3B6] $A9:874D 20 D4 CF JSR $CFD4 [$A9:CFD4] $A9:8750 AF 44 78 7E LDA $7E7844[$7E:7844] $A9:8754 F0 0C BEQ $0C [$8762] $A9:8756 A9 00 A9 LDA #$A900 $A9:8759 8D 05 06 STA $0605 [$7E:0605] $A9:875C A9 63 87 LDA #$8763 $A9:875F 8D 04 06 STA $0604 [$7E:0604] ; Routine called from Bank82, during unpause? $A9:8762 6B RTL } ; $8763: Routine called from Bank82, during unpause? { $A9:8763 AF 2C 78 7E LDA $7E782C[$7E:782C] $A9:8767 F0 07 BEQ $07 [$8770] $A9:8769 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $A9:8770 AD 88 0F LDA $0F88 [$7E:0F88] $A9:8773 29 04 00 AND #$0004 $A9:8776 F0 0C BEQ $0C [$8784] $A9:8778 A9 00 08 LDA #$0800 $A9:877B 8D 9A 17 STA $179A [$7E:179A] $A9:877E A9 01 00 LDA #$0001 $A9:8781 8D 1E 0E STA $0E1E [$7E:0E1E] $A9:8784 6B RTL } ; $8785: RTS { $A9:8785 60 RTS } ; $8786: RTL { $A9:8786 6B RTL } ; $8787: Power bomb reaction - enemy $EC3F/$EC7F (Mother Brain) { $A9:8787 22 B7 A5 A0 JSL $A0A5B7 [$A0:A5B7] } ; $878B: Main AI / hurt AI - enemy $EC3F (Mother Brain) { ; Power bomb reaction for enemy $EC7F falls through into here, possible bug? ; TODO: figure out what the different Mother Brain enemies are $A9:878B A9 00 A9 LDA #$A900 $A9:878E 8D 8D 17 STA $178D [$7E:178D] $A9:8791 A9 86 87 LDA #$8786 $A9:8794 8D 8C 17 STA $178C [$7E:178C] ; Some kind of routine called from $A0 $A9:8797 AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:879A 29 00 01 AND #$0100 $A9:879D F0 E7 BEQ $E7 [$8786] ; RTL $A9:879F 6C E8 0F JMP ($0FE8)[$A9:87D0] ; Main AI Script (enemy #2?) } ; $87A2: AI Script (enemy #2?) { $A9:87A2 AD 78 0A LDA $0A78 [$7E:0A78] $A9:87A5 D0 03 BNE $03 [$87AA] $A9:87A7 20 B8 91 JSR $91B8 [$A9:91B8] $A9:87AA AF 5C 80 7E LDA $7E805C[$7E:805C] $A9:87AE 8D BA 0F STA $0FBA [$7E:0FBA] $A9:87B1 A9 EB FF LDA #$FFEB $A9:87B4 18 CLC $A9:87B5 6F 5E 80 7E ADC $7E805E[$7E:805E] $A9:87B9 8D BE 0F STA $0FBE [$7E:0FBE] $A9:87BC A9 00 A9 LDA #$A900 $A9:87BF 8D 8D 17 STA $178D [$7E:178D] $A9:87C2 A9 C9 87 LDA #$87C9 $A9:87C5 8D 8C 17 STA $178C [$7E:178C] ; Some kind of routine called from $A0 $A9:87C8 6B RTL } ; $87C9: Some kind of routine called from $A0 { $A9:87C9 20 57 93 JSR $9357 [$A9:9357] $A9:87CC 20 03 93 JSR $9303 [$A9:9303] $A9:87CF 6B RTL } ; $87D0: AI Script (enemy #2?) { $A9:87D0 A9 00 A9 LDA #$A900 $A9:87D3 8D 8D 17 STA $178D [$7E:178D] $A9:87D6 A9 DD 87 LDA #$87DD $A9:87D9 8D 8C 17 STA $178C [$7E:178C] ; Some kind of routine called from $A0 $A9:87DC 6B RTL } ; $87DD: Some kind of routine called from $A0 { $A9:87DD 20 57 93 JSR $9357 [$A9:9357] $A9:87E0 6B RTL } ; $87E1: AI Script - Initial 1 { $A9:87E1 A9 02 00 LDA #$0002 $A9:87E4 22 33 82 80 JSL $808233[$80:8233] ; Check if an event has happened? $A9:87E8 90 2E BCC $2E [$8818] $A9:87EA AD 40 18 LDA $1840 [$7E:1840] $A9:87ED 8F 40 78 7E STA $7E7840[$7E:7840] $A9:87F1 AD F6 0A LDA $0AF6 [$7E:0AF6] $A9:87F4 C9 EC 00 CMP #$00EC $A9:87F7 10 1F BPL $1F [$8818] $A9:87F9 AD CC 0F LDA $0FCC [$7E:0FCC] $A9:87FC D0 1A BNE $1A [$8818] $A9:87FE A9 01 00 LDA #$0001 $A9:8801 8F 3A 78 7E STA $7E783A[$7E:783A] $A9:8805 8F 00 78 7E STA $7E7800[$7E:7800] $A9:8809 22 E2 A7 90 JSL $90A7E2[$90:A7E2] ; Disable & clear automap $A9:880D A9 06 00 LDA #$0006 ;\ $A9:8810 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue song 1 music track $A9:8814 22 96 E3 AD JSL $ADE396[$AD:E396] ; Sets new AI Script to $881D $A9:8818 20 B6 B3 JSR $B3B6 [$A9:B3B6] $A9:881B 68 PLA $A9:881C 6B RTL } ; $881D: AI Script - Initial 2 { $A9:881D A9 29 88 LDA #$8829 $A9:8820 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8823 A9 40 00 LDA #$0040 $A9:8826 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8829 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:882C 30 01 BMI $01 [$882F] $A9:882E 60 RTS $A9:882F A9 00 00 LDA #$0000 $A9:8832 22 84 F0 90 JSL $90F084[$90:F084] $A9:8836 AF 20 CD 7E LDA $7ECD20[$7E:CD20] $A9:883A 29 FF 00 AND #$00FF $A9:883D 8F 20 CD 7E STA $7ECD20[$7E:CD20] $A9:8841 A9 4D 88 LDA #$884D $A9:8844 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8847 A9 20 00 LDA #$0020 $A9:884A 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:884D CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8850 10 5F BPL $5F [$88B1] $A9:8852 A9 00 00 LDA #$0000 ;\ $A9:8855 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue music track 0 $A9:8859 A9 21 FF LDA #$FF21 ;\ $A9:885C 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue Mother Brain music data $A9:8860 A9 6C 88 LDA #$886C $A9:8863 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8866 A9 0C 00 LDA #$000C $A9:8869 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? ; $886C: AI Script - Initial 3 { $A9:886C CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:886F 10 40 BPL $40 [$88B1] $A9:8871 A9 01 00 LDA #$0001 $A9:8874 22 84 F0 90 JSL $90F084[$90:F084] $A9:8878 A9 84 88 LDA #$8884 $A9:887B 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:887E A9 08 00 LDA #$0008 $A9:8881 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8884 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8887 10 28 BPL $28 [$88B1] $A9:8889 20 FD CF JSR $CFFD [$A9:CFFD] $A9:888C A9 02 00 LDA #$0002 $A9:888F 22 02 AB 89 JSL $89AB02[$89:AB02] ; FX1? $A9:8893 A9 49 89 LDA #$8949 $A9:8896 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8899 A9 B2 88 LDA #$88B2 $A9:889C 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:889F 9C B2 0F STZ $0FB2 [$7E:0FB2] ; Counter? $A9:88A2 A9 00 00 LDA #$0000 $A9:88A5 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:88A9 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:88AD dx 0E,02,B6B3 $A9:88B1 60 RTS } } ; $88B2: AI Script - Initial 4 { $A9:88B2 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:88B5 10 1C BPL $1C [$88D3] $A9:88B7 A9 08 00 LDA #$0008 $A9:88BA 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:88BD AF 2E 80 7E LDA $7E802E[$7E:802E] $A9:88C1 1A INC A $A9:88C2 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:88C6 3A DEC A $A9:88C7 22 DE EE AD JSL $ADEEDE[$AD:EEDE] $A9:88CB 90 06 BCC $06 [$88D3] $A9:88CD A9 D3 88 LDA #$88D3 $A9:88D0 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script ; $88D3: AI Script - Initial 5 { $A9:88D3 F4 D8 88 PEA $88D8 $A9:88D6 6C F0 0F JMP ($0FF0)[$A9:8949] $A9:88D9 20 DD 88 JSR $88DD [$A9:88DD] $A9:88DC 60 RTS } } ; $88DD: Routine, called from above only { $A9:88DD AF 30 80 7E LDA $7E8030[$7E:8030] $A9:88E1 3A DEC A $A9:88E2 30 05 BMI $05 [$88E9] $A9:88E4 8F 30 80 7E STA $7E8030[$7E:8030] $A9:88E8 60 RTS $A9:88E9 A9 08 00 LDA #$0008 $A9:88EC 8F 30 80 7E STA $7E8030[$7E:8030] $A9:88F0 AF 32 80 7E LDA $7E8032[$7E:8032] $A9:88F4 3A DEC A $A9:88F5 10 03 BPL $03 [$88FA] $A9:88F7 A9 07 00 LDA #$0007 $A9:88FA 8F 32 80 7E STA $7E8032[$7E:8032] $A9:88FE 0A ASL A $A9:88FF 0A ASL A $A9:8900 AA TAX $A9:8901 BD 29 89 LDA $8929,x[$A9:8945] $A9:8904 85 12 STA $12 [$7E:0012] $A9:8906 BD 2B 89 LDA $892B,x[$A9:8947] $A9:8909 85 14 STA $14 [$7E:0014] $A9:890B A0 03 00 LDY #$0003 $A9:890E AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:8911 C9 00 40 CMP #$4000 $A9:8914 B0 03 BCS $03 [$8919] $A9:8916 A0 0C 00 LDY #$000C $A9:8919 98 TYA $A9:891A A0 09 E5 LDY #$E509 $A9:891D 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8921 A9 24 00 LDA #$0024 $A9:8924 22 B7 90 80 JSL $8090B7[$80:90B7] ; Queue sound $A9:8928 60 RTS } ; $8929: Data used above only { $A9:8929 db 88, 00, 74, 00, 78, 00, 84, 00, 7C, 00, 5A, 00, 8A, 00, 92, 00, 78, 00, 34, 00, 7C, 00, AA, 00, 8A, 00, 48, 00, 78, 00, CE, 00 } ; $8949: Sub AI Script for $88D3 { $A9:8949 A0 00 00 LDY #$0000 $A9:894C BB TYX $A9:894D B9 97 19 LDA $1997,y[$7E:1997] $A9:8950 D0 01 BNE $01 [$8953] $A9:8952 E8 INX $A9:8953 C8 INY $A9:8954 C8 INY $A9:8955 C0 24 00 CPY #$0024 $A9:8958 30 F3 BMI $F3 [$894D] $A9:895A E0 04 00 CPX #$0004 $A9:895D 10 01 BPL $01 [$8960] $A9:8960 A2 E5 8A LDX #$8AE5 $A9:8963 22 75 92 A0 JSL $A09275[$A0:9275] $A9:8967 A9 6E 89 LDA #$896E $A9:896A 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:896D 60 RTS } ; $896E: Sub AI Script for $88D3 { $A9:896E 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8972 dx 05,09,B6C3 $A9:8976 A9 83 89 LDA #$8983 $A9:8979 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:897C A9 20 00 LDA #$0020 $A9:897F 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8982 60 RTS } ; $8983: Sub AI Script for $88D3 { $A9:8983 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8986 10 17 BPL $17 [$899F] $A9:8988 A9 98 00 LDA #$0098 $A9:898B 85 12 STA $12 [$7E:0012] $A9:898D A9 2F 00 LDA #$002F $A9:8990 85 14 STA $14 [$7E:0014] $A9:8992 A0 5B CC LDY #$CC5B $A9:8995 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8999 A9 A0 89 LDA #$89A0 $A9:899C 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:899F 60 RTS } ; $89A0: Sub AI Script for $88D3 { $A9:89A0 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:89A4 dx 09,02,B6B3 $A9:89A8 A9 B5 89 LDA #$89B5 $A9:89AB 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:89AE A9 20 00 LDA #$0020 $A9:89B1 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:89B4 60 RTS } ; $89B5: Sub AI Script for $88D3 { $A9:89B5 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:89B8 10 17 BPL $17 [$89D1] $A9:89BA A9 68 00 LDA #$0068 $A9:89BD 85 12 STA $12 [$7E:0012] $A9:89BF A9 2F 00 LDA #$002F $A9:89C2 85 14 STA $14 [$7E:0014] $A9:89C4 A0 69 CC LDY #$CC69 $A9:89C7 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:89CB A9 D2 89 LDA #$89D2 $A9:89CE 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:89D1 60 RTS } ; $89D2: Sub AI Script for $88D3 { $A9:89D2 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:89D6 dx 06,02,B6B3 $A9:89DA A9 E7 89 LDA #$89E7 $A9:89DD 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:89E0 A9 20 00 LDA #$0020 $A9:89E3 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:89E6 60 RTS } ; $89E7: Sub AI Script for $88D3 { $A9:89E7 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:89EA 10 0D BPL $0D [$89F9] $A9:89EC A2 F5 8A LDX #$8AF5 $A9:89EF 22 75 92 A0 JSL $A09275[$A0:9275] $A9:89F3 A9 FA 89 LDA #$89FA $A9:89F6 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:89F9 60 RTS } ; $89FA: Sub AI Script for $88D3 { $A9:89FA 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:89FE dx 0A,09,B6C7 $A9:8A02 A9 0F 8A LDA #$8A0F $A9:8A05 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A08 A9 20 00 LDA #$0020 $A9:8A0B 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8A0E 60 RTS } ; $8A0F: Sub AI Script for $88D3 { $A9:8A0F CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8A12 10 0D BPL $0D [$8A21] $A9:8A14 A2 05 8B LDX #$8B05 $A9:8A17 22 75 92 A0 JSL $A09275[$A0:9275] $A9:8A1B A9 22 8A LDA #$8A22 $A9:8A1E 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A21 60 RTS } ; $8A22: Sub AI Script for $88D3 { $A9:8A22 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8A26 dx 06,0A,B6BB $A9:8A2A A9 37 8A LDA #$8A37 $A9:8A2D 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A30 A9 20 00 LDA #$0020 $A9:8A33 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8A36 60 RTS } ; $8A37: Sub AI Script for $88D3 { $A9:8A37 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8A3A 10 17 BPL $17 [$8A53] $A9:8A3C A9 78 00 LDA #$0078 $A9:8A3F 85 12 STA $12 [$7E:0012] $A9:8A41 A9 3B 00 LDA #$003B $A9:8A44 85 14 STA $14 [$7E:0014] $A9:8A46 A0 77 CC LDY #$CC77 $A9:8A49 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8A4D A9 54 8A LDA #$8A54 $A9:8A50 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A53 60 RTS } ; $8A54: Sub AI Script for $88D3 { $A9:8A54 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8A58 dx 07,02,B6B7 $A9:8A5C A9 69 8A LDA #$8A69 $A9:8A5F 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A62 A9 20 00 LDA #$0020 $A9:8A65 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8A68 60 RTS } ; $8A69: Sub AI Script for $88D3 { $A9:8A69 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8A6C 10 17 BPL $17 [$8A85] $A9:8A6E A9 88 00 LDA #$0088 $A9:8A71 85 12 STA $12 [$7E:0012] $A9:8A73 A9 3B 00 LDA #$003B $A9:8A76 85 14 STA $14 [$7E:0014] $A9:8A78 A0 85 CC LDY #$CC85 $A9:8A7B 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8A7F A9 86 8A LDA #$8A86 $A9:8A82 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A85 60 RTS } ; $8A86: Sub AI Script for $88D3 { $A9:8A86 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8A8A dx 08,02,B6B7 $A9:8A8E A9 9B 8A LDA #$8A9B $A9:8A91 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8A94 A9 20 00 LDA #$0020 $A9:8A97 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8A9A 60 RTS } ; $8A9B: Sub AI Script for $88D3 { $A9:8A9B CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8A9E 10 0D BPL $0D [$8AAD] $A9:8AA0 A2 15 8B LDX #$8B15 $A9:8AA3 22 75 92 A0 JSL $A09275[$A0:9275] $A9:8AA7 A9 AE 8A LDA #$8AAE $A9:8AAA 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8AAD 60 RTS } ; $8AAE: Sub AI Script for $88D3 { $A9:8AAE 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8AB2 dx 09,0A,B6BB $A9:8AB6 A9 C3 8A LDA #$8AC3 $A9:8AB9 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8ABC A9 02 00 LDA #$0002 $A9:8ABF 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8AC2 60 RTS } ; $8AC3: Sub AI Script for $88D3 { $A9:8AC3 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8AC6 10 0D BPL $0D [$8AD5] $A9:8AC8 A2 25 8B LDX #$8B25 $A9:8ACB 22 75 92 A0 JSL $A09275[$A0:9275] $A9:8ACF A9 D6 8A LDA #$8AD6 $A9:8AD2 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:8AD5 60 RTS } ; $8AD6: Sub AI Script for $88D3 { $A9:8AD6 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8ADA dx 07,07,B6BF $A9:8ADE A9 E4 8A LDA #$8AE4 $A9:8AE1 8D F0 0F STA $0FF0 [$7E:0FF0] ; $8AD6: Sub AI Script for $88D3 { $A9:8AE4 60 RTS } } ; $8AE5: Some data for $88D3 { $A9:8AE5 db FF, EC, 60, 00, B3, 00, 69, 8C, 00, A0, 00, 00, 00, 00, 00, 00, FF, EC, A0, 00, B3, 00, 6F, 8C, 00, A0, 00, 00, 02, 00, 00, 00, FF, EC, 68, 00, BB, 00, 75, 8C, 00, A0, 00, 00, 04, 00, 00, 00, FF, EC, 98, 00, BB, 00, 7B, 8C, 00, A0, 00, 00, 06, 00, 00, 00, FF, EC, 80, 00, A7, 00, 81, 8C, 00, A8, 00, 00, 08, 00, 20, 00 } ; $8B35: Initialisation AI - enemy $ECFF (Mother Brain) { $A9:8B35 AE 54 0E LDX $0E54 [$7E:0E54] $A9:8B38 BC B4 0F LDY $0FB4,x[$7E:1034] $A9:8B3B B9 5D 8B LDA $8B5D,y[$A9:8B5D] $A9:8B3E 9D 82 0F STA $0F82,x[$7E:1002] ; Width $A9:8B41 B9 67 8B LDA $8B67,y[$A9:8B67] $A9:8B44 9D 84 0F STA $0F84,x[$7E:1004] ; Height $A9:8B47 B9 71 8B LDA $8B71,y[$A9:8B71] $A9:8B4A 9D AA 0F STA $0FAA,x[$7E:102A] ; Y position threshold $A9:8B4D 9E AE 0F STZ $0FAE,x[$7E:102E] $A9:8B50 9E B0 0F STZ $0FB0,x[$7E:1030] $A9:8B53 9E AC 0F STZ $0FAC,x[$7E:102C] $A9:8B56 B9 7B 8B LDA $8B7B,y[$A9:8B7B] $A9:8B59 9D A8 0F STA $0FA8,x[$7E:1028] ; Main AI Script $A9:8B5C 6B RTL $A9:8B5D dw 0010, 0010, 0008, 0008, 0010 ; Width $A9:8B67 dw 0020, 0020, 0018, 0018, 0020 ; Height $A9:8B71 dw 00F8, 00F8, 00F0, 00F0, 00F6 ; Y position threshold $A9:8B7B dw 8B88, 8B88, 8B88, 8B88, 8BCB ; Function } ; $8B85: Main AI - enemy $ECFF (Mother Brain) { $A9:8B85 7C A8 0F JMP ($0FA8,x)[$A9:8B88] ; Main AI Script } ; $8B88: AI Script (see $8B35 above) { $A9:8B88 BD AC 0F LDA $0FAC,x[$7E:102C] $A9:8B8B 18 CLC $A9:8B8C 69 06 00 ADC #$0006 $A9:8B8F 9D AC 0F STA $0FAC,x[$7E:102C] $A9:8B92 20 A9 C4 JSR $C4A9 [$A9:C4A9] $A9:8B95 BD 7E 0F LDA $0F7E,x[$7E:0FFE] $A9:8B98 DD AA 0F CMP $0FAA,x[$7E:102A] ; Y position threshold $A9:8B9B 10 09 BPL $09 [$8BA6] $A9:8B9D DE AE 0F DEC $0FAE,x[$7E:102E] $A9:8BA0 10 03 BPL $03 [$8BA5] $A9:8BA2 20 36 8C JSR $8C36 [$A9:8C36] $A9:8BA5 6B RTL $A9:8BA6 BD 86 0F LDA $0F86,x[$7E:1006] $A9:8BA9 09 00 02 ORA #$0200 $A9:8BAC 9D 86 0F STA $0F86,x[$7E:1006] $A9:8BAF BD 7A 0F LDA $0F7A,x[$7E:0FFA] $A9:8BB2 85 12 STA $12 [$7E:0012] $A9:8BB4 BD 7E 0F LDA $0F7E,x[$7E:0FFE] $A9:8BB7 85 14 STA $14 [$7E:0014] $A9:8BB9 A9 03 00 LDA #$0003 $A9:8BBC A0 09 E5 LDY #$E509 $A9:8BBF 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8BC3 A9 24 00 LDA #$0024 $A9:8BC6 22 B7 90 80 JSL $8090B7[$80:90B7] ; Queue sound $A9:8BCA 6B RTL } ; $8BCB: AI Script (see $8B35 above) { $A9:8BCB DE B6 0F DEC $0FB6,x[$7E:1076] $A9:8BCE 10 D5 BPL $D5 [$8BA5] $A9:8BD0 A9 D6 8B LDA #$8BD6 $A9:8BD3 9D A8 0F STA $0FA8,x[$7E:1068] ; Main AI Script $A9:8BD6 BD AC 0F LDA $0FAC,x[$7E:106C] $A9:8BD9 18 CLC $A9:8BDA 69 06 00 ADC #$0006 $A9:8BDD 9D AC 0F STA $0FAC,x[$7E:106C] $A9:8BE0 20 A9 C4 JSR $C4A9 [$A9:C4A9] $A9:8BE3 48 PHA $A9:8BE4 C9 F4 00 CMP #$00F4 $A9:8BE7 30 09 BMI $09 [$8BF2] $A9:8BE9 BD 86 0F LDA $0F86,x[$7E:1046] $A9:8BEC 09 00 01 ORA #$0100 $A9:8BEF 9D 86 0F STA $0F86,x[$7E:1046] $A9:8BF2 68 PLA $A9:8BF3 38 SEC $A9:8BF4 E9 38 00 SBC #$0038 $A9:8BF7 C9 C4 00 CMP #$00C4 $A9:8BFA 8D BE 0F STA $0FBE [$7E:0FBE] $A9:8BFD 10 03 BPL $03 [$8C02] $A9:8BFF 4C 9D 8B JMP $8B9D [$A9:8B9D] $A9:8C02 20 0C D0 JSR $D00C [$A9:D00C] $A9:8C05 A9 19 00 LDA #$0019 $A9:8C08 22 0B F4 AD JSL $ADF40B[$AD:F40B] $A9:8C0C 9C B4 18 STZ $18B4 [$7E:18B4] $A9:8C0F 9C B6 18 STZ $18B6 [$7E:18B6] $A9:8C12 9E AC 0F STZ $0FAC,x[$7E:10AA] $A9:8C15 A9 C4 00 LDA #$00C4 $A9:8C18 8D BE 0F STA $0FBE [$7E:0FBE] $A9:8C1B A9 3B 00 LDA #$003B $A9:8C1E 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:8C21 A9 17 01 LDA #$0117 $A9:8C24 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:8C27 20 3F 90 JSR $903F [$A9:903F] $A9:8C2A A9 87 8C LDA #$8C87 $A9:8C2D 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8C30 AE 54 0E LDX $0E54 [$7E:0E54] $A9:8C33 4C A6 8B JMP $8BA6 [$A9:8BA6] } ; $8C36: Unknown routine { $A9:8C36 A9 08 00 LDA #$0008 $A9:8C39 9D AE 0F STA $0FAE,x[$7E:102E] $A9:8C3C BD B0 0F LDA $0FB0,x[$7E:1030] $A9:8C3F 1A INC A $A9:8C40 29 03 00 AND #$0003 $A9:8C43 9D B0 0F STA $0FB0,x[$7E:1030] $A9:8C46 0A ASL A $A9:8C47 A8 TAY $A9:8C48 B9 61 8C LDA $8C61,y[$A9:8C63] $A9:8C4B 18 CLC $A9:8C4C 7D 7A 0F ADC $0F7A,x[$7E:0FFA] $A9:8C4F 85 12 STA $12 [$7E:0012] $A9:8C51 A9 D0 00 LDA #$00D0 $A9:8C54 85 14 STA $14 [$7E:0014] $A9:8C56 A9 09 00 LDA #$0009 $A9:8C59 A0 09 E5 LDY #$E509 $A9:8C5C 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8C60 60 RTS } ; $8C61: Data used only above { $A9:8C61 db F8, FF, 02, 00, FC, FF, 06, 00, 01, 00, A1, AD, 2F, 81, 01, 00, D5, AD, 2F, 81, 01, 00, 09, AE, 2F, 81, 01, 00, 33, AE, 2F, 81, 01, 00, 5D, AE, 2F, 81 } ; $8C87: AI Script { $A9:8C87 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8C8B dx 02,02,B67B $A9:8C8F 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8C93 dx 02,03,B67F $A9:8C97 A9 9E 8C LDA #$8C9E $A9:8C9A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8C9D 60 RTS } ; $8C9E: AI Script { $A9:8C9E 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CA2 dx 02,04,B683 $A9:8CA6 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CAA dx 02,05,B687 $A9:8CAE A9 B5 8C LDA #$8CB5 $A9:8CB1 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8CB4 60 RTS } ; $8CB5: AI Script { $A9:8CB5 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CB9 dx 02,06,B68B $A9:8CBD 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CC1 dx 02,07,B68F $A9:8CC5 A9 CC 8C LDA #$8CCC $A9:8CC8 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8CCB 60 RTS } ; $8CCC: AI Script { $A9:8CCC 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CD0 dx 02,08,B693 $A9:8CD4 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CD8 dx 02,09,B697 $A9:8CDC A9 E3 8C LDA #$8CE3 $A9:8CDF 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8CE2 60 RTS } ; $8CE3: AI Script { $A9:8CE3 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CE7 dx 02,0A,B69B $A9:8CEB 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CEF dx 02,0B,B69F $A9:8CF3 A9 FA 8C LDA #$8CFA $A9:8CF6 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8CF9 60 RTS } ; $8CFA: AI Script { $A9:8CFA 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8CFE dx 02,0C,B6A3 $A9:8D02 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:8C06 dx 02,0D,B6A7 $A9:8D0A A9 11 8D LDA #$8D11 $A9:8D0D 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8D10 60 RTS } ; $8D11: AI Script { $A9:8D11 A9 01 01 LDA #$0101 $A9:8D14 8D 1B 09 STA $091B [$7E:091B] $A9:8D17 A5 59 LDA $59 [$7E:0059] $A9:8D19 29 FC FF AND #$FFFC $A9:8D1C 85 59 STA $59 [$7E:0059] $A9:8D1E A0 B4 94 LDY #$94B4 $A9:8D21 A2 42 01 LDX #$0142 $A9:8D24 A9 0F 00 LDA #$000F $A9:8D27 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:8D2B A0 94 94 LDY #$9494 $A9:8D2E A2 62 01 LDX #$0162 $A9:8D31 A9 0F 00 LDA #$000F $A9:8D34 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:8D38 A9 49 8D LDA #$8D49 $A9:8D3B 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8D3E A9 01 00 LDA #$0001 $A9:8D41 8D 1E 0E STA $0E1E [$7E:0E1E] $A9:8D44 8F 44 78 7E STA $7E7844[$7E:7844] $A9:8D48 60 RTS } ; $8D49: AI Script { $A9:8D49 A9 34 00 LDA #$0034 $A9:8D4C 8D 82 19 STA $1982 [$7E:1982] $A9:8D4F A9 A2 87 LDA #$87A2 $A9:8D52 8D E8 0F STA $0FE8 [$7E:0FE8] ; Main AI Script (enemy #2?) $A9:8D55 AD 86 0F LDA $0F86 [$7E:0F86] $A9:8D58 29 FF FB AND #$FBFF $A9:8D5B 8D 86 0F STA $0F86 [$7E:0F86] $A9:8D5E AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:8D61 29 FF FB AND #$FBFF $A9:8D64 8D C6 0F STA $0FC6 [$7E:0FC6] $A9:8D67 A9 50 46 LDA #$4650 $A9:8D6A 8D CC 0F STA $0FCC [$7E:0FCC] $A9:8D6D A9 79 8D LDA #$8D79 $A9:8D70 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8D73 A9 80 00 LDA #$0080 $A9:8D76 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8D79 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8D7C 30 01 BMI $01 [$8D7F] $A9:8D7E 60 RTS $A9:8D7F A9 8B 8D LDA #$8D8B $A9:8D82 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8D85 A9 20 00 LDA #$0020 $A9:8D88 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8D8B CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8D8E 30 01 BMI $01 [$8D91] $A9:8D90 60 RTS $A9:8D91 22 1E E7 88 JSL $88E71E[$88:E71E] $A9:8D95 8F 12 78 7E STA $7E7812[$7E:7812] $A9:8D99 AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:8D9C 09 00 01 ORA #$0100 $A9:8D9F 8D C6 0F STA $0FC6 [$7E:0FC6] $A9:8DA2 A9 21 9C LDA #$9C21 $A9:8DA5 20 47 C4 JSR $C447 [$A9:C447] $A9:8DA8 A9 B4 8D LDA #$8DB4 $A9:8DAB 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8DAE A9 00 01 LDA #$0100 $A9:8DB1 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8DB4 A2 8F 8F LDX #$8F8F $A9:8DB7 20 BE C5 JSR $C5BE [$A9:C5BE] $A9:8DBA B0 01 BCS $01 [$8DBD] $A9:8DBC 60 RTS $A9:8DBD A9 C3 8D LDA #$8DC3 $A9:8DC0 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8DC3 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8DC6 10 23 BPL $23 [$8DEB] $A9:8DC8 A9 3B 00 LDA #$003B $A9:8DCB 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:8DCE A9 17 01 LDA #$0117 $A9:8DD1 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:8DD4 A9 E5 FF LDA #$FFE5 $A9:8DD7 85 B5 STA $B5 [$7E:00B5] $A9:8DD9 A9 27 FF LDA #$FF27 $A9:8DDC 85 B7 STA $B7 [$7E:00B7] $A9:8DDE A9 07 00 LDA #$0007 $A9:8DE1 8F 08 78 7E STA $7E7808[$7E:7808] $A9:8DE5 A9 EC 8D LDA #$8DEC $A9:8DE8 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8DEB 60 RTS } ; $8DEC: AI Script { $A9:8DEC A9 02 9A LDA #$9A02 $A9:8DEF 20 2D C4 JSR $C42D [$A9:C42D] $A9:8DF2 A9 01 00 LDA #$0001 $A9:8DF5 8D D4 0F STA $0FD4 [$7E:0FD4] $A9:8DF8 AD 86 0F LDA $0F86 [$7E:0F86] $A9:8DFB 29 FF FE AND #$FEFF $A9:8DFE 8D 86 0F STA $0F86 [$7E:0F86] $A9:8E01 A9 3B 00 LDA #$003B $A9:8E04 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:8E07 A9 17 01 LDA #$0117 $A9:8E0A 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:8E0D A9 E5 FF LDA #$FFE5 $A9:8E10 85 B5 STA $B5 [$7E:00B5] $A9:8E12 A9 27 FF LDA #$FF27 $A9:8E15 85 B7 STA $B7 [$7E:00B7] $A9:8E17 A9 05 00 LDA #$0005 ;\ $A9:8E1A 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue song 0 music track $A9:8E1E A9 02 00 LDA #$0002 $A9:8E21 8D 3E 18 STA $183E [$7E:183E] $A9:8E24 A9 00 01 LDA #$0100 $A9:8E27 8D 40 18 STA $1840 [$7E:1840] $A9:8E2A A9 50 00 LDA #$0050 $A9:8E2D 8F 68 80 7E STA $7E8068[$7E:8068] $A9:8E31 A9 01 00 LDA #$0001 $A9:8E34 8F 62 80 7E STA $7E8062[$7E:8062] $A9:8E38 A9 08 00 LDA #$0008 $A9:8E3B 8F 64 80 7E STA $7E8064[$7E:8064] $A9:8E3F A9 06 00 LDA #$0006 $A9:8E42 8F 66 80 7E STA $7E8066[$7E:8066] $A9:8E46 A9 4D 8E LDA #$8E4D $A9:8E49 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8E4C 60 RTS } ; $8E4D: AI Script { $A9:8E4D AD B6 05 LDA $05B6 [$7E:05B6] $A9:8E50 29 03 00 AND #$0003 $A9:8E53 D0 46 BNE $46 [$8E9B] $A9:8E55 20 46 8F JSR $8F46 [$A9:8F46] $A9:8E58 A9 02 00 LDA #$0002 $A9:8E5B 85 12 STA $12 [$7E:0012] $A9:8E5D A5 B7 LDA $B7 [$7E:00B7] $A9:8E5F 18 CLC $A9:8E60 65 12 ADC $12 [$7E:0012] $A9:8E62 85 B7 STA $B7 [$7E:00B7] $A9:8E64 AD 7E 0F LDA $0F7E [$7E:0F7E] $A9:8E67 38 SEC $A9:8E68 E5 12 SBC $12 [$7E:0012] $A9:8E6A 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:8E6D C9 BD 00 CMP #$00BD $A9:8E70 B0 29 BCS $29 [$8E9B] $A9:8E72 A9 40 01 LDA #$0140 $A9:8E75 8D 9A 17 STA $179A [$7E:179A] $A9:8E78 A9 BC 00 LDA #$00BC $A9:8E7B 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:8E7E 9C 40 18 STZ $1840 [$7E:1840] $A9:8E81 AF 12 78 7E LDA $7E7812[$7E:7812] $A9:8E85 AA TAX $A9:8E86 9E B4 18 STZ $18B4,x[$7E:18B4] $A9:8E89 A9 AA 99 LDA #$99AA $A9:8E8C 20 2D C4 JSR $C42D [$A9:C42D] $A9:8E8F A9 95 8E LDA #$8E95 $A9:8E92 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8E95 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:8E99 F0 01 BEQ $01 [$8E9C] $A9:8E9B 60 RTS $A9:8E9C 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:8EA0 A9 AA 8E LDA #$8EAA $A9:8EA3 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8EA6 9C B2 0F STZ $0FB2 [$7E:0FB2] ; Counter? $A9:8EA9 60 RTS } ; $8EAA: AI Script { $A9:8EAA CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8EAD 10 45 BPL $45 [$8EF4] $A9:8EAF A9 04 00 LDA #$0004 $A9:8EB2 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8EB5 AF 2E 80 7E LDA $7E802E[$7E:802E] $A9:8EB9 1A INC A $A9:8EBA 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:8EBE 3A DEC A $A9:8EBF 22 EA EE AD JSL $ADEEEA[$AD:EEEA] $A9:8EC3 90 2F BCC $2F [$8EF4] $A9:8EC5 A9 01 00 LDA #$0001 $A9:8EC8 8F 60 78 7E STA $7E7860[$7E:7860] $A9:8ECC 1A INC A $A9:8ECD 8F 00 78 7E STA $7E7800[$7E:7800] $A9:8ED1 3A DEC A $A9:8ED2 8F 64 78 7E STA $7E7864[$7E:7864] $A9:8ED6 A9 06 00 LDA #$0006 $A9:8ED9 8F 64 80 7E STA $7E8064[$7E:8064] $A9:8EDD 8F 66 80 7E STA $7E8066[$7E:8066] $A9:8EE1 A9 00 05 LDA #$0500 $A9:8EE4 8F 68 80 7E STA $7E8068[$7E:8068] $A9:8EE8 A9 F5 8E LDA #$8EF5 $A9:8EEB 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8EEE A9 17 00 LDA #$0017 $A9:8EF1 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8EF4 60 RTS } ; $8EF5: AI Script { $A9:8EF5 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8EF8 30 01 BMI $01 [$8EFB] $A9:8EFA 60 RTS $A9:8EFB A9 7F 9B LDA #$9B7F $A9:8EFE 20 47 C4 JSR $C447 [$A9:C447] $A9:8F01 A9 14 8F LDA #$8F14 $A9:8F04 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8F07 A9 40 00 LDA #$0040 $A9:8F0A 8F 68 80 7E STA $7E8068[$7E:8068] $A9:8F0E A9 00 01 LDA #$0100 $A9:8F11 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8F14 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8F17 10 2C BPL $2C [$8F45] $A9:8F19 A9 02 00 LDA #$0002 $A9:8F1C 8F 64 80 7E STA $7E8064[$7E:8064] $A9:8F20 A9 04 00 LDA #$0004 $A9:8F23 8F 66 80 7E STA $7E8066[$7E:8066] $A9:8F27 A9 33 8F LDA #$8F33 $A9:8F2A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8F2D A9 40 00 LDA #$0040 $A9:8F30 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:8F33 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:8F36 10 0D BPL $0D [$8F45] $A9:8F38 A9 01 00 LDA #$0001 $A9:8F3B 8F 68 78 7E STA $7E7868[$7E:7868] $A9:8F3F A9 05 B6 LDA #$B605 $A9:8F42 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:8F45 60 RTS } ; $8F46: Unknown routine { $A9:8F46 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:8F49 10 06 BPL $06 [$8F51] $A9:8F4B A9 07 00 LDA #$0007 $A9:8F4E 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:8F51 AD F2 0F LDA $0FF2 [$7E:0FF2] $A9:8F54 0A ASL A $A9:8F55 AA TAX $A9:8F56 BD 7F 8F LDA $8F7F,x[$A9:8F8D] $A9:8F59 85 12 STA $12 [$7E:0012] $A9:8F5B A9 D4 00 LDA #$00D4 $A9:8F5E 85 14 STA $14 [$7E:0014] $A9:8F60 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:8F63 29 00 01 AND #$0100 $A9:8F66 EB XBA $A9:8F67 AA TAX $A9:8F68 BD 7D 8F LDA $8F7D,x[$A9:8F7D] $A9:8F6B 29 FF 00 AND #$00FF $A9:8F6E A0 09 E5 LDY #$E509 $A9:8F71 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:8F75 A9 29 00 LDA #$0029 $A9:8F78 22 B7 90 80 JSL $8090B7[$80:90B7] ; Queue sound $A9:8F7C 60 RTS } ; $8F7D: Data used only above { $A9:8F7D db 09, 12, 3D, 00, 54, 00, 20, 00, 35, 00, 5A, 00, 43, 00, 67, 00, 29, 00, 00, 02, 00, 90, B7, 00, 74, 00, 02, 00, 92, B7, 00, 75, 00, 02, 00, 94, B7, 00, 76, 00, 02, 00, 96, B7, 00, 77, 00, 02, 00, 98, B7, 00, 78, 00, 02, 00, 9A, B7, 00, 79, 00, 02, 00, 9C, B7, 00, 7A, 00, 02, 00, 9E, B7, 00, 7B, 00, 02, 00, A0, B7, 00, 7C, 00, 02, 00, A2, B7, 00, 7D, 00, 02, 00, A4, B7, 00, 7E, 00, 02, 00, A6, B7, 00, 7F, 00, 00, 00, 02, 00, 88, B1, 00, 7C, 00, 02, 00, 8A, B1, 00, 7D, 00, 02, 00, 8C, B1, 00, 7E, 00, 02, 00, 8E, B1, 00, 7F, 00, 00, C0, 01, 00, CE, B7, 00, 7A, C0, 01, 00, D0, B7, 00, 7B, C0, 01, 00, D2, B7, 00, 7C, C0, 01, 00, D4, B7, 00, 7D, C0, 01, 00, D6, B7, 00, 7E, C0, 01, 00, D8, B7, 00, 7F, 00, 00, 00, 02, 00, F4, AB, 00, 70, 00, 02, 00, F6, AB, 00, 71, 00, 00 } ; $903F: Unknown routine { $A9:903F A9 02 00 LDA #$0002 $A9:9042 8F 48 80 7E STA $7E8048[$7E:8048] $A9:9046 A9 0A 00 LDA #$000A $A9:9049 8F 4E 80 7E STA $7E804E[$7E:804E] $A9:904D 8F 5A 80 7E STA $7E805A[$7E:805A] $A9:9051 A9 14 00 LDA #$0014 $A9:9054 8F 54 80 7E STA $7E8054[$7E:8054] $A9:9058 8F 60 80 7E STA $7E8060[$7E:8060] $A9:905C A9 00 48 LDA #$4800 $A9:905F 8F 40 80 7E STA $7E8040[$7E:8040] $A9:9063 A9 00 50 LDA #$5000 $A9:9066 8F 42 80 7E STA $7E8042[$7E:8042] $A9:906A A9 00 01 LDA #$0100 $A9:906D 8F 68 80 7E STA $7E8068[$7E:8068] $A9:9071 60 RTS } ; $9072: Unknown routine { $A9:9072 AF 64 80 7E LDA $7E8064[$7E:8064] $A9:9076 AA TAX $A9:9077 7C 7A 90 JMP ($907A,x)[$A9:90EC] $A9:907A dw 9084 $A9:907C dw 9085 $A9:907E dw 90A2 $A9:9080 dw 90CF $A9:9082 dw 90EC } ; $9084: Sub-subroutine ($9072) { $A9:9084 60 RTS } ; $9085: Sub-subroutine ($9072) { $A9:9085 AF 40 80 7E LDA $7E8040[$7E:8040] $A9:9089 38 SEC $A9:908A EF 68 80 7E SBC $7E8068[$7E:8068] $A9:908E C9 00 28 CMP #$2800 $A9:9091 B0 0A BCS $0A [$909D] $A9:9093 A9 04 00 LDA #$0004 $A9:9096 8F 64 80 7E STA $7E8064[$7E:8064] $A9:909A A9 00 28 LDA #$2800 $A9:909D 8F 40 80 7E STA $7E8040[$7E:8040] $A9:90A1 60 RTS } ; $90A2: Sub-subroutine ($9072) { $A9:90A2 AD BE 0F LDA $0FBE [$7E:0FBE] $A9:90A5 C9 3C 00 CMP #$003C $A9:90A8 30 1D BMI $1D [$90C7] $A9:90AA AF 40 80 7E LDA $7E8040[$7E:8040] $A9:90AE 18 CLC $A9:90AF 6F 68 80 7E ADC $7E8068[$7E:8068] $A9:90B3 C9 00 90 CMP #$9000 $A9:90B6 90 0A BCC $0A [$90C2] $A9:90C2 8F 40 80 7E STA $7E8040[$7E:8040] $A9:90C6 60 RTS $A9:90C7 A9 02 00 LDA #$0002 $A9:90CA 8F 64 80 7E STA $7E8064[$7E:8064] $A9:90CE 60 RTS } ; $90CF: Sub-subroutine ($9072) { $A9:90CF AF 40 80 7E LDA $7E8040[$7E:8040] $A9:90D3 38 SEC $A9:90D4 EF 68 80 7E SBC $7E8068[$7E:8068] $A9:90D8 C9 00 30 CMP #$3000 $A9:90DB B0 0A BCS $0A [$90E7] $A9:90DD A9 00 00 LDA #$0000 $A9:90E0 8F 64 80 7E STA $7E8064[$7E:8064] $A9:90E4 A9 00 30 LDA #$3000 $A9:90E7 8F 40 80 7E STA $7E8040[$7E:8040] $A9:90EB 60 RTS } ; $90EC: Sub-subroutine ($9072) { $A9:90EC AF 40 80 7E LDA $7E8040[$7E:8040] $A9:90F0 18 CLC $A9:90F1 6F 68 80 7E ADC $7E8068[$7E:8068] $A9:90F5 C9 00 90 CMP #$9000 $A9:90F8 90 0A BCC $0A [$9104] $A9:90FA A9 00 00 LDA #$0000 $A9:90FD 8F 64 80 7E STA $7E8064[$7E:8064] $A9:9101 A9 00 90 LDA #$9000 $A9:9104 8F 40 80 7E STA $7E8040[$7E:8040] $A9:9108 60 RTS } ; $9109: Unknown routine { $A9:9109 AF 66 80 7E LDA $7E8066[$7E:8066] $A9:910D AA TAX $A9:910E 7C 11 91 JMP ($9111,x)[$A9:9176] $A9:9111 db 911B $A9:9113 db 911C $A9:9115 db 9151 $A9:9117 db 9176 $A9:9119 db 9193 } ; $911B: Sub-subroutine ($9072) { $A9:911B 60 RTS } ; $911C: Sub-subroutine ($9072) { $A9:911C AD BE 0F LDA $0FBE [$7E:0FBE] $A9:911F 18 CLC $A9:9120 69 04 00 ADC #$0004 $A9:9123 CD FA 0A CMP $0AFA [$7E:0AFA] $A9:9126 30 0C BMI $0C [$9134] $A9:9134 AF 42 80 7E LDA $7E8042[$7E:8042] $A9:9138 38 SEC $A9:9139 EF 68 80 7E SBC $7E8068[$7E:8068] $A9:913D C9 00 20 CMP #$2000 $A9:9140 B0 0A BCS $0A [$914C] $A9:9142 A9 04 00 LDA #$0004 $A9:9145 8F 66 80 7E STA $7E8066[$7E:8066] $A9:9149 A9 00 20 LDA #$2000 $A9:914C 8F 42 80 7E STA $7E8042[$7E:8042] $A9:9150 60 RTS } ; $9151: Sub-subroutine ($9072) { $A9:9151 AF 40 80 7E LDA $7E8040[$7E:8040] $A9:9155 18 CLC $A9:9156 69 00 08 ADC #$0800 $A9:9159 85 12 STA $12 [$7E:0012] $A9:915B AF 42 80 7E LDA $7E8042[$7E:8042] $A9:915F 18 CLC $A9:9160 6F 68 80 7E ADC $7E8068[$7E:8068] $A9:9164 C5 12 CMP $12 [$7E:0012] $A9:9166 90 09 BCC $09 [$9171] $A9:9168 A9 02 00 LDA #$0002 $A9:916B 8F 66 80 7E STA $7E8066[$7E:8066] $A9:916F A5 12 LDA $12 [$7E:0012] $A9:9171 8F 42 80 7E STA $7E8042[$7E:8042] $A9:9175 60 RTS } ; $9176: Sub-subroutine ($9072) { $A9:9176 AF 42 80 7E LDA $7E8042[$7E:8042] $A9:917A 38 SEC $A9:917B EF 68 80 7E SBC $7E8068[$7E:8068] $A9:917F C9 00 20 CMP #$2000 $A9:9182 B0 0A BCS $0A [$918E] $A9:9184 A9 00 00 LDA #$0000 $A9:9187 8F 66 80 7E STA $7E8066[$7E:8066] $A9:918B A9 00 20 LDA #$2000 $A9:918E 8F 42 80 7E STA $7E8042[$7E:8042] $A9:9192 60 RTS } ; $9193: Sub-subroutine ($9072) { $A9:9193 AF 40 80 7E LDA $7E8040[$7E:8040] $A9:9197 18 CLC $A9:9198 69 00 08 ADC #$0800 $A9:919B 85 12 STA $12 [$7E:0012] $A9:919D AF 42 80 7E LDA $7E8042[$7E:8042] $A9:91A1 18 CLC $A9:91A2 6F 68 80 7E ADC $7E8068[$7E:8068] $A9:91A6 C5 12 CMP $12 [$7E:0012] $A9:91A8 90 09 BCC $09 [$91B3] $A9:91AA A9 00 00 LDA #$0000 $A9:91AD 8F 66 80 7E STA $7E8066[$7E:8066] $A9:91B1 A5 12 LDA $12 [$7E:0012] $A9:91B3 8F 42 80 7E STA $7E8042[$7E:8042] $A9:91B7 60 RTS } ; $91B8: Unknown routine { $A9:91B8 A9 B0 FF LDA #$FFB0 $A9:91BB 18 CLC $A9:91BC 6D 7A 0F ADC $0F7A [$7E:0F7A] $A9:91BF 8F 14 78 7E STA $7E7814[$7E:7814] $A9:91C3 A9 2E 00 LDA #$002E $A9:91C6 18 CLC $A9:91C7 6D 7E 0F ADC $0F7E [$7E:0F7E] $A9:91CA 8F 16 78 7E STA $7E7816[$7E:7816] $A9:91CE AF 62 80 7E LDA $7E8062[$7E:8062] $A9:91D2 F0 06 BEQ $06 [$91DA] $A9:91D4 20 72 90 JSR $9072 [$A9:9072] $A9:91D7 20 09 91 JSR $9109 [$A9:9109] $A9:91DA AF 41 80 7E LDA $7E8041[$7E:8041] $A9:91DE 29 FF 00 AND #$00FF $A9:91E1 85 12 STA $12 [$7E:0012] $A9:91E3 AF 48 80 7E LDA $7E8048[$7E:8048] $A9:91E7 22 60 C4 A9 JSL $A9C460[$A9:C460] $A9:91EB 18 CLC $A9:91EC 6F 14 78 7E ADC $7E7814[$7E:7814] $A9:91F0 18 CLC $A9:91F1 69 70 00 ADC #$0070 $A9:91F4 8F 44 80 7E STA $7E8044[$7E:8044] $A9:91F8 AF 48 80 7E LDA $7E8048[$7E:8048] $A9:91FC 22 65 C4 A9 JSL $A9C465[$A9:C465] $A9:9200 18 CLC $A9:9201 6F 16 78 7E ADC $7E7816[$7E:7816] $A9:9205 18 CLC $A9:9206 69 A0 FF ADC #$FFA0 $A9:9209 8F 46 80 7E STA $7E8046[$7E:8046] $A9:920D AF 4E 80 7E LDA $7E804E[$7E:804E] $A9:9211 22 60 C4 A9 JSL $A9C460[$A9:C460] $A9:9215 18 CLC $A9:9216 6F 14 78 7E ADC $7E7814[$7E:7814] $A9:921A 18 CLC $A9:921B 69 70 00 ADC #$0070 $A9:921E 8F 4A 80 7E STA $7E804A[$7E:804A] $A9:9222 AF 4E 80 7E LDA $7E804E[$7E:804E] $A9:9226 22 65 C4 A9 JSL $A9C465[$A9:C465] $A9:922A 18 CLC $A9:922B 6F 16 78 7E ADC $7E7816[$7E:7816] $A9:922F 18 CLC $A9:9230 69 A0 FF ADC #$FFA0 $A9:9233 8F 4C 80 7E STA $7E804C[$7E:804C] $A9:9237 AF 54 80 7E LDA $7E8054[$7E:8054] $A9:923B 22 60 C4 A9 JSL $A9C460[$A9:C460] $A9:923F 18 CLC $A9:9240 6F 14 78 7E ADC $7E7814[$7E:7814] $A9:9244 18 CLC $A9:9245 69 70 00 ADC #$0070 $A9:9248 8F 50 80 7E STA $7E8050[$7E:8050] $A9:924C AF 54 80 7E LDA $7E8054[$7E:8054] $A9:9250 22 65 C4 A9 JSL $A9C465[$A9:C465] $A9:9254 18 CLC $A9:9255 6F 16 78 7E ADC $7E7816[$7E:7816] $A9:9259 18 CLC $A9:925A 69 A0 FF ADC #$FFA0 $A9:925D 8F 52 80 7E STA $7E8052[$7E:8052] $A9:9261 AF 43 80 7E LDA $7E8043[$7E:8043] $A9:9265 29 FF 00 AND #$00FF $A9:9268 85 12 STA $12 [$7E:0012] $A9:926A AF 5A 80 7E LDA $7E805A[$7E:805A] $A9:926E 22 60 C4 A9 JSL $A9C460[$A9:C460] $A9:9272 18 CLC $A9:9273 6F 50 80 7E ADC $7E8050[$7E:8050] $A9:9277 8F 56 80 7E STA $7E8056[$7E:8056] $A9:927B AF 5A 80 7E LDA $7E805A[$7E:805A] $A9:927F 22 65 C4 A9 JSL $A9C465[$A9:C465] $A9:9283 18 CLC $A9:9284 6F 52 80 7E ADC $7E8052[$7E:8052] $A9:9288 8F 58 80 7E STA $7E8058[$7E:8058] $A9:928C AF 60 80 7E LDA $7E8060[$7E:8060] $A9:9290 22 60 C4 A9 JSL $A9C460[$A9:C460] $A9:9294 18 CLC $A9:9295 6F 50 80 7E ADC $7E8050[$7E:8050] $A9:9299 8F 5C 80 7E STA $7E805C[$7E:805C] $A9:929D AF 60 80 7E LDA $7E8060[$7E:8060] $A9:92A1 22 65 C4 A9 JSL $A9C465[$A9:C465] $A9:92A5 18 CLC $A9:92A6 6F 52 80 7E ADC $7E8052[$7E:8052] $A9:92AA 8F 5E 80 7E STA $7E805E[$7E:805E] $A9:92AE 60 RTS } ; $92AF: Unknown routine { $A9:92AF AD 78 0A LDA $0A78 [$7E:0A78] $A9:92B2 D0 08 BNE $08 [$92BC] $A9:92B4 AF 02 80 7E LDA $7E8002[$7E:8002] $A9:92B8 30 0D BMI $0D [$92C7] $A9:92C7 AA TAX $A9:92C8 BD 00 00 LDA $0000,x[$A9:9C21] $A9:92CB 30 0F BMI $0F [$92DC] $A9:92CD CF 00 80 7E CMP $7E8000[$7E:8000] $A9:92D1 10 23 BPL $23 [$92F6] $A9:92D3 E8 INX $A9:92D4 E8 INX $A9:92D5 E8 INX $A9:92D6 E8 INX $A9:92D7 BD 00 00 LDA $0000,x[$A9:9C25] $A9:92DA 10 0A BPL $0A [$92E6] $A9:92DC 85 00 STA $00 [$7E:0000] $A9:92DE E8 INX $A9:92DF E8 INX $A9:92E0 F4 D6 92 PEA $92D6 $A9:92E3 6C 00 00 JMP ($0000)[$A9:9B0F] $A9:92E6 A9 01 00 LDA #$0001 $A9:92E9 8F 00 80 7E STA $7E8000[$7E:8000] $A9:92ED 8A TXA $A9:92EE 8F 02 80 7E STA $7E8002[$7E:8002] $A9:92F2 BC 02 00 LDY $0002,x[$A9:9C23] $A9:92F5 60 RTS $A9:92F6 AF 00 80 7E LDA $7E8000[$7E:8000] $A9:92FA 1A INC A $A9:92FB 8F 00 80 7E STA $7E8000[$7E:8000] $A9:92FF BC 02 00 LDY $0002,x[$A9:9C23] $A9:9302 60 RTS } ; $9303: Unknown routine { $A9:9303 AD 86 0F LDA $0F86 [$7E:0F86] $A9:9306 29 00 01 AND #$0100 $A9:9309 F0 01 BEQ $01 [$930C] $A9:930B 60 RTS $A9:930C AF 5C 80 7E LDA $7E805C[$7E:805C] $A9:9310 85 12 STA $12 [$7E:0012] $A9:9312 AF 5E 80 7E LDA $7E805E[$7E:805E] $A9:9316 85 14 STA $14 [$7E:0014] $A9:9318 20 CB 93 JSR $93CB [$A9:93CB] $A9:931B AF 56 80 7E LDA $7E8056[$7E:8056] $A9:931F 85 12 STA $12 [$7E:0012] $A9:9321 AF 58 80 7E LDA $7E8058[$7E:8058] $A9:9325 85 14 STA $14 [$7E:0014] $A9:9327 20 CB 93 JSR $93CB [$A9:93CB] $A9:932A AF 50 80 7E LDA $7E8050[$7E:8050] $A9:932E 85 12 STA $12 [$7E:0012] $A9:9330 AF 52 80 7E LDA $7E8052[$7E:8052] $A9:9334 85 14 STA $14 [$7E:0014] $A9:9336 20 CB 93 JSR $93CB [$A9:93CB] $A9:9339 AF 4A 80 7E LDA $7E804A[$7E:804A] $A9:933D 85 12 STA $12 [$7E:0012] $A9:933F AF 4C 80 7E LDA $7E804C[$7E:804C] $A9:9343 85 14 STA $14 [$7E:0014] $A9:9345 20 CB 93 JSR $93CB [$A9:93CB] $A9:9348 AF 44 80 7E LDA $7E8044[$7E:8044] $A9:934C 85 12 STA $12 [$7E:0012] $A9:934E AF 46 80 7E LDA $7E8046[$7E:8046] $A9:9352 85 14 STA $14 [$7E:0014] $A9:9354 4C CB 93 JMP $93CB [$A9:93CB] $A9:9357 AF 68 78 7E LDA $7E7868[$7E:7868] $A9:935B F0 12 BEQ $12 [$936F] $A9:935D AF 6A 78 7E LDA $7E786A[$7E:786A] $A9:9361 D0 0C BNE $0C [$936F] $A9:9363 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:9366 30 07 BMI $07 [$936F] $A9:9368 A0 3D CB LDY #$CB3D $A9:936B 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:936F 20 AF 92 JSR $92AF [$A9:92AF] $A9:9372 AF 1A 78 7E LDA $7E781A[$7E:781A] $A9:9376 AA TAX $A9:9377 AD DC 0F LDA $0FDC [$7E:0FDC] $A9:937A 4A LSR A $A9:937B 90 03 BCC $03 [$9380] $A9:937D A2 00 00 LDX #$0000 $A9:9380 86 16 STX $16 [$7E:0016] $A9:9382 AF 40 78 7E LDA $7E7840[$7E:7840] $A9:9386 F0 07 BEQ $07 [$938F] $A9:9388 3A DEC A $A9:9389 8F 40 78 7E STA $7E7840[$7E:7840] $A9:938D 80 08 BRA $08 [$9397] $A9:938F AD DC 0F LDA $0FDC [$7E:0FDC] $A9:9392 D0 03 BNE $03 [$9397] $A9:9394 AD E2 0F LDA $0FE2 [$7E:0FE2] $A9:9397 29 06 00 AND #$0006 $A9:939A AA TAX $A9:939B BD BB 93 LDA $93BB,x[$A9:93BB] $A9:939E 18 CLC $A9:939F 6D BA 0F ADC $0FBA [$7E:0FBA] $A9:93A2 85 12 STA $12 [$7E:0012] $A9:93A4 18 CLC $A9:93A5 69 20 00 ADC #$0020 $A9:93A8 38 SEC $A9:93A9 ED 11 09 SBC $0911 [$7E:0911] $A9:93AC 30 0C BMI $0C [$93BA] $A9:93AE BD C3 93 LDA $93C3,x[$A9:93C5] $A9:93B1 18 CLC $A9:93B2 6D BE 0F ADC $0FBE [$7E:0FBE] $A9:93B5 85 14 STA $14 [$7E:0014] $A9:93B7 4C EE 93 JMP $93EE [$A9:93EE] $A9:93BA 60 RTS } ; $93BB: Data used above/below { $A9:93BB db 00, 00, FF, FF, 00, 00, 01, 00, 00, 00, 01, 00, FF, FF, 01, 00 } ; $93CB: Unknown routine { $A9:93CB AD DC 0F LDA $0FDC [$7E:0FDC] $A9:93CE 29 06 00 AND #$0006 $A9:93D1 AA TAX $A9:93D2 BD BB 93 LDA $93BB,x[$A9:93BB] $A9:93D5 18 CLC $A9:93D6 65 12 ADC $12 [$7E:0012] $A9:93D8 85 12 STA $12 [$7E:0012] $A9:93DA BD C3 93 LDA $93C3,x[$A9:93C3] $A9:93DD 18 CLC $A9:93DE 65 14 ADC $14 [$7E:0014] $A9:93E0 85 14 STA $14 [$7E:0014] $A9:93E2 AF 18 78 7E LDA $7E7818[$7E:7818] $A9:93E6 85 16 STA $16 [$7E:0016] $A9:93E8 A0 94 A6 LDY #$A694 $A9:93EB 4C EE 93 JMP $93EE [$A9:93EE] $A9:93EE B9 00 00 LDA $0000,y[$A9:D761] $A9:93F1 C8 INY $A9:93F2 C8 INY $A9:93F3 85 18 STA $18 [$7E:0018] $A9:93F5 AE 90 05 LDX $0590 [$7E:0590] $A9:93F8 18 CLC $A9:93F9 B9 01 00 LDA $0001,y[$A9:D764] $A9:93FC 29 00 FF AND #$FF00 $A9:93FF 10 03 BPL $03 [$9404] $A9:9401 09 FF 00 ORA #$00FF $A9:9404 EB XBA $A9:9405 18 CLC $A9:9406 65 14 ADC $14 [$7E:0014] $A9:9408 38 SEC $A9:9409 ED 15 09 SBC $0915 [$7E:0915] $A9:940C 30 4A BMI $4A [$9458] $A9:940E 85 1A STA $1A [$7E:001A] $A9:9410 B9 00 00 LDA $0000,y[$A9:D763] $A9:9413 65 12 ADC $12 [$7E:0012] $A9:9415 38 SEC $A9:9416 ED 11 09 SBC $0911 [$7E:0911] $A9:9419 9D 70 03 STA $0370,x[$7E:03FC] $A9:941C 29 00 01 AND #$0100 $A9:941F F0 0E BEQ $0E [$942F] $A9:9421 BF 9F 85 81 LDA $81859F,x[$81:869B] $A9:9425 85 1C STA $1C [$7E:001C] $A9:9427 B2 1C LDA ($1C) [$7E:057E] $A9:9429 1F 9F 83 81 ORA $81839F,x[$81:849B] $A9:942D 92 1C STA ($1C) [$7E:057E] $A9:942F B9 00 00 LDA $0000,y[$A9:D763] $A9:9432 10 0E BPL $0E [$9442] $A9:9434 BF 9F 85 81 LDA $81859F,x[$81:862F] $A9:9438 85 1C STA $1C [$7E:001C] $A9:943A B2 1C LDA ($1C) [$7E:0578] $A9:943C 1F A1 83 81 ORA $8183A1,x[$81:8431] $A9:9440 92 1C STA ($1C) [$7E:0578] $A9:9442 A5 1A LDA $1A [$7E:001A] $A9:9444 9D 71 03 STA $0371,x[$7E:03FD] $A9:9447 B9 03 00 LDA $0003,y[$A9:D766] $A9:944A 05 16 ORA $16 [$7E:0016] $A9:944C 9D 72 03 STA $0372,x[$7E:03FE] $A9:944F 8A TXA $A9:9450 18 CLC $A9:9451 69 04 00 ADC #$0004 $A9:9454 29 FF 01 AND #$01FF $A9:9457 AA TAX $A9:9458 98 TYA $A9:9459 18 CLC $A9:945A 69 05 00 ADC #$0005 $A9:945D A8 TAY $A9:945E C6 18 DEC $18 [$7E:0018] $A9:9460 D0 97 BNE $97 [$93F9] $A9:9462 8E 90 05 STX $0590 [$7E:0590] $A9:9465 60 RTS } ; $9466: Unknown routine (not called directly?) { $A9:9466 8B PHB $A9:9467 F4 00 AD PEA $AD00 $A9:946A AB PLB $A9:946B AB PLB $A9:946C 22 00 DE AD JSL $ADDE00[$AD:DE00] $A9:9470 AB PLB $A9:9471 6B RTL } ; $9472: Palette - enemy $EC3F/$EC7F/$ECFF (Mother Brain) { $A9:9472 dw 3800, 269F, 0159, 004C, 0004, 5739, 4273, 2DAD, 14C6, 367F, 29F9, 2173, 150C, 0C86, 7FFF, 0000 } ; $9492: Unknown data { $A9:9492 dw 3800, 0000, 0000, 0000, 0024, 29AD, 214A, 14E7, 0C63, 0000, 0000, 0000, 0000, 0000, 29AD, 0000 $A9:94B2 dw 3800, 7FE0, 6B20, 5640, 03FF, 02BF, 015F, 001F, 29F9, 2173, 150C, 6318, 4631, 294A, 7FFF, 0C63 $A9:94D2 dw 3800, 57B8, 0B11, 1646, 00E3, 72FF, 2CDF, 24B9, 1CAF, 18A9, 4F9F, 3ED8, 2E12, 08CD, 7FFF, 0000 $A9:94F2 dw 3800, 6318, 6318, 0802, 5294, 39CE, 2108, 1084, 0019, 0012, 5C00, 4000, 1084, 197F, 7FFF, 0000 $A9:9512 dw 3800, 5294, 39CE, 2108, 7F8B, 6F0A, 5E88, 4E07, 3986, 2905, 1883, 0802, 1084, 6318, 7FFF, 0000 $A9:9532 dw 3800, 4D1F, 38B6, 246E, 1448, 47FF, 2EFA, 1616, 0132, 5294, 4210, 318C, 2108, 1084, 7FFF, 0000 } $A9:9552 48 PHA $A9:9553 18 CLC $A9:9554 6D 7E 0F ADC $0F7E [$7E:0F7E] $A9:9557 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:955A 68 PLA $A9:955B 49 FF FF EOR #$FFFF $A9:955E 1A INC A $A9:955F 18 CLC $A9:9560 65 B7 ADC $B7 [$7E:00B7] $A9:9562 85 B7 STA $B7 [$7E:00B7] $A9:9564 8A TXA $A9:9565 18 CLC $A9:9566 69 22 00 ADC #$0022 $A9:9569 85 14 STA $14 [$7E:0014] $A9:956B AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:956E 49 FF FF EOR #$FFFF $A9:9571 1A INC A $A9:9572 18 CLC $A9:9573 65 14 ADC $14 [$7E:0014] $A9:9575 85 B5 STA $B5 [$7E:00B5] $A9:9577 FA PLX $A9:9578 6B RTL $A9:9579 48 PHA $A9:957A 18 CLC $A9:957B 6D 7E 0F ADC $0F7E [$7E:0F7E] $A9:957E 8D 7E 0F STA $0F7E [$7E:0F7E] $A9:9581 68 PLA $A9:9582 49 FF FF EOR #$FFFF $A9:9585 1A INC A $A9:9586 18 CLC $A9:9587 65 B7 ADC $B7 [$7E:00B7] $A9:9589 85 B7 STA $B7 [$7E:00B7] $A9:958B A9 00 00 LDA #$0000 $A9:958E 38 SEC $A9:958F ED 7A 0F SBC $0F7A [$7E:0F7A] $A9:9592 18 CLC $A9:9593 69 22 00 ADC #$0022 $A9:9596 85 B5 STA $B5 [$7E:00B5] $A9:9598 6B RTL $A9:9599 A9 01 00 LDA #$0001 $A9:959C 8D 3E 18 STA $183E [$7E:183E] $A9:959F A9 04 00 LDA #$0004 $A9:95A2 8D 40 18 STA $1840 [$7E:1840] $A9:95A5 AF 00 78 7E LDA $7E7800[$7E:7800] $A9:95A9 C9 03 00 CMP #$0003 $A9:95AC D0 07 BNE $07 [$95B5] $A9:95AE A9 16 00 LDA #$0016 $A9:95B1 8F 4D 91 80 STA $80914D[$80:914D] $A9:95B5 60 RTS $A9:95B6 DA PHX $A9:95B7 A2 04 00 LDX #$0004 $A9:95BA A9 F6 FF LDA #$FFF6 $A9:95BD 4C 52 95 JMP $9552 [$A9:9552] $A9:95C0 DA PHX $A9:95C1 A2 04 00 LDX #$0004 $A9:95C4 A9 F0 FF LDA #$FFF0 $A9:95C7 4C 52 95 JMP $9552 [$A9:9552] $A9:95CA DA PHX $A9:95CB A2 FE FF LDX #$FFFE $A9:95CE A9 F4 FF LDA #$FFF4 $A9:95D1 4C 52 95 JMP $9552 [$A9:9552] $A9:95DE DA PHX $A9:95DF A2 04 00 LDX #$0004 $A9:95E2 A9 0C 00 LDA #$000C $A9:95E5 4C 52 95 JMP $9552 [$A9:9552] $A9:95E8 DA PHX $A9:95E9 A2 FE FF LDX #$FFFE $A9:95EC A9 10 00 LDA #$0010 $A9:95EF 4C 52 95 JMP $9552 [$A9:9552] $A9:95F2 DA PHX $A9:95F3 A2 FE FF LDX #$FFFE $A9:95F6 A9 0A 00 LDA #$000A $A9:95F9 4C 52 95 JMP $9552 [$A9:9552] $A9:95FC AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:95FF 18 CLC $A9:9600 69 01 00 ADC #$0001 $A9:9603 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9606 A9 FE FF LDA #$FFFE $A9:9609 4C 79 95 JMP $9579 [$A9:9579] $A9:960C AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:960F 18 CLC $A9:9610 69 02 00 ADC #$0002 $A9:9613 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9616 A9 00 00 LDA #$0000 $A9:9619 4C 79 95 JMP $9579 [$A9:9579] $A9:961C A9 01 00 LDA #$0001 $A9:961F 4C 79 95 JMP $9579 [$A9:9579] $A9:9622 A9 22 00 LDA #$0022 $A9:9625 20 99 95 JSR $9599 [$A9:9599] $A9:9628 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:962B 18 CLC $A9:962C 69 03 00 ADC #$0003 $A9:962F 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9632 A9 01 00 LDA #$0001 $A9:9635 4C 79 95 JMP $9579 [$A9:9579] $A9:9638 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:963B 18 CLC $A9:963C 69 0F 00 ADC #$000F $A9:963F 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9642 A9 FE FF LDA #$FFFE $A9:9645 4C 79 95 JMP $9579 [$A9:9579] $A9:9648 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:964B 18 CLC $A9:964C 69 06 00 ADC #$0006 $A9:964F 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9652 A9 FC FF LDA #$FFFC $A9:9655 4C 79 95 JMP $9579 [$A9:9579] $A9:9658 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:965B 18 CLC $A9:965C 69 FE FF ADC #$FFFE $A9:965F 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9662 A9 04 00 LDA #$0004 $A9:9665 4C 79 95 JMP $9579 [$A9:9579] $A9:9668 A9 EF FF LDA #$FFEF $A9:966B 20 99 95 JSR $9599 [$A9:9599] $A9:966E AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:9671 18 CLC $A9:9672 69 FF FF ADC #$FFFF $A9:9675 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:9678 A9 02 00 LDA #$0002 $A9:967B 4C 79 95 JMP $9579 [$A9:9579] $A9:967E A9 0B 00 LDA #$000B $A9:9681 20 99 95 JSR $9599 [$A9:9599] $A9:9684 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:9687 38 SEC $A9:9688 E9 01 00 SBC #$0001 $A9:968B 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:968E A9 02 00 LDA #$0002 $A9:9691 4C 79 95 JMP $9579 [$A9:9579] $A9:9694 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:9697 38 SEC $A9:9698 E9 02 00 SBC #$0002 $A9:969B 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:969E A9 00 00 LDA #$0000 $A9:96A1 4C 79 95 JMP $9579 [$A9:9579] $A9:96A4 A9 FF FF LDA #$FFFF $A9:96A7 4C 79 95 JMP $9579 [$A9:9579] $A9:96AA AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:96AD 38 SEC $A9:96AE E9 03 00 SBC #$0003 $A9:96B1 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:96B4 A9 FF FF LDA #$FFFF $A9:96B7 4C 79 95 JMP $9579 [$A9:9579] $A9:96BA A9 DB FF LDA #$FFDB $A9:96BD 20 99 95 JSR $9599 [$A9:9599] $A9:96C0 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:96C3 38 SEC $A9:96C4 E9 0F 00 SBC #$000F $A9:96C7 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:96CA A9 02 00 LDA #$0002 $A9:96CD 4C 79 95 JMP $9579 [$A9:9579] $A9:96D0 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:96D3 38 SEC $A9:96D4 E9 06 00 SBC #$0006 $A9:96D7 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:96DA A9 04 00 LDA #$0004 $A9:96DD 4C 79 95 JMP $9579 [$A9:9579] $A9:96E0 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:96E3 38 SEC $A9:96E4 E9 FE FF SBC #$FFFE $A9:96E7 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:96EA A9 FC FF LDA #$FFFC $A9:96ED 4C 79 95 JMP $9579 [$A9:9579] $A9:96F0 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:96F3 38 SEC $A9:96F4 E9 FF FF SBC #$FFFF $A9:96F7 8D 7A 0F STA $0F7A [$7E:0F7A] $A9:96FA A9 FE FF LDA #$FFFE $A9:96FD 4C 79 95 JMP $9579 [$A9:9579] $A9:9700 A9 00 00 LDA #$0000 $A9:9703 8F 04 78 7E STA $7E7804[$7E:7804] $A9:9707 6B RTL $A9:9708 A9 01 00 LDA #$0001 $A9:970B 8F 04 78 7E STA $7E7804[$7E:7804] $A9:970F 6B RTL $A9:9710 A9 03 00 LDA #$0003 $A9:9713 8F 04 78 7E STA $7E7804[$7E:7804] $A9:9717 6B RTL $A9:9718 A9 02 00 LDA #$0002 $A9:971B 8F 04 78 7E STA $7E7804[$7E:7804] $A9:971F 6B RTL $A9:9720 A9 04 00 LDA #$0004 $A9:9723 8F 04 78 7E STA $7E7804[$7E:7804] $A9:9727 6B RTL $A9:9728 A9 06 00 LDA #$0006 $A9:972B 8F 04 78 7E STA $7E7804[$7E:7804] $A9:972F 6B RTL $A9:9730 db 08, 97, 02, 00, A0, 9F, FC, 95, 02, 00, EA, 9F, 0C, 96, 02, 00, 3C, A0, 1C, 96, 02, 00, 8E, A0, 22, 96, 02, 00, E0, A0, 38, 96, 02, 00, 2A, A1, 48, 96, 02, 00, 74, A1, 58, 96, 02, 00, BE, A1, 68, 96 db 00, 97, 02, 00, 08, A2, 2F, 81, 08, 97, 04, 00, A0, 9F, FC, 95, 04, 00, EA, 9F, 0C, 96, 04, 00, 3C, A0, 1C, 96, 04, 00, 8E, A0, 22, 96, 04, 00, E0, A0, 38, 96, 04, 00, 2A, A1, 48, 96, 04, 00, 74, A1, 58, 96, 04, 00, BE, A1, 68, 96 db 00, 97, 04, 00, 08, A2 $A9:97A4 db 08, 97, 06, 00, A0, 9F, FC, 95, 06, 00, EA, 9F, 0C, 96, 06, 00, 3C, A0, 1C, 96, 06, 00, 8E, A0, 22, 96, 06, 00, E0, A0, 38, 96, 06, 00, 2A, A1, 48, 96, 06, 00, 74, A1, 58, 96, 06, 00, BE, A1, 68, 96 db 00, 97, 06, 00, 08, A2, 2F, 81 db 08, 97, 08, 00, A0, 9F, FC, 95, 08, 00, EA, 9F, 0C, 96, 08, 00, 3C, A0, 1C, 96, 08, 00, 8E, A0, 22, 96, 08, 00, E0, A0, 38, 96, 08, 00, 2A, A1, 48, 96, 08, 00, 74, A1, 58, 96, 08, 00, BE, A1, 68, 96 db 00, 97, 08, 00, 08, A2, 2F, 81 db 08, 97, 0A, 00, A0, 9F, FC, 95, 0A, 00, EA, 9F, 0C, 96, 0A, 00, 3C, A0, 1C, 96, 0A, 00, 8E, A0, 22, 96, 0A, 00, E0, A0, 38, 96, 0A, 00, 2A, A1, 48, 96, 0A, 00, 74, A1, 58, 96, 0A, 00, BE, A1, 68, 96 db 00, 97, 0A, 00, 08, A2, 2F, 81 db 08, 97, 08, 00, 08, A2, F0, 96, 08, 00, BE, A1, E0, 96, 08, 00, 74, A1, D0, 96, 08, 00, 2A, A1, BA, 96, 08, 00, E0, A0, AA, 96, 08, 00, 8E, A0, A4, 96, 08, 00, 3C, A0, 94, 96, 08, 00, EA, 9F, 7E, 96 db 00, 97, 08, 00, A0, 9F, 2F, 81 db 08, 97, 02, 00, 08, A2, F0, 96, 02, 00, BE, A1, E0, 96, 02, 00, 74, A1, D0, 96, 02, 00, 2A, A1, BA, 96, 02, 00, E0, A0, AA, 96, 02, 00, 8E, A0, A4, 96, 02, 00, 3C, A0, 94, 96, 02, 00, EA, 9F, 7E, 96 db 00, 97, 02, 00, A0, 9F, 2F, 81 db 08, 97, 04, 00, 08, A2, F0, 96, 04, 00, BE, A1, E0, 96, 04, 00, 74, A1, D0, 96, 04, 00, 2A, A1, BA, 96, 04, 00, E0, A0, AA, 96, 04, 00, 8E, A0, A4, 96, 04, 00, 3C, A0, 94, 96, 04, 00, EA, 9F, 7E, 96 db 00, 97, 04, 00, A0, 9F, 2F, 81 db 08, 97, 06, 00, 08, A2, F0, 96, 06, 00, BE, A1, E0, 96, 06, 00, 74, A1, D0, 96, 06, 00, 2A, A1, BA, 96, 06, 00, E0, A0, AA, 96, 06, 00, 8E, A0, A4, 96, 06, 00, 3C, A0, 94, 96, 06, 00, EA, 9F, 7E, 96 db 00, 97, 06, 00, A0, 9F, 2F, 81 db 08, 97, 0A, 00, 08, A2, F0, 96, 0A, 00, BE, A1, E0, 96, 0A, 00, 74, A1, D0, 96, 0A, 00, 2A, A1, BA, 96, 0A, 00, E0, A0, AA, 96, 0A, 00, 8E, A0, A4, 96, 0A, 00, 3C, A0, 94, 96, 0A, 00, EA, 9F, 7E, 96 db 00, 97, 0A, 00, A0, 9F, 2F, 81 $A9:99AA db 18, 97, 10, 00, 52, A2, B6, 95, 10, 00, 8C, A2, C0, 95, 10, 00, D6, A2, CA, 95, 10, 00, A0, 9F db 00, 97, 2F, 81 db 18, 97, 08, 00, 52, A2, B6, 95, 08, 00, 8C, A2, C0, 95, 08, 00, D6, A2, CA, 95, 08, 00, A0, 9F db 00, 97, 2F, 81 db 18, 97, 08, 00, D6, A2, CA, 95, 08, 00, A0, 9F db 00, 97, 2F, 81 db 18, 97, 08, 00, A0, 9F, DE, 95 db 28, 97, 08, 00, D6, A2, 2F, 81 db 10, 97, 08, 00, 52, A2, 2F, 81 db 18, 97, 08, 00, A0, 9F, DE, 95, 08, 00, D6, A2, E8, 95, 08, 00, 8C, A2, F2, 95 db 10, 97, 08, 00, 52, A2, 2F, 81 db 18, 97, 08, 00, A0, 9F, DE, 95, 02, 00, D6, A2, E8, 95, 02, 00, 8C, A2, F2, 95 db 10, 97, 08, 00, 52, A2, 2F, 81 db 20, 97, 01, 00, A0, 9F, 01, 00, 84, A3, 01, 00, CE, A3 db C8, 9A, 24, 00, D8, FF, 01, 00, 01, 00, CE, A3 db C8, 9A, 22, 00, D6, FF, 02, 00, 01, 00, CE, A3 db C8, 9A, 24, 00, D8, FF, 01, 00, 01, 00, CE, A3 db C8, 9A, 22, 00, D6, FF, 02, 00, 01, 00, CE, A3 db C8, 9A, 24, 00, D8, FF, 01, 00, 01, 00, CE, A3 db C8, 9A, 22, 00, D6, FF, 02, 00, 01, 00, CE, A3 db C8, 9A, 24, 00, D8, FF, 01, 00, 01, 00, CE, A3 db C8, 9A, 22, 00, D6, FF, 02, 00, 01, 00, CE, A3, 01, 00, CE, A3 db EF, 9A, 01, 00, 18, A4, 01, 00, 62, A4, F0, 00, A0, 9F db 05, 9B db 00, 97, 2F, 81 $A9:9AC8 5A PHY $A9:9AC9 DA PHX $A9:9ACA B9 00 00 LDA $0000,y[$A9:9A52] $A9:9ACD 18 CLC $A9:9ACE 6D 7A 0F ADC $0F7A [$7E:0F7A] $A9:9AD1 85 12 STA $12 [$7E:0012] $A9:9AD3 B9 02 00 LDA $0002,y[$A9:9A54] $A9:9AD6 18 CLC $A9:9AD7 6D 7E 0F ADC $0F7E [$7E:0F7E] $A9:9ADA 85 14 STA $14 [$7E:0014] $A9:9ADC B9 04 00 LDA $0004,y[$A9:9A56] $A9:9ADF A0 09 E5 LDY #$E509 $A9:9AE2 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9AE6 FA PLX $A9:9AE7 7A PLY $A9:9AE8 C8 INY $A9:9AE9 C8 INY $A9:9AEA C8 INY $A9:9AEB C8 INY $A9:9AEC C8 INY $A9:9AED C8 INY $A9:9AEE 6B RTL $A9:9AEF DA PHX $A9:9AF0 5A PHY $A9:9AF1 A9 63 00 LDA #$0063 $A9:9AF4 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:9AF8 A2 40 00 LDX #$0040 $A9:9AFB A0 67 CB LDY #$CB67 $A9:9AFE 22 27 80 86 JSL $868027[$86:8027] $A9:9B02 7A PLY $A9:9B03 FA PLX $A9:9B04 6B RTL $A9:9B05 AF 2E 78 7E LDA $7E782E[$7E:782E] $A9:9B09 1A INC A $A9:9B0A 8F 2E 78 7E STA $7E782E[$7E:782E] $A9:9B0E 6B RTL $A9:9B0F BD 00 00 LDA $0000,x[$A9:9C27] $A9:9B12 AA TAX $A9:9B13 60 RTS $A9:9B14 A9 01 00 LDA #$0001 $A9:9B17 8F 62 80 7E STA $7E8062[$7E:8062] $A9:9B1B BD 00 00 LDA $0000,x[$A9:9EFE] $A9:9B1E AA TAX $A9:9B1F 60 RTS $A9:9B20 A9 00 00 LDA #$0000 $A9:9B23 8F 62 80 7E STA $7E8062[$7E:8062] $A9:9B27 60 RTS $A9:9B28 BD 00 00 LDA $0000,x[$A9:9B93] $A9:9B2B 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:9B2F E8 INX $A9:9B30 E8 INX $A9:9B31 60 RTS $A9:9B32 BD 00 00 LDA $0000,x[$A9:9D55] $A9:9B35 22 4D 91 80 JSL $80914D[$80:914D] $A9:9B39 E8 INX $A9:9B3A E8 INX $A9:9B3B 60 RTS $A9:9B3C AF 64 78 7E LDA $7E7864[$7E:7864] $A9:9B40 F0 2A BEQ $2A [$9B6C] $A9:9B42 5A PHY $A9:9B43 AF 66 78 7E LDA $7E7866[$7E:7866] $A9:9B47 1A INC A $A9:9B48 C9 06 00 CMP #$0006 $A9:9B4B 30 03 BMI $03 [$9B50] $A9:9B4D A9 00 00 LDA #$0000 $A9:9B50 8F 66 78 7E STA $7E7866[$7E:7866] $A9:9B54 A0 91 CB LDY #$CB91 $A9:9B57 AF 68 80 7E LDA $7E8068[$7E:8068] $A9:9B5B C9 80 00 CMP #$0080 $A9:9B5E 30 03 BMI $03 [$9B63] $A9:9B60 A0 9F CB LDY #$CB9F $A9:9B63 AF 66 78 7E LDA $7E7866[$7E:7866] $A9:9B67 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9B6B 7A PLY $A9:9B6C 60 RTS $A9:9B6D 5A PHY $A9:9B6E A0 2F CB LDY #$CB2F $A9:9B71 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9B75 7A PLY $A9:9B76 60 RTS $A9:9B77 A9 32 00 LDA #$0032 $A9:9B7A 8F 40 78 7E STA $7E7840[$7E:7840] $A9:9B7E 60 RTS $A9:9B7F db 77, 9B, 02, 00, F8, A5, 02, 00, 2C, A6, 3C, 9B, 02, 00, 2C, A6, 6D, 9B, 28, 9B, 7E, 00, 3C, 9B, 10, 00, 60, A6, 3C, 9B, 10, 00, 60, A6, 3C, 9B, 20, 00, 60, A6, 04, 00, 2C, A6, 01, 00, F8, A5, 0F, 9B, AB, 9B, 77, 9B, 02, 00, 17, A7, 02, 00, 50, A7, 3C, 9B, 02, 00, 50, A7, 6D, 9B, 28, 9B, 7E, 00, 3C, 9B, 10, 00, 89, A7, 3C, 9B, 10, 00, 89, A7, 3C, 9B, 20, 00, 89, A7, 04, 00, 50, A7, 01, 00, 17, A7, 0F, 9B, DF, 9B, 77, 9B, 02, 00, 17, A7, 02, 00, 50, A7, 02, 00, 50, A7, 6D, 9B, 28, 9B, 7E, 00, 10, 00, 89, A7, 10, 00, 89, A7 $A9:9C13 db 00, 00, 20, A3, 2F, 81 $A9:9C21 db 04, 00, 86, A5, 0F, 9B, 21, 9C, 08, 00, 17, A7, 04, 00, D9, A6, 04, 00, 9B, A6, 0F, 9B, 31, 9C, 77, 9B, 04, 00, 17, A7, 04, 00, 50, A7, 28, 9B, 7E, 00, 02, 00, 89, A7, 3C, 9B, 02, 00, 89, A7, 3C, 9B, 02, 00, 89, A7, 3C, 9B, 02, 00, 89, A7, 3C, 9B, 02, 00, 89, A7, 65, 9C $A9:9C65 A2 5F 9C LDX #$9C5F $A9:9C68 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:9C6B 29 FF 0F AND #$0FFF $A9:9C6E C9 E0 0F CMP #$0FE0 $A9:9C71 90 03 BCC $03 [$9C76] $A9:9C73 A2 47 9C LDX #$9C47 $A9:9C76 60 RTS $A9:9C77 db 01, 00, F8, A5, 0F, 9B, 77, 9C $A9:9C87 db 04, 00, 86, A5, 04, 00, BF, A5, 08, 00, F8, A5, 04, 00, BF, A5, 04, 00, 86, A5, 04, 00, BF, A5, 08, 00, F8, A5, AD, 9C, 04, 00, BF, A5, 0F, 9B, 87, 9C $A9:9CAD AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:9CB0 C9 00 F0 CMP #$F000 $A9:9CB3 B0 03 BCS $03 [$9CB8] $A9:9CB5 A2 9F 9C LDX #$9C9F $A9:9CB8 60 RTS $A9:9CB9 db 04, 00, 9B, A6, 04, 00, D9, A6, 08, 00, 17, A7, 04, 00, D9, A6, 04, 00, 9B, A6, 04, 00, D9, A6, 08, 00, 17, A7, 08, 00, D9, A6, 0D, 9D, 04, 00, 9B, A6, 0F, 9B, B9, 9C $A9:9D0D AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:9D10 29 FF 0F AND #$0FFF $A9:9D13 C9 40 0F CMP #$0F40 $A9:9D16 80 04 BRA $04 [$9D1C] $A9:9D1C C9 C0 0E CMP #$0EC0 $A9:9D1F B0 03 BCS $03 [$9D24] $A9:9D21 A2 D1 9C LDX #$9CD1 $A9:9D24 60 RTS $A9:9D25 db 02, 00, 9B, A6, 02, 00, D9, A6, 40, 00, 17, A7, 40, 00, 3E, AD, 02, 00, 6D, AD, 0F, 9B, 35, 9D, 20, 9B, 04, 00, F8, A5, 04, 00, 2C, A6, 28, 9B, 6F, 00, 08, 00, 60, A6, 5B, 9E, 29, 9E, 32, 9B, 17, 00, 03, 00, 60, A6, 5B, 9E, 29, 9E, 03, 00, 60, A6, 5B, 9E, 29, 9E, 03, 00, 60, A6, 5B, 9E, 29, 9E, 10, 00, 60, A6, 04, 00, 2C, A6, 10, 00, F8, A5, 14, 9B, 87, 9C, 20, 9B, 04, 00, F8, A5, 04, 00, 2C, A6, 28, 9B, 6F, 00, 08, 00, 60, A6, 5B, 9E, 29, 9E, 32, 9B, 17, 00, 03, 00, 60, A6, 5B, 9E, 29, 9E, 10, 00, 60, A6, 04, 00, 2C, A6, 10, 00, F8, A5, 14, 9B, 87, 9C, A3, 9E, 20, 9B, 37, 9E, 0F, 9B, C1, 9D, B5, 9E, 20, 9B, 5B, 9E, 04, 00, 17, A7, 04, 00, 50, A7, F7, 9D, 08, 00, 89, A7, 29, 9E, 32, 9B, 17, 00, 03, 00, 89, A7, 29, 9E, 03, 00, 89, A7, 29, 9E, 03, 00, 89, A7, 29, 9E, 10, 00, 89, A7, 04, 00, 50, A7, 10, 00, 17, A7, 14, 9B, B9, 9C $A9:9DF7 5A PHY $A9:9DF8 AF 26 78 7E LDA $7E7826[$7E:7826] $A9:9DFC C9 0B 00 CMP #$000B $A9:9DFF F0 0C BEQ $0C [$9E0D] $A9:9E01 A9 00 00 LDA #$0000 $A9:9E04 0A ASL A $A9:9E05 A8 TAY $A9:9E06 B9 0F 9E LDA $9E0F,y[$A9:9E0F] $A9:9E09 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:9E0D 7A PLY $A9:9E0E 60 RTS $A9:9E0F db 6F, 00 $A9:9E29 5A PHY $A9:9E2A A0 4B CB LDY #$CB4B $A9:9E2D AF 34 78 7E LDA $7E7834[$7E:7834] $A9:9E31 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9E35 7A PLY $A9:9E36 60 RTS $A9:9E37 DA PHX $A9:9E38 5A PHY $A9:9E39 AF 54 78 7E LDA $7E7854[$7E:7854] $A9:9E3D AA TAX $A9:9E3E BD 7A 0F LDA $0F7A,x[$7E:0FFA] $A9:9E41 38 SEC $A9:9E42 ED BA 0F SBC $0FBA [$7E:0FBA] $A9:9E45 38 SEC $A9:9E46 E9 0A 00 SBC #$000A $A9:9E49 85 12 STA $12 [$7E:0012] $A9:9E4B BD 7E 0F LDA $0F7E,x[$7E:0FFE] $A9:9E4E 38 SEC $A9:9E4F ED BE 0F SBC $0FBE [$7E:0FBE] $A9:9E52 38 SEC $A9:9E53 E9 10 00 SBC #$0010 $A9:9E56 85 14 STA $14 [$7E:0014] $A9:9E58 4C 77 9E JMP $9E77 [$A9:9E77] $A9:9E5B DA PHX $A9:9E5C 5A PHY $A9:9E5D AD F6 0A LDA $0AF6 [$7E:0AF6] $A9:9E60 38 SEC $A9:9E61 ED BA 0F SBC $0FBA [$7E:0FBA] $A9:9E64 38 SEC $A9:9E65 E9 0A 00 SBC #$000A $A9:9E68 85 12 STA $12 [$7E:0012] $A9:9E6A AD FA 0A LDA $0AFA [$7E:0AFA] $A9:9E6D 38 SEC $A9:9E6E ED BE 0F SBC $0FBE [$7E:0FBE] $A9:9E71 38 SEC $A9:9E72 E9 10 00 SBC #$0010 $A9:9E75 85 14 STA $14 [$7E:0014] $A9:9E77 22 AE C0 A0 JSL $A0C0AE[$A0:C0AE] $A9:9E7B 38 SEC $A9:9E7C E9 80 00 SBC #$0080 $A9:9E7F 49 FF FF EOR #$FFFF $A9:9E82 1A INC A $A9:9E83 29 FF 00 AND #$00FF $A9:9E86 E2 20 SEP #$20 $A9:9E88 C9 10 CMP #$10 $A9:9E8A 10 08 BPL $08 [$9E94] $A9:9E94 C9 48 CMP #$48 $A9:9E96 90 02 BCC $02 [$9E9A] $A9:9E9A C2 20 REP #$20 $A9:9E9C 8F 34 78 7E STA $7E7834[$7E:7834] $A9:9EA0 7A PLY $A9:9EA1 FA PLX $A9:9EA2 60 RTS $A9:9EA3 AF 26 78 7E LDA $7E7826[$7E:7826] $A9:9EA7 1A INC A $A9:9EA8 C9 0C 00 CMP #$000C $A9:9EAB 90 03 BCC $03 [$9EB0] $A9:9EB0 8F 26 78 7E STA $7E7826[$7E:7826] $A9:9EB4 60 RTS $A9:9EB5 A9 00 00 LDA #$0000 $A9:9EB8 8F 26 78 7E STA $7E7826[$7E:7826] $A9:9EBC 60 RTS $A9:9EBD 5A PHY $A9:9EBE BD 00 00 LDA $0000,x[$A9:9EEC] $A9:9EC1 A0 59 CB LDY #$CB59 $A9:9EC4 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9EC8 7A PLY $A9:9EC9 E8 INX $A9:9ECA E8 INX $A9:9ECB 60 RTS $A9:9ECC db 04, 00, 86, A5, 04, 00, BF, A5, 08, 00, F8, A5, 20, 9B, 04, 00, F8, A5, 04, 00, 2C, A6, 28, 9B, 6F, 00, 08, 00, 60, A6, BD, 9E, 07, 00, 6D, 9B, 20, 00, 60, A6, 04, 00, 2C, A6, 10, 00, F8, A5, 14, 9B, 87, 9C, 04, 00, 9B, A6, 04, 00, D9, A6, 08, 00, 17, A7, 20, 9B, 04, 00, 17, A7, 04, 00, 50, A7, 28, 9B, 6F, 00, 08, 00, 89, A7, BD, 9E, 01, 00, 6D, 9B, 20, 00, 89, A7 $A9:9F34 db 10, 00, BF, A5, 04, 00, F8, A5, 46, 9F, 20, 00, F8, A5, 14, 9B, 87, 9C $A9:9F46 A9 00 00 LDA #$0000 $A9:9F49 8F 62 80 7E STA $7E8062[$7E:8062] $A9:9F4D 5A PHY $A9:9F4E AD BA 0F LDA $0FBA [$7E:0FBA] $A9:9F51 18 CLC $A9:9F52 69 10 00 ADC #$0010 $A9:9F55 85 12 STA $12 [$7E:0012] $A9:9F57 AD BE 0F LDA $0FBE [$7E:0FBE] $A9:9F5A 18 CLC $A9:9F5B 69 04 00 ADC #$0004 $A9:9F5E 85 14 STA $14 [$7E:0014] $A9:9F60 A9 01 00 LDA #$0001 $A9:9F63 A0 7B A1 LDY #$A17B $A9:9F66 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9F6A 7A PLY $A9:9F6B 60 RTS $A9:9F6C db 8E, 9F, 04, 00, F8, A5, 04, 00, BF, A5, 02, 00, 86, A5, 84, 9F, 1E, 00, 86, A5, 0F, 9B, 7A, 9F $A9:9F84 5A PHY $A9:9F85 A0 83 CB LDY #$CB83 $A9:9F88 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:9F8C 7A PLY $A9:9F8D 60 RTS $A9:9F8E A9 00 00 LDA #$0000 $A9:9F91 8F 68 78 7E STA $7E7868[$7E:7868] $A9:9F95 20 FF D1 JSR $D1FF [$A9:D1FF] $A9:9F98 A9 7F 00 LDA #$007F $A9:9F9B 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:9F9F 60 RTS $A9:9FA0 db 09, 00, 12, 00, 3A, 00, 90, A8, CA, A4, 1E, 00, 1D, 00, 5B, A8, C8, A4, 19, 00, 1E, 00, 6E, A8, C8, A4, 00, 00, FC, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F6, FF, 38, 00, 74, A9, DA, A4, 07, 00, 1C, 00, 3F, A9, D8, A4, 02, 00, 1D, 00, 5E, A9, D8, A4, 0A, 00, 1C, 00, 2F, 00, 90, A8, CA, A4, 26, 00, 13, 00, 5B, A8, C8, A4, 21, 00, 13, 00, 6E, A8, C8, A4, 00, 00, FD, FF, F1, A7, C8, A4, 00, 00, 02, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F5, FF, 3A, 00, 74, A9, DA, A4, 06, 00, 1F, 00, 3F, A9, D8, A4, 01, 00, 21, 00, 5E, A9, D8, A4, E7, FF, FD, FF, A6, A8, D8, A4, 0A, 00, 28, 00, 30, 00, 90, A8, CA, A4, 26, 00, 13, 00, 5B, A8, C8, A4, 23, 00, 13, 00, 62, A8, C8, A4, 00, 00, FD, FF, F1, A7, C8, A4, 00, 00, 02, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F3, FF, 3A, 00, 74, A9, DA, A4, 05, 00, 1F, 00, 3F, A9, D8, A4, FF, FF, 21, 00, 5E, A9, D8, A4, E6, FF, FD, FF, A6, A8, D8, A4, 0A, 00, 28, 00, 33, 00, 90, A8, CA, A4, 26, 00, 15, 00, 5B, A8, C8, A4, 23, 00, 16, 00, 62, A8, C8, A4, FF, FF, FE, FF, F1, A7, C8, A4, 00, 00, 01, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F3, FF, 39, 00, 74, A9, DA, A4, 05, 00, 1E, 00, 3F, A9, D8, A4, FF, FF, 20, 00, 5E, A9, D8, A4, E6, FF, FC, FF, A6, A8, D8, A4, 09, 00, 24, 00, 3A, 00, 90, A8, CA, A4, 21, 00, 1D, 00, 5B, A8, C8, A4, 1F, 00, 1E, 00, 62, A8, C8, A4, 01, 00, FC, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F0, FF, 38, 00, 74, A9, DA, A4, 03, 00, 1C, 00, 3F, A9, D8, A4, FC, FF, 1E, 00, 5E, A9, D8, A4, 09, 00, 15, 00, 3C, 00, 90, A8, CA, A4, 1D, 00, 1F, 00, 5B, A8, C8, A4, 1B, 00, 20, 00, 6E, A8, C8, A4, FE, FF, FE, FF, C2, A7, C8, A4, 00, 00, 02, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F0, FF, 34, 00, 74, A9, DA, A4, 00, 00, 1A, 00, 3F, A9, D8, A4, FB, FF, 1C, 00, 5E, A9, D8, A4, 09, 00, 0F, 00, 40, 00, 90, A8, CA, A4, 1E, 00, 23, 00, 5B, A8, C8, A4, 1A, 00, 25, 00, 7A, A8, C8, A4, FE, FF, FF, FF, C2, A7, C8, A4, 00, 00, 06, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F6, FF, 2F, 00, 74, A9, DA, A4, 04, 00, 16, 00, 3F, A9, D8, A4, FF, FF, 18, 00, 5E, A9, D8, A4, 09, 00, 11, 00, 3C, 00, 90, A8, CA, A4, 1E, 00, 20, 00, 5B, A8, C8, A4, 18, 00, 20, 00, 6E, A8, C8, A4, FF, FF, FE, FF, C2, A7, C8, A4, 00, 00, 02, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F8, FF, 2F, 00, 74, A9, DA, A4, 07, 00, 15, 00, 3F, A9, D8, A4, 03, 00, 17, 00, 5E, A9, D8, A4, 09, 00, 12, 00, 3A, 00, 90, A8, CA, A4, 1F, 00, 1E, 00, 5B, A8, C8, A4, 19, 00, 1E, 00, 6E, A8, C8, A4, FF, FF, FD, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, EA, AA, 04, A5, F6, FF, 38, 00, 74, A9, DA, A4, 07, 00, 1C, 00, 3F, A9, D8, A4, 02, 00, 1F, 00, 5E, A9, D8, A4, 07, 00, 12, 00, 14, 00, 90, A8, CA, A4, 22, 00, F7, FF, 5B, A8, C8, A4, 1F, 00, FA, FF, 7A, A8, C8, A4, FB, FF, 03, 00, 3B, A8, C8, A4, 00, 00, DA, FF, 8A, A9, E8, A4, 04, 00, 00, 00, EA, AA, 04, A5, F6, FF, 12, 00, 74, A9, DA, A4, 09, 00, 12, 00, 1E, 00, 90, A8, CA, A4, 24, 00, 02, 00, 5B, A8, C8, A4, 1F, 00, 04, 00, 7A, A8, C8, A4, FB, FF, FE, FF, 11, A8, C8, A4, 00, 00, E4, FF, 8A, A9, E8, A4, FE, FF, 00, 00, EA, AA, 04, A5, F6, FF, 1C, 00, 74, A9, DA, A4, 07, 00, 00, 00, 3F, A9, D8, A4, 02, 00, 01, 00, 5E, A9, D8, A4, 09, 00, 12, 00, 2E, 00, 90, A8, CA, A4, 1F, 00, 11, 00, 5B, A8, C8, A4, 1A, 00, 12, 00, 6E, A8, C8, A4, FB, FF, FC, FF, F1, A7, C8, A4, 00, 00, F4, FF, 8A, A9, E8, A4, FE, FF, 00, 00, EA, AA, 04, A5, F6, FF, 2C, 00, 74, A9, DA, A4, 07, 00, 10, 00, 3F, A9, D8, A4, 02, 00, 11, 00, 5E, A9, D8, A4, 01, 00, 00, 00, 00, 00 $A9:A328 db AC, A4 $A9:A384 db 09, 00, 12, 00, 3A, 00, 90, A8, CA, A4, 1E, 00, 1D, 00, 5B, A8, C8, A4, 19, 00, 1E, 00, 6E, A8, C8, A4, 00, 00, FC, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, 70, AB, 1E, A5, F6, FF, 38, 00, 74, A9, DA, A4, 07, 00, 1C, 00, 3F, A9, D8, A4, 02, 00, 1D, 00, 5E, A9, D8, A4, 09, 00, 12, 00, 3A, 00, 90, A8, CA, A4, 1E, 00, 1D, 00, 5B, A8, C8, A4, 19, 00, 1E, 00, 6E, A8, C8, A4, 00, 00, FC, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, F6, AB, 38, A5, F6, FF, 38, 00, 74, A9, DA, A4, 07, 00, 1C, 00, 3F, A9, D8, A4, 02, 00, 1D, 00, 5E, A9, D8, A4, 09, 00, 12, 00, 3A, 00, 90, A8, CA, A4, 1E, 00, 1D, 00, 5B, A8, C8, A4, 19, 00, 1E, 00, 6E, A8, C8, A4, 00, 00, FC, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, 76, AC, 52, A5, F6, FF, 38, 00, 74, A9, DA, A4, 07, 00, 1C, 00, 3F, A9, D8, A4, 02, 00, 1D, 00, 5E, A9, D8, A4, 09, 00, 12, 00, 3A, 00, 90, A8, CA, A4, 1E, 00, 1D, 00, 5B, A8, C8, A4, 19, 00, 1E, 00, 6E, A8, C8, A4, 00, 00, FC, FF, C2, A7, C8, A4, 00, 00, 00, 00, 8A, A9, E8, A4, 00, 00, 00, 00, E4, AC, 6C, A5, F6, FF, 38, 00, 74, A9, DA, A4, 07, 00, 1C, 00, 3F, A9, D8, A4, 02, 00, 1D, 00, 5E, A9, D8, A4, 01, 00, EC, FF, EB, FF, 10, 00, 17, 00 $A9:A4B8 db 07, B5 $A9:A4C8 db 00, 00, 01, 00, E9, FF, FF, FF, 17, 00, 07, 00 $A9:A4D6 db 03, B5, 00, 00, 01, 00, E9, FF $A9:A4E0 db 17, 00 $A9:A4E8 db 02, 00, E0, FF, E8, FF, 14, 00, 34, 00 $A9:A4F4 db 03, B5, E8, FF $A9:A4FA db 0D, 00 $A9:A504 db 02, 00, 04, 00, C5, FF, 1C, 00, E8, FF $A9:A510 db 03, B5, 1C, 00, D7, FF, 39, 00, E2, FF $A9:A51C db 03, B5, 02, 00, 04, 00 $A9:A524 db 1C, 00 $A9:A52C db 1C, 00 $A9:A530 db 36, 00 $A9:A538 db 02, 00, 04, 00 $A9:A53E db 1C, 00 $A9:A546 db 1D, 00 $A9:A54A db 2D, 00 $A9:A552 db 02, 00, 04, 00 $A9:A558 db 1C, 00 $A9:A560 db 1D, 00, D0, FF, 44, 00, D8, FF $A9:A56C db 02, 00, 04, 00 $A9:A572 db 1C, 00 $A9:A57A db 1C, 00, D7, FF, 3A, 00, E1, FF $A9:A586 db 0B, 00, 0C, 00, 01, 33, 21, 02, 80, 09, 00, 21, E8, 81, 04, 08, 21, F8, 81, 04, 02, 21, F8, 81, F4, 20, 21, 08, 80, 00, 04, 21, 08, 80, F0, 1E, 21, 08, 80, E8, 0E, 21, F8, 81, E4, 0A, 21, F0, 01, EC, 22, 21, E8, 81, F4, 06, 21, 0B, 00, 0C, 00, 01, 32, 21, 02, 80, 09, 00, 21, E8, 81, 04, 08, 21, F8, 81, 04, 02, 21, F8, 81, F4, 20, 21, 08, 80, 00, 04, 21, 08, 80, F0, 1E, 21, 08, 80, E8, 0E, 21, F8, 81, E4, 0A, 21, F0, 01, EC, 22, 21, E8, 81, F4, 06, 21, 0A, 00, 02, 80, 09, 00, 21, E8, 81, 04, 08, 21, F8, 81, 04, 02, 21, F8, 81, F4, 20, 21, 08, 80, 00, 04, 21, 08, 80, F0, 1E, 21, 08, 80, E8, 0E, 21, F8, 81, E4, 0A, 21, F0, 01, EC, 22, 21, E8, 81, F4, 06, 21, 0A, 00, FF, 81, 0E, 24, 21, E8, 81, 04, 08, 21, F8, 81, 04, 02, 21, F8, 81, F4, 20, 21, 08, 80, 00, 04, 21, 08, 80, F0, 1E, 21, 08, 80, E8, 0E, 21, F8, 81, E4, 0A, 21, F0, 01, EC, 22, 21, E8, 81, F4, 06, 21, 0A, 00, FC, 81, 10, 26, 21, E8, 81, 04, 08, 21, F8, 81, 04, 02, 21, F8, 81, F4, 20, 21, 08, 80, 00, 04, 21, 08, 80, F0, 1E, 21, 08, 80, E8, 0E, 21, F8, 81, E4, 0A, 21, F0, 01, EC, 22, 21, E8, 81, F4, 06, 21, 01, 00, F8, 81, F8, 2A, 21, 0C, 00, 0C, 00, 01, 33, 21, 02, 80, 09, 00, 21, 08, 80, 00, 04, 21, 08, 00, E8, 23, 21, 08, 80, F0, 3E, 21, F8, 81, E4, 3C, 21, F8, 81, F4, 28, 21, F8, 81, 04, 02, 21, F0, 01, 0C, 4B, 21, F0, 01, EC, 4A, 21, E8, 81, F4, 0C, 21, E8, 81, FC, 1C, 21, 0C, 00, 0C, 00, 01, 32, 21, 02, 80, 09, 00, 21, 08, 80, 00, 04, 21, 08, 00, E8, 23, 21, 08, 80, F0, 3E, 21, F8, 81, E4, 3C, 21, F8, 81, F4, 28, 21, F8, 81, 04, 02, 21, F0, 01, 0C, 4B, 21, F0, 01, EC, 4A, 21, E8, 81, F4, 0C, 21, E8, 81, FC, 1C, 21, 0B, 00, 02, 80, 09, 00, 21, 08, 80, 00, 04, 21, 08, 00, E8, 23, 21, 08, 80, F0, 3E, 21, F8, 81, E4, 3C, 21, F8, 81, F4, 28, 21, F8, 81, 04, 02, 21, F0, 01, 0C, 4B, 21, F0, 01, EC, 4A, 21, E8, 81, F4, 0C, 21, E8, 81, FC, 1C, 21, 0B, 00, FF, 81, 0E, 24, 21, 08, 80, 00, 04, 21, 08, 00, E8, 23, 21, 08, 80, F0, 3E, 21, F8, 81, E4, 3C, 21, F8, 81, F4, 28, 21, F8, 81, 04, 02, 21, F0, 01, 0C, 4B, 21, F0, 01, EC, 4A, 21, E8, 81, F4, 0C, 21, E8, 81, FC, 1C, 21, 0B, 00, FC, 81, 10, 26, 21, 08, 80, 00, 04, 21, 08, 00, E8, 23, 21, 08, 80, F0, 3E, 21, F8, 81, E4, 3C, 21, F8, 81, F4, 28, 21, F8, 81, 04, 02, 21, F0, 01, 0C, 4B, 21, F0, 01, EC, 4A, 21, E8, 81, F4, 0C, 21, E8, 81, FC, 1C, 21, 09, 00, 1C, 00, 1C, 7B, 33, 14, 80, 0C, 5A, 33, 0C, 80, 14, 69, 33, 0C, 00, 0C, 66, 33, 14, 00, 04, 78, F3, 04, 00, 14, 78, 33, FC, 01, FC, 47, 33, FC, 81, 04, 57, 33, 04, 80, FC, 48, 33, 06, 00, 1D, 80, 03, 5E, 33, 1D, 80, 0B, 6E, 33, 0D, 80, 0B, 62, 33, 0D, 80, FB, 60, 33, FD, 81, 03, 6C, 33, FD, 81, FB, 5C, 33, 08, 00, 28, 00, 00, 77, B3, 28, 00, F8, 77, 33, 18, 80, 00, 43, B3, 18, 80, F0, 43, 33, 10, 80, 00, 42, B3, 00, 80, 00, 40, B3, 10, 80, F0, 42, 33, 00, 80, F0, 40, 33, 06, 00, 1D, 80, ED, 5E, B3, 1D, 80, E5, 6E, B3, 0D, 80, E5, 62, B3, 0D, 80, F5, 60, B3, FD, 81, ED, 6C, B3, FD, 81, F5, 5C, B3, 01, 00, F8, 81, F8, 64, 33, 02, 00, F8, 81, 10, 88, 33, F8, 81, 00, 45, 33, 02, 00, F3, 81, 10, 8A, 33, F7, 81, 00, 81, 33, 04, 00, FB, 01, 0E, 76, 33, EB, 81, 0E, 86, 33, FB, 81, FE, 84, 33, F3, 81, FE, 83, 33, 04, 00, 10, 00, 00, 90, 33, 08, 00, 00, 80, 33, F8, 81, F8, 8E, 33, E8, 81, F8, 8C, 33, 09, 00, 1C, 00, 1C, 7B, 27, 14, 80, 0C, 5A, 27, 0C, 80, 14, 69, 27, 0C, 00, 0C, 66, 27, 14, 00, 04, 78, E7, 04, 00, 14, 78, 27, FC, 01, FC, 47, 27, FC, 81, 04, 57, 27, 04, 80, FC, 48, 27 $A9:A93F db 01, 00, F8, 81, F8, 64, 27 $A9:A95E db 04, 00, FB, 01, 0E, 76, 27, EB, 81, 0E, 86, 27, FB, 81, FE, 84, 27, F3, 81, FE, 83, 27, 04, 00, 10, 00, 00, 90, 27, 08, 00, 00, 80, 27, F8, 81, F8, 8E, 27, E8, 81, F8, 8C, 27, FE, FF, 80, 20, 04, 00, 38, 23, 38, 23, B7, 31, B8, 31, C0, 20, 04, 00, 38, 23, B9, 31, BA, 31, BB, 31, 00, 21, 04, 00, 38, 23, BC, 31, BD, 31, BE, 31, 40, 21, 0A, 00, BF, 31, C0, 31, C1, 31, C2, 31, C3, 31, C4, 31, C5, 31, C6, 31, C7, 31, C8, 31, 80, 21, 0A, 00, CA, 31, CB, 31, CC, 31, CD, 31, CE, 31, CF, 31, D0, 31, 38, 23, 38, 23, 38, 23, C0, 21, 0A, 00, D1, 31, D2, 31, D3, 31, D4, 31, D5, 31, D6, 31, D7, 31, D8, 31, 38, 23, 38, 23, 00, 22, 0A, 00, D9, 31, DA, 31, DB, 31, DC, 31, DD, 31, DE, 31, DF, 31, E0, 31, 38, 23, 38, 23, 40, 22, 0A, 00, E1, 31, E2, 31, E3, 31, E4, 31, E5, 31, E6, 31, E7, 31, 38, 23, 38, 23, 38, 23, 80, 22, 0A, 00, 38, 23, E8, 31, E9, 31, EA, 31, EB, 31, EC, 31, ED, 31, 38, 23, 38, 23, 38, 23, C0, 22, 04, 00, 38, 23, 38, 23, EE, 31, EF, 31, FF, FF $A9:AAEA db FE, FF, 06, 20, 0B, 00, 38, 23, 38, 23, 67, 31, 68, 31, 69, 31, 38, 23, 38, 23, 38, 23, 38, 23, 38, 23, 38, 23, 46, 20, 0B, 00, 38, 23, 6A, 31, 6B, 31, 6C, 31, 6D, 31, 6E, 31, 38, 23, 38, 23, 38, 23, 38, 23, 38, 23, 86, 20, 0B, 00, B8, 31, 6F, 31, 70, 31, 71, 31, 72, 31, 73, 31, 74, 31, 86, 31, 87, 31, 38, 23, 38, 23, C6, 20, 0B, 00, BB, 31, 77, 31, 78, 31, 79, 31, 7A, 31, 7B, 31, 7C, 31, 88, 31, 89, 31, 38, 23, 38, 23, 06, 21, 0B, 00, BE, 31, 7F, 31, 80, 31, 81, 31, 82, 31, 83, 31, 84, 31, 85, 31, 38, 23, 38, 23, 38, 23, FF, FF, FE, FF, 06, 20, 0B, 00, 38, 23, 38, 23, 67, 31, 68, 31, 69, 31, 38, 23, 38, 23, 38, 23, 38, 23, 38, 23, 38, 23, 46, 20, 0B, 00, 38, 23, 6A, 31, 6B, 31, 6C, 31, 6D, 31, 6E, 31, 38, 23, 38, 23, 38, 23, 38, 23, 38, 23, 86, 20, 0B, 00, B8, 31, 6F, 31, 70, 31, 71, 31, 72, 31, 73, 31, 74, 31, 75, 31, 76, 31, 38, 23, 38, 23, C6, 20, 0B, 00, BB, 31, 77, 31, 78, 31, 79, 31, 7A, 31, 7B, 31, 7C, 31, 7D, 31, 7E, 31, 38, 23, 38, 23, 06, 21, 0B, 00, BE, 31, 7F, 31, 80, 31, 81, 31, 82, 31, 83, 31, 84, 31, 85, 31, 38, 23, 38, 23, 38, 23, FF, FF, FE, FF, 06, 20, 01, 00, 38, 23, 0A, 20, 02, 00, 8A, 31, 8B, 31, 18, 20, 02, 00, 38, 23, 38, 23, 46, 20, 01, 00, 38, 23, 4A, 20, 03, 00, 8C, 31, 8D, 31, 8E, 31, 58, 20, 02, 00, 38, 23, 38, 23, 86, 20, 0B, 00, B8, 31, 8F, 31, 90, 31, 91, 31, 92, 31, 93, 31, 94, 31, 38, 23, 38, 23, 38, 23, 38, 23, C6, 20, 0B, 00, BB, 31, 95, 31, 96, 31, 97, 31, 98, 31, 99, 31, 9A, 31, 9B, 31, 38, 23, 38, 23, 38, 23, 06, 21, 01, 00, BE, 31, 0C, 21, 04, 00, 9C, 31, 9D, 31, 9E, 31, 9F, 31, 18, 21, 02, 00, 38, 23, 38, 23, FF, FF, FE, FF, 0A, 20, 03, 00, 67, 31, A0, 31, A1, 31, 46, 20, 01, 00, B6, 31, 4A, 20, 04, 00, A2, 31, A3, 31, A4, 31, A5, 31, 56, 20, 03, 00, A6, 31, A7, 31, A8, 31, 88, 20, 0A, 00, 6F, 31, A9, 31, AA, 31, AB, 31, AC, 31, AD, 31, AE, 31, AF, 31, B0, 31, B1, 31, C8, 20, 07, 00, 77, 31, 78, 31, 78, 31, B2, 31, B3, 31, B4, 31, B5, 31, 06, 21, 01, 00, BE, 31, 0C, 21, 04, 00, 9C, 31, 9D, 31, 9E, 31, 9F, 31, 18, 21, 02, 00, 38, 23, 38, 23, FF, FF, FE, FF, 0C, 20, 02, 00, 68, 31, 69, 31, 46, 20, 01, 00, 38, 23, 4A, 20, 04, 00, 6B, 31, 6C, 31, 6D, 31, 6E, 31, 56, 20, 03, 00, 38, 23, 38, 23, 38, 23, 8A, 20, 09, 00, 70, 31, 71, 31, 72, 31, 73, 31, 74, 31, 86, 31, 87, 31, 38, 23, 38, 23, CC, 20, 06, 00, 79, 31, 7A, 31, 7B, 31, 7C, 31, 88, 31, 89, 31, 0C, 21, 04, 00, 81, 31, 82, 31, 83, 31, 84, 31, FF, FF, 09, 00, 08, 80, 08, E4, 21, F8, 81, 08, E2, 21, E8, 81, 08, E0, 21, 08, 80, F8, C4, 21, F8, 81, F8, C2, 21, E8, 81, F8, C0, 21, 08, 80, E8, A4, 21, F8, 81, E8, A2, 21, E8, 81, E8, A0, 21, 0A, 00, 14, 80, 08, EC, 21, 04, 80, 08, EA, 21, F4, 81, 08, E8, 21, E4, 81, 08, E6, 21, 04, 80, F8, CA, 21, F4, 81, F8, C8, 21, E4, 81, F8, C6, 21, 04, 80, E8, AA, 21, F4, 81, E8, A8, 21, E4, 81, E8, A6, 21, 0A, 00, 08, 00, E4, 5D, 2F, 08, 00, DC, 4D, 2F, 00, 00, E4, 5D, 2F, 00, 00, DC, 4D, 2F, F0, C3, DC, 42, 2F, F8, 01, 1C, 51, 2F, F0, 01, 1C, 50, 2F, F0, C3, FC, 47, 2F, F0, C3, EC, 40, AF, F0, C3, 0C, 40, 2F, 0A, 00, F0, 01, E4, 5D, 6F, F0, 01, DC, 4D, 6F, F8, 01, E4, 5D, 6F, F8, 01, DC, 4D, 6F, 00, C2, DC, 42, 6F, 00, 00, 1C, 51, 6F, 08, 00, 1C, 50, 6F, 00, C2, FC, 47, 6F, 00, C2, EC, 40, EF, 00, C2, 0C, 40, 6F, 08, 00, F8, C3, E4, 44, 2F, 00, 00, 14, 51, 2F, F8, 01, 14, 50, 2F, F8, C3, 04, 4B, 2F, 00, 00, FC, 51, 2F, F8, 01, FC, 50, 2F, 00, 00, F4, 51, 2F, F8, 01, F4, 50, 2F, 08, 00, F8, C3, E4, 44, 6F, F8, 01, 14, 51, 6F, 00, 00, 14, 50, 6F, F8, C3, 04, 4B, 2F, F8, 01, FC, 51, 6F, 00, 00, FC, 50, 6F, F8, 01, F4, 51, 6F, 00, 00, F4, 50, 6F, 1A, 00, 00, 00, E0, 70, 6F, F8, 01, E0, 70, 2F, 00, 00, D8, 60, 6F, F8, 01, D8, 60, 2F, 08, 00, 28, 6D, 2F, 00, 00, 28, 6D, 2F, F8, 01, 28, 6D, 2F, F0, 01, 28, 6D, 2F, 08, 00, 20, 6D, 2F, 00, 00, 20, 6D, 2F, F8, 01, 20, 6D, 2F, F0, 01, 20, 6D, 2F, 08, 00, 18, 6C, 2F, 00, 00, 18, 6C, 2F, F8, 01, 18, 6C, 2F, F0, 01, 18, 6C, 2F, 00, C2, F8, 49, 6F, F0, C3, F8, 49, 2F, 00, C2, 08, 46, 6F, F0, C3, 08, 46, 2F, 00, C2, E8, 40, 2F, F0, C3, E8, 40, 2F, 00, C2, D8, 4E, EF, F0, C3, D8, 4E, AF, 00, C2, D0, 5E, EF, F0, C3, D0, 5E, AF ;;; $AEE1: ;;; { $A9:AEE1 AD 86 0F LDA $0F86 [$7E:0F86] $A9:AEE4 09 00 04 ORA #$0400 $A9:AEE7 8D 86 0F STA $0F86 [$7E:0F86] $A9:AEEA AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:AEED 09 00 04 ORA #$0400 $A9:AEF0 8D C6 0F STA $0FC6 [$7E:0FC6] $A9:AEF3 A9 00 00 LDA #$0000 $A9:AEF6 8F 08 78 7E STA $7E7808[$7E:7808] $A9:AEFA A0 06 00 LDY #$0006 $A9:AEFD A9 28 00 LDA #$0028 $A9:AF00 20 47 C6 JSR $C647 [$A9:C647] $A9:AF03 B0 01 BCS $01 [$AF06] $A9:AF05 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $A9:AF06 A9 12 AF LDA #$AF12 $A9:AF09 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:AF0C A9 80 00 LDA #$0080 $A9:AF0F 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:AF12 20 22 B0 JSR $B022 [$A9:B022] $A9:AF15 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:AF18 10 06 BPL $06 [$AF20] $A9:AF1A A9 21 AF LDA #$AF21 $A9:AF1D 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:AF20 60 RTS } ;;; $AF21: ;;; { $A9:AF21 20 22 B0 JSR $B022 [$A9:B022] $A9:AF24 A0 02 00 LDY #$0002 $A9:AF27 A9 60 00 LDA #$0060 $A9:AF2A 20 01 C6 JSR $C601 [$A9:C601] $A9:AF2D 90 F1 BCC $F1 [$AF20] $A9:AF2F A9 39 9C LDA #$9C39 $A9:AF32 20 47 C4 JSR $C447 [$A9:C447] $A9:AF35 A9 06 00 LDA #$0006 $A9:AF38 8F 64 80 7E STA $7E8064[$7E:8064] $A9:AF3C 8F 66 80 7E STA $7E8066[$7E:8066] $A9:AF40 A9 00 05 LDA #$0500 $A9:AF43 8F 68 80 7E STA $7E8068[$7E:8068] $A9:AF47 A9 54 AF LDA #$AF54 $A9:AF4A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:AF4D A9 20 00 LDA #$0020 $A9:AF50 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:AF53 60 RTS } ;;; $AF54: ;;; { $A9:AF54 20 22 B0 JSR $B022 [$A9:B022] $A9:AF57 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:AF5A 10 C4 BPL $C4 [$AF20] $A9:AF5C A9 00 00 LDA #$0000 $A9:AF5F 8F 64 80 7E STA $7E8064[$7E:8064] $A9:AF63 8F 66 80 7E STA $7E8066[$7E:8066] $A9:AF67 8F 64 78 7E STA $7E7864[$7E:7864] $A9:AF6B 8F 68 78 7E STA $7E7868[$7E:7868] $A9:AF6F 8F 60 78 7E STA $7E7860[$7E:7860] $A9:AF73 8F 62 78 7E STA $7E7862[$7E:7862] $A9:AF77 A2 1C 00 LDX #$001C $A9:AF7A BF 22 C1 7E LDA $7EC122,x[$7E:C13E] $A9:AF7E 9F E2 C1 7E STA $7EC1E2,x[$7E:C1FE] $A9:AF82 CA DEX $A9:AF83 CA DEX $A9:AF84 10 F4 BPL $F4 [$AF7A] $A9:AF86 22 D5 E3 AD JSL $ADE3D5[$AD:E3D5] $A9:AF8A A9 00 0E LDA #$0E00 $A9:AF8D 8F 1A 78 7E STA $7E781A[$7E:781A] $A9:AF91 9C F0 0F STZ $0FF0 [$7E:0FF0] $A9:AF94 9C F2 0F STZ $0FF2 [$7E:0FF2] $A9:AF97 A9 9D AF LDA #$AF9D $A9:AF9A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:AF9D 20 31 B0 JSR $B031 [$A9:B031] $A9:AFA0 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:AFA3 30 01 BMI $01 [$AFA6] $A9:AFA5 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $A9:AFA6 A9 00 00 LDA #$0000 $A9:AFA9 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:AFAD A9 B6 AF LDA #$AFB6 $A9:AFB0 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:AFB3 9C B2 0F STZ $0FB2 [$7E:0FB2] ; Counter? $A9:AFB6 22 1C F4 AD JSL $ADF41C[$AD:F41C] $A9:AFBA 20 31 B0 JSR $B031 [$A9:B031] $A9:AFBD CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:AFC0 10 16 BPL $16 [$AFD8] $A9:AFC2 A9 10 00 LDA #$0010 $A9:AFC5 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:AFC8 AF 2E 80 7E LDA $7E802E[$7E:802E] $A9:AFCC 1A INC A $A9:AFCD 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:AFD1 3A DEC A $A9:AFD2 22 B4 E9 AD JSL $ADE9B4[$AD:E9B4] $A9:AFD6 B0 01 BCS $01 [$AFD9] $A9:AFD8 60 RTS $A9:AFD9 A9 C6 02 LDA #$02C6 $A9:AFDC 8D 9A 17 STA $179A [$7E:179A] $A9:AFDF AA TAX $A9:AFE0 8B PHB $A9:AFE1 F4 7E 7E PEA $7E7E $A9:AFE4 AB PLB $A9:AFE5 AB PLB $A9:AFE6 A9 38 03 LDA #$0338 $A9:AFE9 9D 00 20 STA $2000,x[$7E:22C6] $A9:AFEC CA DEX $A9:AFED CA DEX $A9:AFEE 10 F9 BPL $F9 [$AFE9] $A9:AFF0 AB PLB $A9:AFF1 A9 01 00 LDA #$0001 $A9:AFF4 8D 1E 0E STA $0E1E [$7E:0E1E] $A9:AFF7 AD 86 0F LDA $0F86 [$7E:0F86] $A9:AFFA 09 00 01 ORA #$0100 $A9:AFFD 29 FF DF AND #$DFFF $A9:B000 8D 86 0F STA $0F86 [$7E:0F86] $A9:B003 9C 88 0F STZ $0F88 [$7E:0F88] $A9:B006 A9 13 B0 LDA #$B013 $A9:B009 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B00C A9 10 00 LDA #$0010 $A9:B00F 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B012 60 RTS } ;;; $B013: ;;; { $A9:B013 20 31 B0 JSR $B031 [$A9:B031] $A9:B016 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B019 10 F7 BPL $F7 [$B012] $A9:B01B A9 15 B1 LDA #$B115 $A9:B01E 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B021 60 RTS } ;;; $B022: ;;; $A9:B022 A9 0F B1 LDA #$B10F $A9:B025 85 16 STA $16 [$7E:0016] $A9:B027 A9 02 00 LDA #$0002 $A9:B02A 85 18 STA $18 [$7E:0018] $A9:B02C A9 10 00 LDA #$0010 $A9:B02F 80 0D BRA $0D [$B03E] $A9:B031 A9 09 B1 LDA #$B109 $A9:B034 85 16 STA $16 [$7E:0016] $A9:B036 A9 04 00 LDA #$0004 $A9:B039 85 18 STA $18 [$7E:0018] $A9:B03B A9 08 00 LDA #$0008 $A9:B03E CE F0 0F DEC $0FF0 [$7E:0FF0] $A9:B041 10 CF BPL $CF [$B012] $A9:B043 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:B046 CE F2 0F DEC $0FF2 [$7E:0FF2] $A9:B049 10 06 BPL $06 [$B051] $A9:B04B A9 06 00 LDA #$0006 $A9:B04E 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:B051 AD F2 0F LDA $0FF2 [$7E:0FF2] $A9:B054 0A ASL A $A9:B055 0A ASL A $A9:B056 0A ASL A $A9:B057 0A ASL A $A9:B058 AA TAX $A9:B059 A5 18 LDA $18 [$7E:0018] $A9:B05B 48 PHA $A9:B05C DA PHX $A9:B05D BD 99 B0 LDA $B099,x[$A9:B0A9] $A9:B060 85 12 STA $12 [$7E:0012] $A9:B062 BD 9B B0 LDA $B09B,x[$A9:B0AB] $A9:B065 85 14 STA $14 [$7E:0014] $A9:B067 A6 16 LDX $16 [$7E:0016] $A9:B069 BC 00 00 LDY $0000,x[$A9:B10F] $A9:B06C 22 11 81 80 JSL $808111[$80:8111] ; RNG $A9:B070 C9 00 40 CMP #$4000 $A9:B073 90 0B BCC $0B [$B080] $A9:B075 BC 02 00 LDY $0002,x[$A9:B111] $A9:B078 C9 00 E0 CMP #$E000 $A9:B07B 90 03 BCC $03 [$B080] $A9:B07D BC 04 00 LDY $0004,x[$A9:B113] $A9:B080 98 TYA $A9:B081 A0 13 CB LDY #$CB13 $A9:B084 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:B088 FA PLX $A9:B089 68 PLA $A9:B08A E8 INX $A9:B08B E8 INX $A9:B08C E8 INX $A9:B08D E8 INX $A9:B08E 3A DEC A $A9:B08F D0 CA BNE $CA [$B05B] $A9:B091 A9 13 00 LDA #$0013 $A9:B094 22 39 91 80 JSL $809139[$80:9139] $A9:B098 60 RTS $A9:B099 db 24, 00, DB, FF, ED, FF, F1, FF, FC, FF, 0D, 00, 1D, 00, 19, 00, 11, 00, C9, FF, 1E, 00, EA, FF, FD, FF, FB, FF, 00, 00, 28, 00, 34, 00, DE, FF, FD, FF, F1, FF, 0C, 00, 13, 00, 19, 00, 2C, 00, 04, 00, D5, FF, F4, FF, EA, FF, 0D, 00, FE, FF, F8, FF, 34, 00, FE, FF, DF, FF, 0A, 00, F6, FF, F2, FF, 10, 00, 06, 00, 3B, 00, 14, 00, D7, FF, 04, 00, EA, FF, EC, FF, 03, 00, E5, FF, 39, 00, 0A, 00, E1, FF, EC, FF, F8, FF, 00, 00, 17, 00, 1E, 00, 3D, 00, 00, 00, 01, 00, 02, 00, 01, 00, 01, 00, 01, 00 ; $B115: AI Script { $A9:B115 A9 29 9C LDA #$9C29 $A9:B118 20 47 C4 JSR $C447 [$A9:C447] $A9:B11B A9 D0 87 LDA #$87D0 $A9:B11E 8D E8 0F STA $0FE8 [$7E:0FE8] ; Main AI Script (enemy #2?) $A9:B121 A9 00 00 LDA #$0000 $A9:B124 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B127 A9 2D B1 LDA #$B12D $A9:B12A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B12D AD B2 0F LDA $0FB2 [$7E:0FB2] ; Counter? $A9:B130 18 CLC $A9:B131 69 20 00 ADC #$0020 $A9:B134 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B137 EB XBA $A9:B138 29 FF 00 AND #$00FF $A9:B13B 18 CLC $A9:B13C 6D BE 0F ADC $0FBE [$7E:0FBE] $A9:B13F C9 C4 00 CMP #$00C4 $A9:B142 90 16 BCC $16 [$B15A] $A9:B144 A9 02 00 LDA #$0002 $A9:B147 22 0B F4 AD JSL $ADF40B[$AD:F40B] $A9:B14B A9 5E B1 LDA #$B15E $A9:B14E 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B151 A9 00 01 LDA #$0100 $A9:B154 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B157 A9 C4 00 LDA #$00C4 $A9:B15A 8D BE 0F STA $0FBE [$7E:0FBE] $A9:B15D 60 RTS } ; $B15E: AI Script { $A9:B15E A2 03 90 LDX #$9003 $A9:B161 20 BE C5 JSR $C5BE [$A9:C5BE] $A9:B164 90 0C BCC $0C [$B172] $A9:B166 A9 73 B1 LDA #$B173 $A9:B169 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B16C A9 20 00 LDA #$0020 $A9:B16F 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B172 60 RTS } ; $B173: AI Script { $A9:B173 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B176 10 FA BPL $FA [$B172] $A9:B178 A9 00 00 LDA #$0000 $A9:B17B 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:B17F A9 89 B1 LDA #$B189 $A9:B182 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B185 9C B2 0F STZ $0FB2 [$7E:0FB2] ; Counter? $A9:B188 60 RTS } ; $B189: AI Script { $A9:B189 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B18C 10 16 BPL $16 [$B1A4] $A9:B18E AF 2E 80 7E LDA $7E802E[$7E:802E] $A9:B192 1A INC A $A9:B193 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:B197 3A DEC A $A9:B198 22 E9 F0 AD JSL $ADF0E9[$AD:F0E9] $A9:B19C B0 07 BCS $07 [$B1A5] $A9:B19E A9 10 00 LDA #$0010 $A9:B1A1 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B1A4 60 RTS $A9:B1A5 A9 25 9D LDA #$9D25 $A9:B1A8 20 47 C4 JSR $C447 [$A9:C447] $A9:B1AB A9 B8 B1 LDA #$B1B8 $A9:B1AE 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B1B1 A9 00 01 LDA #$0100 $A9:B1B4 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B1B7 60 RTS } ; $B1B8: AI Script { $A9:B1B8 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B1BB 30 01 BMI $01 [$B1BE] $A9:B1BD 60 RTS $A9:B1BE A9 D5 B1 LDA #$B1D5 $A9:B1C1 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B1C4 AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:B1C7 09 00 04 ORA #$0400 $A9:B1CA 8D C6 0F STA $0FC6 [$7E:0FC6] $A9:B1CD A9 00 00 LDA #$0000 $A9:B1D0 8F 08 78 7E STA $7E7808[$7E:7808] $A9:B1D4 60 RTS } ; $B1D5: AI Script { $A9:B1D5 A2 40 00 LDX #$0040 $A9:B1D8 20 12 DB JSR $DB12 [$A9:DB12] $A9:B1DB 90 0B BCC $0B [$B1E8] $A9:B1DD A2 40 00 LDX #$0040 $A9:B1E0 BF 26 88 7E LDA $7E8826,x[$7E:8866] $A9:B1E4 AA TAX $A9:B1E5 4C B9 DC JMP $DCB9 [$A9:DCB9] $A9:B1E8 AD C6 0F LDA $0FC6 [$7E:0FC6] $A9:B1EB 09 00 01 ORA #$0100 $A9:B1EE 29 FF DF AND #$DFFF $A9:B1F1 8D C6 0F STA $0FC6 [$7E:0FC6] $A9:B1F4 9C C8 0F STZ $0FC8 [$7E:0FC8] $A9:B1F7 A9 00 00 LDA #$0000 ;\ $A9:B1FA 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue music track 0 $A9:B1FE A9 24 FF LDA #$FF24 ;\ $A9:B201 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue boss fight 1 music data $A9:B205 A9 11 B2 LDA #$B211 $A9:B208 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B20B A9 14 00 LDA #$0014 $A9:B20E 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B211 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B214 10 0C BPL $0C [$B222] $A9:B216 9C BA 0F STZ $0FBA [$7E:0FBA] $A9:B219 9C BE 0F STZ $0FBE [$7E:0FBE] $A9:B21C A9 58 B2 LDA #$B258 $A9:B21F 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B222 60 RTS } ; $B223: Unknown { $A9:B223 DA PHX $A9:B224 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B227 29 1F 00 AND #$001F $A9:B22A 18 CLC $A9:B22B 6D BA 0F ADC $0FBA [$7E:0FBA] $A9:B22E 18 CLC $A9:B22F 69 F0 FF ADC #$FFF0 $A9:B232 85 12 STA $12 [$7E:0012] $A9:B234 AD BE 0F LDA $0FBE [$7E:0FBE] $A9:B237 18 CLC $A9:B238 69 10 00 ADC #$0010 $A9:B23B 85 14 STA $14 [$7E:0014] $A9:B23D A9 0A 00 LDA #$000A $A9:B240 A0 09 E5 LDY #$E509 $A9:B243 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:B247 AD 44 0E LDA $0E44 [$7E:0E44] $A9:B24A 29 07 00 AND #$0007 $A9:B24D D0 07 BNE $07 [$B256] $A9:B24F A9 10 00 LDA #$0010 $A9:B252 22 B7 90 80 JSL $8090B7[$80:90B7] ; Queue sound $A9:B256 FA PLX $A9:B257 60 RTS } ; $B258: AI Script { $A9:B258 8B PHB $A9:B259 F4 00 A6 PEA $A600 $A9:B25C AB PLB $A9:B25D AB PLB $A9:B25E A2 CB C4 LDX #$C4CB $A9:B261 20 BE C5 JSR $C5BE [$A9:C5BE] $A9:B264 AB PLB $A9:B265 90 69 BCC $69 [$B2D0] $A9:B267 A9 6D B2 LDA #$B26D $A9:B26A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B26D A2 2F 90 LDX #$902F $A9:B270 20 BE C5 JSR $C5BE [$A9:C5BE] $A9:B273 90 5B BCC $5B [$B2D0] $A9:B275 A0 34 95 LDY #$9534 $A9:B278 A2 22 01 LDX #$0122 $A9:B27B A9 0E 00 LDA #$000E $A9:B27E 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:B282 A9 07 00 LDA #$0007 ;\ $A9:B285 22 C1 8F 80 JSL $808FC1[$80:8FC1] ;} Queue song 2 music track $A9:B289 A9 05 00 LDA #$0005 $A9:B28C 8D 3E 18 STA $183E [$7E:183E] $A9:B28F A9 FF FF LDA #$FFFF $A9:B292 8D 40 18 STA $1840 [$7E:1840] $A9:B295 A0 C9 FF LDY #$FFC9 $A9:B298 22 E9 C4 8D JSL $8DC4E9[$8D:C4E9] $A9:B29C A0 CD FF LDY #$FFCD $A9:B29F 22 E9 C4 8D JSL $8DC4E9[$8D:C4E9] $A9:B2A3 A0 D1 FF LDY #$FFD1 $A9:B2A6 22 E9 C4 8D JSL $8DC4E9[$8D:C4E9] $A9:B2AA A0 D5 FF LDY #$FFD5 $A9:B2AD 22 E9 C4 8D JSL $8DC4E9[$8D:C4E9] $A9:B2B1 A9 00 00 LDA #$0000 $A9:B2B4 8F 44 78 7E STA $7E7844[$7E:7844] $A9:B2B8 22 3F C2 A6 JSL $A6C23F[$A6:C23F] $A9:B2BC A9 20 00 LDA #$0020 $A9:B2BF 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B2C2 A0 D1 B2 LDY #$B2D1 $A9:B2C5 AD E2 09 LDA $09E2 [$7E:09E2] $A9:B2C8 D0 03 BNE $03 [$B2CD] $A9:B2CA A0 E3 B2 LDY #$B2E3 $A9:B2CD 8C A8 0F STY $0FA8 [$7E:0FA8] ; Main AI Script $A9:B2D0 60 RTS } ; $B2E3: AI Script { $A9:B2E3 A9 10 26 LDA #$2610 $A9:B2E6 22 A7 C2 A6 JSL $A6C2A7[$A6:C2A7] $A9:B2EA 90 0C BCC $0C [$B2F8] $A9:B2EC A9 F9 B2 LDA #$B2F9 $A9:B2EF 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B2F2 A9 20 00 LDA #$0020 $A9:B2F5 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B2F8 60 RTS } ; $B2F9: AI Script { $A9:B2F9 22 46 B3 A9 JSL $A9B346[$A9:B346] $A9:B2FD CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B300 10 27 BPL $27 [$B329] $A9:B302 A9 0F 00 LDA #$000F $A9:B305 22 84 F0 90 JSL $90F084[$90:F084] $A9:B309 A9 02 00 LDA #$0002 $A9:B30C 8D 43 09 STA $0943 [$7E:0943] $A9:B30F 22 A6 81 80 JSL $8081A6[$80:81A6] $A9:B313 A9 0E 00 LDA #$000E $A9:B316 22 FA 81 80 JSL $8081FA[$80:81FA] $A9:B31A A9 2A B3 LDA #$B32A $A9:B31D 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B320 A9 00 00 LDA #$0000 $A9:B323 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:B326 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:B329 60 RTS } ; $B32A: AI Script { $A9:B32A 20 A3 B3 JSR $B3A3 [$A9:B3A3] $A9:B32D A9 3C B3 LDA #$B33C $A9:B330 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B333 22 D7 83 84 JSL $8483D7[$84:83D7] $A9:B337 dx 00, 06, B677 $A9:B33B 60 RTS } ; $B33C: AI Script { $A9:B33C AD 40 18 LDA $1840 [$7E:1840] $A9:B33F D0 04 BNE $04 [$B345] ;;;; $A9:B345 60 RTS } $A9:B346 AD F0 0F LDA $0FF0 [$7E:0FF0] $A9:B349 3A DEC A $A9:B34A 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:B34D 10 43 BPL $43 [$B392] $A9:B34F A9 04 00 LDA #$0004 $A9:B352 8D F0 0F STA $0FF0 [$7E:0FF0] $A9:B355 AD F2 0F LDA $0FF2 [$7E:0FF2] $A9:B358 3A DEC A $A9:B359 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:B35C 10 06 BPL $06 [$B364] $A9:B35E A9 03 00 LDA #$0003 $A9:B361 8D F2 0F STA $0FF2 [$7E:0FF2] $A9:B364 AD F2 0F LDA $0FF2 [$7E:0FF2] $A9:B367 0A ASL A $A9:B368 0A ASL A $A9:B369 A8 TAY $A9:B36A B9 93 B3 LDA $B393,y[$A9:B397] $A9:B36D 85 12 STA $12 [$7E:0012] $A9:B36F B9 95 B3 LDA $B395,y[$A9:B399] $A9:B372 85 14 STA $14 [$7E:0014] $A9:B374 A0 03 00 LDY #$0003 $A9:B377 22 11 81 80 JSL $808111[$80:8111] ; RNG $A9:B37B C9 00 40 CMP #$4000 $A9:B37E B0 03 BCS $03 [$B383] $A9:B380 A0 0C 00 LDY #$000C $A9:B383 98 TYA $A9:B384 A0 09 E5 LDY #$E509 $A9:B387 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:B38B A9 24 00 LDA #$0024 $A9:B38E 22 B7 90 80 JSL $8090B7[$80:90B7] ; Queue sound $A9:B392 6B RTL $A9:B393 db 08, 00, 6C, 00, 18, 00, 80, 00, 09, 00, 90, 00, 18, 00, 74, 00 $A9:B3A3 A9 00 00 LDA #$0000 $A9:B3A6 48 PHA $A9:B3A7 A0 21 CB LDY #$CB21 $A9:B3AA 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:B3AE 68 PLA $A9:B3AF 1A INC A $A9:B3B0 C9 08 00 CMP #$0008 $A9:B3B3 90 F1 BCC $F1 [$B3A6] $A9:B3B5 60 RTS ; $B3B6: Unknown routine { $A9:B3B6 AF 08 78 7E LDA $7E7808[$7E:7808] $A9:B3BA 85 1A STA $1A [$7E:001A] $A9:B3BC 46 1A LSR $1A [$7E:001A] $A9:B3BE 90 12 BCC $12 [$B3D2] $A9:B3C0 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:B3C3 85 12 STA $12 [$7E:0012] $A9:B3C5 AD 7E 0F LDA $0F7E [$7E:0F7E] $A9:B3C8 85 14 STA $14 [$7E:0014] $A9:B3CA A2 27 B4 LDX #$B427 $A9:B3CD 20 55 B4 JSR $B455 [$A9:B455] $A9:B3D0 B0 54 BCS $54 [$B426] $A9:B3D2 46 1A LSR $1A [$7E:001A] $A9:B3D4 90 12 BCC $12 [$B3E8] $A9:B3D6 AD BA 0F LDA $0FBA [$7E:0FBA] $A9:B3D9 85 12 STA $12 [$7E:0012] $A9:B3DB AD BE 0F LDA $0FBE [$7E:0FBE] $A9:B3DE 85 14 STA $14 [$7E:0014] $A9:B3E0 A2 39 B4 LDX #$B439 $A9:B3E3 20 55 B4 JSR $B455 [$A9:B455] $A9:B3E6 B0 3E BCS $3E [$B426] $A9:B3E8 46 1A LSR $1A [$7E:001A] $A9:B3EA 90 3A BCC $3A [$B426] $A9:B3EC AF 4A 80 7E LDA $7E804A[$7E:804A] $A9:B3F0 85 12 STA $12 [$7E:0012] $A9:B3F2 AF 4C 80 7E LDA $7E804C[$7E:804C] $A9:B3F6 85 14 STA $14 [$7E:0014] $A9:B3F8 A2 4B B4 LDX #$B44B $A9:B3FB 20 55 B4 JSR $B455 [$A9:B455] $A9:B3FE B0 26 BCS $26 [$B426] $A9:B400 AF 50 80 7E LDA $7E8050[$7E:8050] $A9:B404 85 12 STA $12 [$7E:0012] $A9:B406 AF 52 80 7E LDA $7E8052[$7E:8052] $A9:B40A 85 14 STA $14 [$7E:0014] $A9:B40C A2 4B B4 LDX #$B44B $A9:B40F 20 55 B4 JSR $B455 [$A9:B455] $A9:B412 B0 12 BCS $12 [$B426] $A9:B414 AF 56 80 7E LDA $7E8056[$7E:8056] $A9:B418 85 12 STA $12 [$7E:0012] $A9:B41A AF 58 80 7E LDA $7E8058[$7E:8058] $A9:B41E 85 14 STA $14 [$7E:0014] $A9:B420 A2 4B B4 LDX #$B44B $A9:B423 20 55 B4 JSR $B455 [$A9:B455] $A9:B426 60 RTS } $A9:B427 db 02, 00 $A9:B42B db E8, FF, 2A, 00, 38, 00 $A9:B433 db D6, FF, 1C, 00, E7, FF, 02, 00 $A9:B43D db EA, FF, 16, 00, 00, 00 $A9:B445 db 01, 00, 10, 00, 14, 00, 01, 00 $A9:B44F db F8, FF, 08, 00, 08, 00 ; $B455: Unkown routine (used only above) { $A9:B455 BD 00 00 LDA $0000,x[$A9:B439] $A9:B458 F0 5F BEQ $5F [$B4B9] $A9:B45A 85 16 STA $16 [$7E:0016] $A9:B45C E8 INX $A9:B45D E8 INX $A9:B45E AD FA 0A LDA $0AFA [$7E:0AFA] $A9:B461 38 SEC $A9:B462 E5 14 SBC $14 [$7E:0014] $A9:B464 10 0B BPL $0B [$B471] $A9:B466 49 FF FF EOR #$FFFF $A9:B469 1A INC A $A9:B46A 85 18 STA $18 [$7E:0018] $A9:B46C BD 02 00 LDA $0002,x[$A9:B43D] $A9:B46F 80 05 BRA $05 [$B476] $A9:B471 85 18 STA $18 [$7E:0018] $A9:B473 BD 06 00 LDA $0006,x[$A9:B441] $A9:B476 10 04 BPL $04 [$B47C] $A9:B478 49 FF FF EOR #$FFFF $A9:B47B 1A INC A $A9:B47C 18 CLC $A9:B47D 6D 00 0B ADC $0B00 [$7E:0B00] $A9:B480 38 SEC $A9:B481 E5 18 SBC $18 [$7E:0018] $A9:B483 30 27 BMI $27 [$B4AC] $A9:B485 AD F6 0A LDA $0AF6 [$7E:0AF6] $A9:B488 38 SEC $A9:B489 E5 12 SBC $12 [$7E:0012] $A9:B48B 10 0B BPL $0B [$B498] $A9:B498 85 18 STA $18 [$7E:0018] $A9:B49A BD 04 00 LDA $0004,x[$A9:B447] $A9:B49D 10 04 BPL $04 [$B4A3] $A9:B4A3 18 CLC $A9:B4A4 6D FE 0A ADC $0AFE [$7E:0AFE] $A9:B4A7 38 SEC $A9:B4A8 E5 18 SBC $18 [$7E:0018] $A9:B4AA 10 0F BPL $0F [$B4BB] $A9:B4AC C6 16 DEC $16 [$7E:0016] $A9:B4AE F0 09 BEQ $09 [$B4B9] $A9:B4B0 8A TXA $A9:B4B1 18 CLC $A9:B4B2 69 08 00 ADC #$0008 $A9:B4B5 AA TAX $A9:B4B6 4C 5E B4 JMP $B45E [$A9:B45E] $A9:B4B9 18 CLC $A9:B4BA 60 RTS } ;;; $B503: Hurt AI - enemy $EC7F (Mother Brain) ;;; { $A9:B503 5C BC A8 A0 JMP $A0A8BC[$A0:A8BC] } ;;; $B507: Enemy shot - enemy $EC3F (Mother Brain) ;;; { $A9:B507 AF 00 78 7E LDA $7E7800[$7E:7800] $A9:B50B D0 41 BNE $41 [$B54E] $A9:B50D AD A6 18 LDA $18A6 [$7E:18A6] $A9:B510 0A ASL A $A9:B511 A8 TAY $A9:B512 B9 19 0C LDA $0C19,y[$7E:0C1D] $A9:B515 29 07 00 AND #$0007 $A9:B518 A8 TAY $A9:B519 B9 46 B5 LDA $B546,y[$A9:B547] $A9:B51C 29 FF 00 AND #$00FF $A9:B51F F0 24 BEQ $24 [$B545] $A9:B521 A2 4E 00 LDX #$004E $A9:B524 18 CLC $A9:B525 7D C7 1D ADC $1DC7,x[$7E:1E15] $A9:B528 9D C7 1D STA $1DC7,x[$7E:1E15] $A9:B52B A9 6E 00 LDA #$006E $A9:B52E 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:B532 A0 0D 00 LDY #$000D $A9:B535 AD DC 0F LDA $0FDC [$7E:0FDC] $A9:B538 F0 04 BEQ $04 [$B53E] $A9:B53A 4A LSR A $A9:B53B 90 01 BCC $01 [$B53E] $A9:B53D C8 INY $A9:B53E 8C DC 0F STY $0FDC [$7E:0FDC] $A9:B541 22 A7 A6 A0 JSL $A0A6A7[$A0:A6A7] $A9:B545 6B RTL $A9:B546 db 00, 01, 01, 00, 00, 00, 00, 00 $A9:B54E 20 62 B5 JSR $B562 [$A9:B562] $A9:B551 AF 00 78 7E LDA $7E7800[$7E:7800] $A9:B555 C9 01 00 CMP #$0001 $A9:B558 D0 04 BNE $04 [$B55E] $A9:B55A 5C BC A8 A0 JMP $A0A8BC[$A0:A8BC] $A9:B55E 5C A7 A6 A0 JMP $A0A6A7[$A0:A6A7] } ;;; $B562: ;;; { $A9:B562 AF 00 78 7E LDA $7E7800[$7E:7800] $A9:B566 C9 04 00 CMP #$0004 $A9:B569 D0 0B BNE $0B [$B576] $A9:B56B 20 8E B5 JSR $B58E [$A9:B58E] $A9:B56E C9 02 00 CMP #$0002 $A9:B571 D0 03 BNE $03 [$B576] $A9:B573 4C A9 B5 JMP $B5A9 [$A9:B5A9] $A9:B576 20 8E B5 JSR $B58E [$A9:B58E] $A9:B579 3A DEC A $A9:B57A F0 0A BEQ $0A [$B586] $A9:B57C AF 0E 78 7E LDA $7E780E[$7E:780E] $A9:B580 38 SEC $A9:B581 E9 00 01 SBC #$0100 $A9:B584 10 03 BPL $03 [$B589] $A9:B586 A9 00 00 LDA #$0000 $A9:B589 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:B58D 60 RTS } ;;; $B58E: ;;; { $A9:B58E AD A6 18 LDA $18A6 [$7E:18A6] $A9:B591 0A ASL A $A9:B592 A8 TAY $A9:B593 B9 19 0C LDA $0C19,y[$7E:0C19] $A9:B596 29 07 00 AND #$0007 $A9:B599 A8 TAY $A9:B59A B9 A1 B5 LDA $B5A1,y[$A9:B5A2] $A9:B59D 29 FF 00 AND #$00FF $A9:B5A0 60 RTS $A9:B5A1 db 02, 01, 01, 00, 00, 00, 00, 00 } ;;; $B5A9: ;;; { $A9:B5A9 AF 0E 78 7E LDA $7E780E[$7E:780E] $A9:B5AD 38 SEC $A9:B5AE E9 0A 01 SBC #$010A $A9:B5B1 10 0D BPL $0D [$B5C0] $A9:B5B3 A9 95 C3 LDA #$C395 $A9:B5B6 8F 70 78 7E STA $7E7870[$7E:7870] $A9:B5BA A9 00 00 LDA #$0000 $A9:B5BD 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B5C0 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:B5C4 60 RTS } ;;; $B5C5: Enemy touch - enemy $EC7F (Mother Brain) ;;; { $A9:B5C5 6B RTL } ;;; $B5C6: Enemy touch - enemy $EC3F (Mother Brain) ;;; { $A9:B5C6 AD 1F 0A LDA $0A1F [$7E:0A1F] $A9:B5C9 29 FF 00 AND #$00FF $A9:B5CC C9 03 00 CMP #$0003 $A9:B5CF D0 0F BNE $0F [$B5E0] $A9:B5D1 A0 0D 00 LDY #$000D $A9:B5D4 AD DC 0F LDA $0FDC [$7E:0FDC] $A9:B5D7 F0 04 BEQ $04 [$B5DD] $A9:B5D9 4A LSR A $A9:B5DA 90 01 BCC $01 [$B5DD] $A9:B5DC C8 INY $A9:B5DD 8C DC 0F STY $0FDC [$7E:0FDC] $A9:B5E0 6B RTL } ;;; $B5E1: ;;; { $A9:B5E1 22 53 D4 A6 JSL $A6D453[$A6:D453] $A9:B5E5 A9 60 00 LDA #$0060 $A9:B5E8 8D A8 18 STA $18A8 [$7E:18A8] $A9:B5EB A9 05 00 LDA #$0005 $A9:B5EE 8D AA 18 STA $18AA [$7E:18AA] $A9:B5F1 A0 00 00 LDY #$0000 $A9:B5F4 AE 54 0E LDX $0E54 [$7E:0E54] $A9:B5F7 AD F6 0A LDA $0AF6 [$7E:0AF6] $A9:B5FA 38 SEC $A9:B5FB FD 7A 0F SBC $0F7A,x[$7E:0F7A] $A9:B5FE 30 01 BMI $01 [$B601] $A9:B600 C8 INY $A9:B601 8C 54 0A STY $0A54 [$7E:0A54] $A9:B604 60 RTS } ;;; $B605: ;;; $A9:B605 AD CC 0F LDA $0FCC [$7E:0FCC] $A9:B608 D0 09 BNE $09 [$B613] $A9:B60A A9 EB B8 LDA #$B8EB $A9:B60D 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B610 4C EB B8 JMP $B8EB [$A9:B8EB] $A9:B613 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:B617 F0 01 BEQ $01 [$B61A] $A9:B619 60 RTS $A9:B61A AD CC 0F LDA $0FCC [$7E:0FCC] $A9:B61D C9 94 11 CMP #$1194 $A9:B620 30 12 BMI $12 [$B634] $A9:B622 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B625 C9 00 10 CMP #$1000 $A9:B628 90 03 BCC $03 [$B62D] $A9:B62A 4C B8 C6 JMP $C6B8 [$A9:C6B8] $A9:B62D A9 4B B6 LDA #$B64B $A9:B630 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B633 60 RTS $A9:B634 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B637 C9 00 20 CMP #$2000 $A9:B63A B0 03 BCS $03 [$B63F] $A9:B63C 4C B8 C6 JMP $C6B8 [$A9:C6B8] $A9:B63F C9 00 A0 CMP #$A000 $A9:B642 B0 E9 BCS $E9 [$B62D] $A9:B644 A9 7D B8 LDA #$B87D $A9:B647 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B64A 60 RTS $A9:B64B AF 30 78 7E LDA $7E7830[$7E:7830] $A9:B64F 0A ASL A $A9:B650 AA TAX $A9:B651 7C 54 B6 JMP ($B654,x)[$A9:B65A] $A9:B654 db 5A $A9:B656 db 64 $A9:B658 db 73 $A9:B65A A9 40 00 LDA #$0040 $A9:B65D 8D B4 0F STA $0FB4 [$7E:0FB4] $A9:B660 AF 30 78 7E LDA $7E7830[$7E:7830] $A9:B664 1A INC A $A9:B665 8F 30 78 7E STA $7E7830[$7E:7830] $A9:B669 20 E2 B6 JSR $B6E2 [$A9:B6E2] $A9:B66C A2 DC B6 LDX #$B6DC $A9:B66F AD BE 0F LDA $0FBE [$7E:0FBE] $A9:B672 18 CLC $A9:B673 69 04 00 ADC #$0004 $A9:B676 38 SEC $A9:B677 ED FA 0A SBC $0AFA [$7E:0AFA] $A9:B67A 10 04 BPL $04 [$B680] $A9:B67C 49 FF FF EOR #$FFFF $A9:B67F 1A INC A $A9:B680 C9 20 00 CMP #$0020 $A9:B683 B0 03 BCS $03 [$B688] $A9:B688 E2 20 SEP #$20 $A9:B68A A0 00 00 LDY #$0000 $A9:B68D AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B690 DD 00 00 CMP $0000,x[$A9:B6DC] $A9:B693 90 10 BCC $10 [$B6A5] $A9:B695 C8 INY $A9:B696 C8 INY $A9:B697 DD 01 00 CMP $0001,x[$A9:B6DD] $A9:B69A 90 09 BCC $09 [$B6A5] $A9:B6A5 BB TYX $A9:B6A6 C2 20 REP #$20 $A9:B6A8 BD D4 B6 LDA $B6D4,x[$A9:B6D4] $A9:B6AB C9 CC 9E CMP #$9ECC $A9:B6AE F0 09 BEQ $09 [$B6B9] $A9:B6B0 C9 34 9F CMP #$9F34 $A9:B6B3 F0 16 BEQ $16 [$B6CB] $A9:B6B5 20 47 C4 JSR $C447 [$A9:C447] $A9:B6B8 60 RTS $A9:B6D4 db 87, 9C, 3D, 9D $A9:B6DC db 40, 80 $A9:B6E2 AD 1F 0A LDA $0A1F [$7E:0A1F] $A9:B6E5 29 FF 00 AND #$00FF $A9:B6E8 0A ASL A $A9:B6E9 AA TAX $A9:B6EA BD 2C B7 LDA $B72C,x[$A9:B72C] $A9:B6ED D0 1D BNE $1D [$B70C] $A9:B6EF AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B6F2 29 FF 00 AND #$00FF $A9:B6F5 C9 80 00 CMP #$0080 $A9:B6F8 30 08 BMI $08 [$B702] $A9:B702 68 PLA $A9:B703 A9 0E B8 LDA #$B80E $A9:B706 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B709 4C 0E B8 JMP $B80E [$A9:B80E] $A9:B70C AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B70F 29 FF 00 AND #$00FF $A9:B712 C9 80 00 CMP #$0080 $A9:B715 10 01 BPL $01 [$B718] $A9:B717 60 RTS $A9:B718 AF 4A 78 7E LDA $7E784A[$7E:784A] $A9:B71C C9 01 00 CMP #$0001 $A9:B71F 10 0A BPL $0A [$B72B] $A9:B721 A9 81 B7 LDA #$B781 $A9:B724 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B727 68 PLA $A9:B728 4C 81 B7 JMP $B781 [$A9:B781] $A9:B72C db FF, FF $A9:B730 db 00, 00 $A9:B764 CE B4 0F DEC $0FB4 [$7E:0FB4] $A9:B767 D0 09 BNE $09 [$B772] $A9:B769 AF 30 78 7E LDA $7E7830[$7E:7830] $A9:B76D 1A INC A $A9:B76E 8F 30 78 7E STA $7E7830[$7E:7830] $A9:B772 60 RTS $A9:B773 A9 00 00 LDA #$0000 $A9:B776 8F 30 78 7E STA $7E7830[$7E:7830] $A9:B77A A9 05 B6 LDA #$B605 $A9:B77D 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B780 60 RTS $A9:B781 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:B784 C9 80 FF CMP #$FF80 $A9:B787 B0 2E BCS $2E [$B7B7] $A9:B789 A2 40 00 LDX #$0040 $A9:B78C C9 00 60 CMP #$6000 $A9:B78F B0 03 BCS $03 [$B794] $A9:B791 A2 60 00 LDX #$0060 $A9:B794 8A TXA $A9:B795 CD 7A 0F CMP $0F7A [$7E:0F7A] $A9:B798 10 1D BPL $1D [$B7B7] $A9:B7AB 60 RTS $A9:B7B7 22 11 81 80 JSL $808111[$80:8111] ; RNG $A9:B7BB C9 00 80 CMP #$8000 $A9:B7BE 90 0B BCC $0B [$B7CB] $A9:B7C0 A9 C6 B7 LDA #$B7C6 $A9:B7C3 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B7C6 20 8E C6 JSR $C68E [$A9:C68E] $A9:B7C9 90 E0 BCC $E0 [$B7AB] $A9:B7CB A0 CC 9E LDY #$9ECC $A9:B7CE AF 3E 78 7E LDA $7E783E[$7E:783E] $A9:B7D2 F0 03 BEQ $03 [$B7D7] $A9:B7D7 98 TYA $A9:B7D8 20 47 C4 JSR $C447 [$A9:C447] $A9:B7DB A9 E8 B7 LDA #$B7E8 $A9:B7DE 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B7E1 A9 2C 00 LDA #$002C $A9:B7E4 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B7E7 60 RTS $A9:B7E8 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B7EB 10 20 BPL $20 [$B80D] $A9:B7ED 20 70 C6 JSR $C670 [$A9:C670] $A9:B7F0 B0 0B BCS $0B [$B7FD] $A9:B7F2 A9 F8 B7 LDA #$B7F8 $A9:B7F5 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B7F8 20 70 C6 JSR $C670 [$A9:C670] $A9:B7FB 90 10 BCC $10 [$B80D] $A9:B7FD A0 05 B6 LDY #$B605 $A9:B800 AF 3E 78 7E LDA $7E783E[$7E:783E] $A9:B804 F0 03 BEQ $03 [$B809] $A9:B809 98 TYA $A9:B80A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B80D 60 RTS $A9:B80E A2 08 00 LDX #$0008 $A9:B811 AD BE 0F LDA $0FBE [$7E:0FBE] $A9:B814 CD FA 0A CMP $0AFA [$7E:0AFA] $A9:B817 10 03 BPL $03 [$B81C] $A9:B819 A2 06 00 LDX #$0006 $A9:B81C 8A TXA $A9:B81D 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B821 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B825 A9 00 02 LDA #$0200 $A9:B828 8F 68 80 7E STA $7E8068[$7E:8068] $A9:B82C A9 39 B8 LDA #$B839 $A9:B82F 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B832 A9 04 00 LDA #$0004 $A9:B835 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B838 60 RTS $A9:B839 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B83C 30 01 BMI $01 [$B83F] $A9:B83E 60 RTS $A9:B83F A0 00 01 LDY #$0100 $A9:B842 AF 68 80 7E LDA $7E8068[$7E:8068] $A9:B846 10 03 BPL $03 [$B84B] $A9:B84B 98 TYA $A9:B84C 8F 68 80 7E STA $7E8068[$7E:8068] $A9:B850 A9 34 9F LDA #$9F34 $A9:B853 20 47 C4 JSR $C447 [$A9:C447] $A9:B856 A9 63 B8 LDA #$B863 $A9:B859 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B85C A9 10 00 LDA #$0010 $A9:B85F 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B862 60 RTS $A9:B863 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B866 30 01 BMI $01 [$B869] $A9:B868 60 RTS $A9:B869 A9 04 00 LDA #$0004 $A9:B86C 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B870 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B874 A9 05 B6 LDA #$B605 $A9:B877 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B87A 4C 05 B6 JMP $B605 [$A9:B605] $A9:B87D AF 2E 78 7E LDA $7E782E[$7E:782E] $A9:B881 0A ASL A $A9:B882 AA TAX $A9:B883 FC 87 B8 JSR ($B887,x)[$A9:B88F] $A9:B886 60 RTS $A9:B887 db 8F $A9:B889 db B2 $A9:B88B db C8 $A9:B88D db C9 $A9:B88F A0 08 00 LDY #$0008 $A9:B892 A9 28 00 LDA #$0028 $A9:B895 20 47 C6 JSR $C647 [$A9:C647] $A9:B898 90 17 BCC $17 [$B8B1] $A9:B89A A9 08 00 LDA #$0008 $A9:B89D 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B8A1 A9 06 00 LDA #$0006 $A9:B8A4 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B8A8 AF 2E 78 7E LDA $7E782E[$7E:782E] $A9:B8AC 1A INC A $A9:B8AD 8F 2E 78 7E STA $7E782E[$7E:782E] $A9:B8B1 60 RTS $A9:B8B2 AF 4A 78 7E LDA $7E784A[$7E:784A] $A9:B8B6 D0 0F BNE $0F [$B8C7] $A9:B8B8 A9 42 9A LDA #$9A42 $A9:B8BB 20 2D C4 JSR $C42D [$A9:C42D] $A9:B8BE AF 2E 78 7E LDA $7E782E[$7E:782E] $A9:B8C2 1A INC A $A9:B8C3 8F 2E 78 7E STA $7E782E[$7E:782E] $A9:B8C7 60 RTS $A9:B8C8 60 RTS $A9:B8C9 A9 87 9C LDA #$9C87 $A9:B8CC 20 47 C4 JSR $C447 [$A9:C447] $A9:B8CF A9 02 00 LDA #$0002 $A9:B8D2 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B8D6 A9 04 00 LDA #$0004 $A9:B8D9 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B8DD A9 00 00 LDA #$0000 $A9:B8E0 8F 2E 78 7E STA $7E782E[$7E:782E] $A9:B8E4 A9 05 B6 LDA #$B605 $A9:B8E7 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B8EA 60 RTS $A9:B8EB A9 87 9C LDA #$9C87 $A9:B8EE 20 47 C4 JSR $C447 [$A9:C447] $A9:B8F1 A9 40 00 LDA #$0040 $A9:B8F4 8F 68 80 7E STA $7E8068[$7E:8068] $A9:B8F8 A9 01 00 LDA #$0001 $A9:B8FB 8F 62 80 7E STA $7E8062[$7E:8062] $A9:B8FF A9 02 00 LDA #$0002 $A9:B902 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B906 A9 04 00 LDA #$0004 $A9:B909 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B90D A9 1A B9 LDA #$B91A $A9:B910 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B913 A9 00 01 LDA #$0100 $A9:B916 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B919 60 RTS $A9:B91A CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B91D 10 FA BPL $FA [$B919] $A9:B91F A9 6C 9F LDA #$9F6C $A9:B922 20 47 C4 JSR $C447 [$A9:C447] $A9:B925 A9 2B B9 LDA #$B92B $A9:B928 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B92B A9 28 00 LDA #$0028 $A9:B92E 20 48 BB JSR $BB48 [$A9:BB48] $A9:B931 90 E6 BCC $E6 [$B919] $A9:B933 A9 3F B9 LDA #$B93F $A9:B936 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B939 A9 00 01 LDA #$0100 $A9:B93C 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B93F CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B942 10 D5 BPL $D5 [$B919] $A9:B944 A9 71 00 LDA #$0071 $A9:B947 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:B94B A9 51 B9 LDA #$B951 $A9:B94E 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B951 A9 08 00 LDA #$0008 $A9:B954 8D CC 0C STA $0CCC [$7E:0CCC] $A9:B957 A9 06 00 LDA #$0006 $A9:B95A 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B95E 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B962 A9 00 05 LDA #$0500 $A9:B965 8F 68 80 7E STA $7E8068[$7E:8068] $A9:B969 A9 75 B9 LDA #$B975 $A9:B96C 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B96F A9 10 00 LDA #$0010 $A9:B972 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:B975 20 6E BB JSR $BB6E [$A9:BB6E] $A9:B978 AD EE 0C LDA $0CEE [$7E:0CEE] $A9:B97B D0 05 BNE $05 [$B982] $A9:B97D CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:B980 30 01 BMI $01 [$B983] $A9:B982 60 RTS $A9:B983 AD EE 0C LDA $0CEE [$7E:0CEE] $A9:B986 D0 FA BNE $FA [$B982] $A9:B988 9C CC 0C STZ $0CCC [$7E:0CCC] $A9:B98B 20 C6 BC JSR $BCC6 [$A9:BCC6] $A9:B98E A9 77 9C LDA #$9C77 $A9:B991 20 47 C4 JSR $C447 [$A9:C447] $A9:B994 A9 00 02 LDA #$0200 $A9:B997 8F 26 80 7E STA $7E8026[$7E:8026] $A9:B99B 22 48 E7 88 JSL $88E748[$88:E748] $A9:B99F 8F 12 78 7E STA $7E7812[$7E:7812] $A9:B9A3 A9 40 00 LDA #$0040 $A9:B9A6 8F 68 80 7E STA $7E8068[$7E:8068] $A9:B9AA A9 01 00 LDA #$0001 $A9:B9AD 8F 62 80 7E STA $7E8062[$7E:8062] $A9:B9B1 A9 02 00 LDA #$0002 $A9:B9B4 8F 64 80 7E STA $7E8064[$7E:8064] $A9:B9B8 A9 04 00 LDA #$0004 $A9:B9BB 8F 66 80 7E STA $7E8066[$7E:8066] $A9:B9BF 9C B4 0F STZ $0FB4 [$7E:0FB4] $A9:B9C2 9C B6 0F STZ $0FB6 [$7E:0FB6] $A9:B9C5 A9 05 00 LDA #$0005 $A9:B9C8 AC C2 09 LDY $09C2 [$7E:09C2] $A9:B9CB C0 BC 02 CPY #$02BC $A9:B9CE 10 03 BPL $03 [$B9D3] $A9:B9D0 A9 18 00 LDA #$0018 $A9:B9D3 22 84 F0 90 JSL $90F084[$90:F084] $A9:B9D7 A9 06 00 LDA #$0006 $A9:B9DA 8F 2A 78 7E STA $7E782A[$7E:782A] $A9:B9DE A9 E5 B9 LDA #$B9E5 $A9:B9E1 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B9E4 60 RTS $A9:B9E5 20 2E BB JSR $BB2E [$A9:BB2E] $A9:B9E8 20 FD BC JSR $BCFD [$A9:BCFD] $A9:B9EB 20 6E BB JSR $BB6E [$A9:BB6E] $A9:B9EE 20 76 BC JSR $BC76 [$A9:BC76] $A9:B9F1 20 B5 BB JSR $BBB5 [$A9:BBB5] $A9:B9F4 90 09 BCC $09 [$B9FF] $A9:B9F6 A9 00 BA LDA #$BA00 $A9:B9F9 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:B9FC 9C B2 0F STZ $0FB2 [$7E:0FB2] ; Counter? $A9:B9FF 60 RTS $A9:BA00 20 2E BB JSR $BB2E [$A9:BB2E] $A9:BA03 20 FD BC JSR $BCFD [$A9:BCFD] $A9:BA06 20 6E BB JSR $BB6E [$A9:BB6E] $A9:BA09 20 76 BC JSR $BC76 [$A9:BC76] $A9:BA0C 20 B5 BB JSR $BBB5 [$A9:BBB5] $A9:BA0F CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BA12 10 12 BPL $12 [$BA26] $A9:BA14 A9 08 00 LDA #$0008 $A9:BA17 8D 3E 18 STA $183E [$7E:183E] $A9:BA1A A9 08 00 LDA #$0008 $A9:BA1D 8D 40 18 STA $1840 [$7E:1840] $A9:BA20 A9 27 BA LDA #$BA27 $A9:BA23 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BA26 60 RTS $A9:BA27 A9 3C BA LDA #$BA3C $A9:BA2A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BA2D A9 2B 01 LDA #$012B $A9:BA30 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BA33 8D 40 18 STA $1840 [$7E:1840] $A9:BA36 A9 08 00 LDA #$0008 $A9:BA39 8D 3E 18 STA $183E [$7E:183E] $A9:BA3C 20 2E BB JSR $BB2E [$A9:BB2E] $A9:BA3F 20 FD BC JSR $BCFD [$A9:BCFD] $A9:BA42 20 6E BB JSR $BB6E [$A9:BB6E] $A9:BA45 20 76 BC JSR $BC76 [$A9:BC76] $A9:BA48 22 7D C5 A9 JSL $A9C57D[$A9:C57D] $A9:BA4C 20 C4 C4 JSR $C4C4 [$A9:C4C4] $A9:BA4F 20 CF BB JSR $BBCF [$A9:BBCF] $A9:BA52 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BA55 10 6C BPL $6C [$BAC3] $A9:BA57 A9 5E BA LDA #$BA5E $A9:BA5A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BA5D 60 RTS $A9:BA5E 20 2E BB JSR $BB2E [$A9:BB2E] $A9:BA61 20 FD BC JSR $BCFD [$A9:BCFD] $A9:BA64 20 82 BB JSR $BB82 [$A9:BB82] $A9:BA67 20 76 BC JSR $BC76 [$A9:BC76] $A9:BA6A AF 26 80 7E LDA $7E8026[$7E:8026] $A9:BA6E 38 SEC $A9:BA6F E9 80 01 SBC #$0180 $A9:BA72 8F 26 80 7E STA $7E8026[$7E:8026] $A9:BA76 C9 00 02 CMP #$0200 $A9:BA79 10 48 BPL $48 [$BAC3] $A9:BA7B A9 00 02 LDA #$0200 $A9:BA7E 8F 26 80 7E STA $7E8026[$7E:8026] $A9:BA82 A9 00 FF LDA #$FF00 $A9:BA85 8D B4 0F STA $0FB4 [$7E:0FB4] $A9:BA88 9C B6 0F STZ $0FB6 [$7E:0FB6] $A9:BA8B AF 12 78 7E LDA $7E7812[$7E:7812] $A9:BA8F AA TAX $A9:BA90 9E B4 18 STZ $18B4,x[$7E:18B4] $A9:BA93 9C 40 18 STZ $1840 [$7E:1840] $A9:BA96 A9 87 9C LDA #$9C87 $A9:BA99 20 47 C4 JSR $C447 [$A9:C447] $A9:BA9C 20 F8 D1 JSR $D1F8 [$A9:D1F8] $A9:BA9F 20 CE BC JSR $BCCE [$A9:BCCE] $A9:BAA2 A9 02 00 LDA #$0002 $A9:BAA5 22 49 90 80 JSL $809049[$80:9049] $A9:BAA9 A9 00 00 LDA #$0000 $A9:BAAC 8F 2C 78 7E STA $7E782C[$7E:782C] $A9:BAB0 A9 01 00 LDA #$0001 $A9:BAB3 22 84 F0 90 JSL $90F084[$90:F084] $A9:BAB7 A9 08 00 LDA #$0008 $A9:BABA 8D CC 0C STA $0CCC [$7E:0CCC] $A9:BABD A9 C4 BA LDA #$BAC4 $A9:BAC0 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BAC3 60 RTS $A9:BAC4 A9 00 00 LDA #$0000 $A9:BAC7 22 AD E4 91 JSL $91E4AD[$91:E4AD] $A9:BACB A9 D1 BA LDA #$BAD1 $A9:BACE 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BAD1 20 E1 BB JSR $BBE1 [$A9:BBE1] $A9:BAD4 90 06 BCC $06 [$BADC] $A9:BAD6 A9 DD BA LDA #$BADD $A9:BAD9 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BADC 60 RTS $A9:BADD A9 40 00 LDA #$0040 $A9:BAE0 8F 68 80 7E STA $7E8068[$7E:8068] $A9:BAE4 A9 01 00 LDA #$0001 $A9:BAE7 8F 62 80 7E STA $7E8062[$7E:8062] $A9:BAEB A9 02 00 LDA #$0002 $A9:BAEE 8F 64 80 7E STA $7E8064[$7E:8064] $A9:BAF2 A9 04 00 LDA #$0004 $A9:BAF5 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BAF9 A9 06 BB LDA #$BB06 $A9:BAFC 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BAFF A9 80 00 LDA #$0080 $A9:BB02 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BB05 60 RTS $A9:BB06 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BB09 10 FA BPL $FA [$BB05] $A9:BB0B AD C2 09 LDA $09C2 [$7E:09C2] $A9:BB0E C9 90 01 CMP #$0190 $A9:BB11 30 07 BMI $07 [$BB1A] $A9:BB13 A9 EB B8 LDA #$B8EB $A9:BB16 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BB19 60 RTS $A9:BB1A A0 0A 00 LDY #$000A $A9:BB1D AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:BB20 18 CLC $A9:BB21 69 10 00 ADC #$0010 $A9:BB24 20 01 C6 JSR $C601 [$A9:C601] $A9:BB27 A9 45 BD LDA #$BD45 $A9:BB2A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BB2D 60 RTS $A9:BB2E AF 2A 78 7E LDA $7E782A[$7E:782A] $A9:BB32 30 13 BMI $13 [$BB47] $A9:BB34 3A DEC A $A9:BB35 8F 2A 78 7E STA $7E782A[$7E:782A] $A9:BB39 A9 40 00 LDA #$0040 $A9:BB3C 22 49 90 80 JSL $809049[$80:9049] $A9:BB40 A9 01 00 LDA #$0001 $A9:BB43 8F 2C 78 7E STA $7E782C[$7E:782C] $A9:BB47 60 RTS $A9:BB48 A0 0A 00 LDY #$000A $A9:BB4B 20 47 C6 JSR $C647 [$A9:C647] $A9:BB4E B0 01 BCS $01 [$BB51] $A9:BB51 A9 50 00 LDA #$0050 $A9:BB54 8F 68 80 7E STA $7E8068[$7E:8068] $A9:BB58 A9 01 00 LDA #$0001 $A9:BB5B 8F 62 80 7E STA $7E8062[$7E:8062] $A9:BB5F A9 08 00 LDA #$0008 $A9:BB62 8F 64 80 7E STA $7E8064[$7E:8064] $A9:BB66 A9 06 00 LDA #$0006 $A9:BB69 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BB6D 60 RTS $A9:BB6E AF 26 80 7E LDA $7E8026[$7E:8026] $A9:BB72 18 CLC $A9:BB73 69 80 01 ADC #$0180 $A9:BB76 C9 00 0C CMP #$0C00 $A9:BB79 30 03 BMI $03 [$BB7E] $A9:BB7B A9 00 0C LDA #$0C00 $A9:BB7E 8F 26 80 7E STA $7E8026[$7E:8026] $A9:BB82 AD F6 0A LDA $0AF6 [$7E:0AF6] $A9:BB85 38 SEC $A9:BB86 ED BA 0F SBC $0FBA [$7E:0FBA] $A9:BB89 38 SEC $A9:BB8A E9 10 00 SBC #$0010 $A9:BB8D 85 12 STA $12 [$7E:0012] $A9:BB8F AD FA 0A LDA $0AFA [$7E:0AFA] $A9:BB92 38 SEC $A9:BB93 ED BE 0F SBC $0FBE [$7E:0FBE] $A9:BB96 38 SEC $A9:BB97 E9 04 00 SBC #$0004 $A9:BB9A 85 14 STA $14 [$7E:0014] $A9:BB9C 22 AE C0 A0 JSL $A0C0AE[$A0:C0AE] $A9:BBA0 38 SEC $A9:BBA1 E9 80 00 SBC #$0080 $A9:BBA4 49 FF FF EOR #$FFFF $A9:BBA7 1A INC A $A9:BBA8 29 FF 00 AND #$00FF $A9:BBAB 8F 22 80 7E STA $7E8022[$7E:8022] $A9:BBAF 60 RTS $A9:BBB5 A9 00 10 LDA #$1000 $A9:BBB8 20 3F BC JSR $BC3F [$A9:BC3F] $A9:BBBB B0 11 BCS $11 [$BBCE] $A9:BBBD AF 22 80 7E LDA $7E8022[$7E:8022] $A9:BBC1 85 12 STA $12 [$7E:0012] $A9:BBC3 A9 00 10 LDA #$1000 $A9:BBC6 22 72 C2 86 JSL $86C272[$86:C272] $A9:BBCA 20 FD BB JSR $BBFD [$A9:BBFD] $A9:BBCD 18 CLC $A9:BBCE 60 RTS $A9:BBCF A9 40 00 LDA #$0040 $A9:BBD2 A0 7C 00 LDY #$007C $A9:BBD5 CC FA 0A CPY $0AFA [$7E:0AFA] $A9:BBD8 10 04 BPL $04 [$BBDE] $A9:BBDA 49 FF FF EOR #$FFFF $A9:BBDD 1A INC A $A9:BBDE 4C FD BB JMP $BBFD [$A9:BBFD] $A9:BBE1 AD B4 0F LDA $0FB4 [$7E:0FB4] $A9:BBE4 18 CLC $A9:BBE5 69 02 00 ADC #$0002 $A9:BBE8 30 03 BMI $03 [$BBED] $A9:BBED 8D B4 0F STA $0FB4 [$7E:0FB4] $A9:BBF0 20 3F BC JSR $BC3F [$A9:BC3F] $A9:BBF3 AD B6 0F LDA $0FB6 [$7E:0FB6] $A9:BBF6 18 CLC $A9:BBF7 69 18 00 ADC #$0018 $A9:BBFA 8D B6 0F STA $0FB6 [$7E:0FB6] $A9:BBFD E2 20 SEP #$20 $A9:BBFF 18 CLC $A9:BC00 6D FD 0A ADC $0AFD [$7E:0AFD] $A9:BC03 8D FD 0A STA $0AFD [$7E:0AFD] $A9:BC06 8D 17 0B STA $0B17 [$7E:0B17] $A9:BC09 C2 20 REP #$20 $A9:BC0B 29 00 FF AND #$FF00 $A9:BC0E EB XBA $A9:BC0F 10 03 BPL $03 [$BC14] $A9:BC11 09 00 FF ORA #$FF00 $A9:BC14 6D FA 0A ADC $0AFA [$7E:0AFA] $A9:BC17 C9 30 00 CMP #$0030 $A9:BC1A 30 0D BMI $0D [$BC29] $A9:BC1C C9 C0 00 CMP #$00C0 $A9:BC1F 10 0D BPL $0D [$BC2E] $A9:BC21 8D FA 0A STA $0AFA [$7E:0AFA] $A9:BC24 8D 14 0B STA $0B14 [$7E:0B14] $A9:BC27 18 CLC $A9:BC28 60 RTS $A9:BC2E A9 C0 00 LDA #$00C0 $A9:BC31 8D FA 0A STA $0AFA [$7E:0AFA] $A9:BC34 8D 14 0B STA $0B14 [$7E:0B14] $A9:BC37 9C FC 0A STZ $0AFC [$7E:0AFC] $A9:BC3A 9C 16 0B STZ $0B16 [$7E:0B16] $A9:BC3D 38 SEC $A9:BC3E 60 RTS $A9:BC3F E2 20 SEP #$20 $A9:BC41 18 CLC $A9:BC42 6D F9 0A ADC $0AF9 [$7E:0AF9] $A9:BC45 8D F9 0A STA $0AF9 [$7E:0AF9] $A9:BC48 8D 13 0B STA $0B13 [$7E:0B13] $A9:BC4B C2 20 REP #$20 $A9:BC4D 29 00 FF AND #$FF00 $A9:BC50 EB XBA $A9:BC51 10 03 BPL $03 [$BC56] $A9:BC53 09 00 FF ORA #$FF00 $A9:BC56 6D F6 0A ADC $0AF6 [$7E:0AF6] $A9:BC59 C9 EB 00 CMP #$00EB $A9:BC5C 10 07 BPL $07 [$BC65] $A9:BC5E 8D F6 0A STA $0AF6 [$7E:0AF6] $A9:BC61 8D 10 0B STA $0B10 [$7E:0B10] $A9:BC64 60 RTS $A9:BC65 A9 EB 00 LDA #$00EB $A9:BC68 8D F6 0A STA $0AF6 [$7E:0AF6] $A9:BC6B 8D 10 0B STA $0B10 [$7E:0B10] $A9:BC6E 9C F8 0A STZ $0AF8 [$7E:0AF8] $A9:BC71 9C 12 0B STZ $0B12 [$7E:0B12] $A9:BC74 38 SEC $A9:BC75 60 RTS $A9:BC76 CE B6 0F DEC $0FB6 [$7E:0FB6] $A9:BC79 30 01 BMI $01 [$BC7C] $A9:BC7B 60 RTS $A9:BC7C A9 08 00 LDA #$0008 $A9:BC7F 8D B6 0F STA $0FB6 [$7E:0FB6] $A9:BC82 EE B4 0F INC $0FB4 [$7E:0FB4] $A9:BC85 AD B4 0F LDA $0FB4 [$7E:0FB4] $A9:BC88 29 07 00 AND #$0007 $A9:BC8B 0A ASL A $A9:BC8C AA TAX $A9:BC8D BD A6 BC LDA $BCA6,x[$A9:BCA8] $A9:BC90 85 12 STA $12 [$7E:0012] $A9:BC92 BD B6 BC LDA $BCB6,x[$A9:BCB8] $A9:BC95 85 14 STA $14 [$7E:0014] $A9:BC97 A0 AD CB LDY #$CBAD $A9:BC9A 22 97 80 86 JSL $868097[$86:8097] ; ER Projectile? $A9:BC9E A9 24 00 LDA #$0024 $A9:BCA1 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:BCA5 60 RTS $A9:BCA6 db F8, FF, 06, 00, FC, FF, 02, 00, 03, 00, FA, FF, 08, 00, 00, 00, F9, FF, 02, 00, 05, 00, FC, FF, 06, 00, FE, FF, FA, FF, 07, 00 $A9:BCC6 A9 00 00 LDA #$0000 $A9:BCC9 8F 42 78 7E STA $7E7842[$7E:7842] $A9:BCCD 60 RTS $A9:BCCE A0 74 94 LDY #$9474 $A9:BCD1 A2 82 00 LDX #$0082 $A9:BCD4 A9 0F 00 LDA #$000F $A9:BCD7 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:BCDB A0 74 94 LDY #$9474 $A9:BCDE A2 22 01 LDX #$0122 $A9:BCE1 A9 0F 00 LDA #$000F $A9:BCE4 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:BCE8 A0 94 94 LDY #$9494 $A9:BCEB A2 62 01 LDX #$0162 $A9:BCEE A9 0F 00 LDA #$000F $A9:BCF1 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:BCF5 60 RTS $A9:BCF6 AF 40 E4 AD LDA $ADE440[$AD:E440] $A9:BCFA A8 TAY $A9:BCFB 80 20 BRA $20 [$BD1D] $A9:BCFD AD A4 0F LDA $0FA4 [$7E:0FA4] $A9:BD00 29 02 00 AND #$0002 $A9:BD03 D0 01 BNE $01 [$BD06] $A9:BD05 60 RTS $A9:BD06 AF 42 78 7E LDA $7E7842[$7E:7842] $A9:BD0A AA TAX $A9:BD0B BF 34 E4 AD LDA $ADE434,x[$AD:E434] $A9:BD0F F0 F9 BEQ $F9 [$BD0A] $A9:BD11 E8 INX $A9:BD12 E8 INX $A9:BD13 8A TXA $A9:BD14 8F 42 78 7E STA $7E7842[$7E:7842] $A9:BD18 BF 32 E4 AD LDA $ADE432,x[$AD:E434] $A9:BD1C A8 TAY $A9:BD1D 8B PHB $A9:BD1E F4 00 AD PEA $AD00 $A9:BD21 AB PLB $A9:BD22 AB PLB $A9:BD23 5A PHY $A9:BD24 A2 82 00 LDX #$0082 $A9:BD27 A9 0F 00 LDA #$000F $A9:BD2A 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:BD2E 7A PLY $A9:BD2F A2 22 01 LDX #$0122 $A9:BD32 A9 0F 00 LDA #$000F $A9:BD35 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:BD39 A2 62 01 LDX #$0162 $A9:BD3C A9 0F 00 LDA #$000F $A9:BD3F 22 E4 D2 A9 JSL $A9D2E4[$A9:D2E4] $A9:BD43 AB PLB $A9:BD44 60 RTS $A9:BD45 A9 50 00 LDA #$0050 $A9:BD48 22 5E A4 A0 JSL $A0A45E[$A0:A45E] $A9:BD4C 0A ASL A $A9:BD4D 0A ASL A $A9:BD4E 69 14 00 ADC #$0014 $A9:BD51 CD C2 09 CMP $09C2 [$7E:09C2] $A9:BD54 10 3B BPL $3B [$BD91] $A9:BD56 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:BD59 29 FF 0F AND #$0FFF $A9:BD5C C9 A0 0F CMP #$0FA0 $A9:BD5F 90 25 BCC $25 [$BD86] $A9:BD61 A9 A0 00 LDA #$00A0 $A9:BD64 22 5E A4 A0 JSL $A0A45E[$A0:A45E] $A9:BD68 18 CLC $A9:BD69 69 14 00 ADC #$0014 $A9:BD6C CD C2 09 CMP $09C2 [$7E:09C2] $A9:BD6F 10 0E BPL $0E [$BD7F] $A9:BD71 A0 CC 9E LDY #$9ECC $A9:BD74 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:BD77 29 FF 0F AND #$0FFF $A9:BD7A C9 F0 0F CMP #$0FF0 $A9:BD7D B0 03 BCS $03 [$BD82] $A9:BD7F A0 7F 9D LDY #$9D7F $A9:BD82 98 TYA $A9:BD83 4C 47 C4 JMP $C447 [$A9:C447] $A9:BD86 AD A4 0F LDA $0FA4 [$7E:0FA4] $A9:BD89 29 1F 00 AND #$001F $A9:BD8C D0 09 BNE $09 [$BD97] $A9:BD8E 4C A7 C1 JMP $C1A7 [$A9:C1A7] $A9:BD91 A9 98 BD LDA #$BD98 $A9:BD94 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BD97 60 RTS $A9:BD98 20 70 C6 JSR $C670 [$A9:C670] $A9:BD9B 90 4F BCC $4F [$BDEC] $A9:BD9D A9 A9 BD LDA #$BDA9 $A9:BDA0 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BDA3 A9 10 00 LDA #$0010 $A9:BDA6 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BDA9 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BDAC 10 3E BPL $3E [$BDEC] $A9:BDAE A9 7F 9B LDA #$9B7F $A9:BDB1 20 47 C4 JSR $C447 [$A9:C447] $A9:BDB4 A9 C1 BD LDA #$BDC1 $A9:BDB7 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BDBA A9 00 01 LDA #$0100 $A9:BDBD 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BDC0 60 RTS $A9:BDC1 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BDC4 10 26 BPL $26 [$BDEC] $A9:BDC6 A9 6C 9F LDA #$9F6C $A9:BDC9 20 47 C4 JSR $C447 [$A9:C447] $A9:BDCC A9 D2 BD LDA #$BDD2 $A9:BDCF 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BDD2 A2 E5 8F LDX #$8FE5 $A9:BDD5 20 BE C5 JSR $C5BE [$A9:C5BE] $A9:BDD8 90 12 BCC $12 [$BDEC] $A9:BDDA 20 51 BB JSR $BB51 [$A9:BB51] $A9:BDDD 20 1B BE JSR $BE1B [$A9:BE1B] $A9:BDE0 A9 ED BD LDA #$BDED $A9:BDE3 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BDE6 A9 00 01 LDA #$0100 $A9:BDE9 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BDEC 60 RTS $A9:BDED CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BDF0 10 FA BPL $FA [$BDEC] $A9:BDF2 20 C6 BC JSR $BCC6 [$A9:BCC6] $A9:BDF5 A9 77 9C LDA #$9C77 $A9:BDF8 20 47 C4 JSR $C447 [$A9:C447] $A9:BDFB A9 06 00 LDA #$0006 $A9:BDFE 8F 64 80 7E STA $7E8064[$7E:8064] $A9:BE02 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BE06 A9 00 05 LDA #$0500 $A9:BE09 8F 68 80 7E STA $7E8068[$7E:8068] $A9:BE0D A9 71 00 LDA #$0071 $A9:BE10 22 CB 90 80 JSL $8090CB[$80:90CB] $A9:BE14 A9 1A BE LDA #$BE1A $A9:BE17 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BE1A 60 RTS $A9:BE1B A2 28 BE LDX #$BE28 $A9:BE1E 22 75 92 A0 JSL $A09275[$A0:9275] $A9:BE22 8A TXA $A9:BE23 8F 54 78 7E STA $7E7854[$7E:7854] $A9:BE27 60 RTS $A9:BE28 db BF, EC, 80, 01, 40, 00, A2, CF, 00, 28, 00, 00, 00, 00, 00, 00 $A9:BE38 A9 03 00 LDA #$0003 $A9:BE3B 8F 00 78 7E STA $7E7800[$7E:7800] $A9:BE3F A9 08 00 LDA #$0008 $A9:BE42 8F 64 80 7E STA $7E8064[$7E:8064] $A9:BE46 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BE4A A9 00 07 LDA #$0700 $A9:BE4D 8F 68 80 7E STA $7E8068[$7E:8068] $A9:BE51 A9 5D BE LDA #$BE5D $A9:BE54 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BE57 A9 30 00 LDA #$0030 $A9:BE5A 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BE5D 20 FD BC JSR $BCFD [$A9:BCFD] $A9:BE60 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BE63 10 30 BPL $30 [$BE95] $A9:BE65 A9 96 BE LDA #$BE96 $A9:BE68 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BE6B A9 D0 BF LDA #$BFD0 $A9:BE6E 8F 50 78 7E STA $7E7850[$7E:7850] $A9:BE72 A9 00 00 LDA #$0000 $A9:BE75 8F 4C 78 7E STA $7E784C[$7E:784C] $A9:BE79 A9 02 00 LDA #$0002 $A9:BE7C 8F 4E 78 7E STA $7E784E[$7E:784E] $A9:BE80 A9 01 00 LDA #$0001 $A9:BE83 AF 62 80 7E LDA $7E8062[$7E:8062] $A9:BE87 A9 02 00 LDA #$0002 $A9:BE8A 8F 64 80 7E STA $7E8064[$7E:8064] $A9:BE8E A9 04 00 LDA #$0004 $A9:BE91 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BE95 60 RTS $A9:BE96 AF 40 78 7E LDA $7E7840[$7E:7840] $A9:BE9A D0 07 BNE $07 [$BEA3] $A9:BE9C A9 32 00 LDA #$0032 $A9:BE9F 8F 40 78 7E STA $7E7840[$7E:7840] $A9:BEA3 20 FD BC JSR $BCFD [$A9:BCFD] $A9:BEA6 AF 50 78 7E LDA $7E7850[$7E:7850] $A9:BEAA 85 12 STA $12 [$7E:0012] $A9:BEAC F4 B1 BE PEA $BEB1 $A9:BEAF 6C 12 00 JMP ($0012)[$A9:BFD0] $A9:BEB2 AF 4C 78 7E LDA $7E784C[$7E:784C] $A9:BEB6 0A ASL A $A9:BEB7 A8 TAY $A9:BEB8 B9 EE BE LDA $BEEE,y[$A9:BEEE] $A9:BEBB 29 FF 00 AND #$00FF $A9:BEBE 8F 4E 78 7E STA $7E784E[$7E:784E] $A9:BEC2 B9 FE BE LDA $BEFE,y[$A9:BEFE] $A9:BEC5 8F 68 80 7E STA $7E8068[$7E:8068] $A9:BEC9 AF 4C 78 7E LDA $7E784C[$7E:784C] $A9:BECD C9 06 00 CMP #$0006 $A9:BED0 D0 1B BNE $1B [$BEED] $A9:BED2 A9 00 00 LDA #$0000 $A9:BED5 8F 2C 78 7E STA $7E782C[$7E:782C] $A9:BED9 8F 60 78 7E STA $7E7860[$7E:7860] $A9:BEDD 20 F6 BC JSR $BCF6 [$A9:BCF6] $A9:BEE0 A9 02 00 LDA #$0002 $A9:BEE3 22 49 90 80 JSL $809049[$80:9049] $A9:BEE7 A9 0E BF LDA #$BF0E $A9:BEEA 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BEED 60 RTS $A9:BEEE db 02, 00, 02, 00, 06, 00, 06, 00, 08, 00, 08, 00, 0A, 00 $A9:BEFE db 00, 05, 00, 05, 00, 02, 00, 02, C0, 00, C0, 00, 40, 00 $A9:BF0E AF 50 78 7E LDA $7E7850[$7E:7850] $A9:BF12 85 12 STA $12 [$7E:0012] $A9:BF14 F4 19 BF PEA $BF19 $A9:BF17 6C 12 00 JMP ($0012)[$A9:BFD0] $A9:BF1A AF 4C 78 7E LDA $7E784C[$7E:784C] $A9:BF1E C9 08 00 CMP #$0008 $A9:BF21 30 59 BMI $59 [$BF7C] $A9:BF23 A9 40 00 LDA #$0040 $A9:BF26 8F 68 80 7E STA $7E8068[$7E:8068] $A9:BF2A A9 08 00 LDA #$0008 $A9:BF2D 8F 64 80 7E STA $7E8064[$7E:8064] $A9:BF31 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BF35 A9 39 9C LDA #$9C39 $A9:BF38 20 47 C4 JSR $C447 [$A9:C447] $A9:BF3B A9 41 BF LDA #$BF41 $A9:BF3E 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BF41 A9 28 00 LDA #$0028 $A9:BF44 20 47 C6 JSR $C647 [$A9:C647] $A9:BF47 90 33 BCC $33 [$BF7C] $A9:BF49 A9 56 BF LDA #$BF56 $A9:BF4C 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BF4F A9 00 00 LDA #$0000 $A9:BF52 8F 66 80 7E STA $7E8066[$7E:8066] $A9:BF56 AF 64 80 7E LDA $7E8064[$7E:8064] $A9:BF5A 0F 66 80 7E ORA $7E8066[$7E:8066] $A9:BF5E D0 1C BNE $1C [$BF7C] $A9:BF60 8F 64 78 7E STA $7E7864[$7E:7864] $A9:BF64 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:BF68 D0 12 BNE $12 [$BF7C] $A9:BF6A A9 26 9A LDA #$9A26 $A9:BF6D 20 2D C4 JSR $C42D [$A9:C42D] $A9:BF70 A9 7D BF LDA #$BF7D $A9:BF73 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BF76 A9 40 00 LDA #$0040 $A9:BF79 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BF7C 60 RTS $A9:BF7D CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BF80 10 FA BPL $FA [$BF7C] $A9:BF82 A9 00 00 LDA #$0000 $A9:BF85 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:BF89 A9 95 BF LDA #$BF95 $A9:BF8C 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BF8F A9 10 00 LDA #$0010 $A9:BF92 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BF95 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:BF98 10 E2 BPL $E2 [$BF7C] $A9:BF9A A9 10 00 LDA #$0010 $A9:BF9D 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:BFA0 AF 2E 80 7E LDA $7E802E[$7E:802E] $A9:BFA4 1A INC A $A9:BFA5 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:BFA9 3A DEC A $A9:BFAA 22 4A EF AD JSL $ADEF4A[$AD:EF4A] $A9:BFAE 90 CC BCC $CC [$BF7C] $A9:BFB0 A9 A0 8C LDA #$8CA0 $A9:BFB3 8D CC 0F STA $0FCC [$7E:0FCC] $A9:BFB6 A9 01 00 LDA #$0001 $A9:BFB9 8F 3E 78 7E STA $7E783E[$7E:783E] $A9:BFBD 3A DEC A $A9:BFBE 8F 68 78 7E STA $7E7868[$7E:7868] $A9:BFC2 A9 02 00 LDA #$0002 $A9:BFC5 8F 00 78 7E STA $7E7800[$7E:7800] $A9:BFC9 A9 59 C0 LDA #$C059 $A9:BFCC 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:BFCF 60 RTS $A9:BFD0 AF 4E 78 7E LDA $7E784E[$7E:784E] $A9:BFD4 A8 TAY $A9:BFD5 A9 48 00 LDA #$0048 $A9:BFD8 20 01 C6 JSR $C601 [$A9:C601] $A9:BFDB 90 0A BCC $0A [$BFE7] $A9:BFDD A9 E8 BF LDA #$BFE8 $A9:BFE0 8F 50 78 7E STA $7E7850[$7E:7850] $A9:BFE4 20 38 C0 JSR $C038 [$A9:C038] $A9:BFE7 60 RTS $A9:BFE8 AF 52 78 7E LDA $7E7852[$7E:7852] $A9:BFEC 3A DEC A $A9:BFED 8F 52 78 7E STA $7E7852[$7E:7852] $A9:BFF1 D0 10 BNE $10 [$C003] $A9:BFF3 AF 4C 78 7E LDA $7E784C[$7E:784C] $A9:BFF7 1A INC A $A9:BFF8 8F 4C 78 7E STA $7E784C[$7E:784C] $A9:BFFC A9 04 C0 LDA #$C004 $A9:BFFF 8F 50 78 7E STA $7E7850[$7E:7850] $A9:C003 60 RTS $A9:C004 AF 4E 78 7E LDA $7E784E[$7E:784E] $A9:C008 A8 TAY $A9:C009 A9 28 00 LDA #$0028 $A9:C00C 20 47 C6 JSR $C647 [$A9:C647] $A9:C00F 90 0A BCC $0A [$C01B] $A9:C011 A9 1C C0 LDA #$C01C $A9:C014 8F 50 78 7E STA $7E7850[$7E:7850] $A9:C018 20 38 C0 JSR $C038 [$A9:C038] $A9:C01B 60 RTS $A9:C01C AF 52 78 7E LDA $7E7852[$7E:7852] $A9:C020 3A DEC A $A9:C021 8F 52 78 7E STA $7E7852[$7E:7852] $A9:C025 D0 10 BNE $10 [$C037] $A9:C027 AF 4C 78 7E LDA $7E784C[$7E:784C] $A9:C02B 1A INC A $A9:C02C 8F 4C 78 7E STA $7E784C[$7E:784C] $A9:C030 A9 D0 BF LDA #$BFD0 $A9:C033 8F 50 78 7E STA $7E7850[$7E:7850] $A9:C037 60 RTS $A9:C038 AF 4C 78 7E LDA $7E784C[$7E:784C] $A9:C03C 0A ASL A $A9:C03D A8 TAY $A9:C03E B9 49 C0 LDA $C049,y[$A9:C049] $A9:C041 29 FF 00 AND #$00FF $A9:C044 8F 52 78 7E STA $7E7852[$7E:7852] $A9:C048 60 RTS $A9:C049 db 10, 00, 10, 00, 20, 00, 20, 00, 30, 00, 30, 00, 40, 00, 40, 00 $A9:C059 A9 66 C0 LDA #$C066 $A9:C05C 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C05F A9 00 03 LDA #$0300 $A9:C062 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C065 60 RTS $A9:C066 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C069 10 FA BPL $FA [$C065] $A9:C06B A9 01 00 LDA #$0001 $A9:C06E 8F 68 78 7E STA $7E7868[$7E:7868] $A9:C072 8F 64 78 7E STA $7E7864[$7E:7864] $A9:C076 A9 82 C0 LDA #$C082 $A9:C079 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C07C A9 E0 00 LDA #$00E0 $A9:C07F 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C082 A9 8F C0 LDA #$C08F $A9:C085 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C088 A9 00 00 LDA #$0000 $A9:C08B 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:C08F CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C092 10 D1 BPL $D1 [$C065] $A9:C094 A9 10 00 LDA #$0010 $A9:C097 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C09A AF 2E 80 7E LDA $7E802E[$7E:802E] $A9:C09E 1A INC A $A9:C09F 8F 2E 80 7E STA $7E802E[$7E:802E] $A9:C0A3 3A DEC A $A9:C0A4 22 0D EF AD JSL $ADEF0D[$AD:EF0D] $A9:C0A8 90 BB BCC $BB [$C065] $A9:C0AA A9 BA C0 LDA #$C0BA $A9:C0AD 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C0B0 A9 01 00 LDA #$0001 $A9:C0B3 8F 60 78 7E STA $7E7860[$7E:7860] $A9:C0B7 20 F8 D1 JSR $D1F8 [$A9:D1F8] $A9:C0BA 20 70 C6 JSR $C670 [$A9:C670] $A9:C0BD 90 A6 BCC $A6 [$C065] $A9:C0BF A9 06 00 LDA #$0006 $A9:C0C2 8F 64 80 7E STA $7E8064[$7E:8064] $A9:C0C6 8F 66 80 7E STA $7E8066[$7E:8066] $A9:C0CA A9 00 05 LDA #$0500 $A9:C0CD 8F 68 80 7E STA $7E8068[$7E:8068] $A9:C0D1 A9 01 00 LDA #$0001 $A9:C0D4 8F 62 80 7E STA $7E8062[$7E:8062] $A9:C0D8 A9 E4 C0 LDA #$C0E4 $A9:C0DB 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C0DE A9 10 00 LDA #$0010 $A9:C0E1 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C0E4 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C0E7 10 34 BPL $34 [$C11D] $A9:C0E9 A9 B3 9B LDA #$9BB3 $A9:C0EC 20 47 C4 JSR $C447 [$A9:C447] $A9:C0EF A9 FB C0 LDA #$C0FB $A9:C0F2 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C0F5 A9 80 00 LDA #$0080 $A9:C0F8 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C0FB CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C0FE 10 1D BPL $1D [$C11D] $A9:C100 A0 04 00 LDY #$0004 $A9:C103 A9 50 00 LDA #$0050 $A9:C106 20 01 C6 JSR $C601 [$A9:C601] $A9:C109 90 12 BCC $12 [$C11D] $A9:C10B A9 1E C1 LDA #$C11E $A9:C10E 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C111 A9 02 00 LDA #$0002 $A9:C114 8F 3E 78 7E STA $7E783E[$7E:783E] $A9:C118 3A DEC A $A9:C119 8F 62 78 7E STA $7E7862[$7E:7862] $A9:C11D 60 RTS $A9:C11E A9 00 00 LDA #$0000 $A9:C121 8F 26 78 7E STA $7E7826[$7E:7826] $A9:C125 A9 01 00 LDA #$0001 $A9:C128 8F 62 80 7E STA $7E8062[$7E:8062] $A9:C12C A9 02 00 LDA #$0002 $A9:C12F 8F 64 80 7E STA $7E8064[$7E:8064] $A9:C133 A9 04 00 LDA #$0004 $A9:C136 8F 66 80 7E STA $7E8066[$7E:8066] $A9:C13A A9 40 00 LDA #$0040 $A9:C13D 8F 68 80 7E STA $7E8068[$7E:8068] $A9:C141 A9 47 C1 LDA #$C147 $A9:C144 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C147 20 70 C6 JSR $C670 [$A9:C670] $A9:C14A B0 01 BCS $01 [$C14D] $A9:C14C 60 RTS $A9:C14D A9 5C C1 LDA #$C15C $A9:C150 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C153 A0 0A 00 LDY #$000A $A9:C156 A9 50 00 LDA #$0050 $A9:C159 20 01 C6 JSR $C601 [$A9:C601] $A9:C15C 20 A7 C1 JSR $C1A7 [$A9:C1A7] $A9:C15F AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C162 30 01 BMI $01 [$C165] $A9:C164 60 RTS $A9:C165 A0 BB 9D LDY #$9DBB $A9:C168 AF 54 78 7E LDA $7E7854[$7E:7854] $A9:C16C F0 03 BEQ $03 [$C171] $A9:C16E A0 B1 9D LDY #$9DB1 $A9:C171 98 TYA $A9:C172 20 47 C4 JSR $C447 [$A9:C447] $A9:C175 A9 82 C1 LDA #$C182 $A9:C178 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C17B A9 40 00 LDA #$0040 $A9:C17E 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C181 60 RTS $A9:C182 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C185 10 FA BPL $FA [$C181] $A9:C187 A9 5C C1 LDA #$C15C $A9:C18A 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C18D 60 RTS $A9:C18E 20 70 C6 JSR $C670 [$A9:C670] $A9:C191 A0 04 00 LDY #$0004 $A9:C194 A9 40 00 LDA #$0040 $A9:C197 4C 47 C6 JMP $C647 [$A9:C647] $A9:C19A A9 B1 9D LDA #$9DB1 $A9:C19D 20 47 C4 JSR $C447 [$A9:C447] $A9:C1A0 A9 A6 C1 LDA #$C1A6 $A9:C1A3 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C1A6 60 RTS $A9:C1A7 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C1AB F0 13 BEQ $13 [$C1C0] $A9:C1AD C9 06 00 CMP #$0006 $A9:C1B0 D0 1C BNE $1C [$C1CE] $A9:C1B2 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C1B5 29 FF 00 AND #$00FF $A9:C1B8 C9 C0 00 CMP #$00C0 $A9:C1BB 90 11 BCC $11 [$C1CE] $A9:C1BD 4C 70 C6 JMP $C670 [$A9:C670] $A9:C1C0 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C1C3 29 FF 00 AND #$00FF $A9:C1C6 C9 C0 00 CMP #$00C0 $A9:C1C9 90 03 BCC $03 [$C1CE] $A9:C1CB 4C A3 C6 JMP $C6A3 [$A9:C6A3] $A9:C1CE 60 RTS ;;; $C1CF: ;;; { $A9:C1CF A9 04 00 LDA #$0004 $A9:C1D2 8F 00 78 7E STA $7E7800[$7E:7800] $A9:C1D6 A9 F0 C1 LDA #$C1F0 $A9:C1D9 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C1DC A9 20 00 LDA #$0020 $A9:C1DF 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C1E2 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C1E5 38 SEC $A9:C1E6 E9 0E 00 SBC #$000E $A9:C1E9 A0 02 00 LDY #$0002 $A9:C1EC 20 47 C6 JSR $C647 [$A9:C647] $A9:C1EF 60 RTS } ;;; $C1F0: ;;; { $A9:C1F0 CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C1F3 10 FA BPL $FA [$C1EF] $A9:C1F5 A9 09 C2 LDA #$C209 $A9:C1F8 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C1FB A9 30 C3 LDA #$C330 $A9:C1FE 8F 70 78 7E STA $7E7870[$7E:7870] $A9:C202 A9 6A C2 LDA #$C26A $A9:C205 8F 74 78 7E STA $7E7874[$7E:7874] $A9:C209 AD CC 0F LDA $0FCC [$7E:0FCC] $A9:C20C D0 07 BNE $07 [$C215] $A9:C20E A9 E1 AE LDA #$AEE1 $A9:C211 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C214 60 RTS $A9:C215 20 27 C3 JSR $C327 [$A9:C327] $A9:C218 20 5A C2 JSR $C25A [$A9:C25A] $A9:C21B AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C21F D0 F3 BNE $F3 [$C214] $A9:C221 AF 0C 78 7E LDA $7E780C[$7E:780C] $A9:C225 D0 ED BNE $ED [$C214] $A9:C227 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C22A 10 E8 BPL $E8 [$C214] $A9:C22C A0 00 9F LDY #$9F00 $A9:C22F AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C232 29 FF 00 AND #$00FF $A9:C235 C9 80 00 CMP #$0080 $A9:C238 90 03 BCC $03 [$C23D] $A9:C23A A0 BB 9D LDY #$9DBB $A9:C23D 98 TYA $A9:C23E 20 47 C4 JSR $C447 [$A9:C447] $A9:C241 A9 4E C2 LDA #$C24E $A9:C244 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C247 A9 40 00 LDA #$0040 $A9:C24A 8D B2 0F STA $0FB2 [$7E:0FB2] ; Counter? $A9:C24D 60 RTS } ;;; $C24E: ;;; $A9:C24E CE B2 0F DEC $0FB2 [$7E:0FB2] ; Counter? $A9:C251 10 C1 BPL $C1 [$C214] $A9:C253 A9 09 C2 LDA #$C209 $A9:C256 8D A8 0F STA $0FA8 [$7E:0FA8] ; Main AI Script $A9:C259 60 RTS $A9:C25A AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C25E F0 01 BEQ $01 [$C261] $A9:C260 60 RTS $A9:C261 AF 74 78 7E LDA $7E7874[$7E:7874] $A9:C265 85 12 STA $12 [$7E:0012] $A9:C267 6C 12 00 JMP ($0012)[$A9:C26A] $A9:C26A AF 0E 78 7E LDA $7E780E[$7E:780E] $A9:C26E F0 31 BEQ $31 [$C2A1] $A9:C270 18 CLC $A9:C271 69 20 00 ADC #$0020 $A9:C274 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:C278 C9 00 01 CMP #$0100 $A9:C27B 90 23 BCC $23 [$C2A0] $A9:C27D AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C280 1A INC A $A9:C281 8F 76 78 7E STA $7E7876[$7E:7876] $A9:C285 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C288 29 02 00 AND #$0002 $A9:C28B 18 CLC $A9:C28C 69 04 00 ADC #$0004 $A9:C28F A8 TAY $A9:C290 AF 76 78 7E LDA $7E7876[$7E:7876] $A9:C294 20 01 C6 JSR $C601 [$A9:C601] $A9:C297 90 07 BCC $07 [$C2A0] $A9:C2A0 60 RTS $A9:C2A1 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C2A4 38 SEC $A9:C2A5 E9 0E 00 SBC #$000E $A9:C2A8 8F 76 78 7E STA $7E7876[$7E:7876] $A9:C2AC A9 B3 C2 LDA #$C2B3 $A9:C2AF 8F 74 78 7E STA $7E7874[$7E:7874] $A9:C2B3 AF 76 78 7E LDA $7E7876[$7E:7876] $A9:C2B7 A0 02 00 LDY #$0002 $A9:C2BA 20 47 C6 JSR $C647 [$A9:C647] $A9:C2BD 90 12 BCC $12 [$C2D1] $A9:C2BF AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C2C2 38 SEC $A9:C2C3 E9 0E 00 SBC #$000E $A9:C2C6 8F 76 78 7E STA $7E7876[$7E:7876] $A9:C2CA A9 D2 C2 LDA #$C2D2 $A9:C2CD 8F 74 78 7E STA $7E7874[$7E:7874] $A9:C2D1 60 RTS $A9:C2D2 AF 76 78 7E LDA $7E7876[$7E:7876] $A9:C2D6 A0 04 00 LDY #$0004 $A9:C2D9 20 47 C6 JSR $C647 [$A9:C647] $A9:C2DC B0 01 BCS $01 [$C2DF] $A9:C2DF A9 40 00 LDA #$0040 $A9:C2E2 4C 13 C3 JMP $C313 [$A9:C313] $A9:C313 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:C317 A9 6A C2 LDA #$C26A $A9:C31A 8F 74 78 7E STA $7E7874[$7E:7874] $A9:C31E AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C321 1A INC A $A9:C322 8F 76 78 7E STA $7E7876[$7E:7876] $A9:C326 60 RTS $A9:C327 AF 70 78 7E LDA $7E7870[$7E:7870] $A9:C32B 85 12 STA $12 [$7E:0012] $A9:C32D 6C 12 00 JMP ($0012)[$A9:C330] $A9:C330 A9 01 00 LDA #$0001 $A9:C333 8F 64 80 7E STA $7E8064[$7E:8064] $A9:C337 A9 80 00 LDA #$0080 $A9:C33A 8F 68 80 7E STA $7E8068[$7E:8068] $A9:C33E A9 02 00 LDA #$0002 $A9:C341 8F 64 80 7E STA $7E8064[$7E:8064] $A9:C345 A9 04 00 LDA #$0004 $A9:C348 8F 66 80 7E STA $7E8066[$7E:8066] $A9:C34C A9 53 C3 LDA #$C353 $A9:C34F 8F 70 78 7E STA $7E7870[$7E:7870] $A9:C353 60 RTS $A9:C354 A9 01 00 LDA #$0001 $A9:C357 8F 62 80 7E STA $7E8062[$7E:8062] $A9:C35B A9 00 05 LDA #$0500 $A9:C35E 8F 68 80 7E STA $7E8068[$7E:8068] $A9:C362 A9 06 00 LDA #$0006 $A9:C365 8F 64 80 7E STA $7E8064[$7E:8064] $A9:C369 8F 66 80 7E STA $7E8066[$7E:8066] $A9:C36D A9 7B C3 LDA #$C37B $A9:C370 8F 70 78 7E STA $7E7870[$7E:7870] $A9:C374 A9 10 00 LDA #$0010 $A9:C377 8F 72 78 7E STA $7E7872[$7E:7872] $A9:C37B AF 72 78 7E LDA $7E7872[$7E:7872] $A9:C37F 3A DEC A $A9:C380 30 05 BMI $05 [$C387] $A9:C382 8F 72 78 7E STA $7E7872[$7E:7872] $A9:C386 60 RTS $A9:C387 A9 BB 9D LDA #$9DBB $A9:C38A 20 47 C4 JSR $C447 [$A9:C447] $A9:C38D A9 30 C3 LDA #$C330 $A9:C390 8F 70 78 7E STA $7E7870[$7E:7870] $A9:C394 60 RTS $A9:C395 A9 01 00 LDA #$0001 $A9:C398 8F 62 80 7E STA $7E8062[$7E:8062] $A9:C39C 8F 0C 78 7E STA $7E780C[$7E:780C] $A9:C3A0 A9 E7 9B LDA #$9BE7 $A9:C3A3 20 47 C4 JSR $C447 [$A9:C447] $A9:C3A6 A9 32 00 LDA #$0032 $A9:C3A9 8F 40 78 7E STA $7E7840[$7E:7840] $A9:C3AD A9 00 09 LDA #$0900 $A9:C3B0 8F 68 80 7E STA $7E8068[$7E:8068] $A9:C3B4 A9 08 00 LDA #$0008 $A9:C3B7 8F 64 80 7E STA $7E8064[$7E:8064] $A9:C3BB 8F 66 80 7E STA $7E8066[$7E:8066] $A9:C3BF A9 CD C3 LDA #$C3CD $A9:C3C2 8F 70 78 7E STA $7E7870[$7E:7870] $A9:C3C6 A9 0B 00 LDA #$000B $A9:C3C9 8F 72 78 7E STA $7E7872[$7E:7872] $A9:C3CD AF 72 78 7E LDA $7E7872[$7E:7872] $A9:C3D1 3A DEC A $A9:C3D2 30 05 BMI $05 [$C3D9] $A9:C3D4 8F 72 78 7E STA $7E7872[$7E:7872] $A9:C3D8 60 RTS $A9:C3D9 A9 80 00 LDA #$0080 $A9:C3DC 8F 68 80 7E STA $7E8068[$7E:8068] $A9:C3E0 A9 00 00 LDA #$0000 $A9:C3E3 8F 0C 78 7E STA $7E780C[$7E:780C] $A9:C3E7 A9 54 C3 LDA #$C354 $A9:C3EA 8F 70 78 7E STA $7E7870[$7E:7870] $A9:C3EE 60 RTS $A9:C3EF AE 54 0E LDX $0E54 [$7E:0E54] $A9:C3F2 BD AA 0F LDA $0FAA,x[$7E:0FEA] ; Y position threshold $A9:C3F5 E2 20 SEP #$20 $A9:C3F7 18 CLC $A9:C3F8 7D 7D 0F ADC $0F7D,x[$7E:0FBD] $A9:C3FB 9D 7D 0F STA $0F7D,x[$7E:0FBD] $A9:C3FE C2 20 REP #$20 $A9:C400 29 00 FF AND #$FF00 $A9:C403 EB XBA $A9:C404 10 03 BPL $03 [$C409] $A9:C406 09 00 FF ORA #$FF00 $A9:C409 7D 7A 0F ADC $0F7A,x[$7E:0FBA] $A9:C40C 9D 7A 0F STA $0F7A,x[$7E:0FBA] $A9:C40F BD AC 0F LDA $0FAC,x[$7E:0FEC] $A9:C412 E2 20 SEP #$20 $A9:C414 18 CLC $A9:C415 7D 81 0F ADC $0F81,x[$7E:0FC1] $A9:C418 9D 81 0F STA $0F81,x[$7E:0FC1] $A9:C41B C2 20 REP #$20 $A9:C41D 29 00 FF AND #$FF00 $A9:C420 EB XBA $A9:C421 10 03 BPL $03 [$C426] $A9:C423 09 00 FF ORA #$FF00 $A9:C426 7D 7E 0F ADC $0F7E,x[$7E:0FBE] $A9:C429 9D 7E 0F STA $0F7E,x[$7E:0FBE] $A9:C42C 6B RTL $A9:C42D 8D 92 0F STA $0F92 [$7E:0F92] ; PLM-esque instructions $A9:C430 A9 01 00 LDA #$0001 $A9:C433 8D 94 0F STA $0F94 [$7E:0F94] $A9:C436 9C 90 0F STZ $0F90 [$7E:0F90] $A9:C439 60 RTS $A9:C43A 8D D2 0F STA $0FD2 [$7E:0FD2] $A9:C43D A9 01 00 LDA #$0001 $A9:C440 8D D4 0F STA $0FD4 [$7E:0FD4] $A9:C443 9C D0 0F STZ $0FD0 [$7E:0FD0] $A9:C446 60 RTS $A9:C447 8F 02 80 7E STA $7E8002[$7E:8002] $A9:C44B A9 01 00 LDA #$0001 $A9:C44E 8F 00 80 7E STA $7E8000[$7E:8000] $A9:C452 60 RTS $A9:C453 9D 92 0F STA $0F92,x[$7E:0FD2] ; PLM-esque instructions $A9:C456 A9 01 00 LDA #$0001 $A9:C459 9D 94 0F STA $0F94,x[$7E:0FD4] $A9:C45C 9E 90 0F STZ $0F90,x[$7E:0FD0] $A9:C45F 6B RTL ;;; $C460: A = (sin($12) * A) / 256 ;;; { ; X is preserved $A9:C460 A8 TAY $A9:C461 A5 12 LDA $12 [$7E:0012] $A9:C463 80 07 BRA $07 [$C46C] } ;;; $C465: A = (cos($12) * A) / 256 ;;; { ; X is preserved $A9:C465 A8 TAY $A9:C466 A5 12 LDA $12 [$7E:0012] $A9:C468 18 CLC $A9:C469 69 40 00 ADC #$0040 $A9:C46C DA PHX $A9:C46D 0A ASL A $A9:C46E 29 FE 01 AND #$01FE $A9:C471 AA TAX $A9:C472 BF 43 B4 A0 LDA $A0B443,x[$A0:B641] $A9:C476 E2 20 SEP #$20 $A9:C478 8F 1B 21 00 STA $00211B[$7E:211B] $A9:C47C EB XBA $A9:C47D 8F 1B 21 00 STA $00211B[$7E:211B] $A9:C481 98 TYA $A9:C482 8F 1C 21 00 STA $00211C[$7E:211C] $A9:C486 C2 20 REP #$20 $A9:C488 AF 35 21 00 LDA $002135[$7E:2135] $A9:C48C FA PLX $A9:C48D 6B RTL } $A9:C4A9 E2 20 SEP #$20 $A9:C4AB 18 CLC $A9:C4AC 7D 81 0F ADC $0F81,x[$7E:1001] $A9:C4AF 9D 81 0F STA $0F81,x[$7E:1001] $A9:C4B2 C2 20 REP #$20 $A9:C4B4 29 00 FF AND #$FF00 $A9:C4B7 EB XBA $A9:C4B8 10 03 BPL $03 [$C4BD] $A9:C4BD 7D 7E 0F ADC $0F7E,x[$7E:0FFE] $A9:C4C0 9D 7E 0F STA $0F7E,x[$7E:0FFE] $A9:C4C3 60 RTS $A9:C4C4 AD 44 0E LDA $0E44 [$7E:0E44] $A9:C4C7 29 03 00 AND #$0003 $A9:C4CA D0 25 BNE $25 [$C4F1] $A9:C4CC AD C6 09 LDA $09C6 [$7E:09C6] $A9:C4CF F0 20 BEQ $20 [$C4F1] $A9:C4D1 38 SEC $A9:C4D2 ED 44 C5 SBC $C544 [$A9:C544] $A9:C4D5 C9 01 00 CMP #$0001 $A9:C4D8 10 14 BPL $14 [$C4EE] $A9:C4DA AD D2 09 LDA $09D2 [$7E:09D2] $A9:C4DD C9 01 00 CMP #$0001 $A9:C4E0 D0 06 BNE $06 [$C4E8] $A9:C4E8 A9 00 00 LDA #$0000 $A9:C4EB 8D 04 0A STA $0A04 [$7E:0A04] $A9:C4EE 8D C6 09 STA $09C6 [$7E:09C6] $A9:C4F1 AD 44 0E LDA $0E44 [$7E:0E44] $A9:C4F4 29 03 00 AND #$0003 $A9:C4F7 D0 25 BNE $25 [$C51E] $A9:C4F9 AD CA 09 LDA $09CA [$7E:09CA] $A9:C4FC F0 20 BEQ $20 [$C51E] $A9:C51E AD CE 09 LDA $09CE [$7E:09CE] $A9:C521 F0 20 BEQ $20 [$C543] $A9:C523 38 SEC $A9:C524 ED 44 C5 SBC $C544 [$A9:C544] $A9:C527 C9 01 00 CMP #$0001 $A9:C52A 10 14 BPL $14 [$C540] $A9:C52C AD D2 09 LDA $09D2 [$7E:09D2] $A9:C52F C9 03 00 CMP #$0003 $A9:C532 D0 06 BNE $06 [$C53A] $A9:C53A A9 00 00 LDA #$0000 $A9:C53D 8D 04 0A STA $0A04 [$7E:0A04] $A9:C540 8D CE 09 STA $09CE [$7E:09CE] $A9:C543 60 RTS $A9:C544 dw 0001 ;;; $C546: ;;; { $A9:C546 48 PHA $A9:C547 AD C2 09 LDA $09C2 [$7E:09C2] ;\ $A9:C54A C9 51 00 CMP #$0051 ;} If health >= 81: $A9:C54D 30 0F BMI $0F [$C55E] ;/ $A9:C54F AD 44 0E LDA $0E44 [$7E:0E44] ;\ $A9:C552 29 07 00 AND #$0007 ;} And if [$0E44] hasn't 07h: $A9:C555 D0 07 BNE $07 [$C55E] ;/ $A9:C557 A9 2D 00 LDA #$002D ;\ $A9:C55A 22 39 91 80 JSL $809139[$80:9139] ;} Play sound library 3, $0653 = 03h, sound 2Dh $A9:C55E 68 PLA $A9:C55F 60 RTS } ;;; $C560: ;;; { $A9:C560 A0 FC FF LDY #$FFFC $A9:C563 AD A2 09 LDA $09A2 [$7E:09A2] $A9:C566 4A LSR A $A9:C567 90 03 BCC $03 [$C56C] $A9:C569 A0 FD FF LDY #$FFFD $A9:C56C 98 TYA $A9:C56D 6D C2 09 ADC $09C2 [$7E:09C2] $A9:C570 C9 02 00 CMP #$0002 $A9:C573 10 04 BPL $04 [$C579] $A9:C575 18 CLC $A9:C576 A9 01 00 LDA #$0001 $A9:C579 8D C2 09 STA $09C2 [$7E:09C2] $A9:C57C 6B RTL } ;;; $C57D: ;;; { $A9:C57D A0 FE FF LDY #$FFFE $A9:C580 AD A2 09 LDA $09A2 [$7E:09A2] ;\ $A9:C583 4A LSR A ;} If Varia suit equipped: $A9:C584 90 03 BCC $03 [$C589] ;/ $A9:C586 A0 FE FF LDY #$FFFE $A9:C589 98 TYA $A9:C58A 6D C2 09 ADC $09C2 [$7E:09C2] ; Subtract 2 from health $A9:C58D C9 01 00 CMP #$0001 ;\ $A9:C590 10 04 BPL $04 [$C596] ;| $A9:C592 18 CLC ;} Dead check $A9:C593 A9 00 00 LDA #$0000 ;/ $A9:C596 8D C2 09 STA $09C2 [$7E:09C2] $A9:C599 08 PHP $A9:C59A 20 46 C5 JSR $C546 [$A9:C546] ; Play sound $A9:C59D 28 PLP $A9:C59E 6B RTL } $A9:C59F A9 01 00 LDA #$0001 $A9:C5A2 18 CLC $A9:C5A3 6D C2 09 ADC $09C2 [$7E:09C2] $A9:C5A6 CD C4 09 CMP $09C4 [$7E:09C4] $A9:C5A9 30 0B BMI $0B [$C5B6] $A9:C5AB AD C4 09 LDA $09C4 [$7E:09C4] $A9:C5AE 8D C2 09 STA $09C2 [$7E:09C2] $A9:C5B1 20 46 C5 JSR $C546 [$A9:C546] $A9:C5B4 18 CLC $A9:C5B5 6B RTL $A9:C5B6 8D C2 09 STA $09C2 [$7E:09C2] $A9:C5B9 20 46 C5 JSR $C546 [$A9:C546] $A9:C5BC 38 SEC $A9:C5BD 6B RTL $A9:C5BE AF 04 80 7E LDA $7E8004[$7E:8004] $A9:C5C2 D0 01 BNE $01 [$C5C5] $A9:C5C4 8A TXA $A9:C5C5 AA TAX $A9:C5C6 AC 30 03 LDY $0330 [$7E:0330] $A9:C5C9 BD 00 00 LDA $0000,x[$A9:8F8F] $A9:C5CC F0 2D BEQ $2D [$C5FB] $A9:C5CE 99 D0 00 STA $00D0,y[$7E:00D0] $A9:C5D1 BD 03 00 LDA $0003,x[$A9:8F92] $A9:C5D4 99 D3 00 STA $00D3,y[$7E:00D3] $A9:C5D7 BD 02 00 LDA $0002,x[$A9:8F91] $A9:C5DA 99 D2 00 STA $00D2,y[$7E:00D2] $A9:C5DD BD 05 00 LDA $0005,x[$A9:8F94] $A9:C5E0 99 D5 00 STA $00D5,y[$7E:00D5] $A9:C5E3 98 TYA $A9:C5E4 18 CLC $A9:C5E5 69 07 00 ADC #$0007 $A9:C5E8 8D 30 03 STA $0330 [$7E:0330] $A9:C5EB 8A TXA $A9:C5EC 69 07 00 ADC #$0007 $A9:C5EF 8F 04 80 7E STA $7E8004[$7E:8004] $A9:C5F3 AA TAX $A9:C5F4 BD 00 00 LDA $0000,x[$A9:8F96] $A9:C5F7 F0 02 BEQ $02 [$C5FB] $A9:C5F9 18 CLC $A9:C5FA 60 RTS $A9:C5FB 8F 04 80 7E STA $7E8004[$7E:8004] $A9:C5FF 38 SEC $A9:C600 60 RTS $A9:C601 CD 7A 0F CMP $0F7A [$7E:0F7A] $A9:C604 30 16 BMI $16 [$C61C] $A9:C606 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C60A D0 0E BNE $0E [$C61A] $A9:C60C AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C60F C9 80 00 CMP #$0080 $A9:C612 10 08 BPL $08 [$C61C] $A9:C614 B9 1E C6 LDA $C61E,y[$A9:C628] $A9:C617 20 2D C4 JSR $C42D [$A9:C42D] $A9:C61A 18 CLC $A9:C61B 60 RTS $A9:C61C 38 SEC $A9:C61D 60 RTS $A9:C620 db 30, 97, 6A, 97, A4, 97, DE, 97, 18, 98 $A9:C647 CD 7A 0F CMP $0F7A [$7E:0F7A] $A9:C64A 10 16 BPL $16 [$C662] $A9:C64C AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C650 D0 0E BNE $0E [$C660] $A9:C652 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C655 C9 30 00 CMP #$0030 $A9:C658 30 08 BMI $08 [$C662] $A9:C65A B9 64 C6 LDA $C664,y[$A9:C666] $A9:C65D 20 2D C4 JSR $C42D [$A9:C42D] $A9:C660 18 CLC $A9:C661 60 RTS $A9:C662 38 SEC $A9:C663 60 RTS $A9:C666 db 8C, 98, C6, 98, 00, 99, 52, 98, 3A, 99 $A9:C670 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C674 F0 16 BEQ $16 [$C68C] $A9:C676 A0 C6 99 LDY #$99C6 $A9:C679 C9 03 00 CMP #$0003 $A9:C67C F0 08 BEQ $08 [$C686] $A9:C67E C9 06 00 CMP #$0006 $A9:C681 D0 07 BNE $07 [$C68A] $A9:C683 A0 E2 99 LDY #$99E2 $A9:C686 98 TYA $A9:C687 20 2D C4 JSR $C42D [$A9:C42D] $A9:C68A 18 CLC $A9:C68B 60 RTS $A9:C68C 38 SEC $A9:C68D 60 RTS $A9:C68E AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C692 F0 07 BEQ $07 [$C69B] $A9:C694 C9 03 00 CMP #$0003 $A9:C697 D0 08 BNE $08 [$C6A1] $A9:C699 38 SEC $A9:C69A 60 RTS $A9:C69B A9 0A 9A LDA #$9A0A $A9:C69E 20 2D C4 JSR $C42D [$A9:C42D] $A9:C6A1 18 CLC $A9:C6A2 60 RTS $A9:C6A3 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C6A7 F0 07 BEQ $07 [$C6B0] $A9:C6B0 A9 F2 99 LDA #$99F2 $A9:C6B3 20 2D C4 JSR $C42D [$A9:C42D] $A9:C6B6 18 CLC $A9:C6B7 60 RTS $A9:C6B8 AF 04 78 7E LDA $7E7804[$7E:7804] $A9:C6BC F0 01 BEQ $01 [$C6BF] $A9:C6BF AF 0E 78 7E LDA $7E780E[$7E:780E] $A9:C6C3 F0 22 BEQ $22 [$C6E7] $A9:C6C5 18 CLC $A9:C6C6 69 06 00 ADC #$0006 $A9:C6C9 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:C6CD C9 00 01 CMP #$0100 $A9:C6D0 90 2A BCC $2A [$C6FC] $A9:C6D2 A9 80 00 LDA #$0080 $A9:C6D5 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:C6D9 AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C6DC C9 80 00 CMP #$0080 $A9:C6DF 10 2E BPL $2E [$C70F] $A9:C6E1 A9 A4 97 LDA #$97A4 $A9:C6E4 4C 2D C4 JMP $C42D [$A9:C42D] $A9:C6E7 A9 01 00 LDA #$0001 $A9:C6EA 8F 0E 78 7E STA $7E780E[$7E:780E] $A9:C6EE AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C6F1 C9 30 00 CMP #$0030 $A9:C6F4 30 0E BMI $0E [$C704] $A9:C6F6 A9 C6 98 LDA #$98C6 $A9:C6F9 4C 2D C4 JMP $C42D [$A9:C42D] $A9:C6FC AD 7A 0F LDA $0F7A [$7E:0F7A] $A9:C6FF C9 30 00 CMP #$0030 $A9:C702 10 0B BPL $0B [$C70F] $A9:C704 AD E5 05 LDA $05E5 [$7E:05E5] ; RNG $A9:C707 29 FF 0F AND #$0FFF $A9:C70A C9 C0 0F CMP #$0FC0 $A9:C70D 10 C3 BPL $C3 [$C6D2] $A9:C70F 60 RTS ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;, ; $CFFD { $A9:CFFD A9 46 D0 LDA #$D046 $A9:D000 8F 1C 78 7E STA $7E781C[$7E:781C] $A9:D004 A9 01 00 LDA #$0001 $A9:D007 8F 1E 78 7E STA $7E781E[$7E:781E] $A9:D00B 60 RTS } ; $D1F8 { $A9:D1F8 A9 0A 00 LDA #$000A $A9:D1FB 8D B0 0F STA $0FB0 [$7E:0FB0] $A9:D1FE 60 RTS } ;;; $DC5F: ;;; { $A9:DC5F B9 00 00 LDA $0000,y[$A9:DD58] $A9:DC62 9F 24 88 7E STA $7E8824,x[$7E:8824] $A9:DC66 B9 02 00 LDA $0002,y[$A9:DD5A] $A9:DC69 9F 26 88 7E STA $7E8826,x[$7E:8826] $A9:DC6D B9 04 00 LDA $0004,y[$A9:DD5C] $A9:DC70 9F 28 88 7E STA $7E8828,x[$7E:8828] $A9:DC74 B9 06 00 LDA $0006,y[$A9:DD5E] $A9:DC77 9F 2A 88 7E STA $7E882A,x[$7E:882A] $A9:DC7B B9 0E 00 LDA $000E,y[$A9:DD66] $A9:DC7E 9F 36 88 7E STA $7E8836,x[$7E:8836] $A9:DC82 B9 0C 00 LDA $000C,y[$A9:DD64] $A9:DC85 9F 2C 88 7E STA $7E882C,x[$7E:882C] $A9:DC89 5A PHY $A9:DC8A A8 TAY $A9:DC8B B9 02 00 LDA $0002,y[$A9:E228] $A9:DC8E 38 SEC $A9:DC8F E9 0C 00 SBC #$000C $A9:DC92 9F 34 88 7E STA $7E8834,x[$7E:8834] $A9:DC96 7A PLY $A9:DC97 B9 08 00 LDA $0008,y[$A9:DD60] $A9:DC9A 9F 2E 88 7E STA $7E882E,x[$7E:882E] $A9:DC9E 3A DEC A $A9:DC9F 9F 30 88 7E STA $7E8830,x[$7E:8830] $A9:DCA3 3A DEC A $A9:DCA4 9F 32 88 7E STA $7E8832,x[$7E:8832] $A9:DCA8 BE 00 00 LDX $0000,y[$A9:DD58] $A9:DCAB B9 08 00 LDA $0008,y[$A9:DD60] $A9:DCAE 20 40 DC JSR $DC40 [$A9:DC40] $A9:DCB1 B9 0A 00 LDA $000A,y[$A9:DD62] $A9:DCB4 85 12 STA $12 [$7E:0012] $A9:DCB6 6C 12 00 JMP ($0012)[$A9:DE18] }