HERE you may find Invaders
Code: Select all
.C:101a F0 F0 BEQ $100C
.C:101c 0F 0F F0 SLO $F00F
.C:101f 40 RTI
.C:1020 A9 20 LDA #$20 <== start point SYS4128
.C:1022 8D 22 03 STA $0322
.C:1025 A9 10 LDA #$10
.C:1027 8D 23 03 STA $0323
.C:102a A9 08 LDA #$08
.C:102c 8D 0F 90 STA $900F
.C:102f A9 08 LDA #$08
.C:1031 20 D2 FF JSR $FFD2
.C:1034 A9 93 LDA #$93
.C:1036 20 D2 FF JSR $FFD2
.C:1039 A9 F0 LDA #$F0
.C:103b 8D 05 90 STA $9005
.C:103e A2 00 LDX #$00
.C:1040 BD 00 11 LDA $1100,X
.C:1043 9D 58 1E STA $1E58,X
.C:1046 BD 50 11 LDA $1150,X
.C:1049 9D 58 96 STA $9658,X
.C:104c BD 16 11 LDA $1116,X
.C:104f 9D 1E 1F STA $1F1E,X
.C:1052 BD 66 11 LDA $1166,X
.C:1055 9D 1E 97 STA $971E,X
.C:1058 BD 2C 11 LDA $112C,X
.C:105b 9D 8C 1F STA $1F8C,X
.C:105e BD 7C 11 LDA $117C,X
.C:1061 9D 8C 97 STA $978C,X
.C:1064 E8 INX
.C:1065 E0 16 CPX #$16
.C:1067 D0 D7 BNE $1040
.C:1069 A2 00 LDX #$00
.C:106b BD 79 10 LDA $1079,X
.C:106e 9D FA 1D STA $1DFA,X
.C:1071 E8 INX
.C:1072 E0 06 CPX #$06
.C:1074 D0 F5 BNE $106B
.C:1076 4C 7F 10 JMP $107F
.C:1079 20 D5 FF JSR $FFD5
.C:107c 4C 73 00 JMP $0073
.C:107f 20 9D 10 JSR $109D
.C:1082 A2 01 LDX #$01 <=== Drive?
.C:1084 A4 9A LDY $9A
.C:1086 A9 01 LDA #$01
.C:1088 20 BA FF JSR $FFBA
.C:108b A9 00 LDA #$00
.C:108d A2 00 LDX #$00
.C:108f A0 00 LDY #$00
.C:1091 20 BD FF JSR $FFBD
.C:1094 A9 00 LDA #$00
.C:1096 A2 FF LDX #$FF
.C:1098 A0 FF LDY #$FF
.C:109a 4C FA 1D JMP $1DFA
.C:109d A2 00 LDX #$00
.C:109f BD A0 11 LDA $11A0,X
.C:10a2 9D 73 00 STA $0073,X
.C:10a5 E8 INX
.C:10a6 E0 17 CPX #$17
.C:10a8 D0 F5 BNE $109F
.C:10aa A2 00 LDX #$00
.C:10ac BD 00 12 LDA $1200,X
.C:10af 9D 00 02 STA $0200,X
.C:10b2 E8 INX
.C:10b3 E0 75 CPX #$75
.C:10b5 D0 F5 BNE $10AC
.C:10b7 A2 00 LDX #$00
.C:10b9 BD A1 12 LDA $12A1,X
.C:10bc 9D A1 02 STA $02A1,X
.C:10bf E8 INX
.C:10c0 E0 5F CPX #$5F
.C:1300 13 0F SLO ($0F),Y
.C:1302 00 BRK
.C:1303 20 20 22 JSR $2220 "
.C:1306 49 39 EOR #$39 I9 <===
.C:1308 38 SEC 8 <=== second part file
.C:1309 22 JAM "
.C:130a 20 20 20 JSR $2020
.C:130d 20 20 20 JSR $2020
.C:1310 20 20 20 JSR $2020
.C:1313 20 20 20 JSR $2020
.C:1316 20 20 50 JSR $5020
.C:1319 52 JAM
.C:131a 47 3C SRE $3C
.C:131c 20 20 00 JSR $0020
.C:131f 3F 13 00 RLA $0013,X
.C:1322 00 BRK
.C:1323 20 20 20 JSR $2020
.C:1326 22 JAM
.C:1327 2D 2D 2D AND $2D2D