mirror of
https://github.com/mi57730/a2d.git
synced 2024-07-06 03:29:01 +00:00
15918 lines
664 KiB
Plaintext
15918 lines
664 KiB
Plaintext
ca65 V2.16 - Git f5e9b401
|
|
Main file : seg_0A780_1267F.s
|
|
Current file: seg_0A780_1267F.s
|
|
|
|
000000r 1 .org $4000
|
|
004000 1 ; da65 V2.16 - Git f5e9b401
|
|
004000 1 ; Created: 2017-09-17 10:55:49
|
|
004000 1 ; Input file: DESKTOP2_seg_0A780_1267F
|
|
004000 1 ; Page: 1
|
|
004000 1
|
|
004000 1
|
|
004000 1 .setcpu "65C02"
|
|
004000 1
|
|
004000 1 L0000 := $0000
|
|
004000 1 L0002 := $0002
|
|
004000 1 L0006 := $0006
|
|
004000 1 L0020 := $0020
|
|
004000 1 L0520 := $0520
|
|
004000 1 L0800 := $0800
|
|
004000 1 L0A20 := $0A20
|
|
004000 1 L0CB8 := $0CB8
|
|
004000 1 L0CD7 := $0CD7
|
|
004000 1 L0CF9 := $0CF9
|
|
004000 1 L0D14 := $0D14
|
|
004000 1 L1C00 := $1C00
|
|
004000 1 L2020 := $2020
|
|
004000 1 L2710 := $2710
|
|
004000 1 L3931 := $3931
|
|
004000 1 MLI := $BF00
|
|
004000 1 RAMRDOFF := $C002
|
|
004000 1 RAMRDON := $C003
|
|
004000 1 RAMWRTOFF := $C004
|
|
004000 1 RAMWRTON := $C005
|
|
004000 1 ALTZPOFF := $C008
|
|
004000 1 ALTZPON := $C009
|
|
004000 1 LCBANK1 := $C08B
|
|
004000 1 AUXMOVE := $C311
|
|
004000 1 XFER := $C314
|
|
004000 1 LD000 := $D000
|
|
004000 1 LD01C := $D01C
|
|
004000 1 LD040 := $D040
|
|
004000 1 LD05E := $D05E
|
|
004000 1 LD082 := $D082
|
|
004000 1 LD096 := $D096
|
|
004000 1 LD09A := $D09A
|
|
004000 1 LD108 := $D108
|
|
004000 1 LD13E := $D13E
|
|
004000 1 LD154 := $D154
|
|
004000 1 LD156 := $D156
|
|
004000 1 FSUB := $E7A7
|
|
004000 1 FADD := $E7BE
|
|
004000 1 FMULT := $E97F
|
|
004000 1 FDIV := $EA66
|
|
004000 1 ROUND := $EB2B
|
|
004000 1 FLOAT := $EB93
|
|
004000 1 FIN := $EC4A
|
|
004000 1 FOUT := $ED34
|
|
004000 1 LFB2F := $FB2F
|
|
004000 1 LFBDD := $FBDD
|
|
004000 1 LFC58 := $FC58
|
|
004000 1 COUT := $FDED
|
|
004000 1 LFE89 := $FE89
|
|
004000 1 LFE93 := $FE93
|
|
004000 1 4C 42 40 A2D: jmp L4042
|
|
004003 1
|
|
004003 1 4C 00 D0 L4003: jmp LD000
|
|
004006 1
|
|
004006 1 4C 59 82 L4006: jmp L8259
|
|
004009 1
|
|
004009 1 4C 0F 83 L4009: jmp L830F
|
|
00400C 1
|
|
00400C 1 4C 78 5E jmp L5E78
|
|
00400F 1
|
|
00400F 1 4C 3E D1 jmp LD13E
|
|
004012 1
|
|
004012 1 4C 50 50 L4012: jmp L5050
|
|
004015 1
|
|
004015 1 4C F2 40 L4015: jmp L40F2
|
|
004018 1
|
|
004018 1 4C 40 D0 L4018: jmp LD040
|
|
00401B 1
|
|
00401B 1 4C 81 8E jmp L8E81
|
|
00401E 1
|
|
00401E 1 4C 2B 6D L401E: jmp L6D2B
|
|
004021 1
|
|
004021 1 4C BA 46 L4021: jmp L46BA
|
|
004024 1
|
|
004024 1 4C 9A D0 jmp LD09A
|
|
004027 1
|
|
004027 1 4C 96 D0 jmp LD096
|
|
00402A 1
|
|
00402A 1 4C 0E 49 jmp L490E
|
|
00402D 1
|
|
00402D 1 4C 07 87 L402D: jmp L8707
|
|
004030 1
|
|
004030 1 4C 54 D1 L4030: jmp LD154
|
|
004033 1
|
|
004033 1 4C 56 D1 L4033: jmp LD156
|
|
004036 1
|
|
004036 1 4C DE 46 jmp L46DE
|
|
004039 1
|
|
004039 1 4C 9A 48 jmp L489A
|
|
00403C 1
|
|
00403C 1 4C 8A 48 jmp L488A
|
|
00403F 1
|
|
00403F 1 4C 89 8E jmp L8E89
|
|
004042 1
|
|
004042 1 58 L4042: cli
|
|
004043 1 8D 09 C0 sta ALTZPON
|
|
004046 1 AD 8B C0 lda LCBANK1
|
|
004049 1 AD 8B C0 lda LCBANK1
|
|
00404C 1 20 30 45 jsr L4530
|
|
00404F 1 A2 00 ldx #$00
|
|
004051 1 EC A0 DE L4051: cpx $DEA0
|
|
004054 1 F0 13 beq L4069
|
|
004056 1 8A txa
|
|
004057 1 48 pha
|
|
004058 1 BD A1 DE lda $DEA1,x
|
|
00405B 1 20 E3 86 jsr L86E3
|
|
00405E 1 A0 01 ldy #$01
|
|
004060 1 20 40 D0 jsr LD040
|
|
004063 1 68 pla
|
|
004064 1 AA tax
|
|
004065 1 E8 inx
|
|
004066 1 4C 51 40 jmp L4051
|
|
004069 1
|
|
004069 1 A9 00 L4069: lda #$00
|
|
00406B 1 8D 9F DE sta $DE9F
|
|
00406E 1 20 96 D0 jsr LD096
|
|
004071 1 A9 00 lda #$00
|
|
004073 1 8D A9 D2 sta $D2A9
|
|
004076 1 8D AA D2 sta $D2AA
|
|
004079 1 8D DF 40 sta L40DF
|
|
00407C 1 8D 6F E2 sta $E26F
|
|
00407F 1 AD 9F 59 lda L599F
|
|
004082 1 F0 04 beq L4088
|
|
004084 1 A8 tay
|
|
004085 1 20 54 D1 jsr LD154
|
|
004088 1 20 10 45 L4088: jsr L4510
|
|
00408B 1 EE DF 40 inc L40DF
|
|
00408E 1 EE DF 40 inc L40DF
|
|
004091 1 AD DF 40 lda L40DF
|
|
004094 1 CD AB D2 cmp $D2AB
|
|
004097 1 90 0D bcc L40A6
|
|
004099 1 A9 00 lda #$00
|
|
00409B 1 8D DF 40 sta L40DF
|
|
00409E 1 20 63 45 jsr L4563
|
|
0040A1 1 F0 03 beq L40A6
|
|
0040A3 1 20 E0 40 jsr L40E0
|
|
0040A6 1 20 4E 46 L40A6: jsr L464E
|
|
0040A9 1 20 E6 48 jsr L48E6
|
|
0040AC 1 AD 08 D2 lda $D208
|
|
0040AF 1 C9 01 cmp #$01
|
|
0040B1 1 F0 04 beq L40B7
|
|
0040B3 1 C9 05 cmp #$05
|
|
0040B5 1 D0 06 bne L40BD
|
|
0040B7 1 20 E7 43 L40B7: jsr L43E7
|
|
0040BA 1 4C 88 40 jmp L4088
|
|
0040BD 1
|
|
0040BD 1 C9 03 L40BD: cmp #$03
|
|
0040BF 1 D0 06 bne L40C7
|
|
0040C1 1 20 5A 43 jsr L435A
|
|
0040C4 1 4C 88 40 jmp L4088
|
|
0040C7 1
|
|
0040C7 1 C9 06 L40C7: cmp #$06
|
|
0040C9 1 D0 11 bne L40DC
|
|
0040CB 1 20 10 45 jsr L4510
|
|
0040CE 1 AD 25 EC lda $EC25
|
|
0040D1 1 8D F0 40 sta L40F0
|
|
0040D4 1 A9 80 lda #$80
|
|
0040D6 1 8D F1 40 sta L40F1
|
|
0040D9 1 20 0D 41 jsr L410D
|
|
0040DC 1 4C 88 40 L40DC: jmp L4088
|
|
0040DF 1
|
|
0040DF 1 00 L40DF: brk
|
|
0040E0 1 BA L40E0: tsx
|
|
0040E1 1 8E 56 E2 stx $E256
|
|
0040E4 1 8D 5B E2 sta $E25B
|
|
0040E7 1 20 A0 59 jsr L59A0
|
|
0040EA 1 A9 00 lda #$00
|
|
0040EC 1 8D 5B E2 sta $E25B
|
|
0040EF 1 60 rts
|
|
0040F0 1
|
|
0040F0 1 00 L40F0: brk
|
|
0040F1 1 00 L40F1: brk
|
|
0040F2 1 20 10 45 L40F2: jsr L4510
|
|
0040F5 1 AD 25 EC lda $EC25
|
|
0040F8 1 8D F0 40 sta L40F0
|
|
0040FB 1 A9 00 lda #$00
|
|
0040FD 1 8D F1 40 sta L40F1
|
|
004100 1 20 F0 48 L4100: jsr L48F0
|
|
004103 1 AD 08 D2 lda $D208
|
|
004106 1 C9 06 cmp #$06
|
|
004108 1 D0 21 bne L412B
|
|
00410A 1 20 E6 48 L410A: jsr L48E6
|
|
00410D 1 20 13 41 L410D: jsr L4113
|
|
004110 1 4C 00 41 jmp L4100
|
|
004113 1
|
|
004113 1 A0 3E L4113: ldy #$3E
|
|
004115 1 A9 09 lda #$09
|
|
004117 1 A2 D2 ldx #$D2
|
|
004119 1 20 00 D0 jsr LD000
|
|
00411C 1 D0 33 bne L4151
|
|
00411E 1 20 53 41 jsr L4153
|
|
004121 1 A0 3F ldy #$3F
|
|
004123 1 A9 00 lda #$00
|
|
004125 1 A2 00 ldx #$00
|
|
004127 1 20 00 D0 jsr LD000
|
|
00412A 1 60 rts
|
|
00412B 1
|
|
00412B 1 A9 00 L412B: lda #$00
|
|
00412D 1 8D 9F DE sta $DE9F
|
|
004130 1 20 9A D0 jsr LD09A
|
|
004133 1 AD F0 40 lda L40F0
|
|
004136 1 8D 25 EC sta $EC25
|
|
004139 1 F0 08 beq L4143
|
|
00413B 1 2C A1 4C bit L4CA1
|
|
00413E 1 30 03 bmi L4143
|
|
004140 1 20 44 42 jsr L4244
|
|
004143 1 2C F1 40 L4143: bit L40F1
|
|
004146 1 10 09 bpl L4151
|
|
004148 1 A0 0C ldy #$0C
|
|
00414A 1 A9 00 lda #$00
|
|
00414C 1 A2 00 ldx #$00
|
|
00414E 1 20 40 D0 jsr LD040
|
|
004151 1 60 L4151: rts
|
|
004152 1
|
|
004152 1 00 L4152: brk
|
|
004153 1 AD 09 D2 L4153: lda $D209
|
|
004156 1 C9 09 cmp #$09
|
|
004158 1 90 01 bcc L415B
|
|
00415A 1 60 rts
|
|
00415B 1
|
|
00415B 1 8D 25 EC L415B: sta $EC25
|
|
00415E 1 8D 9F DE sta $DE9F
|
|
004161 1 20 9A D0 jsr LD09A
|
|
004164 1 A9 80 lda #$80
|
|
004166 1 8D 52 41 sta L4152
|
|
004169 1 AD 9F DE lda $DE9F
|
|
00416C 1 8D 12 D2 sta $D212
|
|
00416F 1 20 05 45 jsr L4505
|
|
004172 1 20 EF 78 jsr L78EF
|
|
004175 1 AD 25 EC lda $EC25
|
|
004178 1 20 55 88 jsr L8855
|
|
00417B 1 20 08 D1 jsr LD108
|
|
00417E 1 AD 25 EC lda $EC25
|
|
004181 1 20 EF 86 jsr L86EF
|
|
004184 1 85 06 sta L0006
|
|
004186 1 86 07 stx $07
|
|
004188 1 A0 16 ldy #$16
|
|
00418A 1 B1 06 lda (L0006),y
|
|
00418C 1 38 sec
|
|
00418D 1 ED 17 D2 sbc $D217
|
|
004190 1 8D 42 42 sta L4242
|
|
004193 1 C8 iny
|
|
004194 1 B1 06 lda (L0006),y
|
|
004196 1 ED 18 D2 sbc $D218
|
|
004199 1 8D 43 42 sta L4243
|
|
00419C 1 AD 42 42 lda L4242
|
|
00419F 1 C9 0F cmp #$0F
|
|
0041A1 1 AD 43 42 lda L4243
|
|
0041A4 1 E9 00 sbc #$00
|
|
0041A6 1 10 23 bpl L41CB
|
|
0041A8 1 20 8A 6E jsr L6E8A
|
|
0041AB 1 A2 0B ldx #$0B
|
|
0041AD 1 A0 1F ldy #$1F
|
|
0041AF 1 BD 15 D2 lda $D215,x
|
|
0041B2 1 91 06 sta (L0006),y
|
|
0041B4 1 88 dey
|
|
0041B5 1 CA dex
|
|
0041B6 1 BD 15 D2 lda $D215,x
|
|
0041B9 1 91 06 sta (L0006),y
|
|
0041BB 1 A2 03 ldx #$03
|
|
0041BD 1 A0 17 ldy #$17
|
|
0041BF 1 BD 15 D2 lda $D215,x
|
|
0041C2 1 91 06 sta (L0006),y
|
|
0041C4 1 88 dey
|
|
0041C5 1 CA dex
|
|
0041C6 1 BD 15 D2 lda $D215,x
|
|
0041C9 1 91 06 sta (L0006),y
|
|
0041CB 1 AE 9F DE L41CB: ldx $DE9F
|
|
0041CE 1 CA dex
|
|
0041CF 1 BD D1 E6 lda $E6D1,x
|
|
0041D2 1 10 0E bpl L41E2
|
|
0041D4 1 20 19 6C jsr L6C19
|
|
0041D7 1 A9 00 lda #$00
|
|
0041D9 1 8D 52 41 sta L4152
|
|
0041DC 1 AD 25 EC lda $EC25
|
|
0041DF 1 4C 74 88 jmp L8874
|
|
0041E2 1
|
|
0041E2 1 AD 9F DE L41E2: lda $DE9F
|
|
0041E5 1 8D 12 D2 sta $D212
|
|
0041E8 1 20 F2 44 jsr L44F2
|
|
0041EB 1 20 52 6E jsr L6E52
|
|
0041EE 1 A2 07 ldx #$07
|
|
0041F0 1 BD 1D D2 L41F0: lda $D21D,x
|
|
0041F3 1 9D 30 E2 sta $E230,x
|
|
0041F6 1 CA dex
|
|
0041F7 1 10 F7 bpl L41F0
|
|
0041F9 1 A9 00 lda #$00
|
|
0041FB 1 8D 41 42 sta L4241
|
|
0041FE 1 AD 41 42 L41FE: lda L4241
|
|
004201 1 CD A0 DE cmp $DEA0
|
|
004204 1 F0 21 beq L4227
|
|
004206 1 AA tax
|
|
004207 1 BD A1 DE lda $DEA1,x
|
|
00420A 1 8D 2F E2 sta $E22F
|
|
00420D 1 A0 0D ldy #$0D
|
|
00420F 1 A9 2F lda #$2F
|
|
004211 1 A2 E2 ldx #$E2
|
|
004213 1 20 40 D0 jsr LD040
|
|
004216 1 F0 09 beq L4221
|
|
004218 1 A0 03 ldy #$03
|
|
00421A 1 A9 2F lda #$2F
|
|
00421C 1 A2 E2 ldx #$E2
|
|
00421E 1 20 40 D0 jsr LD040
|
|
004221 1 EE 41 42 L4221: inc L4241
|
|
004224 1 4C FE 41 jmp L41FE
|
|
004227 1
|
|
004227 1 A9 00 L4227: lda #$00
|
|
004229 1 8D 52 41 sta L4152
|
|
00422C 1 AD 9F DE lda $DE9F
|
|
00422F 1 8D 12 D2 sta $D212
|
|
004232 1 20 F2 44 jsr L44F2
|
|
004235 1 20 6E 6E jsr L6E6E
|
|
004238 1 AD 25 EC lda $EC25
|
|
00423B 1 20 74 88 jsr L8874
|
|
00423E 1 4C 10 45 jmp L4510
|
|
004241 1
|
|
004241 1 00 L4241: brk
|
|
004242 1 00 L4242: brk
|
|
004243 1 00 L4243: brk
|
|
004244 1 AD 21 DF L4244: lda $DF21
|
|
004247 1 D0 01 bne L424A
|
|
004249 1 60 L4249: rts
|
|
00424A 1
|
|
00424A 1 A9 00 L424A: lda #$00
|
|
00424C 1 8D C3 42 sta L42C3
|
|
00424F 1 AD 20 DF lda $DF20
|
|
004252 1 F0 51 beq L42A5
|
|
004254 1 CD 25 EC cmp $EC25
|
|
004257 1 D0 F0 bne L4249
|
|
004259 1 AD 25 EC lda $EC25
|
|
00425C 1 8D 12 D2 sta $D212
|
|
00425F 1 20 05 45 jsr L4505
|
|
004262 1 20 8E 6E jsr L6E8E
|
|
004265 1 A2 07 ldx #$07
|
|
004267 1 BD 1D D2 L4267: lda $D21D,x
|
|
00426A 1 9D 30 E2 sta $E230,x
|
|
00426D 1 CA dex
|
|
00426E 1 10 F7 bpl L4267
|
|
004270 1 AD C3 42 L4270: lda L42C3
|
|
004273 1 CD 21 DF cmp $DF21
|
|
004276 1 F0 2A beq L42A2
|
|
004278 1 AA tax
|
|
004279 1 BD 22 DF lda $DF22,x
|
|
00427C 1 8D 2F E2 sta $E22F
|
|
00427F 1 20 15 89 jsr L8915
|
|
004282 1 A0 0D ldy #$0D
|
|
004284 1 A9 2F lda #$2F
|
|
004286 1 A2 E2 ldx #$E2
|
|
004288 1 20 40 D0 jsr LD040
|
|
00428B 1 F0 .byte $F0
|
|
00428C 1 09 A0 L428C: ora #$A0
|
|
00428E 1 03 .byte $03
|
|
00428F 1 A9 .byte $A9
|
|
004290 1 2F A2 E2 L4290: bbr2 $A2,$4275
|
|
004293 1 20 .byte $20
|
|
004294 1 40 L4294: rti
|
|
004295 1
|
|
004295 1 D0 .byte $D0
|
|
004296 1 AD 2F E2 L4296: lda $E22F
|
|
004299 1 20 93 88 L4299: jsr L8893
|
|
00429C 1 EE C3 42 inc L42C3
|
|
00429F 1 4C 70 42 jmp L4270
|
|
0042A2 1
|
|
0042A2 1 4C 10 45 L42A2: jmp L4510
|
|
0042A5 1
|
|
0042A5 1 AD C3 42 L42A5: lda L42C3
|
|
0042A8 1 CD 21 DF cmp $DF21
|
|
0042AB 1 F0 F5 beq L42A2
|
|
0042AD 1 AA tax
|
|
0042AE 1 BD 22 DF lda $DF22,x
|
|
0042B1 1 8D 2F E2 sta $E22F
|
|
0042B4 1 A0 03 ldy #$03
|
|
0042B6 1 A9 2F lda #$2F
|
|
0042B8 1 A2 E2 ldx #$E2
|
|
0042BA 1 20 40 D0 jsr LD040
|
|
0042BD 1 EE C3 42 inc L42C3
|
|
0042C0 1 4C A5 42 jmp L42A5
|
|
0042C3 1
|
|
0042C3 1 00 L42C3: brk
|
|
0042C4 1 B2 L42C4: .byte $B2
|
|
0042C5 1 4B L42C5: .byte $4B
|
|
0042C6 1 0E 49 BF asl $BF49
|
|
0042C9 1 4B .byte $4B
|
|
0042CA 1 BF 4B BF bbs3 $4B,L428C
|
|
0042CD 1 4B .byte $4B
|
|
0042CE 1 BF 4B BF bbs3 $4B,L4290
|
|
0042D1 1 4B .byte $4B
|
|
0042D2 1 BF 4B BF bbs3 $4B,L4294
|
|
0042D5 1 4B .byte $4B
|
|
0042D6 1 BF 4B B7 bbs3 $4B,L4290
|
|
0042D9 1 4F 0E 49 bbr4 $0E,L4325
|
|
0042DC 1 EA nop
|
|
0042DD 1 4D 72 4E eor L4E72
|
|
0042E0 1 50 4F bvc L4331
|
|
0042E2 1 62 .byte $62
|
|
0042E3 1 56 0E lsr $0E,x
|
|
0042E5 1 49 A2 eor #$A2
|
|
0042E7 1 4C 5F 4D jmp L4D5F
|
|
0042EA 1
|
|
0042EA 1 0E 49 50 asl L5049
|
|
0042ED 1 50 AA bvc L4299
|
|
0042EF 1 50 0F bvc L4300
|
|
0042F1 1 49 0F eor #$0F
|
|
0042F3 1 49 0F eor #$0F
|
|
0042F5 1 49 0F eor #$0F
|
|
0042F7 1 49 0E eor #$0E
|
|
0042F9 1 49 A2 eor #$A2
|
|
0042FB 1 49 A2 eor #$A2
|
|
0042FD 1 49 A2 eor #$A2
|
|
0042FF 1 49 .byte $49
|
|
004300 1 A2 49 L4300: ldx #$49
|
|
004302 1 A2 49 ldx #$49
|
|
004304 1 A2 49 ldx #$49
|
|
004306 1 A2 49 ldx #$49
|
|
004308 1 A2 49 ldx #$49
|
|
00430A 1 F9 50 67 sbc L6750,y
|
|
00430D 1 52 85 eor ($85)
|
|
00430F 1 52 A3 eor ($A3)
|
|
004311 1 52 C1 eor ($C1)
|
|
004313 1 52 01 eor ($01)
|
|
004315 1 59 0E 49 eor L490E,y
|
|
004318 1 40 rti
|
|
004319 1
|
|
004319 1 53 .byte $53
|
|
00431A 1 5B .byte $5B
|
|
00431B 1 53 .byte $53
|
|
00431C 1 5C .byte $5C
|
|
00431D 1 4F 0E 49 bbr4 $0E,L4369
|
|
004320 1 87 53 smb0 $53
|
|
004322 1 81 53 sta ($53,x)
|
|
004324 1 0E .byte $0E
|
|
004325 1 49 75 L4325: eor #$75
|
|
004327 1 53 .byte $53
|
|
004328 1 7B .byte $7B
|
|
004329 1 53 .byte $53
|
|
00432A 1 0E 49 8D asl L8D49
|
|
00432D 1 53 .byte $53
|
|
00432E 1 01 59 ora ($59,x)
|
|
004330 1 0E .byte $0E
|
|
004331 1 49 A0 L4331: eor #$A0
|
|
004333 1 59 A0 59 eor L59A0,y
|
|
004336 1 A0 59 ldy #$59
|
|
004338 1 A0 59 ldy #$59
|
|
00433A 1 A0 59 ldy #$59
|
|
00433C 1 A0 59 ldy #$59
|
|
00433E 1 A0 59 ldy #$59
|
|
004340 1 A0 59 ldy #$59
|
|
004342 1 D1 5A cmp ($5A),y
|
|
004344 1 D1 5A cmp ($5A),y
|
|
004346 1 D1 5A cmp ($5A),y
|
|
004348 1 D1 5A cmp ($5A),y
|
|
00434A 1 D1 5A cmp ($5A),y
|
|
00434C 1 D1 5A cmp ($5A),y
|
|
00434E 1 D1 5A cmp ($5A),y
|
|
004350 1 00 L4350: brk
|
|
004351 1 14 2C trb $2C
|
|
004353 1 46 50 lsr $50
|
|
004355 1 50 6A bvc L43C1
|
|
004357 1 7E .byte $7E
|
|
004358 1 8C .byte $8C
|
|
004359 1 00 L4359: brk
|
|
00435A 1 AD 0A D2 L435A: lda $D20A
|
|
00435D 1 D0 03 bne L4362
|
|
00435F 1 4C 94 43 jmp L4394
|
|
004362 1
|
|
004362 1 C9 03 L4362: cmp #$03
|
|
004364 1 D0 01 bne L4367
|
|
004366 1 60 rts
|
|
004367 1
|
|
004367 1 AD L4367: .byte $AD
|
|
004368 1 09 .byte $09
|
|
004369 1 D2 09 L4369: cmp ($09)
|
|
00436B 1 20 C9 68 jsr L68C9
|
|
00436E 1 D0 03 bne L4373
|
|
004370 1 4C 41 54 jmp L5441
|
|
004373 1
|
|
004373 1 2C 59 43 L4373: bit L4359
|
|
004376 1 10 1C bpl L4394
|
|
004378 1 C9 77 cmp #$77
|
|
00437A 1 D0 03 bne L437F
|
|
00437C 1 4C 02 57 jmp L5702
|
|
00437F 1
|
|
00437F 1 C9 67 L437F: cmp #$67
|
|
004381 1 D0 03 bne L4386
|
|
004383 1 4C 8E 57 jmp L578E
|
|
004386 1
|
|
004386 1 C9 6D L4386: cmp #$6D
|
|
004388 1 D0 03 bne L438D
|
|
00438A 1 4C 9A 57 jmp L579A
|
|
00438D 1
|
|
00438D 1 C9 78 L438D: cmp #$78
|
|
00438F 1 D0 03 bne L4394
|
|
004391 1 4C A6 57 jmp L57A6
|
|
004394 1
|
|
004394 1 AD 09 D2 L4394: lda $D209
|
|
004397 1 8D 5C E2 sta $E25C
|
|
00439A 1 AD 0A D2 lda $D20A
|
|
00439D 1 F0 02 beq L43A1
|
|
00439F 1 A9 01 lda #$01
|
|
0043A1 1 8D 5D E2 L43A1: sta $E25D
|
|
0043A4 1 A0 32 ldy #$32
|
|
0043A6 1 A9 5A lda #$5A
|
|
0043A8 1 A2 E2 ldx #$E2
|
|
0043AA 1 20 00 D0 jsr LD000
|
|
0043AD 1 AE 5A E2 L43AD: ldx $E25A
|
|
0043B0 1 D0 01 bne L43B3
|
|
0043B2 1 60 rts
|
|
0043B3 1
|
|
0043B3 1 CA L43B3: dex
|
|
0043B4 1 BD 50 43 lda L4350,x
|
|
0043B7 1 AA tax
|
|
0043B8 1 AC 5B E2 ldy $E25B
|
|
0043BB 1 88 dey
|
|
0043BC 1 98 tya
|
|
0043BD 1 0A asl a
|
|
0043BE 1 8D E5 43 sta L43E5
|
|
0043C1 1 8A L43C1: txa
|
|
0043C2 1 18 clc
|
|
0043C3 1 6D E5 43 adc L43E5
|
|
0043C6 1 AA tax
|
|
0043C7 1 BD C4 42 lda L42C4,x
|
|
0043CA 1 8D E5 43 sta L43E5
|
|
0043CD 1 BD C5 42 lda L42C5,x
|
|
0043D0 1 8D E6 43 sta L43E6
|
|
0043D3 1 20 E0 43 jsr L43E0
|
|
0043D6 1 A0 33 ldy #$33
|
|
0043D8 1 A9 5A lda #$5A
|
|
0043DA 1 A2 E2 ldx #$E2
|
|
0043DC 1 20 00 D0 jsr LD000
|
|
0043DF 1 60 rts
|
|
0043E0 1
|
|
0043E0 1 BA L43E0: tsx
|
|
0043E1 1 8E 56 E2 stx $E256
|
|
0043E4 1 4C .byte $4C
|
|
0043E5 1 34 L43E5: .byte $34
|
|
0043E6 1 12 L43E6: .byte $12
|
|
0043E7 1 BA L43E7: tsx
|
|
0043E8 1 8E 56 E2 stx $E256
|
|
0043EB 1 A0 40 ldy #$40
|
|
0043ED 1 A9 09 lda #$09
|
|
0043EF 1 A2 D2 ldx #$D2
|
|
0043F1 1 20 00 D0 jsr LD000
|
|
0043F4 1 AD 0D D2 lda $D20D
|
|
0043F7 1 D0 1F bne L4418
|
|
0043F9 1 20 FC 85 jsr L85FC
|
|
0043FC 1 8D AA D2 sta $D2AA
|
|
0043FF 1 A9 00 lda #$00
|
|
004401 1 8D 0E D2 sta $D20E
|
|
004404 1 A0 09 ldy #$09
|
|
004406 1 A9 09 lda #$09
|
|
004408 1 A2 D2 ldx #$D2
|
|
00440A 1 20 40 D0 jsr LD040
|
|
00440D 1 AD 0D D2 lda $D20D
|
|
004410 1 F0 03 beq L4415
|
|
004412 1 4C D7 67 jmp L67D7
|
|
004415 1
|
|
004415 1 4C AA 68 L4415: jmp L68AA
|
|
004418 1
|
|
004418 1 C9 01 L4418: cmp #$01
|
|
00441A 1 D0 0C bne L4428
|
|
00441C 1 A0 31 ldy #$31
|
|
00441E 1 A9 5A lda #$5A
|
|
004420 1 A2 E2 ldx #$E2
|
|
004422 1 20 00 D0 jsr LD000
|
|
004425 1 4C AD 43 jmp L43AD
|
|
004428 1
|
|
004428 1 48 L4428: pha
|
|
004429 1 AD 25 EC lda $EC25
|
|
00442C 1 CD 0E D2 cmp $D20E
|
|
00442F 1 F0 04 beq L4435
|
|
004431 1 68 pla
|
|
004432 1 4C 59 44 jmp L4459
|
|
004435 1
|
|
004435 1 68 L4435: pla
|
|
004436 1 C9 02 cmp #$02
|
|
004438 1 D0 09 bne L4443
|
|
00443A 1 20 FC 85 jsr L85FC
|
|
00443D 1 8D AA D2 sta $D2AA
|
|
004440 1 4C 1C 5B jmp L5B1C
|
|
004443 1
|
|
004443 1 C9 03 L4443: cmp #$03
|
|
004445 1 D0 03 bne L444A
|
|
004447 1 4C DB 60 jmp L60DB
|
|
00444A 1
|
|
00444A 1 C9 04 L444A: cmp #$04
|
|
00444C 1 D0 03 bne L4451
|
|
00444E 1 4C 9B 61 jmp L619B
|
|
004451 1
|
|
004451 1 C9 05 L4451: cmp #$05
|
|
004453 1 D0 03 bne L4458
|
|
004455 1 4C CA 61 jmp L61CA
|
|
004458 1
|
|
004458 1 60 L4458: rts
|
|
004459 1
|
|
004459 1 4C 5D 44 L4459: jmp L445D
|
|
00445C 1
|
|
00445C 1 00 L445C: brk
|
|
00445D 1 20 2B 6D L445D: jsr L6D2B
|
|
004460 1 AE 0E D2 ldx $D20E
|
|
004463 1 CA dex
|
|
004464 1 BD 26 EC lda $EC26,x
|
|
004467 1 8D 2F E2 sta $E22F
|
|
00446A 1 AD 2F E2 lda $E22F
|
|
00446D 1 20 E3 86 jsr L86E3
|
|
004470 1 85 06 sta L0006
|
|
004472 1 86 07 stx $07
|
|
004474 1 A0 01 ldy #$01
|
|
004476 1 B1 06 lda (L0006),y
|
|
004478 1 F0 2C beq L44A6
|
|
00447A 1 09 80 ora #$80
|
|
00447C 1 91 06 sta (L0006),y
|
|
00447E 1 C8 iny
|
|
00447F 1 B1 06 lda (L0006),y
|
|
004481 1 29 0F and #$0F
|
|
004483 1 8D 5C 44 sta L445C
|
|
004486 1 20 97 89 jsr L8997
|
|
004489 1 A0 02 ldy #$02
|
|
00448B 1 A9 2F lda #$2F
|
|
00448D 1 A2 E2 ldx #$E2
|
|
00448F 1 20 40 D0 jsr LD040
|
|
004492 1 20 10 45 jsr L4510
|
|
004495 1 AD 5C 44 lda L445C
|
|
004498 1 8D 20 DF sta $DF20
|
|
00449B 1 A9 01 lda #$01
|
|
00449D 1 8D 21 DF sta $DF21
|
|
0044A0 1 AD 2F E2 lda $E22F
|
|
0044A3 1 8D 22 DF sta $DF22
|
|
0044A6 1 A0 42 L44A6: ldy #$42
|
|
0044A8 1 A9 0E lda #$0E
|
|
0044AA 1 A2 D2 ldx #$D2
|
|
0044AC 1 20 00 D0 jsr LD000
|
|
0044AF 1 AD 0E D2 lda $D20E
|
|
0044B2 1 8D 25 EC sta $EC25
|
|
0044B5 1 8D 9F DE sta $DE9F
|
|
0044B8 1 20 9A D0 L44B8: jsr LD09A
|
|
0044BB 1 20 19 6C jsr L6C19
|
|
0044BE 1 A9 00 lda #$00
|
|
0044C0 1 8D 9F DE sta $DE9F
|
|
0044C3 1 20 9A D0 jsr LD09A
|
|
0044C6 1 A9 00 lda #$00
|
|
0044C8 1 8D 69 E2 sta $E269
|
|
0044CB 1 A0 36 ldy #$36
|
|
0044CD 1 A9 67 lda #$67
|
|
0044CF 1 A2 E2 ldx #$E2
|
|
0044D1 1 20 00 D0 jsr LD000
|
|
0044D4 1 AE 25 EC ldx $EC25
|
|
0044D7 1 CA dex
|
|
0044D8 1 BD D1 E6 lda $E6D1,x
|
|
0044DB 1 29 0F and #$0F
|
|
0044DD 1 8D 68 E2 sta $E268
|
|
0044E0 1 EE 68 E2 inc $E268
|
|
0044E3 1 A9 01 lda #$01
|
|
0044E5 1 8D 69 E2 sta $E269
|
|
0044E8 1 A0 36 ldy #$36
|
|
0044EA 1 A9 67 lda #$67
|
|
0044EC 1 A2 E2 ldx #$E2
|
|
0044EE 1 20 00 D0 jsr LD000
|
|
0044F1 1 60 rts
|
|
0044F2 1
|
|
0044F2 1 A0 3C L44F2: ldy #$3C
|
|
0044F4 1 A9 12 lda #$12
|
|
0044F6 1 A2 D2 ldx #$D2
|
|
0044F8 1 20 00 D0 jsr LD000
|
|
0044FB 1 A0 04 ldy #$04
|
|
0044FD 1 A9 15 lda #$15
|
|
0044FF 1 A2 D2 ldx #$D2
|
|
004501 1 20 00 D0 jsr LD000
|
|
004504 1 60 rts
|
|
004505 1
|
|
004505 1 A0 3C L4505: ldy #$3C
|
|
004507 1 A9 12 lda #$12
|
|
004509 1 A2 D2 ldx #$D2
|
|
00450B 1 20 00 D0 jsr LD000
|
|
00450E 1 60 rts
|
|
00450F 1
|
|
00450F 1 60 rts
|
|
004510 1
|
|
004510 1 A0 03 L4510: ldy #$03
|
|
004512 1 A9 39 lda #$39
|
|
004514 1 A2 D2 ldx #$D2
|
|
004516 1 20 00 D0 jsr LD000
|
|
004519 1 A0 04 ldy #$04
|
|
00451B 1 A9 39 lda #$39
|
|
00451D 1 A2 D2 ldx #$D2
|
|
00451F 1 20 00 D0 jsr LD000
|
|
004522 1 60 rts
|
|
004523 1
|
|
004523 1 20 F2 40 L4523: jsr L40F2
|
|
004526 1 A0 0C ldy #$0C
|
|
004528 1 A9 00 lda #$00
|
|
00452A 1 A2 00 ldx #$00
|
|
00452C 1 20 40 D0 jsr LD040
|
|
00452F 1 60 rts
|
|
004530 1
|
|
004530 1 A2 00 L4530: ldx #$00
|
|
004532 1 AC 31 BF ldy $BF31
|
|
004535 1 B9 32 BF L4535: lda $BF32,y
|
|
004538 1 29 0F and #$0F
|
|
00453A 1 C9 0B cmp #$0B
|
|
00453C 1 F0 1B beq L4559
|
|
00453E 1 88 L453E: dey
|
|
00453F 1 10 F4 bpl L4535
|
|
004541 1 8E 97 45 stx L4597
|
|
004544 1 8E A0 45 stx L45A0
|
|
004547 1 20 B2 45 jsr L45B2
|
|
00454A 1 AE A0 45 ldx L45A0
|
|
00454D 1 F0 09 beq L4558
|
|
00454F 1 BD A0 45 L454F: lda L45A0,x
|
|
004552 1 9D A9 45 sta L45A9,x
|
|
004555 1 CA dex
|
|
004556 1 10 F7 bpl L454F
|
|
004558 1 60 L4558: rts
|
|
004559 1
|
|
004559 1 B9 32 BF L4559: lda $BF32,y
|
|
00455C 1 E8 inx
|
|
00455D 1 9D 97 45 sta L4597,x
|
|
004560 1 D0 DC bne L453E
|
|
004562 1 60 rts
|
|
004563 1
|
|
004563 1 AD A0 45 L4563: lda L45A0
|
|
004566 1 F0 11 beq L4579
|
|
004568 1 20 B2 45 jsr L45B2
|
|
00456B 1 AE A0 45 ldx L45A0
|
|
00456E 1 BD A0 45 L456E: lda L45A0,x
|
|
004571 1 DD A9 45 cmp L45A9,x
|
|
004574 1 D0 06 bne L457C
|
|
004576 1 CA dex
|
|
004577 1 D0 F5 bne L456E
|
|
004579 1 A9 00 L4579: lda #$00
|
|
00457B 1 60 rts
|
|
00457C 1
|
|
00457C 1 BD A0 45 L457C: lda L45A0,x
|
|
00457F 1 9D A9 45 sta L45A9,x
|
|
004582 1 BD 97 45 lda L4597,x
|
|
004585 1 AC 31 BF ldy $BF31
|
|
004588 1 D9 32 BF L4588: cmp $BF32,y
|
|
00458B 1 F0 04 beq L4591
|
|
00458D 1 88 dey
|
|
00458E 1 10 F8 bpl L4588
|
|
004590 1 60 rts
|
|
004591 1
|
|
004591 1 98 L4591: tya
|
|
004592 1 18 clc
|
|
004593 1 69 03 adc #$03
|
|
004595 1 60 rts
|
|
004596 1
|
|
004596 1 00 brk
|
|
004597 1 00 L4597: brk
|
|
004598 1 00 brk
|
|
004599 1 00 brk
|
|
00459A 1 00 brk
|
|
00459B 1 00 brk
|
|
00459C 1 00 brk
|
|
00459D 1 00 brk
|
|
00459E 1 00 brk
|
|
00459F 1 00 brk
|
|
0045A0 1 00 L45A0: brk
|
|
0045A1 1 00 brk
|
|
0045A2 1 00 brk
|
|
0045A3 1 00 brk
|
|
0045A4 1 00 brk
|
|
0045A5 1 00 brk
|
|
0045A6 1 00 brk
|
|
0045A7 1 00 brk
|
|
0045A8 1 00 brk
|
|
0045A9 1 00 L45A9: brk
|
|
0045AA 1 00 brk
|
|
0045AB 1 00 brk
|
|
0045AC 1 00 brk
|
|
0045AD 1 00 brk
|
|
0045AE 1 00 brk
|
|
0045AF 1 00 brk
|
|
0045B0 1 00 brk
|
|
0045B1 1 00 brk
|
|
0045B2 1 AE 97 45 L45B2: ldx L4597
|
|
0045B5 1 F0 0F beq L45C6
|
|
0045B7 1 8E A0 45 stx L45A0
|
|
0045BA 1 BD 97 45 L45BA: lda L4597,x
|
|
0045BD 1 20 C7 45 jsr L45C7
|
|
0045C0 1 9D A0 45 sta L45A0,x
|
|
0045C3 1 CA dex
|
|
0045C4 1 D0 F4 bne L45BA
|
|
0045C6 1 60 L45C6: rts
|
|
0045C7 1
|
|
0045C7 1 8D 37 46 L45C7: sta L4637
|
|
0045CA 1 8A txa
|
|
0045CB 1 48 pha
|
|
0045CC 1 98 tya
|
|
0045CD 1 48 pha
|
|
0045CE 1 A2 11 ldx #$11
|
|
0045D0 1 AD 37 46 lda L4637
|
|
0045D3 1 29 80 and #$80
|
|
0045D5 1 F0 02 beq L45D9
|
|
0045D7 1 A2 21 ldx #$21
|
|
0045D9 1 8E EC 45 L45D9: stx L45EC
|
|
0045DC 1 AD 37 46 lda L4637
|
|
0045DF 1 29 70 and #$70
|
|
0045E1 1 4A lsr a
|
|
0045E2 1 4A lsr a
|
|
0045E3 1 4A lsr a
|
|
0045E4 1 18 clc
|
|
0045E5 1 6D EC 45 adc L45EC
|
|
0045E8 1 8D EC 45 sta L45EC
|
|
0045EB 1 AD .byte $AD
|
|
0045EC 1 00 L45EC: brk
|
|
0045ED 1 BF 85 07 bbs3 $85,L45F7
|
|
0045F0 1 A9 00 lda #$00
|
|
0045F2 1 85 06 sta L0006
|
|
0045F4 1 A0 07 ldy #$07
|
|
0045F6 1 B1 .byte $B1
|
|
0045F7 1 06 D0 L45F7: asl $D0
|
|
0045F9 1 2D A0 FF and $FFA0
|
|
0045FC 1 B1 06 lda (L0006),y
|
|
0045FE 1 18 clc
|
|
0045FF 1 69 03 adc #$03
|
|
004601 1 85 06 sta L0006
|
|
004603 1 AD 37 46 lda L4637
|
|
004606 1 48 pha
|
|
004607 1 2A rol a
|
|
004608 1 68 pla
|
|
004609 1 08 php
|
|
00460A 1 29 20 and #$20
|
|
00460C 1 4A lsr a
|
|
00460D 1 4A lsr a
|
|
00460E 1 4A lsr a
|
|
00460F 1 4A lsr a
|
|
004610 1 28 plp
|
|
004611 1 69 .byte $69
|
|
004612 1 01 8D L4612: ora ($8D,x)
|
|
004614 1 3A dec a
|
|
004615 1 46 20 lsr L0020
|
|
004617 1 34 46 bit $46,x
|
|
004619 1 00 brk
|
|
00461A 1 39 46 AD and LAD46,y
|
|
00461D 1 3E 46 29 rol $2946,x
|
|
004620 1 10 F0 bpl L4612
|
|
004622 1 04 A9 tsb $A9
|
|
004624 1 FF D0 02 bbs7 $D0,L4629
|
|
004627 1 A9 00 lda #$00
|
|
004629 1 8D 38 46 L4629: sta L4638
|
|
00462C 1 68 pla
|
|
00462D 1 A8 tay
|
|
00462E 1 68 pla
|
|
00462F 1 AA tax
|
|
004630 1 AD 38 46 lda L4638
|
|
004633 1 60 rts
|
|
004634 1
|
|
004634 1 6C 06 00 L4634: jmp (L0006)
|
|
004637 1
|
|
004637 1 00 L4637: brk
|
|
004638 1 00 L4638: brk
|
|
004639 1 03 .byte $03
|
|
00463A 1 01 3E L463A: ora ($3E,x)
|
|
00463C 1 46 00 lsr L0000
|
|
00463E 1 00 brk
|
|
00463F 1 00 brk
|
|
004640 1 00 brk
|
|
004641 1 00 brk
|
|
004642 1 00 brk
|
|
004643 1 00 brk
|
|
004644 1 00 brk
|
|
004645 1 00 brk
|
|
004646 1 00 brk
|
|
004647 1 00 brk
|
|
004648 1 00 brk
|
|
004649 1 00 brk
|
|
00464A 1 00 brk
|
|
00464B 1 00 brk
|
|
00464C 1 00 brk
|
|
00464D 1 00 brk
|
|
00464E 1 AD 43 D3 L464E: lda $D343
|
|
004651 1 F0 0B beq L465E
|
|
004653 1 2C 44 D3 bit $D344
|
|
004656 1 30 0E bmi L4666
|
|
004658 1 20 AB 67 jsr L67AB
|
|
00465B 1 4C 66 46 jmp L4666
|
|
00465E 1
|
|
00465E 1 2C 44 D3 L465E: bit $D344
|
|
004661 1 30 03 bmi L4666
|
|
004663 1 20 A3 67 jsr L67A3
|
|
004666 1 AD 21 DF L4666: lda $DF21
|
|
004669 1 F0 3D beq L46A8
|
|
00466B 1 AD 20 DF lda $DF20
|
|
00466E 1 D0 21 bne L4691
|
|
004670 1 AD 21 DF lda $DF21
|
|
004673 1 C9 02 cmp #$02
|
|
004675 1 B0 20 bcs L4697
|
|
004677 1 AD 22 DF lda $DF22
|
|
00467A 1 CD FB EB cmp $EBFB
|
|
00467D 1 D0 0C bne L468B
|
|
00467F 1 20 8A 67 jsr L678A
|
|
004682 1 20 0C 67 jsr L670C
|
|
004685 1 A9 00 lda #$00
|
|
004687 1 8D 6F E2 sta $E26F
|
|
00468A 1 60 rts
|
|
00468B 1
|
|
00468B 1 20 82 67 L468B: jsr L6782
|
|
00468E 1 4C 9A 46 jmp L469A
|
|
004691 1
|
|
004691 1 20 8A 67 L4691: jsr L678A
|
|
004694 1 4C 9A 46 jmp L469A
|
|
004697 1
|
|
004697 1 20 82 67 L4697: jsr L6782
|
|
00469A 1 2C 6F E2 L469A: bit $E26F
|
|
00469D 1 30 08 bmi L46A7
|
|
00469F 1 20 47 67 jsr L6747
|
|
0046A2 1 A9 80 lda #$80
|
|
0046A4 1 8D 6F E2 sta $E26F
|
|
0046A7 1 60 L46A7: rts
|
|
0046A8 1
|
|
0046A8 1 2C 6F E2 L46A8: bit $E26F
|
|
0046AB 1 30 01 bmi L46AE
|
|
0046AD 1 60 rts
|
|
0046AE 1
|
|
0046AE 1 20 8A 67 L46AE: jsr L678A
|
|
0046B1 1 20 0C 67 jsr L670C
|
|
0046B4 1 A9 00 lda #$00
|
|
0046B6 1 8D 6F E2 sta $E26F
|
|
0046B9 1 60 rts
|
|
0046BA 1
|
|
0046BA 1 8C CE 46 L46BA: sty L46CE
|
|
0046BD 1 8D CF 46 sta L46CF
|
|
0046C0 1 8E D0 46 stx L46CF+1
|
|
0046C3 1 08 php
|
|
0046C4 1 78 sei
|
|
0046C5 1 8D 08 C0 sta ALTZPOFF
|
|
0046C8 1 8D 82 C0 sta $C082
|
|
0046CB 1 20 00 BF jsr MLI
|
|
0046CE 1 00 L46CE: .byte $00
|
|
0046CF 1 00 00 L46CF: .addr L0000
|
|
0046D1 1 8D 09 C0 sta ALTZPON
|
|
0046D4 1 AA tax
|
|
0046D5 1 AD 8B C0 lda LCBANK1
|
|
0046D8 1 AD 8B C0 lda LCBANK1
|
|
0046DB 1 28 plp
|
|
0046DC 1 8A txa
|
|
0046DD 1 60 rts
|
|
0046DE 1
|
|
0046DE 1 4C F3 46 L46DE: jmp L46F3
|
|
0046E1 1
|
|
0046E1 1 0A asl a
|
|
0046E2 1 20 02 00 jsr L0002
|
|
0046E5 1 00 L46E5: brk
|
|
0046E6 1 00 brk
|
|
0046E7 1 00 brk
|
|
0046E8 1 00 brk
|
|
0046E9 1 00 brk
|
|
0046EA 1 00 brk
|
|
0046EB 1 00 brk
|
|
0046EC 1 00 brk
|
|
0046ED 1 00 brk
|
|
0046EE 1 00 brk
|
|
0046EF 1 00 brk
|
|
0046F0 1 00 brk
|
|
0046F1 1 00 brk
|
|
0046F2 1 00 brk
|
|
0046F3 1 20 8A 48 L46F3: jsr L488A
|
|
0046F6 1 A2 FF ldx #$FF
|
|
0046F8 1 E8 L46F8: inx
|
|
0046F9 1 BD 55 D3 lda $D355,x
|
|
0046FC 1 9D 20 02 sta $0220,x
|
|
0046FF 1 EC 55 D3 cpx $D355
|
|
004702 1 D0 F4 bne L46F8
|
|
004704 1 E8 inx
|
|
004705 1 A9 2F lda #$2F
|
|
004707 1 9D 20 02 sta $0220,x
|
|
00470A 1 A0 00 ldy #$00
|
|
00470C 1 C8 L470C: iny
|
|
00470D 1 E8 inx
|
|
00470E 1 B9 45 D3 lda $D345,y
|
|
004711 1 9D 20 02 sta $0220,x
|
|
004714 1 CC 45 D3 cpy $D345
|
|
004717 1 D0 F3 bne L470C
|
|
004719 1 8E 20 02 stx $0220
|
|
00471C 1 A0 C4 ldy #$C4
|
|
00471E 1 A9 E1 lda #$E1
|
|
004720 1 A2 46 ldx #$46
|
|
004722 1 20 BA 46 jsr L46BA
|
|
004725 1 F0 04 beq L472B
|
|
004727 1 20 54 D1 jsr LD154
|
|
00472A 1 60 rts
|
|
00472B 1
|
|
00472B 1 AD E5 46 L472B: lda L46E5
|
|
00472E 1 C9 FC cmp #$FC
|
|
004730 1 D0 06 bne L4738
|
|
004732 1 20 B8 47 jsr L47B8
|
|
004735 1 4C 55 47 jmp L4755
|
|
004738 1
|
|
004738 1 C9 06 L4738: cmp #$06
|
|
00473A 1 D0 0C bne L4748
|
|
00473C 1 AD 61 C0 lda $C061
|
|
00473F 1 0D 62 C0 ora $C062
|
|
004742 1 30 11 bmi L4755
|
|
004744 1 20 9A 48 jsr L489A
|
|
004747 1 60 rts
|
|
004748 1
|
|
004748 1 C9 FF L4748: cmp #$FF
|
|
00474A 1 F0 09 beq L4755
|
|
00474C 1 C9 B3 cmp #$B3
|
|
00474E 1 F0 05 beq L4755
|
|
004750 1 A9 FA lda #$FA
|
|
004752 1 20 02 48 jsr L4802
|
|
004755 1 A0 06 L4755: ldy #$06
|
|
004757 1 A9 00 lda #$00
|
|
004759 1 A2 00 ldx #$00
|
|
00475B 1 20 40 D0 jsr LD040
|
|
00475E 1 A0 3A ldy #$3A
|
|
004760 1 A9 00 lda #$00
|
|
004762 1 A2 00 ldx #$00
|
|
004764 1 20 00 D0 jsr LD000
|
|
004767 1 A0 30 ldy #$30
|
|
004769 1 A9 80 lda #$80
|
|
00476B 1 A2 E6 ldx #$E6
|
|
00476D 1 20 00 D0 jsr LD000
|
|
004770 1 AE 55 D3 ldx $D355
|
|
004773 1 BD 55 D3 L4773: lda $D355,x
|
|
004776 1 9D 20 02 sta $0220,x
|
|
004779 1 CA dex
|
|
00477A 1 10 F7 bpl L4773
|
|
00477C 1 AE 45 D3 ldx $D345
|
|
00477F 1 BD 45 D3 L477F: lda $D345,x
|
|
004782 1 9D 80 02 sta $0280,x
|
|
004785 1 CA dex
|
|
004786 1 10 F7 bpl L477F
|
|
004788 1 A9 80 lda #$80
|
|
00478A 1 A2 02 ldx #$02
|
|
00478C 1 20 42 48 jsr L4842
|
|
00478F 1 A9 20 lda #$20
|
|
004791 1 A2 02 ldx #$02
|
|
004793 1 20 42 48 jsr L4842
|
|
004796 1 20 BE 48 jsr L48BE
|
|
004799 1 A9 90 lda #$90
|
|
00479B 1 8D 19 5B sta L5B19
|
|
00479E 1 A9 02 lda #$02
|
|
0047A0 1 8D 1A 5B sta L5B1A
|
|
0047A3 1 4C EE 5A jmp L5AEE
|
|
0047A6 1
|
|
0047A6 1 0A asl a
|
|
0047A7 1 00 brk
|
|
0047A8 1 18 clc
|
|
0047A9 1 00 brk
|
|
0047AA 1 00 brk
|
|
0047AB 1 00 brk
|
|
0047AC 1 00 brk
|
|
0047AD 1 00 brk
|
|
0047AE 1 00 brk
|
|
0047AF 1 00 brk
|
|
0047B0 1 00 brk
|
|
0047B1 1 00 brk
|
|
0047B2 1 00 brk
|
|
0047B3 1 00 brk
|
|
0047B4 1 00 brk
|
|
0047B5 1 00 brk
|
|
0047B6 1 00 brk
|
|
0047B7 1 00 brk
|
|
0047B8 1 AE 55 D3 L47B8: ldx $D355
|
|
0047BB 1 8E 16 48 stx L4816
|
|
0047BE 1 BD 55 D3 L47BE: lda $D355,x
|
|
0047C1 1 9D 00 18 sta $1800,x
|
|
0047C4 1 CA dex
|
|
0047C5 1 10 F7 bpl L47BE
|
|
0047C7 1 EE 00 18 inc $1800
|
|
0047CA 1 AE 00 18 ldx $1800
|
|
0047CD 1 A9 2F lda #$2F
|
|
0047CF 1 9D 00 18 sta $1800,x
|
|
0047D2 1 AE 00 18 L47D2: ldx $1800
|
|
0047D5 1 A0 00 ldy #$00
|
|
0047D7 1 E8 L47D7: inx
|
|
0047D8 1 C8 iny
|
|
0047D9 1 B9 17 48 lda L4817,y
|
|
0047DC 1 9D 00 18 sta $1800,x
|
|
0047DF 1 CC 17 48 cpy L4817
|
|
0047E2 1 D0 F3 bne L47D7
|
|
0047E4 1 8E 00 18 stx $1800
|
|
0047E7 1 A0 C4 ldy #$C4
|
|
0047E9 1 A9 A6 lda #$A6
|
|
0047EB 1 A2 47 ldx #$47
|
|
0047ED 1 20 BA 46 jsr L46BA
|
|
0047F0 1 D0 01 bne L47F3
|
|
0047F2 1 60 rts
|
|
0047F3 1
|
|
0047F3 1 AE 16 48 L47F3: ldx L4816
|
|
0047F6 1 BD 00 18 L47F6: lda $1800,x
|
|
0047F9 1 C9 2F cmp #$2F
|
|
0047FB 1 F0 0B beq L4808
|
|
0047FD 1 CA dex
|
|
0047FE 1 D0 F6 bne L47F6
|
|
004800 1 A9 FE L4800: lda #$FE
|
|
004802 1 20 54 D1 L4802: jsr LD154
|
|
004805 1 68 pla
|
|
004806 1 68 pla
|
|
004807 1 60 rts
|
|
004808 1
|
|
004808 1 E0 01 L4808: cpx #$01
|
|
00480A 1 F0 F4 beq L4800
|
|
00480C 1 8E 00 18 stx $1800
|
|
00480F 1 CA dex
|
|
004810 1 8E 16 48 stx L4816
|
|
004813 1 4C D2 47 jmp L47D2
|
|
004816 1
|
|
004816 1 00 L4816: brk
|
|
004817 1 0C 42 61 L4817: tsb L6142
|
|
00481A 1 73 .byte $73
|
|
00481B 1 69 63 adc #$63
|
|
00481D 1 2E 73 79 rol L7973
|
|
004820 1 73 .byte $73
|
|
004821 1 74 65 stz $65,x
|
|
004823 1 6D 00 00 adc a:L0000
|
|
004826 1 00 brk
|
|
004827 1 00 brk
|
|
004828 1 00 brk
|
|
004829 1 00 brk
|
|
00482A 1 00 brk
|
|
00482B 1 00 brk
|
|
00482C 1 00 brk
|
|
00482D 1 00 brk
|
|
00482E 1 00 brk
|
|
00482F 1 00 brk
|
|
004830 1 00 brk
|
|
004831 1 00 brk
|
|
004832 1 00 brk
|
|
004833 1 00 brk
|
|
004834 1 00 brk
|
|
004835 1 00 brk
|
|
004836 1 00 brk
|
|
004837 1 00 brk
|
|
004838 1 00 brk
|
|
004839 1 00 brk
|
|
00483A 1 00 brk
|
|
00483B 1 00 brk
|
|
00483C 1 00 brk
|
|
00483D 1 00 brk
|
|
00483E 1 00 brk
|
|
00483F 1 00 brk
|
|
004840 1 00 brk
|
|
004841 1 00 brk
|
|
004842 1 85 06 L4842: sta L0006
|
|
004844 1 86 07 stx $07
|
|
004846 1 A0 00 ldy #$00
|
|
004848 1 B1 06 lda (L0006),y
|
|
00484A 1 A8 tay
|
|
00484B 1 B1 06 L484B: lda (L0006),y
|
|
00484D 1 C9 61 cmp #$61
|
|
00484F 1 90 08 bcc L4859
|
|
004851 1 C9 7B cmp #$7B
|
|
004853 1 B0 04 bcs L4859
|
|
004855 1 29 DF and #$DF
|
|
004857 1 91 06 sta (L0006),y
|
|
004859 1 88 L4859: dey
|
|
00485A 1 D0 EF bne L484B
|
|
00485C 1 60 rts
|
|
00485D 1
|
|
00485D 1 00 L485D: brk
|
|
00485E 1 E0 L485E: .byte $E0
|
|
00485F 1 00 L485F: brk
|
|
004860 1 D0 00 L4860: bne L4862
|
|
004862 1 00 L4862: brk
|
|
004863 1 00 brk
|
|
004864 1 00 brk
|
|
004865 1 00 brk
|
|
004866 1 00 brk
|
|
004867 1 00 brk
|
|
004868 1 00 brk
|
|
004869 1 00 brk
|
|
00486A 1 00 brk
|
|
00486B 1 00 brk
|
|
00486C 1 00 brk
|
|
00486D 1 00 brk
|
|
00486E 1 00 brk
|
|
00486F 1 00 brk
|
|
004870 1 00 brk
|
|
004871 1 00 brk
|
|
004872 1 00 brk
|
|
004873 1 00 brk
|
|
004874 1 00 brk
|
|
004875 1 00 brk
|
|
004876 1 00 brk
|
|
004877 1 00 brk
|
|
004878 1 00 brk
|
|
004879 1 00 brk
|
|
00487A 1 00 brk
|
|
00487B 1 00 brk
|
|
00487C 1 00 brk
|
|
00487D 1 00 brk
|
|
00487E 1 00 brk
|
|
00487F 1 00 brk
|
|
004880 1 00 brk
|
|
004881 1 00 brk
|
|
004882 1 00 brk
|
|
004883 1 00 brk
|
|
004884 1 00 brk
|
|
004885 1 00 brk
|
|
004886 1 00 brk
|
|
004887 1 00 brk
|
|
004888 1 00 brk
|
|
004889 1 00 brk
|
|
00488A 1 20 AA 48 L488A: jsr L48AA
|
|
00488D 1 A0 24 ldy #$24
|
|
00488F 1 A9 11 lda #$11
|
|
004891 1 A2 D3 ldx #$D3
|
|
004893 1 20 00 D0 jsr LD000
|
|
004896 1 20 B4 48 jsr L48B4
|
|
004899 1 60 rts
|
|
00489A 1
|
|
00489A 1 20 AA 48 L489A: jsr L48AA
|
|
00489D 1 A0 24 ldy #$24
|
|
00489F 1 A9 AD lda #$AD
|
|
0048A1 1 A2 D2 ldx #$D2
|
|
0048A3 1 20 00 D0 jsr LD000
|
|
0048A6 1 20 B4 48 jsr L48B4
|
|
0048A9 1 60 rts
|
|
0048AA 1
|
|
0048AA 1 A0 26 L48AA: ldy #$26
|
|
0048AC 1 A9 00 lda #$00
|
|
0048AE 1 A2 00 ldx #$00
|
|
0048B0 1 20 00 D0 jsr LD000
|
|
0048B3 1 60 rts
|
|
0048B4 1
|
|
0048B4 1 A0 25 L48B4: ldy #$25
|
|
0048B6 1 A9 00 lda #$00
|
|
0048B8 1 A2 00 ldx #$00
|
|
0048BA 1 20 00 D0 jsr LD000
|
|
0048BD 1 60 rts
|
|
0048BE 1
|
|
0048BE 1 AE 96 E1 L48BE: ldx $E196
|
|
0048C1 1 E8 inx
|
|
0048C2 1 BD 96 E1 L48C2: lda $E196,x
|
|
0048C5 1 9D 31 BF sta $BF31,x
|
|
0048C8 1 CA dex
|
|
0048C9 1 10 F7 bpl L48C2
|
|
0048CB 1 60 rts
|
|
0048CC 1
|
|
0048CC 1 8D AC D2 L48CC: sta $D2AC
|
|
0048CF 1 A0 0C ldy #$0C
|
|
0048D1 1 A9 AC lda #$AC
|
|
0048D3 1 A2 D2 ldx #$D2
|
|
0048D5 1 20 00 A5 jsr LA500
|
|
0048D8 1 60 rts
|
|
0048D9 1
|
|
0048D9 1 A9 88 lda #$88
|
|
0048DB 1 8D E4 48 sta L48E4
|
|
0048DE 1 A9 40 lda #$40
|
|
0048E0 1 8D E5 48 sta L48E5
|
|
0048E3 1 4C .byte $4C
|
|
0048E4 1 34 L48E4: .byte $34
|
|
0048E5 1 12 L48E5: .byte $12
|
|
0048E6 1 A0 2A L48E6: ldy #$2A
|
|
0048E8 1 A9 08 lda #$08
|
|
0048EA 1 A2 D2 ldx #$D2
|
|
0048EC 1 20 00 D0 jsr LD000
|
|
0048EF 1 60 rts
|
|
0048F0 1
|
|
0048F0 1 A0 2C L48F0: ldy #$2C
|
|
0048F2 1 A9 08 lda #$08
|
|
0048F4 1 A2 D2 ldx #$D2
|
|
0048F6 1 20 00 D0 jsr LD000
|
|
0048F9 1 60 rts
|
|
0048FA 1
|
|
0048FA 1 A0 07 L48FA: ldy #$07
|
|
0048FC 1 A9 02 lda #$02
|
|
0048FE 1 A2 D2 ldx #$D2
|
|
004900 1 20 00 D0 jsr LD000
|
|
004903 1 60 rts
|
|
004904 1
|
|
004904 1 A0 07 L4904: ldy #$07
|
|
004906 1 A9 00 lda #$00
|
|
004908 1 A2 D2 ldx #$D2
|
|
00490A 1 20 00 D0 jsr LD000
|
|
00490D 1 60 rts
|
|
00490E 1
|
|
00490E 1 60 L490E: rts
|
|
00490F 1
|
|
00490F 1 20 8A 48 jsr L488A
|
|
004912 1 A9 02 lda #$02
|
|
004914 1 20 81 8E jsr L8E81
|
|
004917 1 30 48 bmi L4961
|
|
004919 1 AD 5B E2 lda $E25B
|
|
00491C 1 C9 03 cmp #$03
|
|
00491E 1 B0 0E bcs L492E
|
|
004920 1 A9 06 lda #$06
|
|
004922 1 20 81 8E jsr L8E81
|
|
004925 1 30 3A bmi L4961
|
|
004927 1 A9 03 lda #$03
|
|
004929 1 20 81 8E jsr L8E81
|
|
00492C 1 30 33 bmi L4961
|
|
00492E 1 20 9A 48 L492E: jsr L489A
|
|
004931 1 AD 5B E2 lda $E25B
|
|
004934 1 20 00 90 jsr L9000
|
|
004937 1 8D 8F 49 sta L498F
|
|
00493A 1 20 8A 48 jsr L488A
|
|
00493D 1 A9 08 lda #$08
|
|
00493F 1 20 89 8E jsr L8E89
|
|
004942 1 AD 5B E2 lda $E25B
|
|
004945 1 C9 04 cmp #$04
|
|
004947 1 D0 18 bne L4961
|
|
004949 1 AD 8F 49 lda L498F
|
|
00494C 1 10 13 bpl L4961
|
|
00494E 1 20 AD 4A jsr L4AAD
|
|
004951 1 20 77 4A jsr L4A77
|
|
004954 1 20 FD 4A jsr L4AFD
|
|
004957 1 10 21 bpl L497A
|
|
004959 1 20 24 8F jsr L8F24
|
|
00495C 1 30 03 bmi L4961
|
|
00495E 1 20 68 49 jsr L4968
|
|
004961 1 20 9A 48 L4961: jsr L489A
|
|
004964 1 20 23 45 jsr L4523
|
|
004967 1 60 rts
|
|
004968 1
|
|
004968 1 20 AD 4A L4968: jsr L4AAD
|
|
00496B 1 AE 40 08 ldx $0840
|
|
00496E 1 BD 40 08 L496E: lda $0840,x
|
|
004971 1 9D 55 D3 sta $D355,x
|
|
004974 1 CA dex
|
|
004975 1 10 F7 bpl L496E
|
|
004977 1 4C 17 4A jmp L4A17
|
|
00497A 1
|
|
00497A 1 20 AD 4A L497A: jsr L4AAD
|
|
00497D 1 AE 00 08 ldx L0800
|
|
004980 1 BD 00 08 L4980: lda L0800,x
|
|
004983 1 9D 55 D3 sta $D355,x
|
|
004986 1 CA dex
|
|
004987 1 10 F7 bpl L4980
|
|
004989 1 20 17 4A jsr L4A17
|
|
00498C 1 4C 61 49 jmp L4961
|
|
00498F 1
|
|
00498F 1 00 L498F: brk
|
|
004990 1 0A asl a
|
|
004991 1 20 L4991: .byte $20
|
|
004992 1 02 L4992: .byte $02
|
|
004993 1 00 brk
|
|
004994 1 00 brk
|
|
004995 1 00 brk
|
|
004996 1 00 brk
|
|
004997 1 00 brk
|
|
004998 1 00 brk
|
|
004999 1 00 brk
|
|
00499A 1 00 brk
|
|
00499B 1 00 brk
|
|
00499C 1 00 brk
|
|
00499D 1 00 brk
|
|
00499E 1 00 brk
|
|
00499F 1 00 brk
|
|
0049A0 1 00 brk
|
|
0049A1 1 00 brk
|
|
0049A2 1 4C A6 49 jmp L49A6
|
|
0049A5 1
|
|
0049A5 1 00 L49A5: brk
|
|
0049A6 1 AD 5B E2 L49A6: lda $E25B
|
|
0049A9 1 38 sec
|
|
0049AA 1 E9 06 sbc #$06
|
|
0049AC 1 8D A5 49 sta L49A5
|
|
0049AF 1 20 A7 86 jsr L86A7
|
|
0049B2 1 18 clc
|
|
0049B3 1 69 1E adc #$1E
|
|
0049B5 1 85 06 sta L0006
|
|
0049B7 1 8A txa
|
|
0049B8 1 69 DB adc #$DB
|
|
0049BA 1 85 07 sta $07
|
|
0049BC 1 A0 0F ldy #$0F
|
|
0049BE 1 B1 06 lda (L0006),y
|
|
0049C0 1 0A asl a
|
|
0049C1 1 30 37 bmi L49FA
|
|
0049C3 1 90 1B bcc L49E0
|
|
0049C5 1 20 FD 4A jsr L4AFD
|
|
0049C8 1 F0 30 beq L49FA
|
|
0049CA 1 AD A5 49 lda L49A5
|
|
0049CD 1 20 EA 4A jsr L4AEA
|
|
0049D0 1 F0 1B beq L49ED
|
|
0049D2 1 AD A5 49 lda L49A5
|
|
0049D5 1 20 47 4A jsr L4A47
|
|
0049D8 1 20 24 8F jsr L8F24
|
|
0049DB 1 10 10 bpl L49ED
|
|
0049DD 1 4C 23 45 jmp L4523
|
|
0049E0 1
|
|
0049E0 1 20 FD 4A L49E0: jsr L4AFD
|
|
0049E3 1 F0 15 beq L49FA
|
|
0049E5 1 AD A5 49 lda L49A5
|
|
0049E8 1 20 EA 4A jsr L4AEA
|
|
0049EB 1 D0 0D bne L49FA
|
|
0049ED 1 AD A5 49 L49ED: lda L49A5
|
|
0049F0 1 20 5F 4B jsr L4B5F
|
|
0049F3 1 85 06 sta L0006
|
|
0049F5 1 86 07 stx $07
|
|
0049F7 1 4C 0A 4A jmp L4A0A
|
|
0049FA 1
|
|
0049FA 1 AD A5 49 L49FA: lda L49A5
|
|
0049FD 1 20 C1 86 jsr L86C1
|
|
004A00 1 18 clc
|
|
004A01 1 69 9E adc #$9E
|
|
004A03 1 85 06 sta L0006
|
|
004A05 1 8A txa
|
|
004A06 1 69 DB adc #$DB
|
|
004A08 1 85 07 sta $07
|
|
004A0A 1 A0 00 L4A0A: ldy #$00
|
|
004A0C 1 B1 06 lda (L0006),y
|
|
004A0E 1 A8 tay
|
|
004A0F 1 B1 06 L4A0F: lda (L0006),y
|
|
004A11 1 99 55 D3 sta $D355,y
|
|
004A14 1 88 dey
|
|
004A15 1 10 F8 bpl L4A0F
|
|
004A17 1 AC 55 D3 L4A17: ldy $D355
|
|
004A1A 1 B9 55 D3 L4A1A: lda $D355,y
|
|
004A1D 1 C9 2F cmp #$2F
|
|
004A1F 1 F0 03 beq L4A24
|
|
004A21 1 88 dey
|
|
004A22 1 10 F6 bpl L4A1A
|
|
004A24 1 88 L4A24: dey
|
|
004A25 1 8C 46 4A sty L4A46
|
|
004A28 1 A2 00 ldx #$00
|
|
004A2A 1 C8 iny
|
|
004A2B 1 C8 L4A2B: iny
|
|
004A2C 1 E8 inx
|
|
004A2D 1 B9 55 D3 lda $D355,y
|
|
004A30 1 9D 45 D3 sta $D345,x
|
|
004A33 1 CC 55 D3 cpy $D355
|
|
004A36 1 D0 F3 bne L4A2B
|
|
004A38 1 8E 45 D3 stx $D345
|
|
004A3B 1 AD 46 4A lda L4A46
|
|
004A3E 1 8D 55 D3 sta $D355
|
|
004A41 1 A9 00 lda #$00
|
|
004A43 1 4C DE 46 jmp L46DE
|
|
004A46 1
|
|
004A46 1 00 L4A46: brk
|
|
004A47 1 48 L4A47: pha
|
|
004A48 1 20 C1 86 jsr L86C1
|
|
004A4B 1 18 clc
|
|
004A4C 1 69 9E adc #$9E
|
|
004A4E 1 85 06 sta L0006
|
|
004A50 1 8A txa
|
|
004A51 1 69 DB adc #$DB
|
|
004A53 1 85 07 sta $07
|
|
004A55 1 A0 00 ldy #$00
|
|
004A57 1 B1 06 lda (L0006),y
|
|
004A59 1 A8 tay
|
|
004A5A 1 B1 06 L4A5A: lda (L0006),y
|
|
004A5C 1 99 00 08 sta L0800,y
|
|
004A5F 1 88 dey
|
|
004A60 1 10 F8 bpl L4A5A
|
|
004A62 1 68 pla
|
|
004A63 1 20 5F 4B jsr L4B5F
|
|
004A66 1 85 08 sta $08
|
|
004A68 1 86 09 stx $09
|
|
004A6A 1 A0 00 ldy #$00
|
|
004A6C 1 B1 08 lda ($08),y
|
|
004A6E 1 A8 tay
|
|
004A6F 1 B1 08 L4A6F: lda ($08),y
|
|
004A71 1 99 40 08 sta $0840,y
|
|
004A74 1 88 dey
|
|
004A75 1 10 F8 bpl L4A6F
|
|
004A77 1 AC 00 08 L4A77: ldy L0800
|
|
004A7A 1 B9 00 08 L4A7A: lda L0800,y
|
|
004A7D 1 C9 2F cmp #$2F
|
|
004A7F 1 F0 03 beq L4A84
|
|
004A81 1 88 dey
|
|
004A82 1 D0 F6 bne L4A7A
|
|
004A84 1 88 L4A84: dey
|
|
004A85 1 8C 00 08 sty L0800
|
|
004A88 1 AC 40 08 ldy $0840
|
|
004A8B 1 B9 40 08 L4A8B: lda $0840,y
|
|
004A8E 1 C9 2F cmp #$2F
|
|
004A90 1 F0 03 beq L4A95
|
|
004A92 1 88 dey
|
|
004A93 1 D0 F6 bne L4A8B
|
|
004A95 1 88 L4A95: dey
|
|
004A96 1 8C 40 08 sty $0840
|
|
004A99 1 A9 00 lda #$00
|
|
004A9B 1 85 06 sta L0006
|
|
004A9D 1 A9 08 lda #$08
|
|
004A9F 1 85 07 sta $07
|
|
004AA1 1 A9 40 lda #$40
|
|
004AA3 1 85 08 sta $08
|
|
004AA5 1 A9 08 lda #$08
|
|
004AA7 1 85 09 sta $09
|
|
004AA9 1 20 19 4D jsr L4D19
|
|
004AAC 1 60 rts
|
|
004AAD 1
|
|
004AAD 1 AC 55 D3 L4AAD: ldy $D355
|
|
004AB0 1 B9 55 D3 L4AB0: lda $D355,y
|
|
004AB3 1 99 00 08 sta L0800,y
|
|
004AB6 1 88 dey
|
|
004AB7 1 10 F7 bpl L4AB0
|
|
004AB9 1 A9 40 lda #$40
|
|
004ABB 1 A2 08 ldx #$08
|
|
004ABD 1 20 15 4B jsr L4B15
|
|
004AC0 1 AC 00 08 ldy L0800
|
|
004AC3 1 B9 00 08 L4AC3: lda L0800,y
|
|
004AC6 1 C9 2F cmp #$2F
|
|
004AC8 1 F0 03 beq L4ACD
|
|
004ACA 1 88 dey
|
|
004ACB 1 D0 F6 bne L4AC3
|
|
004ACD 1 88 L4ACD: dey
|
|
004ACE 1 B9 00 08 L4ACE: lda L0800,y
|
|
004AD1 1 C9 2F cmp #$2F
|
|
004AD3 1 F0 03 beq L4AD8
|
|
004AD5 1 88 dey
|
|
004AD6 1 D0 F6 bne L4ACE
|
|
004AD8 1 88 L4AD8: dey
|
|
004AD9 1 AE 40 08 ldx $0840
|
|
004ADC 1 C8 L4ADC: iny
|
|
004ADD 1 E8 inx
|
|
004ADE 1 B9 00 08 lda L0800,y
|
|
004AE1 1 9D 40 08 sta $0840,x
|
|
004AE4 1 CC 00 08 cpy L0800
|
|
004AE7 1 D0 F3 bne L4ADC
|
|
004AE9 1 60 rts
|
|
004AEA 1
|
|
004AEA 1 20 5F 4B L4AEA: jsr L4B5F
|
|
004AED 1 8D 91 49 sta L4991
|
|
004AF0 1 8E 92 49 stx L4992
|
|
004AF3 1 A0 C4 ldy #$C4
|
|
004AF5 1 A9 90 lda #$90
|
|
004AF7 1 A2 49 ldx #$49
|
|
004AF9 1 20 BA 46 jsr L46BA
|
|
004AFC 1 60 rts
|
|
004AFD 1
|
|
004AFD 1 8D 08 C0 L4AFD: sta ALTZPOFF
|
|
004B00 1 AD 83 C0 lda $C083
|
|
004B03 1 AD 83 C0 lda $C083
|
|
004B06 1 AD FF D3 lda $D3FF
|
|
004B09 1 AA tax
|
|
004B0A 1 8D 09 C0 sta ALTZPON
|
|
004B0D 1 AD 8B C0 lda LCBANK1
|
|
004B10 1 AD 8B C0 lda LCBANK1
|
|
004B13 1 8A txa
|
|
004B14 1 60 rts
|
|
004B15 1
|
|
004B15 1 8D 2B 4B L4B15: sta L4B2B
|
|
004B18 1 8E 2C 4B stx L4B2C
|
|
004B1B 1 8D 08 C0 sta ALTZPOFF
|
|
004B1E 1 AD 83 C0 lda $C083
|
|
004B21 1 AD 83 C0 lda $C083
|
|
004B24 1 AE EE D3 ldx $D3EE
|
|
004B27 1 BD EE D3 L4B27: lda $D3EE,x
|
|
004B2A 1 9D .byte $9D
|
|
004B2B 1 34 L4B2B: .byte $34
|
|
004B2C 1 12 CA L4B2C: ora ($CA)
|
|
004B2E 1 10 F7 bpl L4B27
|
|
004B30 1 8D 09 C0 sta ALTZPON
|
|
004B33 1 AD 8B C0 lda LCBANK1
|
|
004B36 1 AD 8B C0 lda LCBANK1
|
|
004B39 1 60 rts
|
|
004B3A 1
|
|
004B3A 1 8D 50 4B sta L4B50
|
|
004B3D 1 8E 51 4B stx L4B51
|
|
004B40 1 8D 08 C0 sta ALTZPOFF
|
|
004B43 1 AD 83 C0 lda $C083
|
|
004B46 1 AD 83 C0 lda $C083
|
|
004B49 1 AE AD D3 ldx $D3AD
|
|
004B4C 1 BD AD D3 L4B4C: lda $D3AD,x
|
|
004B4F 1 9D .byte $9D
|
|
004B50 1 34 L4B50: .byte $34
|
|
004B51 1 12 CA L4B51: ora ($CA)
|
|
004B53 1 10 F7 bpl L4B4C
|
|
004B55 1 8D 09 C0 sta ALTZPON
|
|
004B58 1 AD 8B C0 lda LCBANK1
|
|
004B5B 1 AD 8B C0 lda LCBANK1
|
|
004B5E 1 60 rts
|
|
004B5F 1
|
|
004B5F 1 8D B0 4B L4B5F: sta L4BB0
|
|
004B62 1 A9 76 lda #$76
|
|
004B64 1 A2 4F ldx #$4F
|
|
004B66 1 20 15 4B jsr L4B15
|
|
004B69 1 AD B0 4B lda L4BB0
|
|
004B6C 1 20 C1 86 jsr L86C1
|
|
004B6F 1 18 clc
|
|
004B70 1 69 9E adc #$9E
|
|
004B72 1 85 06 sta L0006
|
|
004B74 1 8A txa
|
|
004B75 1 69 DB adc #$DB
|
|
004B77 1 85 07 sta $07
|
|
004B79 1 A0 00 ldy #$00
|
|
004B7B 1 B1 06 lda (L0006),y
|
|
004B7D 1 8D B1 4B sta L4BB1
|
|
004B80 1 A8 tay
|
|
004B81 1 B1 06 L4B81: lda (L0006),y
|
|
004B83 1 29 7F and #$7F
|
|
004B85 1 C9 2F cmp #$2F
|
|
004B87 1 F0 03 beq L4B8C
|
|
004B89 1 88 dey
|
|
004B8A 1 D0 F5 bne L4B81
|
|
004B8C 1 88 L4B8C: dey
|
|
004B8D 1 B1 06 L4B8D: lda (L0006),y
|
|
004B8F 1 29 7F and #$7F
|
|
004B91 1 C9 2F cmp #$2F
|
|
004B93 1 F0 03 beq L4B98
|
|
004B95 1 88 dey
|
|
004B96 1 D0 F5 bne L4B8D
|
|
004B98 1 88 L4B98: dey
|
|
004B99 1 AE 76 4F ldx L4F76
|
|
004B9C 1 E8 L4B9C: inx
|
|
004B9D 1 C8 iny
|
|
004B9E 1 B1 06 lda (L0006),y
|
|
004BA0 1 9D 76 4F sta L4F76,x
|
|
004BA3 1 CC B1 4B cpy L4BB1
|
|
004BA6 1 D0 F4 bne L4B9C
|
|
004BA8 1 8E 76 4F stx L4F76
|
|
004BAB 1 A9 76 lda #$76
|
|
004BAD 1 A2 4F ldx #$4F
|
|
004BAF 1 60 rts
|
|
004BB0 1
|
|
004BB0 1 00 L4BB0: brk
|
|
004BB1 1 00 L4BB1: brk
|
|
004BB2 1 A0 00 ldy #$00
|
|
004BB4 1 A9 00 lda #$00
|
|
004BB6 1 A2 00 ldx #$00
|
|
004BB8 1 20 00 A5 jsr LA500
|
|
004BBB 1 4C 23 45 jmp L4523
|
|
004BBE 1
|
|
004BBE 1 80 20 bra L4BE0
|
|
004BC0 1 10 45 bpl L4C07
|
|
004BC2 1 20 8A 48 jsr L488A
|
|
004BC5 1 AD 5B E2 lda $E25B
|
|
004BC8 1 38 sec
|
|
004BC9 1 E9 03 sbc #$03
|
|
004BCB 1 20 A7 86 jsr L86A7
|
|
004BCE 1 18 clc
|
|
004BCF 1 69 F2 adc #$F2
|
|
004BD1 1 85 06 sta L0006
|
|
004BD3 1 8A txa
|
|
004BD4 1 69 E5 adc #$E5
|
|
004BD6 1 85 07 sta $07
|
|
004BD8 1 A0 00 ldy #$00
|
|
004BDA 1 B1 06 lda (L0006),y
|
|
004BDC 1 A8 tay
|
|
004BDD 1 18 clc
|
|
004BDE 1 6D .byte $6D
|
|
004BDF 1 87 .byte $87
|
|
004BE0 1 4C 48 AA L4BE0: jmp LAA48
|
|
004BE3 1
|
|
004BE3 1 B1 06 L4BE3: lda (L0006),y
|
|
004BE5 1 9D 88 4C sta L4C88,x
|
|
004BE8 1 CA dex
|
|
004BE9 1 88 dey
|
|
004BEA 1 D0 F7 bne L4BE3
|
|
004BEC 1 68 pla
|
|
004BED 1 8D 88 4C sta L4C88
|
|
004BF0 1 AE 88 4C ldx L4C88
|
|
004BF3 1 BD 88 4C L4BF3: lda L4C88,x
|
|
004BF6 1 C9 20 cmp #$20
|
|
004BF8 1 D0 05 bne L4BFF
|
|
004BFA 1 A9 2E lda #$2E
|
|
004BFC 1 9D 88 4C sta L4C88,x
|
|
004BFF 1 CA L4BFF: dex
|
|
004C00 1 D0 F1 bne L4BF3
|
|
004C02 1 20 4E 4C jsr L4C4E
|
|
004C05 1 30 43 bmi L4C4A
|
|
004C07 1 AD 7C 4C L4C07: lda L4C7C
|
|
004C0A 1 8D 7E 4C sta L4C7E
|
|
004C0D 1 8D 86 4C sta L4C86
|
|
004C10 1 20 64 4C jsr L4C64
|
|
004C13 1 20 6D 4C jsr L4C6D
|
|
004C16 1 A9 80 lda #$80
|
|
004C18 1 8D A1 4C sta L4CA1
|
|
004C1B 1 20 9A 48 jsr L489A
|
|
004C1E 1 20 10 45 jsr L4510
|
|
004C21 1 A0 1A ldy #$1A
|
|
004C23 1 A9 A7 lda #$A7
|
|
004C25 1 A2 D2 ldx #$D2
|
|
004C27 1 20 00 D0 jsr LD000
|
|
004C2A 1 A0 1A ldy #$1A
|
|
004C2C 1 A9 BE lda #$BE
|
|
004C2E 1 A2 4B ldx #$4B
|
|
004C30 1 20 00 D0 jsr LD000
|
|
004C33 1 20 00 08 jsr L0800
|
|
004C36 1 A0 1A ldy #$1A
|
|
004C38 1 A9 A7 lda #$A7
|
|
004C3A 1 A2 D2 ldx #$D2
|
|
004C3C 1 20 00 D0 jsr LD000
|
|
004C3F 1 A9 00 lda #$00
|
|
004C41 1 8D A1 4C sta L4CA1
|
|
004C44 1 20 10 45 jsr L4510
|
|
004C47 1 20 23 45 jsr L4523
|
|
004C4A 1 20 9A 48 L4C4A: jsr L489A
|
|
004C4D 1 60 rts
|
|
004C4E 1
|
|
004C4E 1 A0 C8 L4C4E: ldy #$C8
|
|
004C50 1 A2 4C ldx #$4C
|
|
004C52 1 A9 77 lda #$77
|
|
004C54 1 20 BA 46 jsr L46BA
|
|
004C57 1 D0 01 bne L4C5A
|
|
004C59 1 60 rts
|
|
004C5A 1
|
|
004C5A 1 A9 00 L4C5A: lda #$00
|
|
004C5C 1 20 CC 48 jsr L48CC
|
|
004C5F 1 F0 ED beq L4C4E
|
|
004C61 1 A9 FF lda #$FF
|
|
004C63 1 60 rts
|
|
004C64 1
|
|
004C64 1 A0 CA L4C64: ldy #$CA
|
|
004C66 1 A2 4C ldx #$4C
|
|
004C68 1 A9 7D lda #$7D
|
|
004C6A 1 4C BA 46 jmp L46BA
|
|
004C6D 1
|
|
004C6D 1 A0 CC L4C6D: ldy #$CC
|
|
004C6F 1 A2 4C ldx #$4C
|
|
004C71 1 A9 85 lda #$85
|
|
004C73 1 4C BA 46 jmp L46BA
|
|
004C76 1
|
|
004C76 1 00 brk
|
|
004C77 1 03 .byte $03
|
|
004C78 1 88 dey
|
|
004C79 1 4C 00 1C jmp L1C00
|
|
004C7C 1
|
|
004C7C 1 00 L4C7C: brk
|
|
004C7D 1 04 .byte $04
|
|
004C7E 1 00 L4C7E: brk
|
|
004C7F 1 00 brk
|
|
004C80 1 08 php
|
|
004C81 1 00 brk
|
|
004C82 1 14 00 trb L0000
|
|
004C84 1 00 brk
|
|
004C85 1 01 .byte $01
|
|
004C86 1 00 L4C86: brk
|
|
004C87 1 09 .byte $09
|
|
004C88 1 09 44 L4C88: ora #$44
|
|
004C8A 1 65 73 adc $73
|
|
004C8C 1 6B .byte $6B
|
|
004C8D 1 2E 61 63 rol L6361
|
|
004C90 1 63 .byte $63
|
|
004C91 1 2F 00 00 bbr2 L0000,L4C94
|
|
004C94 1 00 L4C94: brk
|
|
004C95 1 00 brk
|
|
004C96 1 00 brk
|
|
004C97 1 00 brk
|
|
004C98 1 00 brk
|
|
004C99 1 00 brk
|
|
004C9A 1 00 brk
|
|
004C9B 1 00 brk
|
|
004C9C 1 00 brk
|
|
004C9D 1 00 brk
|
|
004C9E 1 00 brk
|
|
004C9F 1 00 brk
|
|
004CA0 1 00 brk
|
|
004CA1 1 00 L4CA1: brk
|
|
004CA2 1 20 8A 48 jsr L488A
|
|
004CA5 1 A9 03 lda #$03
|
|
004CA7 1 20 81 8E jsr L8E81
|
|
004CAA 1 30 2A bmi L4CD6
|
|
004CAC 1 A9 04 lda #$04
|
|
004CAE 1 20 81 8E jsr L8E81
|
|
004CB1 1 30 23 bmi L4CD6
|
|
004CB3 1 20 9A 48 jsr L489A
|
|
004CB6 1 A9 00 lda #$00
|
|
004CB8 1 20 00 50 jsr L5000
|
|
004CBB 1 48 pha
|
|
004CBC 1 20 8A 48 jsr L488A
|
|
004CBF 1 A9 07 lda #$07
|
|
004CC1 1 20 89 8E jsr L8E89
|
|
004CC4 1 20 9A 48 jsr L489A
|
|
004CC7 1 68 pla
|
|
004CC8 1 10 03 bpl L4CCD
|
|
004CCA 1 4C D6 4C jmp L4CD6
|
|
004CCD 1
|
|
004CCD 1 20 19 4D L4CCD: jsr L4D19
|
|
004CD0 1 20 23 45 jsr L4523
|
|
004CD3 1 20 18 8F jsr L8F18
|
|
004CD6 1 48 L4CD6: pha
|
|
004CD7 1 20 9A 48 jsr L489A
|
|
004CDA 1 68 pla
|
|
004CDB 1 10 03 bpl L4CE0
|
|
004CDD 1 4C 23 45 jmp L4523
|
|
004CE0 1
|
|
004CE0 1 A9 C9 L4CE0: lda #$C9
|
|
004CE2 1 A2 DF ldx #$DF
|
|
004CE4 1 20 AF 6F jsr L6FAF
|
|
004CE7 1 F0 08 beq L4CF1
|
|
004CE9 1 48 pha
|
|
004CEA 1 20 0D 6F jsr L6F0D
|
|
004CED 1 68 pla
|
|
004CEE 1 4C 78 5E jmp L5E78
|
|
004CF1 1
|
|
004CF1 1 A0 01 L4CF1: ldy #$01
|
|
004CF3 1 C8 L4CF3: iny
|
|
004CF4 1 B9 C9 DF lda $DFC9,y
|
|
004CF7 1 C9 2F cmp #$2F
|
|
004CF9 1 F0 06 beq L4D01
|
|
004CFB 1 CC C9 DF cpy $DFC9
|
|
004CFE 1 D0 F3 bne L4CF3
|
|
004D00 1 C8 iny
|
|
004D01 1 88 L4D01: dey
|
|
004D02 1 8C C9 DF sty $DFC9
|
|
004D05 1 A9 C9 lda #$C9
|
|
004D07 1 A2 DF ldx #$DF
|
|
004D09 1 20 B7 6F jsr L6FB7
|
|
004D0C 1 A9 C9 lda #$C9
|
|
004D0E 1 A2 DF ldx #$DF
|
|
004D10 1 AC C9 DF ldy $DFC9
|
|
004D13 1 20 4B 6F jsr L6F4B
|
|
004D16 1 4C 23 45 jmp L4523
|
|
004D19 1
|
|
004D19 1 A0 00 L4D19: ldy #$00
|
|
004D1B 1 B1 06 lda (L0006),y
|
|
004D1D 1 A8 tay
|
|
004D1E 1 B1 06 L4D1E: lda (L0006),y
|
|
004D20 1 99 0A E0 sta $E00A,y
|
|
004D23 1 88 dey
|
|
004D24 1 10 F8 bpl L4D1E
|
|
004D26 1 A0 00 ldy #$00
|
|
004D28 1 B1 08 lda ($08),y
|
|
004D2A 1 A8 tay
|
|
004D2B 1 B1 08 L4D2B: lda ($08),y
|
|
004D2D 1 99 C9 DF sta $DFC9,y
|
|
004D30 1 88 dey
|
|
004D31 1 10 F8 bpl L4D2B
|
|
004D33 1 A9 C9 lda #$C9
|
|
004D35 1 A2 DF ldx #$DF
|
|
004D37 1 20 90 6F jsr L6F90
|
|
004D3A 1 A2 01 ldx #$01
|
|
004D3C 1 C8 iny
|
|
004D3D 1 C8 iny
|
|
004D3E 1 B9 C9 DF L4D3E: lda $DFC9,y
|
|
004D41 1 9D 4B E0 sta $E04B,x
|
|
004D44 1 CC C9 DF cpy $DFC9
|
|
004D47 1 F0 05 beq L4D4E
|
|
004D49 1 C8 iny
|
|
004D4A 1 E8 inx
|
|
004D4B 1 4C 3E 4D jmp L4D3E
|
|
004D4E 1
|
|
004D4E 1 8E 4B E0 L4D4E: stx $E04B
|
|
004D51 1 AD C9 DF lda $DFC9
|
|
004D54 1 38 sec
|
|
004D55 1 ED 4B E0 sbc $E04B
|
|
004D58 1 8D C9 DF sta $DFC9
|
|
004D5B 1 CE C9 DF dec $DFC9
|
|
004D5E 1 60 rts
|
|
004D5F 1
|
|
004D5F 1 20 8A 48 L4D5F: jsr L488A
|
|
004D62 1 A9 03 lda #$03
|
|
004D64 1 20 81 8E jsr L8E81
|
|
004D67 1 30 34 bmi L4D9D
|
|
004D69 1 A9 05 lda #$05
|
|
004D6B 1 20 81 8E jsr L8E81
|
|
004D6E 1 30 2D bmi L4D9D
|
|
004D70 1 20 9A 48 jsr L489A
|
|
004D73 1 A9 01 lda #$01
|
|
004D75 1 20 00 50 jsr L5000
|
|
004D78 1 48 pha
|
|
004D79 1 20 8A 48 jsr L488A
|
|
004D7C 1 A9 07 lda #$07
|
|
004D7E 1 20 89 8E jsr L8E89
|
|
004D81 1 20 9A 48 jsr L489A
|
|
004D84 1 68 pla
|
|
004D85 1 10 03 bpl L4D8A
|
|
004D87 1 4C 9D 4D jmp L4D9D
|
|
004D8A 1
|
|
004D8A 1 A0 00 L4D8A: ldy #$00
|
|
004D8C 1 B1 06 lda (L0006),y
|
|
004D8E 1 A8 tay
|
|
004D8F 1 B1 06 L4D8F: lda (L0006),y
|
|
004D91 1 99 0A E0 sta $E00A,y
|
|
004D94 1 88 dey
|
|
004D95 1 10 F8 bpl L4D8F
|
|
004D97 1 20 23 45 jsr L4523
|
|
004D9A 1 20 1B 8F jsr L8F1B
|
|
004D9D 1 48 L4D9D: pha
|
|
004D9E 1 20 9A 48 jsr L489A
|
|
004DA1 1 68 pla
|
|
004DA2 1 10 03 bpl L4DA7
|
|
004DA4 1 4C 23 45 jmp L4523
|
|
004DA7 1
|
|
004DA7 1 A9 0A L4DA7: lda #$0A
|
|
004DA9 1 A2 E0 ldx #$E0
|
|
004DAB 1 20 90 6F jsr L6F90
|
|
004DAE 1 8C 0A E0 sty $E00A
|
|
004DB1 1 A9 0A lda #$0A
|
|
004DB3 1 A2 E0 ldx #$E0
|
|
004DB5 1 20 AF 6F jsr L6FAF
|
|
004DB8 1 F0 08 beq L4DC2
|
|
004DBA 1 48 pha
|
|
004DBB 1 20 0D 6F jsr L6F0D
|
|
004DBE 1 68 pla
|
|
004DBF 1 4C 78 5E jmp L5E78
|
|
004DC2 1
|
|
004DC2 1 A0 01 L4DC2: ldy #$01
|
|
004DC4 1 C8 L4DC4: iny
|
|
004DC5 1 B9 0A E0 lda $E00A,y
|
|
004DC8 1 C9 2F cmp #$2F
|
|
004DCA 1 F0 06 beq L4DD2
|
|
004DCC 1 CC 0A E0 cpy $E00A
|
|
004DCF 1 D0 F3 bne L4DC4
|
|
004DD1 1 C8 iny
|
|
004DD2 1 88 L4DD2: dey
|
|
004DD3 1 8C 0A E0 sty $E00A
|
|
004DD6 1 A9 0A lda #$0A
|
|
004DD8 1 A2 E0 ldx #$E0
|
|
004DDA 1 20 B7 6F jsr L6FB7
|
|
004DDD 1 A9 0A lda #$0A
|
|
004DDF 1 A2 E0 ldx #$E0
|
|
004DE1 1 AC 0A E0 ldy $E00A
|
|
004DE4 1 20 4B 6F jsr L6F4B
|
|
004DE7 1 4C 23 45 jmp L4523
|
|
004DEA 1
|
|
004DEA 1 A2 00 ldx #$00
|
|
004DEC 1 EC 21 DF L4DEC: cpx $DF21
|
|
004DEF 1 D0 01 bne L4DF2
|
|
004DF1 1 60 rts
|
|
004DF2 1
|
|
004DF2 1 8A L4DF2: txa
|
|
004DF3 1 48 pha
|
|
004DF4 1 BD 22 DF lda $DF22,x
|
|
004DF7 1 20 E3 86 jsr L86E3
|
|
004DFA 1 85 06 sta L0006
|
|
004DFC 1 86 07 stx $07
|
|
004DFE 1 A0 02 ldy #$02
|
|
004E00 1 B1 06 lda (L0006),y
|
|
004E02 1 29 70 and #$70
|
|
004E04 1 D0 0A bne L4E10
|
|
004E06 1 A0 00 ldy #$00
|
|
004E08 1 B1 06 lda (L0006),y
|
|
004E0A 1 20 8A 6A jsr L6A8A
|
|
004E0D 1 4C 14 4E jmp L4E14
|
|
004E10 1
|
|
004E10 1 C9 40 L4E10: cmp #$40
|
|
004E12 1 90 06 bcc L4E1A
|
|
004E14 1 68 L4E14: pla
|
|
004E15 1 AA tax
|
|
004E16 1 E8 inx
|
|
004E17 1 4C EC 4D jmp L4DEC
|
|
004E1A 1
|
|
004E1A 1 8D 71 4E L4E1A: sta L4E71
|
|
004E1D 1 AD 21 DF lda $DF21
|
|
004E20 1 C9 02 cmp #$02
|
|
004E22 1 B0 F0 bcs L4E14
|
|
004E24 1 68 pla
|
|
004E25 1 AD 25 EC lda $EC25
|
|
004E28 1 20 FB 86 jsr L86FB
|
|
004E2B 1 85 06 sta L0006
|
|
004E2D 1 86 07 stx $07
|
|
004E2F 1 A0 00 ldy #$00
|
|
004E31 1 B1 06 lda (L0006),y
|
|
004E33 1 A8 tay
|
|
004E34 1 B1 06 L4E34: lda (L0006),y
|
|
004E36 1 99 55 D3 sta $D355,y
|
|
004E39 1 88 dey
|
|
004E3A 1 10 F8 bpl L4E34
|
|
004E3C 1 AD 22 DF lda $DF22
|
|
004E3F 1 20 E3 86 jsr L86E3
|
|
004E42 1 85 06 sta L0006
|
|
004E44 1 86 07 stx $07
|
|
004E46 1 A0 09 ldy #$09
|
|
004E48 1 B1 06 lda (L0006),y
|
|
004E4A 1 AA tax
|
|
004E4B 1 18 clc
|
|
004E4C 1 69 09 adc #$09
|
|
004E4E 1 A8 tay
|
|
004E4F 1 CA dex
|
|
004E50 1 88 dey
|
|
004E51 1 B1 06 L4E51: lda (L0006),y
|
|
004E53 1 9D 44 D3 sta $D344,x
|
|
004E56 1 88 dey
|
|
004E57 1 CA dex
|
|
004E58 1 D0 F7 bne L4E51
|
|
004E5A 1 A0 09 ldy #$09
|
|
004E5C 1 B1 06 lda (L0006),y
|
|
004E5E 1 AA tax
|
|
004E5F 1 CA dex
|
|
004E60 1 CA dex
|
|
004E61 1 8E 45 D3 stx $D345
|
|
004E64 1 AD 71 4E lda L4E71
|
|
004E67 1 C9 20 cmp #$20
|
|
004E69 1 90 03 bcc L4E6E
|
|
004E6B 1 AD 71 4E lda L4E71
|
|
004E6E 1 4C DE 46 L4E6E: jmp L46DE
|
|
004E71 1
|
|
004E71 1 00 L4E71: brk
|
|
004E72 1 AD 25 EC L4E72: lda $EC25
|
|
004E75 1 D0 01 bne L4E78
|
|
004E77 1 60 rts
|
|
004E78 1
|
|
004E78 1 20 2B 6D L4E78: jsr L6D2B
|
|
004E7B 1 CE 2E EC dec $EC2E
|
|
004E7E 1 AD 25 EC lda $EC25
|
|
004E81 1 8D 9F DE sta $DE9F
|
|
004E84 1 20 9A D0 jsr LD09A
|
|
004E87 1 AE 25 EC ldx $EC25
|
|
004E8A 1 CA dex
|
|
004E8B 1 BD D1 E6 lda $E6D1,x
|
|
004E8E 1 30 24 bmi L4EB4
|
|
004E90 1 A0 07 ldy #$07
|
|
004E92 1 A9 25 lda #$25
|
|
004E94 1 A2 EC ldx #$EC
|
|
004E96 1 20 40 D0 jsr LD040
|
|
004E99 1 AD 9E DD lda $DD9E
|
|
004E9C 1 38 sec
|
|
004E9D 1 ED A0 DE sbc $DEA0
|
|
004EA0 1 8D 9E DD sta $DD9E
|
|
004EA3 1 A2 00 ldx #$00
|
|
004EA5 1 EC A0 DE L4EA5: cpx $DEA0
|
|
004EA8 1 F0 0A beq L4EB4
|
|
004EAA 1 BD A1 DE lda $DEA1,x
|
|
004EAD 1 20 82 D0 jsr LD082
|
|
004EB0 1 E8 inx
|
|
004EB1 1 4C A5 4E jmp L4EA5
|
|
004EB4 1
|
|
004EB4 1 A2 00 L4EB4: ldx #$00
|
|
004EB6 1 8A txa
|
|
004EB7 1 9D A1 DE L4EB7: sta $DEA1,x
|
|
004EBA 1 EC A0 DE cpx $DEA0
|
|
004EBD 1 F0 04 beq L4EC3
|
|
004EBF 1 E8 inx
|
|
004EC0 1 4C B7 4E jmp L4EB7
|
|
004EC3 1
|
|
004EC3 1 8D A0 DE L4EC3: sta $DEA0
|
|
004EC6 1 20 96 D0 jsr LD096
|
|
004EC9 1 A9 00 lda #$00
|
|
004ECB 1 8D 9F DE sta $DE9F
|
|
004ECE 1 20 9A D0 jsr LD09A
|
|
004ED1 1 A0 39 ldy #$39
|
|
004ED3 1 A9 25 lda #$25
|
|
004ED5 1 A2 EC ldx #$EC
|
|
004ED7 1 20 00 D0 jsr LD000
|
|
004EDA 1 AE 25 EC ldx $EC25
|
|
004EDD 1 CA dex
|
|
004EDE 1 BD 26 EC lda $EC26,x
|
|
004EE1 1 8D 2F E2 sta $E22F
|
|
004EE4 1 20 E3 86 jsr L86E3
|
|
004EE7 1 85 06 sta L0006
|
|
004EE9 1 86 07 stx $07
|
|
004EEB 1 A0 02 ldy #$02
|
|
004EED 1 B1 06 lda (L0006),y
|
|
004EEF 1 29 7F and #$7F
|
|
004EF1 1 91 06 sta (L0006),y
|
|
004EF3 1 29 0F and #$0F
|
|
004EF5 1 8D 20 DF sta $DF20
|
|
004EF8 1 20 97 89 jsr L8997
|
|
004EFB 1 A0 02 ldy #$02
|
|
004EFD 1 A9 2F lda #$2F
|
|
004EFF 1 A2 E2 ldx #$E2
|
|
004F01 1 20 40 D0 jsr LD040
|
|
004F04 1 20 10 45 jsr L4510
|
|
004F07 1 A9 01 lda #$01
|
|
004F09 1 8D 21 DF sta $DF21
|
|
004F0C 1 AD 2F E2 lda $E22F
|
|
004F0F 1 8D 22 DF sta $DF22
|
|
004F12 1 AE 25 EC ldx $EC25
|
|
004F15 1 CA dex
|
|
004F16 1 BD 26 EC lda $EC26,x
|
|
004F19 1 20 45 73 jsr L7345
|
|
004F1C 1 AE 25 EC ldx $EC25
|
|
004F1F 1 CA dex
|
|
004F20 1 A9 00 lda #$00
|
|
004F22 1 9D 26 EC sta $EC26,x
|
|
004F25 1 A0 41 ldy #$41
|
|
004F27 1 A9 25 lda #$25
|
|
004F29 1 A2 EC ldx #$EC
|
|
004F2B 1 20 00 D0 jsr LD000
|
|
004F2E 1 AD 25 EC lda $EC25
|
|
004F31 1 D0 09 bne L4F3C
|
|
004F33 1 A0 0C ldy #$0C
|
|
004F35 1 A9 00 lda #$00
|
|
004F37 1 A2 00 ldx #$00
|
|
004F39 1 20 40 D0 jsr LD040
|
|
004F3C 1 A9 00 L4F3C: lda #$00
|
|
004F3E 1 8D 69 E2 sta $E269
|
|
004F41 1 A0 36 ldy #$36
|
|
004F43 1 A9 67 lda #$67
|
|
004F45 1 A2 E2 ldx #$E2
|
|
004F47 1 20 00 D0 jsr LD000
|
|
004F4A 1 20 A2 66 jsr L66A2
|
|
004F4D 1 4C 10 45 jmp L4510
|
|
004F50 1
|
|
004F50 1 AD 25 EC L4F50: lda $EC25
|
|
004F53 1 F0 06 beq L4F5B
|
|
004F55 1 20 72 4E jsr L4E72
|
|
004F58 1 4C 50 4F jmp L4F50
|
|
004F5B 1
|
|
004F5B 1 60 L4F5B: rts
|
|
004F5C 1
|
|
004F5C 1 A9 00 lda #$00
|
|
004F5E 1 20 81 8E jsr L8E81
|
|
004F61 1 30 03 bmi L4F66
|
|
004F63 1 4C 00 08 jmp L0800
|
|
004F66 1
|
|
004F66 1 60 L4F66: rts
|
|
004F67 1
|
|
004F67 1 00 L4F67: brk
|
|
004F68 1 00 L4F68: brk
|
|
004F69 1 00 L4F69: brk
|
|
004F6A 1 07 76 rmb0 $76
|
|
004F6C 1 4F C3 0F bbr4 $C3,L4F7E
|
|
004F6F 1 00 brk
|
|
004F70 1 00 brk
|
|
004F71 1 0D .byte $0D
|
|
004F72 1 00 L4F72: brk
|
|
004F73 1 00 brk
|
|
004F74 1 00 brk
|
|
004F75 1 00 brk
|
|
004F76 1 00 L4F76: brk
|
|
004F77 1 00 brk
|
|
004F78 1 00 brk
|
|
004F79 1 00 brk
|
|
004F7A 1 00 brk
|
|
004F7B 1 00 brk
|
|
004F7C 1 00 brk
|
|
004F7D 1 00 brk
|
|
004F7E 1 00 L4F7E: brk
|
|
004F7F 1 00 brk
|
|
004F80 1 00 brk
|
|
004F81 1 00 brk
|
|
004F82 1 00 brk
|
|
004F83 1 00 brk
|
|
004F84 1 00 brk
|
|
004F85 1 00 brk
|
|
004F86 1 00 brk
|
|
004F87 1 00 brk
|
|
004F88 1 00 brk
|
|
004F89 1 00 brk
|
|
004F8A 1 00 brk
|
|
004F8B 1 00 brk
|
|
004F8C 1 00 brk
|
|
004F8D 1 00 brk
|
|
004F8E 1 00 brk
|
|
004F8F 1 00 brk
|
|
004F90 1 00 brk
|
|
004F91 1 00 brk
|
|
004F92 1 00 brk
|
|
004F93 1 00 brk
|
|
004F94 1 00 brk
|
|
004F95 1 00 brk
|
|
004F96 1 00 brk
|
|
004F97 1 00 brk
|
|
004F98 1 00 brk
|
|
004F99 1 00 brk
|
|
004F9A 1 00 brk
|
|
004F9B 1 00 brk
|
|
004F9C 1 00 brk
|
|
004F9D 1 00 brk
|
|
004F9E 1 00 brk
|
|
004F9F 1 00 brk
|
|
004FA0 1 00 brk
|
|
004FA1 1 00 brk
|
|
004FA2 1 00 brk
|
|
004FA3 1 00 brk
|
|
004FA4 1 00 brk
|
|
004FA5 1 00 brk
|
|
004FA6 1 00 brk
|
|
004FA7 1 00 brk
|
|
004FA8 1 00 brk
|
|
004FA9 1 00 brk
|
|
004FAA 1 00 brk
|
|
004FAB 1 00 brk
|
|
004FAC 1 00 brk
|
|
004FAD 1 00 brk
|
|
004FAE 1 00 brk
|
|
004FAF 1 00 brk
|
|
004FB0 1 00 brk
|
|
004FB1 1 00 brk
|
|
004FB2 1 00 brk
|
|
004FB3 1 00 brk
|
|
004FB4 1 00 brk
|
|
004FB5 1 00 brk
|
|
004FB6 1 00 brk
|
|
004FB7 1 AD 25 EC lda $EC25
|
|
004FBA 1 8D 67 4F sta L4F67
|
|
004FBD 1 A0 03 ldy #$03
|
|
004FBF 1 A9 67 lda #$67
|
|
004FC1 1 A2 4F ldx #$4F
|
|
004FC3 1 20 00 A5 jsr LA500
|
|
004FC6 1 AD 25 EC L4FC6: lda $EC25
|
|
004FC9 1 F0 09 beq L4FD4
|
|
004FCB 1 20 FB 86 jsr L86FB
|
|
004FCE 1 8D 68 4F sta L4F68
|
|
004FD1 1 8E 69 4F stx L4F69
|
|
004FD4 1 A9 80 L4FD4: lda #$80
|
|
004FD6 1 8D 67 4F sta L4F67
|
|
004FD9 1 A0 03 ldy #$03
|
|
004FDB 1 A9 67 lda #$67
|
|
004FDD 1 A2 4F ldx #$4F
|
|
004FDF 1 20 00 A5 jsr LA500
|
|
004FE2 1 F0 03 beq L4FE7
|
|
004FE4 1 4C 4B 50 jmp L504B
|
|
004FE7 1
|
|
004FE7 1 86 07 L4FE7: stx $07
|
|
004FE9 1 8E 4F 50 stx L504F
|
|
004FEC 1 84 06 sty L0006
|
|
004FEE 1 8C 4E 50 sty L504E
|
|
004FF1 1 A0 00 ldy #$00
|
|
004FF3 1 B1 06 lda (L0006),y
|
|
004FF5 1 A8 tay
|
|
004FF6 1 B1 06 L4FF6: lda (L0006),y
|
|
004FF8 1 99 76 4F sta L4F76,y
|
|
004FFB 1 88 dey
|
|
004FFC 1 10 F8 bpl L4FF6
|
|
004FFE 1 A2 03 ldx #$03
|
|
005000 1 BD 90 BF L5000: lda $BF90,x
|
|
005003 1 9D 72 4F sta L4F72,x
|
|
005006 1 CA dex
|
|
005007 1 10 F7 bpl L5000
|
|
005009 1 A0 C0 ldy #$C0
|
|
00500B 1 A9 6A lda #$6A
|
|
00500D 1 A2 4F ldx #$4F
|
|
00500F 1 20 BA 46 jsr L46BA
|
|
005012 1 F0 13 beq L5027
|
|
005014 1 20 54 D1 jsr LD154
|
|
005017 1 AD 4E 50 lda L504E
|
|
00501A 1 8D 68 4F sta L4F68
|
|
00501D 1 AD 4F 50 lda L504F
|
|
005020 1 8D 69 4F sta L4F69
|
|
005023 1 4C C6 4F jmp L4FC6
|
|
005026 1
|
|
005026 1 60 rts
|
|
005027 1
|
|
005027 1 A9 40 L5027: lda #$40
|
|
005029 1 8D 67 4F sta L4F67
|
|
00502C 1 A0 03 ldy #$03
|
|
00502E 1 A9 67 lda #$67
|
|
005030 1 A2 4F ldx #$4F
|
|
005032 1 20 00 A5 jsr LA500
|
|
005035 1 A9 76 lda #$76
|
|
005037 1 A2 4F ldx #$4F
|
|
005039 1 20 90 6F jsr L6F90
|
|
00503C 1 8C 76 4F sty L4F76
|
|
00503F 1 A9 76 lda #$76
|
|
005041 1 A2 4F ldx #$4F
|
|
005043 1 20 AF 6F jsr L6FAF
|
|
005046 1 F0 03 beq L504B
|
|
005048 1 20 .byte $20
|
|
005049 1 78 L5049: sei
|
|
00504A 1 5E .byte $5E
|
|
00504B 1 4C 23 45 L504B: jmp L4523
|
|
00504E 1
|
|
00504E 1 00 L504E: brk
|
|
00504F 1 00 L504F: brk
|
|
005050 1 AD 20 DF L5050: lda $DF20
|
|
005053 1 F0 01 beq L5056
|
|
005055 1 60 L5055: rts
|
|
005056 1
|
|
005056 1 AD 21 DF L5056: lda $DF21
|
|
005059 1 F0 FA beq L5055
|
|
00505B 1 C9 01 cmp #$01
|
|
00505D 1 D0 08 bne L5067
|
|
00505F 1 AD 22 DF lda $DF22
|
|
005062 1 CD FB EB cmp $EBFB
|
|
005065 1 F0 EE beq L5055
|
|
005067 1 A9 00 L5067: lda #$00
|
|
005069 1 AA tax
|
|
00506A 1 A8 tay
|
|
00506B 1 B9 22 DF L506B: lda $DF22,y
|
|
00506E 1 CD FB EB cmp $EBFB
|
|
005071 1 F0 04 beq L5077
|
|
005073 1 9D 00 18 sta $1800,x
|
|
005076 1 E8 inx
|
|
005077 1 C8 L5077: iny
|
|
005078 1 CC 21 DF cpy $DF21
|
|
00507B 1 D0 EE bne L506B
|
|
00507D 1 CA dex
|
|
00507E 1 8E 98 50 stx L5098
|
|
005081 1 20 15 8F jsr L8F15
|
|
005084 1 AE 98 50 L5084: ldx L5098
|
|
005087 1 BD 00 18 lda $1800,x
|
|
00508A 1 8D 3F 53 sta L533F
|
|
00508D 1 20 A8 59 jsr L59A8
|
|
005090 1 CE 98 50 dec L5098
|
|
005093 1 10 EF bpl L5084
|
|
005095 1 4C 23 45 jmp L4523
|
|
005098 1
|
|
005098 1 00 L5098: brk
|
|
005099 1 AF DE AD L5099: bbs2 $DE,L5049
|
|
00509C 1 DE .byte $DE
|
|
00509D 1 18 L509D: clc
|
|
00509E 1 FB .byte $FB
|
|
00509F 1 5C .byte $5C
|
|
0050A0 1 04 D0 tsb $D0
|
|
0050A2 1 E0 .byte $E0
|
|
0050A3 1 04 00 L50A3: tsb L0000
|
|
0050A5 1 00 brk
|
|
0050A6 1 00 brk
|
|
0050A7 1 00 brk
|
|
0050A8 1 00 brk
|
|
0050A9 1 00 brk
|
|
0050AA 1 A2 03 ldx #$03
|
|
0050AC 1 BD 99 50 L50AC: lda L5099,x
|
|
0050AF 1 9D 02 01 sta $0102,x
|
|
0050B2 1 CA dex
|
|
0050B3 1 10 F7 bpl L50AC
|
|
0050B5 1 8D 08 C0 sta ALTZPOFF
|
|
0050B8 1 AD 83 C0 lda $C083
|
|
0050BB 1 AD 83 C0 lda $C083
|
|
0050BE 1 A2 05 ldx #$05
|
|
0050C0 1 BD 9D 50 L50C0: lda L509D,x
|
|
0050C3 1 9D 00 D1 sta $D100,x
|
|
0050C6 1 CA dex
|
|
0050C7 1 10 F7 bpl L50C0
|
|
0050C9 1 8D 08 C0 sta ALTZPOFF
|
|
0050CC 1 AD 82 C0 lda $C082
|
|
0050CF 1 20 93 FE jsr LFE93
|
|
0050D2 1 20 89 FE jsr LFE89
|
|
0050D5 1 20 2F FB jsr LFB2F
|
|
0050D8 1 20 58 FC jsr LFC58
|
|
0050DB 1 8D 51 C0 sta $C051
|
|
0050DE 1 8D 54 C0 sta $C054
|
|
0050E1 1 8D 56 C0 sta $C056
|
|
0050E4 1 8D 52 C0 sta $C052
|
|
0050E7 1 8D 5F C0 sta $C05F
|
|
0050EA 1 8D 0E C0 sta $C00E
|
|
0050ED 1 8D 0C C0 sta $C00C
|
|
0050F0 1 8D 00 C0 sta $C000
|
|
0050F3 1 20 00 BF jsr MLI
|
|
0050F6 1 65 .byte $65
|
|
0050F7 1 A3 50 .addr L50A3
|
|
0050F9 1 AE 25 EC ldx $EC25
|
|
0050FC 1 D0 01 bne L50FF
|
|
0050FE 1 60 rts
|
|
0050FF 1
|
|
0050FF 1 CA L50FF: dex
|
|
005100 1 BD D1 E6 lda $E6D1,x
|
|
005103 1 D0 01 bne L5106
|
|
005105 1 60 rts
|
|
005106 1
|
|
005106 1 AD 25 EC L5106: lda $EC25
|
|
005109 1 8D 9F DE sta $DE9F
|
|
00510C 1 20 9A D0 jsr LD09A
|
|
00510F 1 A2 00 ldx #$00
|
|
005111 1 8A txa
|
|
005112 1 EC A0 DE L5112: cpx $DEA0
|
|
005115 1 F0 07 beq L511E
|
|
005117 1 9D A1 DE sta $DEA1,x
|
|
00511A 1 E8 inx
|
|
00511B 1 4C 12 51 jmp L5112
|
|
00511E 1
|
|
00511E 1 8D A0 DE L511E: sta $DEA0
|
|
005121 1 A9 00 lda #$00
|
|
005123 1 AE 25 EC ldx $EC25
|
|
005126 1 CA dex
|
|
005127 1 9D D1 E6 sta $E6D1,x
|
|
00512A 1 20 DF 52 jsr L52DF
|
|
00512D 1 AD 25 EC lda $EC25
|
|
005130 1 8D 12 D2 sta $D212
|
|
005133 1 20 05 45 jsr L4505
|
|
005136 1 20 8E 6E jsr L6E8E
|
|
005139 1 20 04 49 jsr L4904
|
|
00513C 1 A0 11 ldy #$11
|
|
00513E 1 A9 1D lda #$1D
|
|
005140 1 A2 D2 ldx #$D2
|
|
005142 1 20 00 D0 jsr LD000
|
|
005145 1 AD 25 EC lda $EC25
|
|
005148 1 20 5D 7D jsr L7D5D
|
|
00514B 1 8D EB 51 sta L51EB
|
|
00514E 1 8E EC 51 stx L51EC
|
|
005151 1 8C ED 51 sty L51ED
|
|
005154 1 AD 25 EC lda $EC25
|
|
005157 1 20 EF 86 jsr L86EF
|
|
00515A 1 85 06 sta L0006
|
|
00515C 1 86 07 stx $07
|
|
00515E 1 A0 1F ldy #$1F
|
|
005160 1 A9 00 lda #$00
|
|
005162 1 91 06 L5162: sta (L0006),y
|
|
005164 1 88 dey
|
|
005165 1 C0 1B cpy #$1B
|
|
005167 1 D0 F9 bne L5162
|
|
005169 1 A0 23 ldy #$23
|
|
00516B 1 A2 03 ldx #$03
|
|
00516D 1 BD EB 51 L516D: lda L51EB,x
|
|
005170 1 91 06 sta (L0006),y
|
|
005172 1 88 dey
|
|
005173 1 CA dex
|
|
005174 1 10 F7 bpl L516D
|
|
005176 1 AD 25 EC lda $EC25
|
|
005179 1 20 3A 76 jsr L763A
|
|
00517C 1 AD 25 EC lda $EC25
|
|
00517F 1 8D 12 D2 sta $D212
|
|
005182 1 20 F2 44 jsr L44F2
|
|
005185 1 20 52 6E jsr L6E52
|
|
005188 1 A9 00 lda #$00
|
|
00518A 1 8D EF 51 sta L51EF
|
|
00518D 1 AD EF 51 L518D: lda L51EF
|
|
005190 1 CD A0 DE cmp $DEA0
|
|
005193 1 F0 12 beq L51A7
|
|
005195 1 AA tax
|
|
005196 1 BD A1 DE lda $DEA1,x
|
|
005199 1 20 E3 86 jsr L86E3
|
|
00519C 1 A0 01 ldy #$01
|
|
00519E 1 20 40 D0 jsr LD040
|
|
0051A1 1 EE EF 51 inc L51EF
|
|
0051A4 1 4C 8D 51 jmp L518D
|
|
0051A7 1
|
|
0051A7 1 20 10 45 L51A7: jsr L4510
|
|
0051AA 1 20 6E 6E jsr L6E6E
|
|
0051AD 1 20 96 D0 jsr LD096
|
|
0051B0 1 20 B1 6D jsr L6DB1
|
|
0051B3 1 AD 20 DF lda $DF20
|
|
0051B6 1 F0 2B beq L51E3
|
|
0051B8 1 AD 21 DF lda $DF21
|
|
0051BB 1 F0 26 beq L51E3
|
|
0051BD 1 8D EF 51 sta L51EF
|
|
0051C0 1 AE EF 51 L51C0: ldx L51EF
|
|
0051C3 1 BD 21 DF lda $DF21,x
|
|
0051C6 1 8D 2F E2 sta $E22F
|
|
0051C9 1 20 15 89 jsr L8915
|
|
0051CC 1 20 8E 6E jsr L6E8E
|
|
0051CF 1 A0 02 ldy #$02
|
|
0051D1 1 A9 2F lda #$2F
|
|
0051D3 1 A2 E2 ldx #$E2
|
|
0051D5 1 20 40 D0 jsr LD040
|
|
0051D8 1 AD 2F E2 lda $E22F
|
|
0051DB 1 20 93 88 jsr L8893
|
|
0051DE 1 CE EF 51 dec L51EF
|
|
0051E1 1 D0 DD bne L51C0
|
|
0051E3 1 A9 00 L51E3: lda #$00
|
|
0051E5 1 8D 9F DE sta $DE9F
|
|
0051E8 1 4C 9A D0 jmp LD09A
|
|
0051EB 1
|
|
0051EB 1 00 L51EB: brk
|
|
0051EC 1 00 L51EC: brk
|
|
0051ED 1 00 L51ED: brk
|
|
0051EE 1 00 brk
|
|
0051EF 1 00 L51EF: brk
|
|
0051F0 1 AE 25 EC L51F0: ldx $EC25
|
|
0051F3 1 CA dex
|
|
0051F4 1 9D D1 E6 sta $E6D1,x
|
|
0051F7 1 AD 25 EC lda $EC25
|
|
0051FA 1 8D 9F DE sta $DE9F
|
|
0051FD 1 20 9A D0 jsr LD09A
|
|
005200 1 20 9C 7D jsr L7D9C
|
|
005203 1 20 96 D0 jsr LD096
|
|
005206 1 AD 25 EC lda $EC25
|
|
005209 1 8D 12 D2 sta $D212
|
|
00520C 1 20 05 45 jsr L4505
|
|
00520F 1 20 8E 6E jsr L6E8E
|
|
005212 1 20 04 49 jsr L4904
|
|
005215 1 A0 11 ldy #$11
|
|
005217 1 A9 1D lda #$1D
|
|
005219 1 A2 D2 ldx #$D2
|
|
00521B 1 20 00 D0 jsr LD000
|
|
00521E 1 AD 25 EC lda $EC25
|
|
005221 1 20 5D 7D jsr L7D5D
|
|
005224 1 8D 63 52 sta L5263
|
|
005227 1 8E 64 52 stx L5264
|
|
00522A 1 8C 65 52 sty L5265
|
|
00522D 1 AD 25 EC lda $EC25
|
|
005230 1 20 EF 86 jsr L86EF
|
|
005233 1 85 06 sta L0006
|
|
005235 1 86 07 stx $07
|
|
005237 1 A0 1F ldy #$1F
|
|
005239 1 A9 00 lda #$00
|
|
00523B 1 91 06 L523B: sta (L0006),y
|
|
00523D 1 88 dey
|
|
00523E 1 C0 1B cpy #$1B
|
|
005240 1 D0 F9 bne L523B
|
|
005242 1 A0 23 ldy #$23
|
|
005244 1 A2 03 ldx #$03
|
|
005246 1 BD 63 52 L5246: lda L5263,x
|
|
005249 1 91 06 sta (L0006),y
|
|
00524B 1 88 dey
|
|
00524C 1 CA dex
|
|
00524D 1 10 F7 bpl L5246
|
|
00524F 1 A9 80 lda #$80
|
|
005251 1 8D 52 41 sta L4152
|
|
005254 1 20 10 45 jsr L4510
|
|
005257 1 20 19 6C jsr L6C19
|
|
00525A 1 20 B1 6D jsr L6DB1
|
|
00525D 1 A9 00 lda #$00
|
|
00525F 1 8D 52 41 sta L4152
|
|
005262 1 60 rts
|
|
005263 1
|
|
005263 1 00 L5263: brk
|
|
005264 1 00 L5264: brk
|
|
005265 1 00 L5265: brk
|
|
005266 1 00 brk
|
|
005267 1 AE 25 EC ldx $EC25
|
|
00526A 1 D0 01 bne L526D
|
|
00526C 1 60 rts
|
|
00526D 1
|
|
00526D 1 CA L526D: dex
|
|
00526E 1 BD D1 E6 lda $E6D1,x
|
|
005271 1 C9 81 cmp #$81
|
|
005273 1 D0 01 bne L5276
|
|
005275 1 60 rts
|
|
005276 1
|
|
005276 1 C9 00 L5276: cmp #$00
|
|
005278 1 D0 03 bne L527D
|
|
00527A 1 20 02 53 jsr L5302
|
|
00527D 1 20 DF 52 L527D: jsr L52DF
|
|
005280 1 A9 81 lda #$81
|
|
005282 1 4C F0 51 jmp L51F0
|
|
005285 1
|
|
005285 1 AE 25 EC ldx $EC25
|
|
005288 1 D0 01 bne L528B
|
|
00528A 1 60 rts
|
|
00528B 1
|
|
00528B 1 CA L528B: dex
|
|
00528C 1 BD D1 E6 lda $E6D1,x
|
|
00528F 1 C9 82 cmp #$82
|
|
005291 1 D0 01 bne L5294
|
|
005293 1 60 rts
|
|
005294 1
|
|
005294 1 C9 00 L5294: cmp #$00
|
|
005296 1 D0 03 bne L529B
|
|
005298 1 20 02 53 jsr L5302
|
|
00529B 1 20 DF 52 L529B: jsr L52DF
|
|
00529E 1 A9 82 lda #$82
|
|
0052A0 1 4C F0 51 jmp L51F0
|
|
0052A3 1
|
|
0052A3 1 AE 25 EC ldx $EC25
|
|
0052A6 1 D0 01 bne L52A9
|
|
0052A8 1 60 rts
|
|
0052A9 1
|
|
0052A9 1 CA L52A9: dex
|
|
0052AA 1 BD D1 E6 lda $E6D1,x
|
|
0052AD 1 C9 83 cmp #$83
|
|
0052AF 1 D0 01 bne L52B2
|
|
0052B1 1 60 rts
|
|
0052B2 1
|
|
0052B2 1 C9 00 L52B2: cmp #$00
|
|
0052B4 1 D0 03 bne L52B9
|
|
0052B6 1 20 02 53 jsr L5302
|
|
0052B9 1 20 DF 52 L52B9: jsr L52DF
|
|
0052BC 1 A9 83 lda #$83
|
|
0052BE 1 4C F0 51 jmp L51F0
|
|
0052C1 1
|
|
0052C1 1 AE 25 EC ldx $EC25
|
|
0052C4 1 D0 01 bne L52C7
|
|
0052C6 1 60 rts
|
|
0052C7 1
|
|
0052C7 1 CA L52C7: dex
|
|
0052C8 1 BD D1 E6 lda $E6D1,x
|
|
0052CB 1 C9 84 cmp #$84
|
|
0052CD 1 D0 01 bne L52D0
|
|
0052CF 1 60 rts
|
|
0052D0 1
|
|
0052D0 1 C9 00 L52D0: cmp #$00
|
|
0052D2 1 D0 03 bne L52D7
|
|
0052D4 1 20 02 53 jsr L5302
|
|
0052D7 1 20 DF 52 L52D7: jsr L52DF
|
|
0052DA 1 A9 84 lda #$84
|
|
0052DC 1 4C F0 51 jmp L51F0
|
|
0052DF 1
|
|
0052DF 1 A9 00 L52DF: lda #$00
|
|
0052E1 1 8D 69 E2 sta $E269
|
|
0052E4 1 A0 36 ldy #$36
|
|
0052E6 1 A9 67 lda #$67
|
|
0052E8 1 A2 E2 ldx #$E2
|
|
0052EA 1 20 00 D0 jsr LD000
|
|
0052ED 1 AD 5B E2 lda $E25B
|
|
0052F0 1 8D 68 E2 sta $E268
|
|
0052F3 1 A9 01 lda #$01
|
|
0052F5 1 8D 69 E2 sta $E269
|
|
0052F8 1 A0 36 ldy #$36
|
|
0052FA 1 A9 67 lda #$67
|
|
0052FC 1 A2 E2 ldx #$E2
|
|
0052FE 1 20 00 D0 jsr LD000
|
|
005301 1 60 rts
|
|
005302 1
|
|
005302 1 A0 07 L5302: ldy #$07
|
|
005304 1 A9 25 lda #$25
|
|
005306 1 A2 EC ldx #$EC
|
|
005308 1 20 40 D0 jsr LD040
|
|
00530B 1 AD 25 EC lda $EC25
|
|
00530E 1 8D 9F DE sta $DE9F
|
|
005311 1 20 9A D0 jsr LD09A
|
|
005314 1 AD 9E DD lda $DD9E
|
|
005317 1 38 sec
|
|
005318 1 ED A0 DE sbc $DEA0
|
|
00531B 1 8D 9E DD sta $DD9E
|
|
00531E 1 A2 00 ldx #$00
|
|
005320 1 EC A0 DE L5320: cpx $DEA0
|
|
005323 1 F0 0F beq L5334
|
|
005325 1 BD A1 DE lda $DEA1,x
|
|
005328 1 20 82 D0 jsr LD082
|
|
00532B 1 A9 00 lda #$00
|
|
00532D 1 9D A1 DE sta $DEA1,x
|
|
005330 1 E8 inx
|
|
005331 1 4C 20 53 jmp L5320
|
|
005334 1
|
|
005334 1 20 96 D0 L5334: jsr LD096
|
|
005337 1 A9 00 lda #$00
|
|
005339 1 8D 9F DE sta $DE9F
|
|
00533C 1 4C 9A D0 jmp LD09A
|
|
00533F 1
|
|
00533F 1 00 L533F: brk
|
|
005340 1 A9 01 lda #$01
|
|
005342 1 20 81 8E jsr L8E81
|
|
005345 1 30 13 bmi L535A
|
|
005347 1 A9 04 lda #$04
|
|
005349 1 20 00 08 jsr L0800
|
|
00534C 1 D0 09 bne L5357
|
|
00534E 1 8E 3F 53 stx L533F
|
|
005351 1 20 23 45 jsr L4523
|
|
005354 1 20 A4 59 jsr L59A4
|
|
005357 1 4C 23 45 L5357: jmp L4523
|
|
00535A 1
|
|
00535A 1 60 L535A: rts
|
|
00535B 1
|
|
00535B 1 A9 01 lda #$01
|
|
00535D 1 20 81 8E jsr L8E81
|
|
005360 1 30 10 bmi L5372
|
|
005362 1 A9 05 lda #$05
|
|
005364 1 20 00 08 jsr L0800
|
|
005367 1 D0 09 bne L5372
|
|
005369 1 8E 3F 53 stx L533F
|
|
00536C 1 20 23 45 jsr L4523
|
|
00536F 1 20 A4 59 jsr L59A4
|
|
005372 1 4C 23 45 L5372: jmp L4523
|
|
005375 1
|
|
005375 1 20 09 8F jsr L8F09
|
|
005378 1 4C 23 45 jmp L4523
|
|
00537B 1
|
|
00537B 1 20 27 8F jsr L8F27
|
|
00537E 1 4C 23 45 jmp L4523
|
|
005381 1
|
|
005381 1 20 0F 8F jsr L8F0F
|
|
005384 1 4C 23 45 jmp L4523
|
|
005387 1
|
|
005387 1 20 0C 8F jsr L8F0C
|
|
00538A 1 4C 23 45 jmp L4523
|
|
00538D 1
|
|
00538D 1 20 12 8F jsr L8F12
|
|
005390 1 48 pha
|
|
005391 1 20 23 45 jsr L4523
|
|
005394 1 68 pla
|
|
005395 1 F0 01 beq L5398
|
|
005397 1 60 rts
|
|
005398 1
|
|
005398 1 AD 20 DF L5398: lda $DF20
|
|
00539B 1 D0 18 bne L53B5
|
|
00539D 1 A2 00 ldx #$00
|
|
00539F 1 A0 00 ldy #$00
|
|
0053A1 1 BD 22 DF L53A1: lda $DF22,x
|
|
0053A4 1 C9 01 cmp #$01
|
|
0053A6 1 F0 04 beq L53AC
|
|
0053A8 1 99 28 54 sta L5428,y
|
|
0053AB 1 C8 iny
|
|
0053AC 1 E8 L53AC: inx
|
|
0053AD 1 EC 22 DF cpx $DF22
|
|
0053B0 1 D0 EF bne L53A1
|
|
0053B2 1 8C 27 54 sty L5427
|
|
0053B5 1 A9 FF L53B5: lda #$FF
|
|
0053B7 1 8D 26 54 sta L5426
|
|
0053BA 1 EE 26 54 L53BA: inc L5426
|
|
0053BD 1 AD 26 54 lda L5426
|
|
0053C0 1 CD 21 DF cmp $DF21
|
|
0053C3 1 D0 0B bne L53D0
|
|
0053C5 1 AD 20 DF lda $DF20
|
|
0053C8 1 D0 03 bne L53CD
|
|
0053CA 1 4C 0E 54 jmp L540E
|
|
0053CD 1
|
|
0053CD 1 4C 78 5E L53CD: jmp L5E78
|
|
0053D0 1
|
|
0053D0 1 AA L53D0: tax
|
|
0053D1 1 BD 22 DF lda $DF22,x
|
|
0053D4 1 20 31 54 jsr L5431
|
|
0053D7 1 30 E1 bmi L53BA
|
|
0053D9 1 20 FB 86 jsr L86FB
|
|
0053DC 1 85 06 sta L0006
|
|
0053DE 1 86 07 stx $07
|
|
0053E0 1 A0 00 ldy #$00
|
|
0053E2 1 B1 06 lda (L0006),y
|
|
0053E4 1 A8 tay
|
|
0053E5 1 A5 06 lda L0006
|
|
0053E7 1 20 B7 6F jsr L6FB7
|
|
0053EA 1 AD 4B 70 lda L704B
|
|
0053ED 1 F0 CB beq L53BA
|
|
0053EF 1 CE 4B 70 L53EF: dec L704B
|
|
0053F2 1 AE 4B 70 ldx L704B
|
|
0053F5 1 BD 4C 70 lda L704C,x
|
|
0053F8 1 CD 25 EC cmp $EC25
|
|
0053FB 1 F0 06 beq L5403
|
|
0053FD 1 8D 0E D2 sta $D20E
|
|
005400 1 20 59 44 jsr L4459
|
|
005403 1 20 DC 61 L5403: jsr L61DC
|
|
005406 1 AD 4B 70 lda L704B
|
|
005409 1 D0 E4 bne L53EF
|
|
00540B 1 4C BA 53 jmp L53BA
|
|
00540E 1
|
|
00540E 1 AE 27 54 L540E: ldx L5427
|
|
005411 1 BD 28 54 L5411: lda L5428,x
|
|
005414 1 8D 3F 53 sta L533F
|
|
005417 1 20 A8 59 jsr L59A8
|
|
00541A 1 AE 27 54 ldx L5427
|
|
00541D 1 CE 27 54 dec L5427
|
|
005420 1 CA dex
|
|
005421 1 10 EE bpl L5411
|
|
005423 1 4C 23 45 jmp L4523
|
|
005426 1
|
|
005426 1 00 L5426: brk
|
|
005427 1 00 L5427: brk
|
|
005428 1 00 L5428: brk
|
|
005429 1 00 brk
|
|
00542A 1 00 brk
|
|
00542B 1 00 brk
|
|
00542C 1 00 brk
|
|
00542D 1 00 brk
|
|
00542E 1 00 brk
|
|
00542F 1 00 brk
|
|
005430 1 00 brk
|
|
005431 1 A2 07 L5431: ldx #$07
|
|
005433 1 DD 26 EC L5433: cmp $EC26,x
|
|
005436 1 F0 06 beq L543E
|
|
005438 1 CA dex
|
|
005439 1 10 F8 bpl L5433
|
|
00543B 1 A9 FF lda #$FF
|
|
00543D 1 60 rts
|
|
00543E 1
|
|
00543E 1 E8 L543E: inx
|
|
00543F 1 8A txa
|
|
005440 1 60 rts
|
|
005441 1
|
|
005441 1 4C 4D 54 L5441: jmp L544D
|
|
005444 1
|
|
005444 1 00 L5444: brk
|
|
005445 1 00 L5445: brk
|
|
005446 1 00 L5446: brk
|
|
005447 1 00 L5447: brk
|
|
005448 1 00 L5448: brk
|
|
005449 1 00 L5449: brk
|
|
00544A 1 00 L544A: brk
|
|
00544B 1 00 brk
|
|
00544C 1 00 brk
|
|
00544D 1 A9 00 L544D: lda #$00
|
|
00544F 1 8D 00 18 sta $1800
|
|
005452 1 AD .byte $AD
|
|
005453 1 25 EC L5453: and $EC
|
|
005455 1 D0 03 bne L545A
|
|
005457 1 4C C5 54 jmp L54C5
|
|
00545A 1
|
|
00545A 1 AA L545A: tax
|
|
00545B 1 CA dex
|
|
00545C 1 BD D1 E6 lda $E6D1,x
|
|
00545F 1 10 03 bpl L5464
|
|
005461 1 4C C5 54 jmp L54C5
|
|
005464 1
|
|
005464 1 AD 25 EC L5464: lda $EC25
|
|
005467 1 8D 9F DE sta $DE9F
|
|
00546A 1 20 9A D0 jsr LD09A
|
|
00546D 1 AD 25 EC lda $EC25
|
|
005470 1 20 EF 86 jsr L86EF
|
|
005473 1 85 06 sta L0006
|
|
005475 1 86 07 stx $07
|
|
005477 1 A0 1C ldy #$1C
|
|
005479 1 B1 06 L5479: lda (L0006),y
|
|
00547B 1 99 14 E2 sta $E214,y
|
|
00547E 1 C8 iny
|
|
00547F 1 C0 24 cpy #$24
|
|
005481 1 D0 F6 bne L5479
|
|
005483 1 A2 00 ldx #$00
|
|
005485 1 EC A0 DE L5485: cpx $DEA0
|
|
005488 1 F0 33 beq L54BD
|
|
00548A 1 8A txa
|
|
00548B 1 48 pha
|
|
00548C 1 BD A1 DE lda $DEA1,x
|
|
00548F 1 8D 2F E2 sta $E22F
|
|
005492 1 20 15 89 jsr L8915
|
|
005495 1 A0 0D ldy #$0D
|
|
005497 1 A9 2F lda #$2F
|
|
005499 1 A2 E2 ldx #$E2
|
|
00549B 1 20 40 D0 jsr LD040
|
|
00549E 1 48 pha
|
|
00549F 1 AD 2F E2 lda $E22F
|
|
0054A2 1 20 93 88 jsr L8893
|
|
0054A5 1 68 pla
|
|
0054A6 1 F0 0F beq L54B7
|
|
0054A8 1 68 pla
|
|
0054A9 1 48 pha
|
|
0054AA 1 AA tax
|
|
0054AB 1 BD A1 DE lda $DEA1,x
|
|
0054AE 1 AE 00 18 ldx $1800
|
|
0054B1 1 9D 01 18 sta $1801,x
|
|
0054B4 1 EE 00 18 inc $1800
|
|
0054B7 1 68 L54B7: pla
|
|
0054B8 1 AA tax
|
|
0054B9 1 E8 inx
|
|
0054BA 1 4C 85 54 jmp L5485
|
|
0054BD 1
|
|
0054BD 1 A9 00 L54BD: lda #$00
|
|
0054BF 1 8D 9F DE sta $DE9F
|
|
0054C2 1 20 9A D0 jsr LD09A
|
|
0054C5 1 AE 00 18 L54C5: ldx $1800
|
|
0054C8 1 A0 00 ldy #$00
|
|
0054CA 1 B9 A1 DE L54CA: lda $DEA1,y
|
|
0054CD 1 9D 01 18 sta $1801,x
|
|
0054D0 1 C8 iny
|
|
0054D1 1 E8 inx
|
|
0054D2 1 CC A0 DE cpy $DEA0
|
|
0054D5 1 D0 F3 bne L54CA
|
|
0054D7 1 AD 00 18 lda $1800
|
|
0054DA 1 18 clc
|
|
0054DB 1 6D A0 DE adc $DEA0
|
|
0054DE 1 8D 00 18 sta $1800
|
|
0054E1 1 A9 00 lda #$00
|
|
0054E3 1 8D 4A 54 sta L544A
|
|
0054E6 1 A9 FF lda #$FF
|
|
0054E8 1 A2 03 ldx #$03
|
|
0054EA 1 9D 44 54 L54EA: sta L5444,x
|
|
0054ED 1 CA dex
|
|
0054EE 1 10 FA bpl L54EA
|
|
0054F0 1 AE 4A 54 L54F0: ldx L544A
|
|
0054F3 1 BD 01 18 L54F3: lda $1801,x
|
|
0054F6 1 0A asl a
|
|
0054F7 1 A8 tay
|
|
0054F8 1 B9 9F DD lda $DD9F,y
|
|
0054FB 1 85 06 sta L0006
|
|
0054FD 1 B9 A0 DD lda $DDA0,y
|
|
005500 1 85 07 sta $07
|
|
005502 1 A0 06 ldy #$06
|
|
005504 1 B1 06 lda (L0006),y
|
|
005506 1 CD 47 54 cmp L5447
|
|
005509 1 F0 05 beq L5510
|
|
00550B 1 90 25 bcc L5532
|
|
00550D 1 4C 47 55 jmp L5547
|
|
005510 1
|
|
005510 1 88 L5510: dey
|
|
005511 1 B1 06 lda (L0006),y
|
|
005513 1 CD 46 54 cmp L5446
|
|
005516 1 F0 05 beq L551D
|
|
005518 1 90 18 bcc L5532
|
|
00551A 1 4C 47 55 jmp L5547
|
|
00551D 1
|
|
00551D 1 88 L551D: dey
|
|
00551E 1 B1 06 lda (L0006),y
|
|
005520 1 CD 45 54 cmp L5445
|
|
005523 1 F0 05 beq L552A
|
|
005525 1 90 0B bcc L5532
|
|
005527 1 4C 47 55 jmp L5547
|
|
00552A 1
|
|
00552A 1 88 L552A: dey
|
|
00552B 1 B1 06 lda (L0006),y
|
|
00552D 1 CD 44 54 cmp L5444
|
|
005530 1 B0 15 bcs L5547
|
|
005532 1 BD 01 18 L5532: lda $1801,x
|
|
005535 1 8E 49 54 stx L5449
|
|
005538 1 8D 48 54 sta L5448
|
|
00553B 1 A0 03 ldy #$03
|
|
00553D 1 B1 06 L553D: lda (L0006),y
|
|
00553F 1 99 41 54 sta L5441,y
|
|
005542 1 C8 iny
|
|
005543 1 C0 07 cpy #$07
|
|
005545 1 D0 F6 bne L553D
|
|
005547 1 E8 L5547: inx
|
|
005548 1 EC 00 18 cpx $1800
|
|
00554B 1 D0 A6 bne L54F3
|
|
00554D 1 AE 4A 54 ldx L544A
|
|
005550 1 BD 01 18 lda $1801,x
|
|
005553 1 A8 tay
|
|
005554 1 AD 48 54 lda L5448
|
|
005557 1 9D 01 18 sta $1801,x
|
|
00555A 1 AE 49 54 ldx L5449
|
|
00555D 1 98 tya
|
|
00555E 1 9D 01 18 sta $1801,x
|
|
005561 1 A9 FF lda #$FF
|
|
005563 1 A2 03 ldx #$03
|
|
005565 1 9D 44 54 L5565: sta L5444,x
|
|
005568 1 CA dex
|
|
005569 1 10 FA bpl L5565
|
|
00556B 1 EE 4A 54 inc L544A
|
|
00556E 1 AE 4A 54 ldx L544A
|
|
005571 1 EC 00 18 cpx $1800
|
|
005574 1 F0 03 beq L5579
|
|
005576 1 4C F0 54 jmp L54F0
|
|
005579 1
|
|
005579 1 A9 00 L5579: lda #$00
|
|
00557B 1 8D 4A 54 sta L544A
|
|
00557E 1 20 2B 6D jsr L6D2B
|
|
005581 1 20 F0 55 L5581: jsr L55F0
|
|
005584 1 20 E6 48 L5584: jsr L48E6
|
|
005587 1 AD 08 D2 lda $D208
|
|
00558A 1 C9 03 cmp #$03
|
|
00558C 1 F0 07 beq L5595
|
|
00558E 1 C9 01 cmp #$01
|
|
005590 1 D0 F2 bne L5584
|
|
005592 1 4C D1 55 jmp L55D1
|
|
005595 1
|
|
005595 1 AD 09 D2 L5595: lda $D209
|
|
005598 1 29 7F and #$7F
|
|
00559A 1 C9 0D cmp #$0D
|
|
00559C 1 F0 33 beq L55D1
|
|
00559E 1 C9 1B cmp #$1B
|
|
0055A0 1 F0 2F beq L55D1
|
|
0055A2 1 C9 08 cmp #$08
|
|
0055A4 1 F0 18 beq L55BE
|
|
0055A6 1 C9 15 cmp #$15
|
|
0055A8 1 D0 DA bne L5584
|
|
0055AA 1 AE 4A 54 ldx L544A
|
|
0055AD 1 E8 inx
|
|
0055AE 1 EC 00 18 cpx $1800
|
|
0055B1 1 D0 02 bne L55B5
|
|
0055B3 1 A2 00 ldx #$00
|
|
0055B5 1 8E 4A 54 L55B5: stx L544A
|
|
0055B8 1 20 2C 56 jsr L562C
|
|
0055BB 1 4C 81 55 jmp L5581
|
|
0055BE 1
|
|
0055BE 1 AE 4A 54 L55BE: ldx L544A
|
|
0055C1 1 CA dex
|
|
0055C2 1 10 04 bpl L55C8
|
|
0055C4 1 AE 00 18 ldx $1800
|
|
0055C7 1 CA dex
|
|
0055C8 1 8E 4A 54 L55C8: stx L544A
|
|
0055CB 1 20 2C 56 jsr L562C
|
|
0055CE 1 4C 81 55 jmp L5581
|
|
0055D1 1
|
|
0055D1 1 AE 4A 54 L55D1: ldx L544A
|
|
0055D4 1 BD 01 18 lda $1801,x
|
|
0055D7 1 8D 22 DF sta $DF22
|
|
0055DA 1 20 E3 86 jsr L86E3
|
|
0055DD 1 85 06 sta L0006
|
|
0055DF 1 86 07 stx $07
|
|
0055E1 1 A0 02 ldy #$02
|
|
0055E3 1 B1 06 lda (L0006),y
|
|
0055E5 1 29 0F and #$0F
|
|
0055E7 1 8D 20 DF sta $DF20
|
|
0055EA 1 A9 01 lda #$01
|
|
0055EC 1 8D 21 DF sta $DF21
|
|
0055EF 1 60 rts
|
|
0055F0 1
|
|
0055F0 1 AE 4A 54 L55F0: ldx L544A
|
|
0055F3 1 BD 01 18 lda $1801,x
|
|
0055F6 1 8D 2F E2 sta $E22F
|
|
0055F9 1 20 E3 86 jsr L86E3
|
|
0055FC 1 85 06 sta L0006
|
|
0055FE 1 86 07 stx $07
|
|
005600 1 A0 02 ldy #$02
|
|
005602 1 B1 06 lda (L0006),y
|
|
005604 1 29 0F and #$0F
|
|
005606 1 8D 12 D2 sta $D212
|
|
005609 1 F0 09 beq L5614
|
|
00560B 1 20 F9 56 jsr L56F9
|
|
00560E 1 AD 2F E2 lda $E22F
|
|
005611 1 20 15 89 jsr L8915
|
|
005614 1 A0 02 L5614: ldy #$02
|
|
005616 1 A9 2F lda #$2F
|
|
005618 1 A2 E2 ldx #$E2
|
|
00561A 1 20 40 D0 jsr LD040
|
|
00561D 1 AD 12 D2 lda $D212
|
|
005620 1 F0 09 beq L562B
|
|
005622 1 AD 2F E2 lda $E22F
|
|
005625 1 20 93 88 jsr L8893
|
|
005628 1 20 10 45 jsr L4510
|
|
00562B 1 60 L562B: rts
|
|
00562C 1
|
|
00562C 1 AD 2F E2 L562C: lda $E22F
|
|
00562F 1 20 E3 86 jsr L86E3
|
|
005632 1 85 06 sta L0006
|
|
005634 1 86 07 stx $07
|
|
005636 1 A0 02 ldy #$02
|
|
005638 1 B1 06 lda (L0006),y
|
|
00563A 1 29 0F and #$0F
|
|
00563C 1 8D 12 D2 sta $D212
|
|
00563F 1 F0 09 beq L564A
|
|
005641 1 20 F9 56 jsr L56F9
|
|
005644 1 AD 2F E2 lda $E22F
|
|
005647 1 20 15 89 jsr L8915
|
|
00564A 1 A0 0B L564A: ldy #$0B
|
|
00564C 1 A9 2F lda #$2F
|
|
00564E 1 A2 E2 ldx #$E2
|
|
005650 1 20 40 D0 jsr LD040
|
|
005653 1 AD 12 D2 lda $D212
|
|
005656 1 F0 09 beq L5661
|
|
005658 1 AD 2F E2 lda $E22F
|
|
00565B 1 20 93 88 jsr L8893
|
|
00565E 1 20 10 45 jsr L4510
|
|
005661 1 60 L5661: rts
|
|
005662 1
|
|
005662 1 AD 21 DF lda $DF21
|
|
005665 1 F0 03 beq L566A
|
|
005667 1 20 2B 6D jsr L6D2B
|
|
00566A 1 AE 25 EC L566A: ldx $EC25
|
|
00566D 1 F0 07 beq L5676
|
|
00566F 1 CA dex
|
|
005670 1 BD D1 E6 lda $E6D1,x
|
|
005673 1 10 01 bpl L5676
|
|
005675 1 60 rts
|
|
005676 1
|
|
005676 1 AD 25 EC L5676: lda $EC25
|
|
005679 1 8D 9F DE sta $DE9F
|
|
00567C 1 20 9A D0 jsr LD09A
|
|
00567F 1 AD A0 DE lda $DEA0
|
|
005682 1 D0 03 bne L5687
|
|
005684 1 4C F0 56 jmp L56F0
|
|
005687 1
|
|
005687 1 AE A0 DE L5687: ldx $DEA0
|
|
00568A 1 CA dex
|
|
00568B 1 BD A1 DE L568B: lda $DEA1,x
|
|
00568E 1 9D 22 DF sta $DF22,x
|
|
005691 1 CA dex
|
|
005692 1 10 F7 bpl L568B
|
|
005694 1 AD A0 DE lda $DEA0
|
|
005697 1 8D 21 DF sta $DF21
|
|
00569A 1 AD 25 EC lda $EC25
|
|
00569D 1 8D 20 DF sta $DF20
|
|
0056A0 1 AD 20 DF lda $DF20
|
|
0056A3 1 8D 2C E2 sta $E22C
|
|
0056A6 1 F0 03 beq L56AB
|
|
0056A8 1 20 F9 56 jsr L56F9
|
|
0056AB 1 AD 21 DF L56AB: lda $DF21
|
|
0056AE 1 8D F8 56 sta L56F8
|
|
0056B1 1 CE F8 56 dec L56F8
|
|
0056B4 1 AE F8 56 L56B4: ldx L56F8
|
|
0056B7 1 BD 22 DF lda $DF22,x
|
|
0056BA 1 8D 2B E2 sta $E22B
|
|
0056BD 1 20 E3 86 jsr L86E3
|
|
0056C0 1 85 06 sta L0006
|
|
0056C2 1 86 07 stx $07
|
|
0056C4 1 AD 2C E2 lda $E22C
|
|
0056C7 1 F0 06 beq L56CF
|
|
0056C9 1 AD 2B E2 lda $E22B
|
|
0056CC 1 20 15 89 jsr L8915
|
|
0056CF 1 A0 02 L56CF: ldy #$02
|
|
0056D1 1 A9 2B lda #$2B
|
|
0056D3 1 A2 E2 ldx #$E2
|
|
0056D5 1 20 40 D0 jsr LD040
|
|
0056D8 1 AD 2C E2 lda $E22C
|
|
0056DB 1 F0 06 beq L56E3
|
|
0056DD 1 AD 2B E2 lda $E22B
|
|
0056E0 1 20 93 88 jsr L8893
|
|
0056E3 1 CE F8 56 L56E3: dec L56F8
|
|
0056E6 1 10 CC bpl L56B4
|
|
0056E8 1 AD 20 DF lda $DF20
|
|
0056EB 1 F0 03 beq L56F0
|
|
0056ED 1 20 10 45 jsr L4510
|
|
0056F0 1 A9 00 L56F0: lda #$00
|
|
0056F2 1 8D 9F DE sta $DE9F
|
|
0056F5 1 4C 9A D0 jmp LD09A
|
|
0056F8 1
|
|
0056F8 1 00 L56F8: brk
|
|
0056F9 1 8D 12 D2 L56F9: sta $D212
|
|
0056FC 1 20 05 45 jsr L4505
|
|
0056FF 1 4C 8E 6E jmp L6E8E
|
|
005702 1
|
|
005702 1 AD 25 EC L5702: lda $EC25
|
|
005705 1 D0 01 bne L5708
|
|
005707 1 60 rts
|
|
005708 1
|
|
005708 1 8D 00 08 L5708: sta L0800
|
|
00570B 1 A0 01 ldy #$01
|
|
00570D 1 A2 00 ldx #$00
|
|
00570F 1 BD 26 EC L570F: lda $EC26,x
|
|
005712 1 F0 0C beq L5720
|
|
005714 1 E8 inx
|
|
005715 1 EC 25 EC cpx $EC25
|
|
005718 1 F0 07 beq L5721
|
|
00571A 1 8A txa
|
|
00571B 1 CA dex
|
|
00571C 1 99 00 08 sta L0800,y
|
|
00571F 1 C8 iny
|
|
005720 1 E8 L5720: inx
|
|
005721 1 E0 08 L5721: cpx #$08
|
|
005723 1 D0 EA bne L570F
|
|
005725 1 8C 8D 57 sty L578D
|
|
005728 1 C0 01 cpy #$01
|
|
00572A 1 D0 01 bne L572D
|
|
00572C 1 60 rts
|
|
00572D 1
|
|
00572D 1 A9 00 L572D: lda #$00
|
|
00572F 1 8D 8C 57 sta L578C
|
|
005732 1 20 E6 48 L5732: jsr L48E6
|
|
005735 1 AD 08 D2 lda $D208
|
|
005738 1 C9 03 cmp #$03
|
|
00573A 1 F0 07 beq L5743
|
|
00573C 1 C9 01 cmp #$01
|
|
00573E 1 D0 F2 bne L5732
|
|
005740 1 4C 8B 57 jmp L578B
|
|
005743 1
|
|
005743 1 AD 09 D2 L5743: lda $D209
|
|
005746 1 29 7F and #$7F
|
|
005748 1 C9 0D cmp #$0D
|
|
00574A 1 F0 3F beq L578B
|
|
00574C 1 C9 1B cmp #$1B
|
|
00574E 1 F0 3B beq L578B
|
|
005750 1 C9 08 cmp #$08
|
|
005752 1 F0 1E beq L5772
|
|
005754 1 C9 15 cmp #$15
|
|
005756 1 D0 DA bne L5732
|
|
005758 1 AE 8C 57 ldx L578C
|
|
00575B 1 E8 inx
|
|
00575C 1 EC 8D 57 cpx L578D
|
|
00575F 1 D0 02 bne L5763
|
|
005761 1 A2 00 ldx #$00
|
|
005763 1 8E 8C 57 L5763: stx L578C
|
|
005766 1 BD 00 08 lda L0800,x
|
|
005769 1 8D 0E D2 sta $D20E
|
|
00576C 1 20 59 44 jsr L4459
|
|
00576F 1 4C 32 57 jmp L5732
|
|
005772 1
|
|
005772 1 AE 8C 57 L5772: ldx L578C
|
|
005775 1 CA dex
|
|
005776 1 10 04 bpl L577C
|
|
005778 1 AE 8D 57 ldx L578D
|
|
00577B 1 CA dex
|
|
00577C 1 8E 8C 57 L577C: stx L578C
|
|
00577F 1 BD 00 08 lda L0800,x
|
|
005782 1 8D 0E D2 sta $D20E
|
|
005785 1 20 59 44 jsr L4459
|
|
005788 1 4C 32 57 jmp L5732
|
|
00578B 1
|
|
00578B 1 60 L578B: rts
|
|
00578C 1
|
|
00578C 1 00 L578C: brk
|
|
00578D 1 00 L578D: brk
|
|
00578E 1 A0 22 L578E: ldy #$22
|
|
005790 1 A9 00 lda #$00
|
|
005792 1 A2 00 ldx #$00
|
|
005794 1 20 00 D0 jsr LD000
|
|
005797 1 4C 9B 61 jmp L619B
|
|
00579A 1
|
|
00579A 1 A0 22 L579A: ldy #$22
|
|
00579C 1 A9 00 lda #$00
|
|
00579E 1 A2 00 ldx #$00
|
|
0057A0 1 20 00 D0 jsr LD000
|
|
0057A3 1 4C DB 60 jmp L60DB
|
|
0057A6 1
|
|
0057A6 1 20 L57A6: .byte $20
|
|
0057A7 1 03 .byte $03
|
|
0057A8 1 58 L57A8: cli
|
|
0057A9 1 20 E6 48 L57A9: jsr L48E6
|
|
0057AC 1 AD 08 D2 lda $D208
|
|
0057AF 1 C9 01 cmp #$01
|
|
0057B1 1 F0 0F beq L57C2
|
|
0057B3 1 C9 03 cmp #$03
|
|
0057B5 1 D0 F2 bne L57A9
|
|
0057B7 1 AD 09 D2 lda $D209
|
|
0057BA 1 C9 0D cmp #$0D
|
|
0057BC 1 F0 04 beq L57C2
|
|
0057BE 1 C9 1B cmp #$1B
|
|
0057C0 1 D0 09 bne L57CB
|
|
0057C2 1 A9 00 L57C2: lda #$00
|
|
0057C4 1 8D 9F DE sta $DE9F
|
|
0057C7 1 20 9A D0 jsr LD09A
|
|
0057CA 1 60 rts
|
|
0057CB 1
|
|
0057CB 1 2C 5D 58 L57CB: bit L585D
|
|
0057CE 1 30 03 bmi L57D3
|
|
0057D0 1 4C E7 57 jmp L57E7
|
|
0057D3 1
|
|
0057D3 1 C9 15 L57D3: cmp #$15
|
|
0057D5 1 D0 06 bne L57DD
|
|
0057D7 1 20 2F 58 jsr L582F
|
|
0057DA 1 4C A9 57 jmp L57A9
|
|
0057DD 1
|
|
0057DD 1 C9 08 L57DD: cmp #$08
|
|
0057DF 1 D0 06 bne L57E7
|
|
0057E1 1 20 3C 58 jsr L583C
|
|
0057E4 1 4C A9 57 jmp L57A9
|
|
0057E7 1
|
|
0057E7 1 2C 5E 58 L57E7: bit L585E
|
|
0057EA 1 30 03 bmi L57EF
|
|
0057EC 1 4C A9 57 jmp L57A9
|
|
0057EF 1
|
|
0057EF 1 C9 0A L57EF: cmp #$0A
|
|
0057F1 1 D0 06 bne L57F9
|
|
0057F3 1 20 46 58 jsr L5846
|
|
0057F6 1 4C A9 57 jmp L57A9
|
|
0057F9 1
|
|
0057F9 1 C9 0B L57F9: cmp #$0B
|
|
0057FB 1 D0 AC bne L57A9
|
|
0057FD 1 20 53 58 jsr L5853
|
|
005800 1 4C A9 57 jmp L57A9
|
|
005803 1
|
|
005803 1 AD 25 EC L5803: lda $EC25
|
|
005806 1 8D 9F DE sta $DE9F
|
|
005809 1 20 9A D0 jsr LD09A
|
|
00580C 1 AE 25 EC ldx $EC25
|
|
00580F 1 CA dex
|
|
005810 1 BD D1 E6 lda $E6D1,x
|
|
005813 1 8D 1B 5B sta L5B1B
|
|
005816 1 20 C3 58 jsr L58C3
|
|
005819 1 8D 5F 58 sta L585F
|
|
00581C 1 8E 60 58 stx L5860
|
|
00581F 1 8C 5D 58 sty L585D
|
|
005822 1 20 E2 58 jsr L58E2
|
|
005825 1 8D 61 58 sta L5861
|
|
005828 1 8E 62 58 stx L5862
|
|
00582B 1 8C 5E 58 sty L585E
|
|
00582E 1 60 rts
|
|
00582F 1
|
|
00582F 1 AD 5F 58 L582F: lda L585F
|
|
005832 1 AE 60 58 ldx L5860
|
|
005835 1 20 63 58 jsr L5863
|
|
005838 1 8D 5F 58 sta L585F
|
|
00583B 1 60 rts
|
|
00583C 1
|
|
00583C 1 AD 5F 58 L583C: lda L585F
|
|
00583F 1 20 7E 58 jsr L587E
|
|
005842 1 8D 5F 58 sta L585F
|
|
005845 1 60 rts
|
|
005846 1
|
|
005846 1 AD 61 58 L5846: lda L5861
|
|
005849 1 AE 62 58 ldx L5862
|
|
00584C 1 20 93 58 jsr L5893
|
|
00584F 1 8D 61 58 sta L5861
|
|
005852 1 60 rts
|
|
005853 1
|
|
005853 1 AD 61 58 L5853: lda L5861
|
|
005856 1 20 AE 58 jsr L58AE
|
|
005859 1 8D 61 58 sta L5861
|
|
00585C 1 60 rts
|
|
00585D 1
|
|
00585D 1 00 L585D: brk
|
|
00585E 1 00 L585E: brk
|
|
00585F 1 00 L585F: brk
|
|
005860 1 00 L5860: brk
|
|
005861 1 00 L5861: brk
|
|
005862 1 00 L5862: brk
|
|
005863 1 8E 7D 58 L5863: stx L587D
|
|
005866 1 CD 7D 58 cmp L587D
|
|
005869 1 F0 11 beq L587C
|
|
00586B 1 8D 0D D2 sta $D20D
|
|
00586E 1 EE 0D D2 inc $D20D
|
|
005871 1 A9 02 lda #$02
|
|
005873 1 8D 08 D2 sta $D208
|
|
005876 1 20 54 5C jsr L5C54
|
|
005879 1 AD 0D D2 lda $D20D
|
|
00587C 1 60 L587C: rts
|
|
00587D 1
|
|
00587D 1 00 L587D: brk
|
|
00587E 1 F0 11 L587E: beq L5891
|
|
005880 1 8D 0D D2 sta $D20D
|
|
005883 1 CE 0D D2 dec $D20D
|
|
005886 1 A9 02 lda #$02
|
|
005888 1 8D 08 D2 sta $D208
|
|
00588B 1 20 54 5C jsr L5C54
|
|
00588E 1 AD 0D D2 lda $D20D
|
|
005891 1 60 L5891: rts
|
|
005892 1
|
|
005892 1 00 brk
|
|
005893 1 8E AD 58 L5893: stx L58AD
|
|
005896 1 CD AD 58 cmp L58AD
|
|
005899 1 F0 11 beq L58AC
|
|
00589B 1 8D 0D D2 sta $D20D
|
|
00589E 1 EE 0D D2 inc $D20D
|
|
0058A1 1 A9 01 lda #$01
|
|
0058A3 1 8D 08 D2 sta $D208
|
|
0058A6 1 20 54 5C jsr L5C54
|
|
0058A9 1 AD 0D D2 lda $D20D
|
|
0058AC 1 60 L58AC: rts
|
|
0058AD 1
|
|
0058AD 1 00 L58AD: brk
|
|
0058AE 1 F0 11 L58AE: beq L58C1
|
|
0058B0 1 8D 0D D2 sta $D20D
|
|
0058B3 1 CE 0D D2 dec $D20D
|
|
0058B6 1 A9 01 lda #$01
|
|
0058B8 1 8D 08 D2 sta $D208
|
|
0058BB 1 20 54 5C jsr L5C54
|
|
0058BE 1 AD 0D D2 lda $D20D
|
|
0058C1 1 60 L58C1: rts
|
|
0058C2 1
|
|
0058C2 1 00 brk
|
|
0058C3 1 AD 25 EC L58C3: lda $EC25
|
|
0058C6 1 20 EF 86 jsr L86EF
|
|
0058C9 1 85 06 sta L0006
|
|
0058CB 1 86 07 stx $07
|
|
0058CD 1 A0 06 ldy #$06
|
|
0058CF 1 B1 06 lda (L0006),y
|
|
0058D1 1 AA tax
|
|
0058D2 1 C8 iny
|
|
0058D3 1 B1 06 lda (L0006),y
|
|
0058D5 1 48 pha
|
|
0058D6 1 A0 04 ldy #$04
|
|
0058D8 1 B1 06 lda (L0006),y
|
|
0058DA 1 29 01 and #$01
|
|
0058DC 1 18 clc
|
|
0058DD 1 6A ror a
|
|
0058DE 1 6A ror a
|
|
0058DF 1 A8 tay
|
|
0058E0 1 68 pla
|
|
0058E1 1 60 rts
|
|
0058E2 1
|
|
0058E2 1 AD 25 EC L58E2: lda $EC25
|
|
0058E5 1 20 EF 86 jsr L86EF
|
|
0058E8 1 85 06 sta L0006
|
|
0058EA 1 86 07 stx $07
|
|
0058EC 1 A0 08 ldy #$08
|
|
0058EE 1 B1 06 lda (L0006),y
|
|
0058F0 1 AA tax
|
|
0058F1 1 C8 iny
|
|
0058F2 1 B1 06 lda (L0006),y
|
|
0058F4 1 48 pha
|
|
0058F5 1 A0 05 ldy #$05
|
|
0058F7 1 B1 06 lda (L0006),y
|
|
0058F9 1 29 01 and #$01
|
|
0058FB 1 18 clc
|
|
0058FC 1 6A ror a
|
|
0058FD 1 6A ror a
|
|
0058FE 1 A8 tay
|
|
0058FF 1 68 pla
|
|
005900 1 60 rts
|
|
005901 1
|
|
005901 1 A9 00 lda #$00
|
|
005903 1 8D 9F 59 sta L599F
|
|
005906 1 8D 9F DE sta $DE9F
|
|
005909 1 20 9A D0 jsr LD09A
|
|
00590C 1 20 50 4F jsr L4F50
|
|
00590F 1 20 2B 6D jsr L6D2B
|
|
005912 1 AE A0 DE ldx $DEA0
|
|
005915 1 CA dex
|
|
005916 1 BD A1 DE L5916: lda $DEA1,x
|
|
005919 1 CD FB EB cmp $EBFB
|
|
00591C 1 F0 24 beq L5942
|
|
00591E 1 8A txa
|
|
00591F 1 48 pha
|
|
005920 1 BD A1 DE lda $DEA1,x
|
|
005923 1 8D 2F E2 sta $E22F
|
|
005926 1 A9 00 lda #$00
|
|
005928 1 9D A1 DE sta $DEA1,x
|
|
00592B 1 A0 04 ldy #$04
|
|
00592D 1 A9 2F lda #$2F
|
|
00592F 1 A2 E2 ldx #$E2
|
|
005931 1 20 40 D0 jsr LD040
|
|
005934 1 AD 2F E2 lda $E22F
|
|
005937 1 20 82 D0 jsr LD082
|
|
00593A 1 CE A0 DE dec $DEA0
|
|
00593D 1 CE 9E DD dec $DD9E
|
|
005940 1 68 pla
|
|
005941 1 AA tax
|
|
005942 1 CA L5942: dex
|
|
005943 1 10 D1 bpl L5916
|
|
005945 1 A0 00 ldy #$00
|
|
005947 1 8C 9E 59 sty L599E
|
|
00594A 1 AC 9E 59 L594A: ldy L599E
|
|
00594D 1 EE A0 DE inc $DEA0
|
|
005950 1 EE 9E DD inc $DD9E
|
|
005953 1 A9 00 lda #$00
|
|
005955 1 99 A0 E1 sta $E1A0,y
|
|
005958 1 B9 32 BF lda $BF32,y
|
|
00595B 1 20 B6 89 jsr L89B6
|
|
00595E 1 C9 57 cmp #$57
|
|
005960 1 D0 05 bne L5967
|
|
005962 1 A9 F9 lda #$F9
|
|
005964 1 8D 9F 59 sta L599F
|
|
005967 1 EE 9E 59 L5967: inc L599E
|
|
00596A 1 AD 9E 59 lda L599E
|
|
00596D 1 CD 31 BF cmp $BF31
|
|
005970 1 F0 D8 beq L594A
|
|
005972 1 90 D6 bcc L594A
|
|
005974 1 A2 00 ldx #$00
|
|
005976 1 EC A0 DE L5976: cpx $DEA0
|
|
005979 1 D0 0B bne L5986
|
|
00597B 1 AD 9F 59 lda L599F
|
|
00597E 1 F0 03 beq L5983
|
|
005980 1 20 54 D1 jsr LD154
|
|
005983 1 4C 96 D0 L5983: jmp LD096
|
|
005986 1
|
|
005986 1 8A L5986: txa
|
|
005987 1 48 pha
|
|
005988 1 BD A1 DE lda $DEA1,x
|
|
00598B 1 CD FB EB cmp $EBFB
|
|
00598E 1 F0 08 beq L5998
|
|
005990 1 20 E3 86 jsr L86E3
|
|
005993 1 A0 01 ldy #$01
|
|
005995 1 20 40 D0 jsr LD040
|
|
005998 1 68 L5998: pla
|
|
005999 1 AA tax
|
|
00599A 1 E8 inx
|
|
00599B 1 4C 76 59 jmp L5976
|
|
00599E 1
|
|
00599E 1 00 L599E: brk
|
|
00599F 1 00 L599F: brk
|
|
0059A0 1 A9 00 L59A0: lda #$00
|
|
0059A2 1 F0 06 beq L59AA
|
|
0059A4 1 A9 80 L59A4: lda #$80
|
|
0059A6 1 D0 02 bne L59AA
|
|
0059A8 1 A9 C0 L59A8: lda #$C0
|
|
0059AA 1 8D D0 5A L59AA: sta L5AD0
|
|
0059AD 1 A9 00 lda #$00
|
|
0059AF 1 8D 9F DE sta $DE9F
|
|
0059B2 1 20 9A D0 jsr LD09A
|
|
0059B5 1 2C D0 5A bit L5AD0
|
|
0059B8 1 10 30 bpl L59EA
|
|
0059BA 1 50 16 bvc L59D2
|
|
0059BC 1 AD 3F 53 lda L533F
|
|
0059BF 1 A0 0F ldy #$0F
|
|
0059C1 1 D9 A0 E1 L59C1: cmp $E1A0,y
|
|
0059C4 1 F0 03 beq L59C9
|
|
0059C6 1 88 dey
|
|
0059C7 1 10 F8 bpl L59C1
|
|
0059C9 1 8C C6 5A L59C9: sty L5AC6
|
|
0059CC 1 8C 5B E2 sty $E25B
|
|
0059CF 1 4C F3 59 jmp L59F3
|
|
0059D2 1
|
|
0059D2 1 AC 31 BF L59D2: ldy $BF31
|
|
0059D5 1 AD 3F 53 lda L533F
|
|
0059D8 1 D9 32 BF L59D8: cmp $BF32,y
|
|
0059DB 1 F0 04 beq L59E1
|
|
0059DD 1 88 dey
|
|
0059DE 1 10 F8 bpl L59D8
|
|
0059E0 1 C8 iny
|
|
0059E1 1 8C C6 5A L59E1: sty L5AC6
|
|
0059E4 1 8C 5B E2 sty $E25B
|
|
0059E7 1 4C F3 59 jmp L59F3
|
|
0059EA 1
|
|
0059EA 1 AD 5B E2 L59EA: lda $E25B
|
|
0059ED 1 38 sec
|
|
0059EE 1 E9 03 sbc #$03
|
|
0059F0 1 8D 5B E2 sta $E25B
|
|
0059F3 1 AC 5B E2 L59F3: ldy $E25B
|
|
0059F6 1 B9 A0 E1 lda $E1A0,y
|
|
0059F9 1 D0 03 bne L59FE
|
|
0059FB 1 4C 4C 5A jmp L5A4C
|
|
0059FE 1
|
|
0059FE 1 20 E3 86 L59FE: jsr L86E3
|
|
005A01 1 18 clc
|
|
005A02 1 69 09 adc #$09
|
|
005A04 1 85 06 sta L0006
|
|
005A06 1 8A txa
|
|
005A07 1 69 00 adc #$00
|
|
005A09 1 85 07 sta $07
|
|
005A0B 1 A0 00 ldy #$00
|
|
005A0D 1 B1 06 lda (L0006),y
|
|
005A0F 1 A8 tay
|
|
005A10 1 B1 06 L5A10: lda (L0006),y
|
|
005A12 1 99 00 1F sta $1F00,y
|
|
005A15 1 88 dey
|
|
005A16 1 10 F8 bpl L5A10
|
|
005A18 1 CE 00 1F dec $1F00
|
|
005A1B 1 A9 2F lda #$2F
|
|
005A1D 1 8D 01 1F sta $1F01
|
|
005A20 1 A9 00 lda #$00
|
|
005A22 1 A2 1F ldx #$1F
|
|
005A24 1 AC 00 1F ldy $1F00
|
|
005A27 1 20 B7 6F jsr L6FB7
|
|
005A2A 1 AD 4B 70 lda L704B
|
|
005A2D 1 F0 1D beq L5A4C
|
|
005A2F 1 AE 4B 70 L5A2F: ldx L704B
|
|
005A32 1 F0 18 beq L5A4C
|
|
005A34 1 CA dex
|
|
005A35 1 BD 4C 70 lda L704C,x
|
|
005A38 1 CD 25 EC cmp $EC25
|
|
005A3B 1 F0 06 beq L5A43
|
|
005A3D 1 8D 0E D2 sta $D20E
|
|
005A40 1 20 59 44 jsr L4459
|
|
005A43 1 20 DC 61 L5A43: jsr L61DC
|
|
005A46 1 CE 4B 70 dec L704B
|
|
005A49 1 4C 2F 5A jmp L5A2F
|
|
005A4C 1
|
|
005A4C 1 20 23 45 L5A4C: jsr L4523
|
|
005A4F 1 20 2B 6D jsr L6D2B
|
|
005A52 1 A9 00 lda #$00
|
|
005A54 1 8D 9F DE sta $DE9F
|
|
005A57 1 20 9A D0 jsr LD09A
|
|
005A5A 1 AD 5B E2 lda $E25B
|
|
005A5D 1 A8 tay
|
|
005A5E 1 48 pha
|
|
005A5F 1 B9 A0 E1 lda $E1A0,y
|
|
005A62 1 8D 2F E2 sta $E22F
|
|
005A65 1 F0 18 beq L5A7F
|
|
005A67 1 20 F4 8A jsr L8AF4
|
|
005A6A 1 CE 9E DD dec $DD9E
|
|
005A6D 1 AD 2F E2 lda $E22F
|
|
005A70 1 20 82 D0 jsr LD082
|
|
005A73 1 20 10 45 jsr L4510
|
|
005A76 1 A0 04 ldy #$04
|
|
005A78 1 A9 2F lda #$2F
|
|
005A7A 1 A2 E2 ldx #$E2
|
|
005A7C 1 20 40 D0 jsr LD040
|
|
005A7F 1 AD A0 DE L5A7F: lda $DEA0
|
|
005A82 1 8D C6 5A sta L5AC6
|
|
005A85 1 EE A0 DE inc $DEA0
|
|
005A88 1 EE 9E DD inc $DD9E
|
|
005A8B 1 68 pla
|
|
005A8C 1 A8 tay
|
|
005A8D 1 B9 32 BF lda $BF32,y
|
|
005A90 1 20 B6 89 jsr L89B6
|
|
005A93 1 2C D0 5A bit L5AD0
|
|
005A96 1 30 11 bmi L5AA9
|
|
005A98 1 29 FF and #$FF
|
|
005A9A 1 F0 0D beq L5AA9
|
|
005A9C 1 C9 2F cmp #$2F
|
|
005A9E 1 F0 09 beq L5AA9
|
|
005AA0 1 48 pha
|
|
005AA1 1 20 96 D0 jsr LD096
|
|
005AA4 1 68 pla
|
|
005AA5 1 20 54 D1 jsr LD154
|
|
005AA8 1 60 rts
|
|
005AA9 1
|
|
005AA9 1 AD A0 DE L5AA9: lda $DEA0
|
|
005AAC 1 CD C6 5A cmp L5AC6
|
|
005AAF 1 F0 0F beq L5AC0
|
|
005AB1 1 AE A0 DE ldx $DEA0
|
|
005AB4 1 CA dex
|
|
005AB5 1 BD A1 DE lda $DEA1,x
|
|
005AB8 1 20 E3 86 jsr L86E3
|
|
005ABB 1 A0 01 ldy #$01
|
|
005ABD 1 20 40 D0 jsr LD040
|
|
005AC0 1 20 96 D0 L5AC0: jsr LD096
|
|
005AC3 1 4C 23 45 jmp L4523
|
|
005AC6 1
|
|
005AC6 1 00 L5AC6: brk
|
|
005AC7 1 00 brk
|
|
005AC8 1 00 brk
|
|
005AC9 1 00 brk
|
|
005ACA 1 00 brk
|
|
005ACB 1 00 brk
|
|
005ACC 1 00 brk
|
|
005ACD 1 00 brk
|
|
005ACE 1 00 brk
|
|
005ACF 1 00 brk
|
|
005AD0 1 00 L5AD0: brk
|
|
005AD1 1 AE 5B E2 ldx $E25B
|
|
005AD4 1 CA dex
|
|
005AD5 1 8A txa
|
|
005AD6 1 0A asl a
|
|
005AD7 1 0A asl a
|
|
005AD8 1 0A asl a
|
|
005AD9 1 18 clc
|
|
005ADA 1 69 06 adc #$06
|
|
005ADC 1 AA tax
|
|
005ADD 1 BD 4C E4 lda $E44C,x
|
|
005AE0 1 38 sec
|
|
005AE1 1 E9 30 sbc #$30
|
|
005AE3 1 18 clc
|
|
005AE4 1 69 C0 adc #$C0
|
|
005AE6 1 8D 1A 5B sta L5B1A
|
|
005AE9 1 A9 00 lda #$00
|
|
005AEB 1 8D 19 5B sta L5B19
|
|
005AEE 1 8D 08 C0 L5AEE: sta ALTZPOFF
|
|
005AF1 1 AD 82 C0 lda $C082
|
|
005AF4 1 20 93 FE jsr LFE93
|
|
005AF7 1 20 89 FE jsr LFE89
|
|
005AFA 1 20 2F FB jsr LFB2F
|
|
005AFD 1 20 58 FC jsr LFC58
|
|
005B00 1 8D 51 C0 sta $C051
|
|
005B03 1 8D 54 C0 sta $C054
|
|
005B06 1 8D 56 C0 sta $C056
|
|
005B09 1 8D 52 C0 sta $C052
|
|
005B0C 1 8D 5F C0 sta $C05F
|
|
005B0F 1 8D 0E C0 sta $C00E
|
|
005B12 1 8D 0C C0 sta $C00C
|
|
005B15 1 8D 00 C0 sta $C000
|
|
005B18 1 4C .byte $4C
|
|
005B19 1 00 L5B19: brk
|
|
005B1A 1 00 L5B1A: brk
|
|
005B1B 1 00 L5B1B: brk
|
|
005B1C 1 AD 25 EC L5B1C: lda $EC25
|
|
005B1F 1 8D 9F DE sta $DE9F
|
|
005B22 1 20 9A D0 jsr LD09A
|
|
005B25 1 AE 25 EC ldx $EC25
|
|
005B28 1 CA dex
|
|
005B29 1 BD D1 E6 lda $E6D1,x
|
|
005B2C 1 8D 1B 5B sta L5B1B
|
|
005B2F 1 A2 03 ldx #$03
|
|
005B31 1 BD FD EB L5B31: lda $EBFD,x
|
|
005B34 1 9D 09 D2 sta $D209,x
|
|
005B37 1 CA dex
|
|
005B38 1 10 F7 bpl L5B31
|
|
005B3A 1 A0 48 ldy #$48
|
|
005B3C 1 A9 09 lda #$09
|
|
005B3E 1 A2 D2 ldx #$D2
|
|
005B40 1 20 00 D0 jsr LD000
|
|
005B43 1 AD 0D D2 lda $D20D
|
|
005B46 1 D0 03 bne L5B4B
|
|
005B48 1 4C B7 5C jmp L5CB7
|
|
005B4B 1
|
|
005B4B 1 2C AA D2 L5B4B: bit $D2AA
|
|
005B4E 1 30 03 bmi L5B53
|
|
005B50 1 4C 26 5C jmp L5C26
|
|
005B53 1
|
|
005B53 1 C9 03 L5B53: cmp #$03
|
|
005B55 1 D0 01 bne L5B58
|
|
005B57 1 60 rts
|
|
005B58 1
|
|
005B58 1 C9 01 L5B58: cmp #$01
|
|
005B5A 1 D0 65 bne L5BC1
|
|
005B5C 1 AD 25 EC lda $EC25
|
|
005B5F 1 20 EF 86 jsr L86EF
|
|
005B62 1 85 06 sta L0006
|
|
005B64 1 86 07 stx $07
|
|
005B66 1 A0 05 ldy #$05
|
|
005B68 1 B1 06 lda (L0006),y
|
|
005B6A 1 29 01 and #$01
|
|
005B6C 1 D0 03 bne L5B71
|
|
005B6E 1 4C 26 5C jmp L5C26
|
|
005B71 1
|
|
005B71 1 20 03 58 L5B71: jsr L5803
|
|
005B74 1 AD 0E D2 lda $D20E
|
|
005B77 1 C9 05 cmp #$05
|
|
005B79 1 D0 06 bne L5B81
|
|
005B7B 1 20 31 5C jsr L5C31
|
|
005B7E 1 4C 26 5C jmp L5C26
|
|
005B81 1
|
|
005B81 1 C9 01 L5B81: cmp #$01
|
|
005B83 1 D0 0D bne L5B92
|
|
005B85 1 20 53 58 L5B85: jsr L5853
|
|
005B88 1 A9 01 lda #$01
|
|
005B8A 1 20 89 5C jsr L5C89
|
|
005B8D 1 10 F6 bpl L5B85
|
|
005B8F 1 4C 26 5C jmp L5C26
|
|
005B92 1
|
|
005B92 1 C9 02 L5B92: cmp #$02
|
|
005B94 1 D0 0D bne L5BA3
|
|
005B96 1 20 46 58 L5B96: jsr L5846
|
|
005B99 1 A9 02 lda #$02
|
|
005B9B 1 20 89 5C jsr L5C89
|
|
005B9E 1 10 F6 bpl L5B96
|
|
005BA0 1 4C 26 5C jmp L5C26
|
|
005BA3 1
|
|
005BA3 1 C9 04 L5BA3: cmp #$04
|
|
005BA5 1 F0 0D beq L5BB4
|
|
005BA7 1 20 8C 63 L5BA7: jsr L638C
|
|
005BAA 1 A9 03 lda #$03
|
|
005BAC 1 20 89 5C jsr L5C89
|
|
005BAF 1 10 F6 bpl L5BA7
|
|
005BB1 1 4C 26 5C jmp L5C26
|
|
005BB4 1
|
|
005BB4 1 20 EC 63 L5BB4: jsr L63EC
|
|
005BB7 1 A9 04 lda #$04
|
|
005BB9 1 20 89 5C jsr L5C89
|
|
005BBC 1 10 F6 bpl L5BB4
|
|
005BBE 1 4C 26 5C jmp L5C26
|
|
005BC1 1
|
|
005BC1 1 AD 25 EC L5BC1: lda $EC25
|
|
005BC4 1 20 EF 86 jsr L86EF
|
|
005BC7 1 85 06 sta L0006
|
|
005BC9 1 86 07 stx $07
|
|
005BCB 1 A0 04 ldy #$04
|
|
005BCD 1 B1 06 lda (L0006),y
|
|
005BCF 1 29 01 and #$01
|
|
005BD1 1 D0 03 bne L5BD6
|
|
005BD3 1 4C 26 5C jmp L5C26
|
|
005BD6 1
|
|
005BD6 1 20 03 58 L5BD6: jsr L5803
|
|
005BD9 1 AD 0E D2 lda $D20E
|
|
005BDC 1 C9 05 cmp #$05
|
|
005BDE 1 D0 06 bne L5BE6
|
|
005BE0 1 20 31 5C jsr L5C31
|
|
005BE3 1 4C 26 5C jmp L5C26
|
|
005BE6 1
|
|
005BE6 1 C9 01 L5BE6: cmp #$01
|
|
005BE8 1 D0 0D bne L5BF7
|
|
005BEA 1 20 3C 58 L5BEA: jsr L583C
|
|
005BED 1 A9 01 lda #$01
|
|
005BEF 1 20 89 5C jsr L5C89
|
|
005BF2 1 10 F6 bpl L5BEA
|
|
005BF4 1 4C 26 5C jmp L5C26
|
|
005BF7 1
|
|
005BF7 1 C9 02 L5BF7: cmp #$02
|
|
005BF9 1 D0 0D bne L5C08
|
|
005BFB 1 20 2F 58 L5BFB: jsr L582F
|
|
005BFE 1 A9 02 lda #$02
|
|
005C00 1 20 89 5C jsr L5C89
|
|
005C03 1 10 F6 bpl L5BFB
|
|
005C05 1 4C 26 5C jmp L5C26
|
|
005C08 1
|
|
005C08 1 C9 04 L5C08: cmp #$04
|
|
005C0A 1 F0 0D beq L5C19
|
|
005C0C 1 20 51 64 L5C0C: jsr L6451
|
|
005C0F 1 A9 03 lda #$03
|
|
005C11 1 20 89 5C jsr L5C89
|
|
005C14 1 10 F6 bpl L5C0C
|
|
005C16 1 4C 26 5C jmp L5C26
|
|
005C19 1
|
|
005C19 1 20 B0 64 L5C19: jsr L64B0
|
|
005C1C 1 A9 04 lda #$04
|
|
005C1E 1 20 89 5C jsr L5C89
|
|
005C21 1 10 F6 bpl L5C19
|
|
005C23 1 4C 26 5C jmp L5C26
|
|
005C26 1
|
|
005C26 1 20 96 D0 L5C26: jsr LD096
|
|
005C29 1 A9 00 lda #$00
|
|
005C2B 1 8D 9F DE sta $DE9F
|
|
005C2E 1 4C 9A D0 jmp LD09A
|
|
005C31 1
|
|
005C31 1 AD 0D D2 L5C31: lda $D20D
|
|
005C34 1 8D 08 D2 sta $D208
|
|
005C37 1 A0 4A ldy #$4A
|
|
005C39 1 A9 08 lda #$08
|
|
005C3B 1 A2 D2 ldx #$D2
|
|
005C3D 1 20 00 D0 jsr LD000
|
|
005C40 1 AD 0E D2 lda $D20E
|
|
005C43 1 D0 01 bne L5C46
|
|
005C45 1 60 rts
|
|
005C46 1
|
|
005C46 1 20 54 5C L5C46: jsr L5C54
|
|
005C49 1 20 96 D0 jsr LD096
|
|
005C4C 1 A9 00 lda #$00
|
|
005C4E 1 8D 9F DE sta $DE9F
|
|
005C51 1 4C 9A D0 jmp LD09A
|
|
005C54 1
|
|
005C54 1 AD 0D D2 L5C54: lda $D20D
|
|
005C57 1 8D 09 D2 sta $D209
|
|
005C5A 1 A0 4B ldy #$4B
|
|
005C5C 1 A9 08 lda #$08
|
|
005C5E 1 A2 D2 ldx #$D2
|
|
005C60 1 20 00 D0 jsr LD000
|
|
005C63 1 20 23 65 jsr L6523
|
|
005C66 1 20 D1 84 jsr L84D1
|
|
005C69 1 2C 1B 5B bit L5B1B
|
|
005C6C 1 30 03 bmi L5C71
|
|
005C6E 1 20 6E 6E jsr L6E6E
|
|
005C71 1 AD 25 EC L5C71: lda $EC25
|
|
005C74 1 8D 12 D2 sta $D212
|
|
005C77 1 20 F2 44 jsr L44F2
|
|
005C7A 1 A0 11 ldy #$11
|
|
005C7C 1 A9 1D lda #$1D
|
|
005C7E 1 A2 D2 ldx #$D2
|
|
005C80 1 20 00 D0 jsr LD000
|
|
005C83 1 20 10 45 jsr L4510
|
|
005C86 1 4C 19 6C jmp L6C19
|
|
005C89 1
|
|
005C89 1 8D B6 5C L5C89: sta L5CB6
|
|
005C8C 1 20 F0 48 jsr L48F0
|
|
005C8F 1 AD 08 D2 lda $D208
|
|
005C92 1 C9 04 cmp #$04
|
|
005C94 1 F0 03 beq L5C99
|
|
005C96 1 A9 FF L5C96: lda #$FF
|
|
005C98 1 60 rts
|
|
005C99 1
|
|
005C99 1 A0 48 L5C99: ldy #$48
|
|
005C9B 1 A9 09 lda #$09
|
|
005C9D 1 A2 D2 ldx #$D2
|
|
005C9F 1 20 00 D0 jsr LD000
|
|
005CA2 1 AD 0D D2 lda $D20D
|
|
005CA5 1 F0 EF beq L5C96
|
|
005CA7 1 C9 03 cmp #$03
|
|
005CA9 1 F0 EB beq L5C96
|
|
005CAB 1 AD 0E D2 lda $D20E
|
|
005CAE 1 CD B6 5C cmp L5CB6
|
|
005CB1 1 D0 E3 bne L5C96
|
|
005CB3 1 A9 00 lda #$00
|
|
005CB5 1 60 rts
|
|
005CB6 1
|
|
005CB6 1 00 L5CB6: brk
|
|
005CB7 1 2C 1B 5B L5CB7: bit L5B1B
|
|
005CBA 1 10 03 bpl L5CBF
|
|
005CBC 1 4C 2B 6D jmp L6D2B
|
|
005CBF 1
|
|
005CBF 1 AD 25 EC L5CBF: lda $EC25
|
|
005CC2 1 8D 0E D2 sta $D20E
|
|
005CC5 1 A0 09 ldy #$09
|
|
005CC7 1 A9 09 lda #$09
|
|
005CC9 1 A2 D2 ldx #$D2
|
|
005CCB 1 20 40 D0 jsr LD040
|
|
005CCE 1 AD 0D D2 lda $D20D
|
|
005CD1 1 D0 07 bne L5CDA
|
|
005CD3 1 20 13 5F jsr L5F13
|
|
005CD6 1 4C EC 5D jmp L5DEC
|
|
005CD9 1
|
|
005CD9 1 00 L5CD9: brk
|
|
005CDA 1 8D D9 5C L5CDA: sta L5CD9
|
|
005CDD 1 AE 21 DF ldx $DF21
|
|
005CE0 1 F0 19 beq L5CFB
|
|
005CE2 1 CA dex
|
|
005CE3 1 AD D9 5C lda L5CD9
|
|
005CE6 1 DD 22 DF L5CE6: cmp $DF22,x
|
|
005CE9 1 F0 05 beq L5CF0
|
|
005CEB 1 CA dex
|
|
005CEC 1 10 F8 bpl L5CE6
|
|
005CEE 1 30 0B bmi L5CFB
|
|
005CF0 1 2C AA D2 L5CF0: bit $D2AA
|
|
005CF3 1 30 03 bmi L5CF8
|
|
005CF5 1 4C FC 5D jmp L5DFC
|
|
005CF8 1
|
|
005CF8 1 4C 55 5D L5CF8: jmp L5D55
|
|
005CFB 1
|
|
005CFB 1 2C 61 C0 L5CFB: bit $C061
|
|
005CFE 1 10 08 bpl L5D08
|
|
005D00 1 AD 20 DF lda $DF20
|
|
005D03 1 CD 25 EC cmp $EC25
|
|
005D06 1 F0 03 beq L5D0B
|
|
005D08 1 20 2B 6D L5D08: jsr L6D2B
|
|
005D0B 1 AE 21 DF L5D0B: ldx $DF21
|
|
005D0E 1 AD D9 5C lda L5CD9
|
|
005D11 1 9D 22 DF sta $DF22,x
|
|
005D14 1 EE 21 DF inc $DF21
|
|
005D17 1 AD 25 EC lda $EC25
|
|
005D1A 1 8D 20 DF sta $DF20
|
|
005D1D 1 AD 25 EC lda $EC25
|
|
005D20 1 8D 12 D2 sta $D212
|
|
005D23 1 20 F2 44 jsr L44F2
|
|
005D26 1 AD D9 5C lda L5CD9
|
|
005D29 1 8D 2F E2 sta $E22F
|
|
005D2C 1 20 15 89 jsr L8915
|
|
005D2F 1 20 8E 6E jsr L6E8E
|
|
005D32 1 A0 02 ldy #$02
|
|
005D34 1 A9 2F lda #$2F
|
|
005D36 1 A2 E2 ldx #$E2
|
|
005D38 1 20 40 D0 jsr LD040
|
|
005D3B 1 AD 25 EC lda $EC25
|
|
005D3E 1 8D 12 D2 sta $D212
|
|
005D41 1 20 F2 44 jsr L44F2
|
|
005D44 1 AD D9 5C lda L5CD9
|
|
005D47 1 20 93 88 jsr L8893
|
|
005D4A 1 20 10 45 jsr L4510
|
|
005D4D 1 2C AA D2 bit $D2AA
|
|
005D50 1 30 03 bmi L5D55
|
|
005D52 1 4C FC 5D jmp L5DFC
|
|
005D55 1
|
|
005D55 1 AD D9 5C L5D55: lda L5CD9
|
|
005D58 1 8D FC EB sta $EBFC
|
|
005D5B 1 A0 0A ldy #$0A
|
|
005D5D 1 A9 FC lda #$FC
|
|
005D5F 1 A2 EB ldx #$EB
|
|
005D61 1 20 40 D0 jsr LD040
|
|
005D64 1 AA tax
|
|
005D65 1 AD FC EB lda $EBFC
|
|
005D68 1 F0 3C beq L5DA6
|
|
005D6A 1 20 00 8F jsr L8F00
|
|
005D6D 1 C9 FF cmp #$FF
|
|
005D6F 1 D0 06 bne L5D77
|
|
005D71 1 20 EC 5D jsr L5DEC
|
|
005D74 1 4C 23 45 jmp L4523
|
|
005D77 1
|
|
005D77 1 AD FC EB L5D77: lda $EBFC
|
|
005D7A 1 CD FB EB cmp $EBFB
|
|
005D7D 1 D0 0F bne L5D8E
|
|
005D7F 1 AD 25 EC lda $EC25
|
|
005D82 1 20 0D 6F jsr L6F0D
|
|
005D85 1 AD 25 EC lda $EC25
|
|
005D88 1 20 78 5E jsr L5E78
|
|
005D8B 1 4C 23 45 jmp L4523
|
|
005D8E 1
|
|
005D8E 1 AD FC EB L5D8E: lda $EBFC
|
|
005D91 1 30 06 bmi L5D99
|
|
005D93 1 20 3F 6A jsr L6A3F
|
|
005D96 1 4C 23 45 jmp L4523
|
|
005D99 1
|
|
005D99 1 29 7F L5D99: and #$7F
|
|
005D9B 1 48 pha
|
|
005D9C 1 20 0D 6F jsr L6F0D
|
|
005D9F 1 68 pla
|
|
005DA0 1 20 78 5E jsr L5E78
|
|
005DA3 1 4C 23 45 jmp L4523
|
|
005DA6 1
|
|
005DA6 1 E0 02 L5DA6: cpx #$02
|
|
005DA8 1 D0 03 bne L5DAD
|
|
005DAA 1 4C EC 5D jmp L5DEC
|
|
005DAD 1
|
|
005DAD 1 E0 FF L5DAD: cpx #$FF
|
|
005DAF 1 F0 46 beq L5DF7
|
|
005DB1 1 AD 25 EC lda $EC25
|
|
005DB4 1 8D 12 D2 sta $D212
|
|
005DB7 1 20 F2 44 jsr L44F2
|
|
005DBA 1 20 52 6E jsr L6E52
|
|
005DBD 1 20 8E 6E jsr L6E8E
|
|
005DC0 1 AE 21 DF ldx $DF21
|
|
005DC3 1 CA dex
|
|
005DC4 1 8A L5DC4: txa
|
|
005DC5 1 48 pha
|
|
005DC6 1 BD 22 DF lda $DF22,x
|
|
005DC9 1 8D 2E E2 sta $E22E
|
|
005DCC 1 A0 03 ldy #$03
|
|
005DCE 1 A9 2E lda #$2E
|
|
005DD0 1 A2 E2 ldx #$E2
|
|
005DD2 1 20 40 D0 jsr LD040
|
|
005DD5 1 68 pla
|
|
005DD6 1 AA tax
|
|
005DD7 1 CA dex
|
|
005DD8 1 10 EA bpl L5DC4
|
|
005DDA 1 AD 25 EC lda $EC25
|
|
005DDD 1 8D 12 D2 sta $D212
|
|
005DE0 1 20 F2 44 jsr L44F2
|
|
005DE3 1 20 B1 6D jsr L6DB1
|
|
005DE6 1 20 6E 6E jsr L6E6E
|
|
005DE9 1 20 10 45 jsr L4510
|
|
005DEC 1 20 96 D0 L5DEC: jsr LD096
|
|
005DEF 1 A9 00 lda #$00
|
|
005DF1 1 8D 9F DE sta $DE9F
|
|
005DF4 1 4C 9A D0 jmp LD09A
|
|
005DF7 1
|
|
005DF7 1 AE 56 E2 L5DF7: ldx $E256
|
|
005DFA 1 9A txs
|
|
005DFB 1 60 rts
|
|
005DFC 1
|
|
005DFC 1 AD D9 5C L5DFC: lda L5CD9
|
|
005DFF 1 20 E3 86 jsr L86E3
|
|
005E02 1 85 06 sta L0006
|
|
005E04 1 86 07 stx $07
|
|
005E06 1 A0 02 ldy #$02
|
|
005E08 1 B1 06 lda (L0006),y
|
|
005E0A 1 29 70 and #$70
|
|
005E0C 1 C9 10 cmp #$10
|
|
005E0E 1 F0 18 beq L5E28
|
|
005E10 1 C9 20 cmp #$20
|
|
005E12 1 F0 14 beq L5E28
|
|
005E14 1 C9 30 cmp #$30
|
|
005E16 1 F0 10 beq L5E28
|
|
005E18 1 C9 00 cmp #$00
|
|
005E1A 1 D0 0B bne L5E27
|
|
005E1C 1 AD D9 5C lda L5CD9
|
|
005E1F 1 20 8A 6A jsr L6A8A
|
|
005E22 1 30 03 bmi L5E27
|
|
005E24 1 4C EC 5D jmp L5DEC
|
|
005E27 1
|
|
005E27 1 60 L5E27: rts
|
|
005E28 1
|
|
005E28 1 8D 77 5E L5E28: sta L5E77
|
|
005E2B 1 AD 25 EC lda $EC25
|
|
005E2E 1 20 FB 86 jsr L86FB
|
|
005E31 1 85 06 sta L0006
|
|
005E33 1 86 07 stx $07
|
|
005E35 1 A0 00 ldy #$00
|
|
005E37 1 B1 06 lda (L0006),y
|
|
005E39 1 A8 tay
|
|
005E3A 1 B1 06 L5E3A: lda (L0006),y
|
|
005E3C 1 99 55 D3 sta $D355,y
|
|
005E3F 1 88 dey
|
|
005E40 1 10 F8 bpl L5E3A
|
|
005E42 1 AD D9 5C lda L5CD9
|
|
005E45 1 20 E3 86 jsr L86E3
|
|
005E48 1 85 06 sta L0006
|
|
005E4A 1 86 07 stx $07
|
|
005E4C 1 A0 09 ldy #$09
|
|
005E4E 1 B1 06 lda (L0006),y
|
|
005E50 1 AA tax
|
|
005E51 1 18 clc
|
|
005E52 1 69 09 adc #$09
|
|
005E54 1 A8 tay
|
|
005E55 1 CA dex
|
|
005E56 1 88 dey
|
|
005E57 1 B1 06 L5E57: lda (L0006),y
|
|
005E59 1 9D 44 D3 sta $D344,x
|
|
005E5C 1 88 dey
|
|
005E5D 1 CA dex
|
|
005E5E 1 D0 F7 bne L5E57
|
|
005E60 1 A0 09 ldy #$09
|
|
005E62 1 B1 06 lda (L0006),y
|
|
005E64 1 AA tax
|
|
005E65 1 CA dex
|
|
005E66 1 CA dex
|
|
005E67 1 8E 45 D3 stx $D345
|
|
005E6A 1 AD 77 5E lda L5E77
|
|
005E6D 1 C9 20 cmp #$20
|
|
005E6F 1 90 03 bcc L5E74
|
|
005E71 1 AD 77 5E lda L5E77
|
|
005E74 1 4C DE 46 L5E74: jmp L46DE
|
|
005E77 1
|
|
005E77 1 00 L5E77: brk
|
|
005E78 1 8D 0A 5F L5E78: sta L5F0A
|
|
005E7B 1 20 23 45 jsr L4523
|
|
005E7E 1 20 2B 6D jsr L6D2B
|
|
005E81 1 AD 0A 5F lda L5F0A
|
|
005E84 1 CD 25 EC cmp $EC25
|
|
005E87 1 F0 06 beq L5E8F
|
|
005E89 1 8D 0E D2 sta $D20E
|
|
005E8C 1 20 59 44 jsr L4459
|
|
005E8F 1 AD 25 EC L5E8F: lda $EC25
|
|
005E92 1 8D 12 D2 sta $D212
|
|
005E95 1 20 F2 44 jsr L44F2
|
|
005E98 1 20 04 49 jsr L4904
|
|
005E9B 1 A0 11 ldy #$11
|
|
005E9D 1 A9 1D lda #$1D
|
|
005E9F 1 A2 D2 ldx #$D2
|
|
005EA1 1 20 00 D0 jsr LD000
|
|
005EA4 1 AE 25 EC ldx $EC25
|
|
005EA7 1 CA dex
|
|
005EA8 1 BD 26 EC lda $EC26,x
|
|
005EAB 1 48 pha
|
|
005EAC 1 20 45 73 jsr L7345
|
|
005EAF 1 AD 0A 5F lda L5F0A
|
|
005EB2 1 AA tax
|
|
005EB3 1 CA dex
|
|
005EB4 1 BD D1 E6 lda $E6D1,x
|
|
005EB7 1 30 03 bmi L5EBC
|
|
005EB9 1 20 02 53 jsr L5302
|
|
005EBC 1 AD 25 EC L5EBC: lda $EC25
|
|
005EBF 1 20 FB 86 jsr L86FB
|
|
005EC2 1 85 06 sta L0006
|
|
005EC4 1 86 07 stx $07
|
|
005EC6 1 A0 00 ldy #$00
|
|
005EC8 1 B1 06 lda (L0006),y
|
|
005ECA 1 A8 tay
|
|
005ECB 1 B1 06 L5ECB: lda (L0006),y
|
|
005ECD 1 99 B0 E1 sta $E1B0,y
|
|
005ED0 1 88 dey
|
|
005ED1 1 10 F8 bpl L5ECB
|
|
005ED3 1 68 pla
|
|
005ED4 1 20 54 70 jsr L7054
|
|
005ED7 1 20 06 51 jsr L5106
|
|
005EDA 1 20 96 D0 jsr LD096
|
|
005EDD 1 AD 25 EC lda $EC25
|
|
005EE0 1 8D 9F DE sta $DE9F
|
|
005EE3 1 20 9A D0 jsr LD09A
|
|
005EE6 1 AD 25 EC lda $EC25
|
|
005EE9 1 8D 12 D2 sta $D212
|
|
005EEC 1 20 05 45 jsr L4505
|
|
005EEF 1 20 EF 78 jsr L78EF
|
|
005EF2 1 A9 00 lda #$00
|
|
005EF4 1 AE 25 EC ldx $EC25
|
|
005EF7 1 9D D0 E6 sta $E6D0,x
|
|
005EFA 1 A9 01 lda #$01
|
|
005EFC 1 8D 5B E2 sta $E25B
|
|
005EFF 1 20 DF 52 jsr L52DF
|
|
005F02 1 A9 00 lda #$00
|
|
005F04 1 8D 9F DE sta $DE9F
|
|
005F07 1 4C 9A D0 jmp LD09A
|
|
005F0A 1
|
|
005F0A 1 00 L5F0A: brk
|
|
005F0B 1 00 L5F0B: brk
|
|
005F0C 1 00 brk
|
|
005F0D 1 00 brk
|
|
005F0E 1 00 brk
|
|
005F0F 1 00 L5F0F: brk
|
|
005F10 1 00 brk
|
|
005F11 1 00 brk
|
|
005F12 1 00 brk
|
|
005F13 1 A9 06 L5F13: lda #$06
|
|
005F15 1 85 06 sta L0006
|
|
005F17 1 A9 D2 lda #$D2
|
|
005F19 1 85 07 sta $07
|
|
005F1B 1 20 D5 60 jsr L60D5
|
|
005F1E 1 A2 03 ldx #$03
|
|
005F20 1 BD 09 D2 L5F20: lda $D209,x
|
|
005F23 1 9D 0B 5F sta L5F0B,x
|
|
005F26 1 9D 0F 5F sta L5F0F,x
|
|
005F29 1 CA dex
|
|
005F2A 1 10 F4 bpl L5F20
|
|
005F2C 1 20 F0 48 jsr L48F0
|
|
005F2F 1 AD 08 D2 lda $D208
|
|
005F32 1 C9 04 cmp #$04
|
|
005F34 1 F0 09 beq L5F3F
|
|
005F36 1 2C 61 C0 bit $C061
|
|
005F39 1 30 03 bmi L5F3E
|
|
005F3B 1 20 2B 6D jsr L6D2B
|
|
005F3E 1 60 L5F3E: rts
|
|
005F3F 1
|
|
005F3F 1 20 2B 6D L5F3F: jsr L6D2B
|
|
005F42 1 AD 25 EC lda $EC25
|
|
005F45 1 8D 12 D2 sta $D212
|
|
005F48 1 20 05 45 jsr L4505
|
|
005F4B 1 20 8E 6E jsr L6E8E
|
|
005F4E 1 A2 03 ldx #$03
|
|
005F50 1 BD 0B 5F L5F50: lda L5F0B,x
|
|
005F53 1 9D 30 E2 sta $E230,x
|
|
005F56 1 BD 0F 5F lda L5F0F,x
|
|
005F59 1 9D 34 E2 sta $E234,x
|
|
005F5C 1 CA dex
|
|
005F5D 1 10 F1 bpl L5F50
|
|
005F5F 1 20 FA 48 jsr L48FA
|
|
005F62 1 A0 12 ldy #$12
|
|
005F64 1 A9 30 lda #$30
|
|
005F66 1 A2 E2 ldx #$E2
|
|
005F68 1 20 00 D0 jsr LD000
|
|
005F6B 1 20 F0 48 L5F6B: jsr L48F0
|
|
005F6E 1 AD 08 D2 lda $D208
|
|
005F71 1 C9 04 cmp #$04
|
|
005F73 1 F0 50 beq L5FC5
|
|
005F75 1 A0 12 ldy #$12
|
|
005F77 1 A9 30 lda #$30
|
|
005F79 1 A2 E2 ldx #$E2
|
|
005F7B 1 20 00 D0 jsr LD000
|
|
005F7E 1 A2 00 ldx #$00
|
|
005F80 1 EC A0 DE L5F80: cpx $DEA0
|
|
005F83 1 D0 03 bne L5F88
|
|
005F85 1 4C 10 45 jmp L4510
|
|
005F88 1
|
|
005F88 1 8A L5F88: txa
|
|
005F89 1 48 pha
|
|
005F8A 1 BD A1 DE lda $DEA1,x
|
|
005F8D 1 8D 2F E2 sta $E22F
|
|
005F90 1 20 15 89 jsr L8915
|
|
005F93 1 A0 0D ldy #$0D
|
|
005F95 1 A9 2F lda #$2F
|
|
005F97 1 A2 E2 ldx #$E2
|
|
005F99 1 20 40 D0 jsr LD040
|
|
005F9C 1 F0 1B beq L5FB9
|
|
005F9E 1 A0 02 ldy #$02
|
|
005FA0 1 A9 2F lda #$2F
|
|
005FA2 1 A2 E2 ldx #$E2
|
|
005FA4 1 20 40 D0 jsr LD040
|
|
005FA7 1 AE 21 DF ldx $DF21
|
|
005FAA 1 EE 21 DF inc $DF21
|
|
005FAD 1 AD 2F E2 lda $E22F
|
|
005FB0 1 9D 22 DF sta $DF22,x
|
|
005FB3 1 AD 25 EC lda $EC25
|
|
005FB6 1 8D 20 DF sta $DF20
|
|
005FB9 1 AD 2F E2 L5FB9: lda $E22F
|
|
005FBC 1 20 93 88 jsr L8893
|
|
005FBF 1 68 pla
|
|
005FC0 1 AA tax
|
|
005FC1 1 E8 inx
|
|
005FC2 1 4C 80 5F jmp L5F80
|
|
005FC5 1
|
|
005FC5 1 20 D5 60 L5FC5: jsr L60D5
|
|
005FC8 1 AD 09 D2 lda $D209
|
|
005FCB 1 38 sec
|
|
005FCC 1 ED CF 60 sbc L60CF
|
|
005FCF 1 8D CB 60 sta L60CB
|
|
005FD2 1 AD 0A D2 lda $D20A
|
|
005FD5 1 ED D0 60 sbc L60D0
|
|
005FD8 1 8D CC 60 sta L60CC
|
|
005FDB 1 AD 0B D2 lda $D20B
|
|
005FDE 1 38 sec
|
|
005FDF 1 ED D1 60 sbc L60D1
|
|
005FE2 1 8D CD 60 sta L60CD
|
|
005FE5 1 AD 0C D2 lda $D20C
|
|
005FE8 1 ED D2 60 sbc L60D2
|
|
005FEB 1 8D CE 60 sta L60CE
|
|
005FEE 1 AD CC 60 lda L60CC
|
|
005FF1 1 10 0B bpl L5FFE
|
|
005FF3 1 AD CB 60 lda L60CB
|
|
005FF6 1 49 FF eor #$FF
|
|
005FF8 1 8D CB 60 sta L60CB
|
|
005FFB 1 EE CB 60 inc L60CB
|
|
005FFE 1 AD CE 60 L5FFE: lda L60CE
|
|
006001 1 10 0B bpl L600E
|
|
006003 1 AD CD 60 lda L60CD
|
|
006006 1 49 FF eor #$FF
|
|
006008 1 8D CD 60 sta L60CD
|
|
00600B 1 EE CD 60 inc L60CD
|
|
00600E 1 AD CB 60 L600E: lda L60CB
|
|
006011 1 C9 05 cmp #$05
|
|
006013 1 B0 0A bcs L601F
|
|
006015 1 AD CD 60 lda L60CD
|
|
006018 1 C9 05 cmp #$05
|
|
00601A 1 B0 03 bcs L601F
|
|
00601C 1 4C 6B 5F jmp L5F6B
|
|
00601F 1
|
|
00601F 1 A0 12 L601F: ldy #$12
|
|
006021 1 A9 30 lda #$30
|
|
006023 1 A2 E2 ldx #$E2
|
|
006025 1 20 00 D0 jsr LD000
|
|
006028 1 A2 03 ldx #$03
|
|
00602A 1 BD 09 D2 L602A: lda $D209,x
|
|
00602D 1 9D CF 60 sta L60CF,x
|
|
006030 1 CA dex
|
|
006031 1 10 F7 bpl L602A
|
|
006033 1 AD 09 D2 lda $D209
|
|
006036 1 CD 34 E2 cmp $E234
|
|
006039 1 AD 0A D2 lda $D20A
|
|
00603C 1 ED 35 E2 sbc $E235
|
|
00603F 1 10 27 bpl L6068
|
|
006041 1 AD 09 D2 lda $D209
|
|
006044 1 CD 30 E2 cmp $E230
|
|
006047 1 AD 0A D2 lda $D20A
|
|
00604A 1 ED 31 E2 sbc $E231
|
|
00604D 1 30 05 bmi L6054
|
|
00604F 1 2C D3 60 bit L60D3
|
|
006052 1 10 14 bpl L6068
|
|
006054 1 AD 09 D2 L6054: lda $D209
|
|
006057 1 8D 30 E2 sta $E230
|
|
00605A 1 AD 0A D2 lda $D20A
|
|
00605D 1 8D 31 E2 sta $E231
|
|
006060 1 A9 80 lda #$80
|
|
006062 1 8D D3 60 sta L60D3
|
|
006065 1 4C 79 60 jmp L6079
|
|
006068 1
|
|
006068 1 AD 09 D2 L6068: lda $D209
|
|
00606B 1 8D 34 E2 sta $E234
|
|
00606E 1 AD 0A D2 lda $D20A
|
|
006071 1 8D 35 E2 sta $E235
|
|
006074 1 A9 00 lda #$00
|
|
006076 1 8D D3 60 sta L60D3
|
|
006079 1 AD 0B D2 L6079: lda $D20B
|
|
00607C 1 CD 36 E2 cmp $E236
|
|
00607F 1 AD 0C D2 lda $D20C
|
|
006082 1 ED 37 E2 sbc $E237
|
|
006085 1 10 27 bpl L60AE
|
|
006087 1 AD 0B D2 lda $D20B
|
|
00608A 1 CD 32 E2 cmp $E232
|
|
00608D 1 AD 0C D2 lda $D20C
|
|
006090 1 ED 33 E2 sbc $E233
|
|
006093 1 30 05 bmi L609A
|
|
006095 1 2C D4 60 bit L60D4
|
|
006098 1 10 14 bpl L60AE
|
|
00609A 1 AD 0B D2 L609A: lda $D20B
|
|
00609D 1 8D 32 E2 sta $E232
|
|
0060A0 1 AD 0C D2 lda $D20C
|
|
0060A3 1 8D 33 E2 sta $E233
|
|
0060A6 1 A9 80 lda #$80
|
|
0060A8 1 8D D4 60 sta L60D4
|
|
0060AB 1 4C BF 60 jmp L60BF
|
|
0060AE 1
|
|
0060AE 1 AD 0B D2 L60AE: lda $D20B
|
|
0060B1 1 8D 36 E2 sta $E236
|
|
0060B4 1 AD 0C D2 lda $D20C
|
|
0060B7 1 8D 37 E2 sta $E237
|
|
0060BA 1 A9 00 lda #$00
|
|
0060BC 1 8D D4 60 sta L60D4
|
|
0060BF 1 A0 12 L60BF: ldy #$12
|
|
0060C1 1 A9 30 lda #$30
|
|
0060C3 1 A2 E2 ldx #$E2
|
|
0060C5 1 20 00 D0 jsr LD000
|
|
0060C8 1 4C 6B 5F jmp L5F6B
|
|
0060CB 1
|
|
0060CB 1 00 L60CB: brk
|
|
0060CC 1 00 L60CC: brk
|
|
0060CD 1 00 L60CD: brk
|
|
0060CE 1 00 L60CE: brk
|
|
0060CF 1 00 L60CF: brk
|
|
0060D0 1 00 L60D0: brk
|
|
0060D1 1 00 L60D1: brk
|
|
0060D2 1 00 L60D2: brk
|
|
0060D3 1 00 L60D3: brk
|
|
0060D4 1 00 L60D4: brk
|
|
0060D5 1 20 F6 87 L60D5: jsr L87F6
|
|
0060D8 1 4C 21 89 jmp L8921
|
|
0060DB 1
|
|
0060DB 1 4C DE 60 L60DB: jmp L60DE
|
|
0060DE 1
|
|
0060DE 1 AD 25 EC L60DE: lda $EC25
|
|
0060E1 1 8D 08 D2 sta $D208
|
|
0060E4 1 A0 41 ldy #$41
|
|
0060E6 1 A9 25 lda #$25
|
|
0060E8 1 A2 EC ldx #$EC
|
|
0060EA 1 20 00 D0 jsr LD000
|
|
0060ED 1 AD 25 EC lda $EC25
|
|
0060F0 1 20 55 88 jsr L8855
|
|
0060F3 1 A0 44 ldy #$44
|
|
0060F5 1 A9 08 lda #$08
|
|
0060F7 1 A2 D2 ldx #$D2
|
|
0060F9 1 20 00 D0 jsr LD000
|
|
0060FC 1 AD 25 EC lda $EC25
|
|
0060FF 1 20 EF 86 jsr L86EF
|
|
006102 1 85 06 sta L0006
|
|
006104 1 86 07 stx $07
|
|
006106 1 A0 16 ldy #$16
|
|
006108 1 B1 06 lda (L0006),y
|
|
00610A 1 C9 19 cmp #$19
|
|
00610C 1 B0 04 bcs L6112
|
|
00610E 1 A9 19 lda #$19
|
|
006110 1 91 06 sta (L0006),y
|
|
006112 1 A0 14 L6112: ldy #$14
|
|
006114 1 B1 06 lda (L0006),y
|
|
006116 1 38 sec
|
|
006117 1 ED 30 88 sbc L8830
|
|
00611A 1 8D 97 61 sta L6197
|
|
00611D 1 C8 iny
|
|
00611E 1 B1 06 lda (L0006),y
|
|
006120 1 ED 31 88 sbc L8831
|
|
006123 1 8D 98 61 sta L6198
|
|
006126 1 C8 iny
|
|
006127 1 B1 06 lda (L0006),y
|
|
006129 1 38 sec
|
|
00612A 1 ED 32 88 sbc L8832
|
|
00612D 1 8D 99 61 sta L6199
|
|
006130 1 C8 iny
|
|
006131 1 B1 06 lda (L0006),y
|
|
006133 1 ED 33 88 sbc L8833
|
|
006136 1 8D 9A 61 sta L619A
|
|
006139 1 AE 25 EC ldx $EC25
|
|
00613C 1 CA dex
|
|
00613D 1 BD D1 E6 lda $E6D1,x
|
|
006140 1 F0 01 beq L6143
|
|
006142 1 60 L6142: rts
|
|
006143 1
|
|
006143 1 AD 25 EC L6143: lda $EC25
|
|
006146 1 8D 9F DE sta $DE9F
|
|
006149 1 20 9A D0 jsr LD09A
|
|
00614C 1 A2 00 ldx #$00
|
|
00614E 1 EC A0 DE L614E: cpx $DEA0
|
|
006151 1 D0 0E bne L6161
|
|
006153 1 20 96 D0 jsr LD096
|
|
006156 1 A9 00 lda #$00
|
|
006158 1 8D 9F DE sta $DE9F
|
|
00615B 1 20 9A D0 jsr LD09A
|
|
00615E 1 4C 96 61 jmp L6196
|
|
006161 1
|
|
006161 1 8A L6161: txa
|
|
006162 1 48 pha
|
|
006163 1 BD A1 DE lda $DEA1,x
|
|
006166 1 20 E3 86 jsr L86E3
|
|
006169 1 85 06 sta L0006
|
|
00616B 1 86 07 stx $07
|
|
00616D 1 A0 03 ldy #$03
|
|
00616F 1 B1 06 lda (L0006),y
|
|
006171 1 18 clc
|
|
006172 1 6D 97 61 adc L6197
|
|
006175 1 91 06 sta (L0006),y
|
|
006177 1 C8 iny
|
|
006178 1 B1 06 lda (L0006),y
|
|
00617A 1 6D 98 61 adc L6198
|
|
00617D 1 91 06 sta (L0006),y
|
|
00617F 1 C8 iny
|
|
006180 1 B1 06 lda (L0006),y
|
|
006182 1 18 clc
|
|
006183 1 6D 99 61 adc L6199
|
|
006186 1 91 06 sta (L0006),y
|
|
006188 1 C8 iny
|
|
006189 1 B1 06 lda (L0006),y
|
|
00618B 1 6D 9A 61 adc L619A
|
|
00618E 1 91 06 sta (L0006),y
|
|
006190 1 68 pla
|
|
006191 1 AA tax
|
|
006192 1 E8 inx
|
|
006193 1 4C 4E 61 jmp L614E
|
|
006196 1
|
|
006196 1 60 L6196: rts
|
|
006197 1
|
|
006197 1 00 L6197: brk
|
|
006198 1 00 L6198: brk
|
|
006199 1 00 L6199: brk
|
|
00619A 1 00 L619A: brk
|
|
00619B 1 AD 25 EC L619B: lda $EC25
|
|
00619E 1 8D 08 D2 sta $D208
|
|
0061A1 1 A0 45 ldy #$45
|
|
0061A3 1 A9 08 lda #$08
|
|
0061A5 1 A2 D2 ldx #$D2
|
|
0061A7 1 20 00 D0 jsr LD000
|
|
0061AA 1 20 23 45 jsr L4523
|
|
0061AD 1 AD 25 EC lda $EC25
|
|
0061B0 1 8D 9F DE sta $DE9F
|
|
0061B3 1 20 9A D0 jsr LD09A
|
|
0061B6 1 20 52 6E jsr L6E52
|
|
0061B9 1 20 B1 6D jsr L6DB1
|
|
0061BC 1 20 6E 6E jsr L6E6E
|
|
0061BF 1 A9 00 lda #$00
|
|
0061C1 1 8D 9F DE sta $DE9F
|
|
0061C4 1 20 9A D0 jsr LD09A
|
|
0061C7 1 4C 10 45 jmp L4510
|
|
0061CA 1
|
|
0061CA 1 AD 25 EC L61CA: lda $EC25
|
|
0061CD 1 A0 43 ldy #$43
|
|
0061CF 1 A9 A8 lda #$A8
|
|
0061D1 1 A2 D2 ldx #$D2
|
|
0061D3 1 20 00 D0 jsr LD000
|
|
0061D6 1 AD A8 D2 lda $D2A8
|
|
0061D9 1 D0 01 bne L61DC
|
|
0061DB 1 60 rts
|
|
0061DC 1
|
|
0061DC 1 AD 25 EC L61DC: lda $EC25
|
|
0061DF 1 8D 9F DE sta $DE9F
|
|
0061E2 1 20 9A D0 jsr LD09A
|
|
0061E5 1 20 2B 6D jsr L6D2B
|
|
0061E8 1 AE 25 EC ldx $EC25
|
|
0061EB 1 CA dex
|
|
0061EC 1 BD D1 E6 lda $E6D1,x
|
|
0061EF 1 30 24 bmi L6215
|
|
0061F1 1 AD 9E DD lda $DD9E
|
|
0061F4 1 38 sec
|
|
0061F5 1 ED A0 DE sbc $DEA0
|
|
0061F8 1 8D 9E DD sta $DD9E
|
|
0061FB 1 A0 07 ldy #$07
|
|
0061FD 1 A9 25 lda #$25
|
|
0061FF 1 A2 EC ldx #$EC
|
|
006201 1 20 40 D0 jsr LD040
|
|
006204 1 A2 00 ldx #$00
|
|
006206 1 EC A0 DE L6206: cpx $DEA0
|
|
006209 1 F0 0A beq L6215
|
|
00620B 1 BD A1 DE lda $DEA1,x
|
|
00620E 1 20 82 D0 jsr LD082
|
|
006211 1 E8 inx
|
|
006212 1 4C 06 62 jmp L6206
|
|
006215 1
|
|
006215 1 CE 2E EC L6215: dec $EC2E
|
|
006218 1 A2 00 ldx #$00
|
|
00621A 1 8A txa
|
|
00621B 1 9D A1 DE L621B: sta $DEA1,x
|
|
00621E 1 EC A0 DE cpx $DEA0
|
|
006221 1 F0 04 beq L6227
|
|
006223 1 E8 inx
|
|
006224 1 4C 1B 62 jmp L621B
|
|
006227 1
|
|
006227 1 8D A0 DE L6227: sta $DEA0
|
|
00622A 1 20 96 D0 jsr LD096
|
|
00622D 1 A0 39 ldy #$39
|
|
00622F 1 A9 25 lda #$25
|
|
006231 1 A2 EC ldx #$EC
|
|
006233 1 20 00 D0 jsr LD000
|
|
006236 1 AE 25 EC ldx $EC25
|
|
006239 1 CA dex
|
|
00623A 1 BD 26 EC lda $EC26,x
|
|
00623D 1 8D 2F E2 sta $E22F
|
|
006240 1 20 E3 86 jsr L86E3
|
|
006243 1 85 06 sta L0006
|
|
006245 1 86 07 stx $07
|
|
006247 1 A0 01 ldy #$01
|
|
006249 1 B1 06 lda (L0006),y
|
|
00624B 1 29 0F and #$0F
|
|
00624D 1 F0 27 beq L6276
|
|
00624F 1 A0 02 ldy #$02
|
|
006251 1 B1 06 lda (L0006),y
|
|
006253 1 29 7F and #$7F
|
|
006255 1 91 06 sta (L0006),y
|
|
006257 1 29 0F and #$0F
|
|
006259 1 8D 20 DF sta $DF20
|
|
00625C 1 20 97 89 jsr L8997
|
|
00625F 1 A0 02 ldy #$02
|
|
006261 1 A9 2F lda #$2F
|
|
006263 1 A2 E2 ldx #$E2
|
|
006265 1 20 40 D0 jsr LD040
|
|
006268 1 20 10 45 jsr L4510
|
|
00626B 1 A9 01 lda #$01
|
|
00626D 1 8D 21 DF sta $DF21
|
|
006270 1 AD 2F E2 lda $E22F
|
|
006273 1 8D 22 DF sta $DF22
|
|
006276 1 AE 25 EC L6276: ldx $EC25
|
|
006279 1 CA dex
|
|
00627A 1 BD 26 EC lda $EC26,x
|
|
00627D 1 20 45 73 jsr L7345
|
|
006280 1 AE 25 EC ldx $EC25
|
|
006283 1 CA dex
|
|
006284 1 BD 26 EC lda $EC26,x
|
|
006287 1 E8 inx
|
|
006288 1 20 5C 8B jsr L8B5C
|
|
00628B 1 AE 25 EC ldx $EC25
|
|
00628E 1 CA dex
|
|
00628F 1 A9 00 lda #$00
|
|
006291 1 9D 26 EC sta $EC26,x
|
|
006294 1 9D D1 E6 sta $E6D1,x
|
|
006297 1 A0 41 ldy #$41
|
|
006299 1 A9 25 lda #$25
|
|
00629B 1 A2 EC ldx #$EC
|
|
00629D 1 20 00 D0 jsr LD000
|
|
0062A0 1 A9 00 lda #$00
|
|
0062A2 1 8D 9F DE sta $DE9F
|
|
0062A5 1 20 9A D0 jsr LD09A
|
|
0062A8 1 A9 00 lda #$00
|
|
0062AA 1 8D 69 E2 sta $E269
|
|
0062AD 1 A0 36 ldy #$36
|
|
0062AF 1 A9 67 lda #$67
|
|
0062B1 1 A2 E2 ldx #$E2
|
|
0062B3 1 20 00 D0 jsr LD000
|
|
0062B6 1 20 A2 66 jsr L66A2
|
|
0062B9 1 4C 23 45 jmp L4523
|
|
0062BC 1
|
|
0062BC 1 C9 01 L62BC: cmp #$01
|
|
0062BE 1 90 02 bcc L62C2
|
|
0062C0 1 D0 03 bne L62C5
|
|
0062C2 1 A9 00 L62C2: lda #$00
|
|
0062C4 1 60 rts
|
|
0062C5 1
|
|
0062C5 1 8D 8B 63 L62C5: sta L638B
|
|
0062C8 1 8E 86 63 stx L6386
|
|
0062CB 1 8C 8A 63 sty L638A
|
|
0062CE 1 CD 86 63 cmp L6386
|
|
0062D1 1 90 02 bcc L62D5
|
|
0062D3 1 98 tya
|
|
0062D4 1 60 rts
|
|
0062D5 1
|
|
0062D5 1 A9 00 L62D5: lda #$00
|
|
0062D7 1 8D 85 63 sta L6385
|
|
0062DA 1 8D 89 63 sta L6389
|
|
0062DD 1 18 clc
|
|
0062DE 1 6E 86 63 ror L6386
|
|
0062E1 1 6E 85 63 ror L6385
|
|
0062E4 1 18 clc
|
|
0062E5 1 6E 8A 63 ror L638A
|
|
0062E8 1 6E 89 63 ror L6389
|
|
0062EB 1 A9 00 lda #$00
|
|
0062ED 1 8D 83 63 sta L6383
|
|
0062F0 1 8D 87 63 sta L6387
|
|
0062F3 1 8D 84 63 sta L6384
|
|
0062F6 1 8D 88 63 sta L6388
|
|
0062F9 1 AD 84 63 L62F9: lda L6384
|
|
0062FC 1 CD 8B 63 cmp L638B
|
|
0062FF 1 F0 0E beq L630F
|
|
006301 1 90 06 bcc L6309
|
|
006303 1 20 19 63 jsr L6319
|
|
006306 1 4C F9 62 jmp L62F9
|
|
006309 1
|
|
006309 1 20 4E 63 L6309: jsr L634E
|
|
00630C 1 4C F9 62 jmp L62F9
|
|
00630F 1
|
|
00630F 1 AD 88 63 L630F: lda L6388
|
|
006312 1 C9 01 cmp #$01
|
|
006314 1 B0 02 bcs L6318
|
|
006316 1 A9 01 lda #$01
|
|
006318 1 60 L6318: rts
|
|
006319 1
|
|
006319 1 AD 83 63 L6319: lda L6383
|
|
00631C 1 38 sec
|
|
00631D 1 ED 85 63 sbc L6385
|
|
006320 1 8D 83 63 sta L6383
|
|
006323 1 AD 84 63 lda L6384
|
|
006326 1 ED 86 63 sbc L6386
|
|
006329 1 8D 84 63 sta L6384
|
|
00632C 1 AD 87 63 lda L6387
|
|
00632F 1 38 sec
|
|
006330 1 ED 89 63 sbc L6389
|
|
006333 1 8D 87 63 sta L6387
|
|
006336 1 AD 88 63 lda L6388
|
|
006339 1 ED 8A 63 sbc L638A
|
|
00633C 1 8D 88 63 sta L6388
|
|
00633F 1 18 clc
|
|
006340 1 6E 86 63 ror L6386
|
|
006343 1 6E 85 63 ror L6385
|
|
006346 1 18 clc
|
|
006347 1 6E 8A 63 ror L638A
|
|
00634A 1 6E 89 63 ror L6389
|
|
00634D 1 60 rts
|
|
00634E 1
|
|
00634E 1 AD 83 63 L634E: lda L6383
|
|
006351 1 18 clc
|
|
006352 1 6D 85 63 adc L6385
|
|
006355 1 8D 83 63 sta L6383
|
|
006358 1 AD 84 63 lda L6384
|
|
00635B 1 6D 86 63 adc L6386
|
|
00635E 1 8D 84 63 sta L6384
|
|
006361 1 AD 87 63 L6361: lda L6387
|
|
006364 1 18 clc
|
|
006365 1 6D 89 63 adc L6389
|
|
006368 1 8D 87 63 sta L6387
|
|
00636B 1 AD 88 63 lda L6388
|
|
00636E 1 6D 8A 63 adc L638A
|
|
006371 1 8D 88 63 sta L6388
|
|
006374 1 18 clc
|
|
006375 1 6E 86 63 ror L6386
|
|
006378 1 6E 85 63 ror L6385
|
|
00637B 1 18 clc
|
|
00637C 1 6E 8A 63 ror L638A
|
|
00637F 1 6E 89 63 ror L6389
|
|
006382 1 60 rts
|
|
006383 1
|
|
006383 1 00 L6383: brk
|
|
006384 1 00 L6384: brk
|
|
006385 1 00 L6385: brk
|
|
006386 1 00 L6386: brk
|
|
006387 1 00 L6387: brk
|
|
006388 1 00 L6388: brk
|
|
006389 1 00 L6389: brk
|
|
00638A 1 00 L638A: brk
|
|
00638B 1 00 L638B: brk
|
|
00638C 1 20 0F 65 L638C: jsr L650F
|
|
00638F 1 8C E9 63 sty L63E9
|
|
006392 1 20 4C 64 jsr L644C
|
|
006395 1 8D E8 63 sta L63E8
|
|
006398 1 AD 1F D2 lda $D21F
|
|
00639B 1 38 sec
|
|
00639C 1 ED E8 63 sbc L63E8
|
|
00639F 1 8D EA 63 sta L63EA
|
|
0063A2 1 AD 20 D2 lda $D220
|
|
0063A5 1 E9 00 sbc #$00
|
|
0063A7 1 8D EB 63 sta L63EB
|
|
0063AA 1 AD EA 63 lda L63EA
|
|
0063AD 1 CD 61 7B cmp L7B61
|
|
0063B0 1 AD EB 63 lda L63EB
|
|
0063B3 1 ED 62 7B sbc L7B62
|
|
0063B6 1 30 09 bmi L63C1
|
|
0063B8 1 AD EA 63 lda L63EA
|
|
0063BB 1 AE EB 63 ldx L63EB
|
|
0063BE 1 4C C7 63 jmp L63C7
|
|
0063C1 1
|
|
0063C1 1 AD 61 7B L63C1: lda L7B61
|
|
0063C4 1 AE 62 7B ldx L7B62
|
|
0063C7 1 8D 1F D2 L63C7: sta $D21F
|
|
0063CA 1 8E 20 D2 stx $D220
|
|
0063CD 1 AD 1F D2 lda $D21F
|
|
0063D0 1 18 clc
|
|
0063D1 1 6D E9 63 adc L63E9
|
|
0063D4 1 8D 23 D2 sta $D223
|
|
0063D7 1 AD 20 D2 lda $D220
|
|
0063DA 1 69 00 adc #$00
|
|
0063DC 1 8D 24 D2 sta $D224
|
|
0063DF 1 20 3E 65 jsr L653E
|
|
0063E2 1 20 B1 6D jsr L6DB1
|
|
0063E5 1 4C 56 65 jmp L6556
|
|
0063E8 1
|
|
0063E8 1 00 L63E8: brk
|
|
0063E9 1 00 L63E9: brk
|
|
0063EA 1 00 L63EA: brk
|
|
0063EB 1 00 L63EB: brk
|
|
0063EC 1 20 0F 65 L63EC: jsr L650F
|
|
0063EF 1 8C 49 64 sty L6449
|
|
0063F2 1 20 4C 64 jsr L644C
|
|
0063F5 1 8D 48 64 sta L6448
|
|
0063F8 1 AD 23 D2 lda $D223
|
|
0063FB 1 18 clc
|
|
0063FC 1 6D 48 64 adc L6448
|
|
0063FF 1 8D 4A 64 sta L644A
|
|
006402 1 AD 24 D2 lda $D224
|
|
006405 1 69 00 adc #$00
|
|
006407 1 8D 4B 64 sta L644B
|
|
00640A 1 AD 4A 64 lda L644A
|
|
00640D 1 CD 65 7B cmp L7B65
|
|
006410 1 AD 4B 64 lda L644B
|
|
006413 1 ED 66 7B sbc L7B66
|
|
006416 1 10 09 bpl L6421
|
|
006418 1 AD 4A 64 lda L644A
|
|
00641B 1 AE 4B 64 ldx L644B
|
|
00641E 1 4C 27 64 jmp L6427
|
|
006421 1
|
|
006421 1 AD 65 7B L6421: lda L7B65
|
|
006424 1 AE 66 7B ldx L7B66
|
|
006427 1 8D 23 D2 L6427: sta $D223
|
|
00642A 1 8E 24 D2 stx $D224
|
|
00642D 1 AD 23 D2 lda $D223
|
|
006430 1 38 sec
|
|
006431 1 ED 49 64 sbc L6449
|
|
006434 1 8D 1F D2 sta $D21F
|
|
006437 1 AD 24 D2 lda $D224
|
|
00643A 1 E9 00 sbc #$00
|
|
00643C 1 8D 20 D2 sta $D220
|
|
00643F 1 20 3E 65 jsr L653E
|
|
006442 1 20 B1 6D jsr L6DB1
|
|
006445 1 4C 56 65 jmp L6556
|
|
006448 1
|
|
006448 1 00 L6448: brk
|
|
006449 1 00 L6449: brk
|
|
00644A 1 00 L644A: brk
|
|
00644B 1 00 L644B: brk
|
|
00644C 1 98 L644C: tya
|
|
00644D 1 38 sec
|
|
00644E 1 E9 0E sbc #$0E
|
|
006450 1 60 rts
|
|
006451 1
|
|
006451 1 20 0F 65 L6451: jsr L650F
|
|
006454 1 8D AC 64 sta L64AC
|
|
006457 1 8E AD 64 stx L64AD
|
|
00645A 1 AD 1D D2 lda $D21D
|
|
00645D 1 38 sec
|
|
00645E 1 ED AC 64 sbc L64AC
|
|
006461 1 8D AE 64 sta L64AE
|
|
006464 1 AD 1E D2 lda $D21E
|
|
006467 1 ED AD 64 sbc L64AD
|
|
00646A 1 8D AF 64 sta L64AF
|
|
00646D 1 AD AE 64 lda L64AE
|
|
006470 1 CD 5F 7B cmp L7B5F
|
|
006473 1 AD AF 64 lda L64AF
|
|
006476 1 ED 60 7B sbc L7B60
|
|
006479 1 30 09 bmi L6484
|
|
00647B 1 AD AE 64 lda L64AE
|
|
00647E 1 AE AF 64 ldx L64AF
|
|
006481 1 4C 8A 64 jmp L648A
|
|
006484 1
|
|
006484 1 AD 5F 7B L6484: lda L7B5F
|
|
006487 1 AE 60 7B ldx L7B60
|
|
00648A 1 8D 1D D2 L648A: sta $D21D
|
|
00648D 1 8E 1E D2 stx $D21E
|
|
006490 1 AD 1D D2 lda $D21D
|
|
006493 1 18 clc
|
|
006494 1 6D AC 64 adc L64AC
|
|
006497 1 8D 21 D2 sta $D221
|
|
00649A 1 AD 1E D2 lda $D21E
|
|
00649D 1 6D AD 64 adc L64AD
|
|
0064A0 1 8D 22 D2 sta $D222
|
|
0064A3 1 20 3E 65 jsr L653E
|
|
0064A6 1 20 B1 6D jsr L6DB1
|
|
0064A9 1 4C 56 65 jmp L6556
|
|
0064AC 1
|
|
0064AC 1 00 L64AC: brk
|
|
0064AD 1 00 L64AD: brk
|
|
0064AE 1 00 L64AE: brk
|
|
0064AF 1 00 L64AF: brk
|
|
0064B0 1 20 0F 65 L64B0: jsr L650F
|
|
0064B3 1 8D 0B 65 sta L650B
|
|
0064B6 1 8E 0C 65 stx L650C
|
|
0064B9 1 AD 21 D2 lda $D221
|
|
0064BC 1 18 clc
|
|
0064BD 1 6D 0B 65 adc L650B
|
|
0064C0 1 8D 0D 65 sta L650D
|
|
0064C3 1 AD 22 D2 lda $D222
|
|
0064C6 1 6D 0C 65 adc L650C
|
|
0064C9 1 8D 0E 65 sta L650E
|
|
0064CC 1 AD 0D 65 lda L650D
|
|
0064CF 1 CD 63 7B cmp L7B63
|
|
0064D2 1 AD 0E 65 lda L650E
|
|
0064D5 1 ED 64 7B sbc L7B64
|
|
0064D8 1 10 09 bpl L64E3
|
|
0064DA 1 AD 0D 65 lda L650D
|
|
0064DD 1 AE 0E 65 ldx L650E
|
|
0064E0 1 4C E9 64 jmp L64E9
|
|
0064E3 1
|
|
0064E3 1 AD 63 7B L64E3: lda L7B63
|
|
0064E6 1 AE 64 7B ldx L7B64
|
|
0064E9 1 8D 21 D2 L64E9: sta $D221
|
|
0064EC 1 8E 22 D2 stx $D222
|
|
0064EF 1 AD 21 D2 lda $D221
|
|
0064F2 1 38 sec
|
|
0064F3 1 ED 0B 65 sbc L650B
|
|
0064F6 1 8D 1D D2 sta $D21D
|
|
0064F9 1 AD 22 D2 lda $D222
|
|
0064FC 1 ED 0C 65 sbc L650C
|
|
0064FF 1 8D 1E D2 sta $D21E
|
|
006502 1 20 3E 65 jsr L653E
|
|
006505 1 20 B1 6D jsr L6DB1
|
|
006508 1 4C 56 65 jmp L6556
|
|
00650B 1
|
|
00650B 1 00 L650B: brk
|
|
00650C 1 00 L650C: brk
|
|
00650D 1 00 L650D: brk
|
|
00650E 1 00 L650E: brk
|
|
00650F 1 2C 1B 5B L650F: bit L5B1B
|
|
006512 1 30 03 bmi L6517
|
|
006514 1 20 52 6E jsr L6E52
|
|
006517 1 20 23 65 L6517: jsr L6523
|
|
00651A 1 20 6B 7B jsr L7B6B
|
|
00651D 1 AD 25 EC lda $EC25
|
|
006520 1 4C 5D 7D jmp L7D5D
|
|
006523 1
|
|
006523 1 AD 25 EC L6523: lda $EC25
|
|
006526 1 20 EF 86 jsr L86EF
|
|
006529 1 18 clc
|
|
00652A 1 69 14 adc #$14
|
|
00652C 1 85 06 sta L0006
|
|
00652E 1 8A txa
|
|
00652F 1 69 00 adc #$00
|
|
006531 1 85 07 sta $07
|
|
006533 1 A0 25 ldy #$25
|
|
006535 1 B1 06 L6535: lda (L0006),y
|
|
006537 1 99 15 D2 sta $D215,y
|
|
00653A 1 88 dey
|
|
00653B 1 10 F8 bpl L6535
|
|
00653D 1 60 rts
|
|
00653E 1
|
|
00653E 1 AD 25 EC L653E: lda $EC25
|
|
006541 1 20 EF 86 jsr L86EF
|
|
006544 1 85 06 sta L0006
|
|
006546 1 86 07 stx $07
|
|
006548 1 A0 23 ldy #$23
|
|
00654A 1 A2 07 ldx #$07
|
|
00654C 1 BD 1D D2 L654C: lda $D21D,x
|
|
00654F 1 91 06 sta (L0006),y
|
|
006551 1 88 dey
|
|
006552 1 CA dex
|
|
006553 1 10 F7 bpl L654C
|
|
006555 1 60 rts
|
|
006556 1
|
|
006556 1 2C 1B 5B L6556: bit L5B1B
|
|
006559 1 30 03 bmi L655E
|
|
00655B 1 20 6E 6E jsr L6E6E
|
|
00655E 1 A0 11 L655E: ldy #$11
|
|
006560 1 A9 1D lda #$1D
|
|
006562 1 A2 D2 L6562: ldx #$D2
|
|
006564 1 20 00 D0 jsr LD000
|
|
006567 1 20 10 45 jsr L4510
|
|
00656A 1 4C 19 6C jmp L6C19
|
|
00656D 1
|
|
00656D 1 AD 25 EC L656D: lda $EC25
|
|
006570 1 20 5D 7D jsr L7D5D
|
|
006573 1 8D 00 66 sta L6600
|
|
006576 1 8E 01 66 stx L6601
|
|
006579 1 AD 25 EC lda $EC25
|
|
00657C 1 20 EF 86 jsr L86EF
|
|
00657F 1 85 06 sta L0006
|
|
006581 1 86 07 stx $07
|
|
006583 1 A0 06 ldy #$06
|
|
006585 1 B1 06 lda (L0006),y
|
|
006587 1 A8 tay
|
|
006588 1 AD 63 7B lda L7B63
|
|
00658B 1 38 sec
|
|
00658C 1 ED 5F 7B sbc L7B5F
|
|
00658F 1 8D 02 66 sta L6602
|
|
006592 1 AD 64 7B lda L7B64
|
|
006595 1 ED 60 7B sbc L7B60
|
|
006598 1 8D 03 66 sta L6603
|
|
00659B 1 AD 02 66 lda L6602
|
|
00659E 1 38 sec
|
|
00659F 1 ED 00 66 sbc L6600
|
|
0065A2 1 8D 02 66 sta L6602
|
|
0065A5 1 AD 03 66 lda L6603
|
|
0065A8 1 ED 01 66 sbc L6601
|
|
0065AB 1 8D 03 66 sta L6603
|
|
0065AE 1 4E 03 66 lsr L6603
|
|
0065B1 1 6E 02 66 ror L6602
|
|
0065B4 1 AE 02 66 ldx L6602
|
|
0065B7 1 AD 1D D2 lda $D21D
|
|
0065BA 1 38 sec
|
|
0065BB 1 ED 5F 7B sbc L7B5F
|
|
0065BE 1 8D 02 66 sta L6602
|
|
0065C1 1 AD 1E D2 lda $D21E
|
|
0065C4 1 ED 60 7B sbc L7B60
|
|
0065C7 1 8D 03 66 sta L6603
|
|
0065CA 1 10 04 bpl L65D0
|
|
0065CC 1 A9 00 lda #$00
|
|
0065CE 1 F0 1B beq L65EB
|
|
0065D0 1 AD 21 D2 L65D0: lda $D221
|
|
0065D3 1 CD 63 7B cmp L7B63
|
|
0065D6 1 AD 22 D2 lda $D222
|
|
0065D9 1 ED 64 7B sbc L7B64
|
|
0065DC 1 30 04 bmi L65E2
|
|
0065DE 1 98 tya
|
|
0065DF 1 4C EE 65 jmp L65EE
|
|
0065E2 1
|
|
0065E2 1 4E 03 66 L65E2: lsr L6603
|
|
0065E5 1 6E 02 66 ror L6602
|
|
0065E8 1 AD 02 66 lda L6602
|
|
0065EB 1 20 BC 62 L65EB: jsr L62BC
|
|
0065EE 1 8D 09 D2 L65EE: sta $D209
|
|
0065F1 1 A9 02 lda #$02
|
|
0065F3 1 8D 08 D2 sta $D208
|
|
0065F6 1 A0 4B ldy #$4B
|
|
0065F8 1 A9 08 lda #$08
|
|
0065FA 1 A2 D2 ldx #$D2
|
|
0065FC 1 20 00 D0 jsr LD000
|
|
0065FF 1 60 rts
|
|
006600 1
|
|
006600 1 00 L6600: brk
|
|
006601 1 00 L6601: brk
|
|
006602 1 00 L6602: brk
|
|
006603 1 00 L6603: brk
|
|
006604 1 AD 25 EC L6604: lda $EC25
|
|
006607 1 20 5D 7D jsr L7D5D
|
|
00660A 1 8C 9F 66 sty L669F
|
|
00660D 1 AD 25 EC lda $EC25
|
|
006610 1 20 EF 86 jsr L86EF
|
|
006613 1 85 06 sta L0006
|
|
006615 1 86 07 stx $07
|
|
006617 1 A0 08 ldy #$08
|
|
006619 1 B1 06 lda (L0006),y
|
|
00661B 1 A8 tay
|
|
00661C 1 AD 65 7B lda L7B65
|
|
00661F 1 38 sec
|
|
006620 1 ED 61 7B sbc L7B61
|
|
006623 1 8D A0 66 sta L66A0
|
|
006626 1 AD 66 7B lda L7B66
|
|
006629 1 ED 62 7B sbc L7B62
|
|
00662C 1 8D A1 66 sta L66A1
|
|
00662F 1 AD A0 66 lda L66A0
|
|
006632 1 38 sec
|
|
006633 1 ED 9F 66 sbc L669F
|
|
006636 1 8D A0 66 sta L66A0
|
|
006639 1 AD A1 66 lda L66A1
|
|
00663C 1 E9 00 sbc #$00
|
|
00663E 1 8D A1 66 sta L66A1
|
|
006641 1 4E A1 66 lsr L66A1
|
|
006644 1 6E A0 66 ror L66A0
|
|
006647 1 4E A1 66 lsr L66A1
|
|
00664A 1 6E A0 66 ror L66A0
|
|
00664D 1 AE A0 66 ldx L66A0
|
|
006650 1 AD 1F D2 lda $D21F
|
|
006653 1 38 sec
|
|
006654 1 ED 61 7B sbc L7B61
|
|
006657 1 8D A0 66 sta L66A0
|
|
00665A 1 AD 20 D2 lda $D220
|
|
00665D 1 ED 62 7B sbc L7B62
|
|
006660 1 8D A1 66 sta L66A1
|
|
006663 1 10 04 bpl L6669
|
|
006665 1 A9 00 lda #$00
|
|
006667 1 F0 21 beq L668A
|
|
006669 1 AD 23 D2 L6669: lda $D223
|
|
00666C 1 CD 65 7B cmp L7B65
|
|
00666F 1 AD 24 D2 lda $D224
|
|
006672 1 ED 66 7B sbc L7B66
|
|
006675 1 30 04 bmi L667B
|
|
006677 1 98 tya
|
|
006678 1 4C 8D 66 jmp L668D
|
|
00667B 1
|
|
00667B 1 4E A1 66 L667B: lsr L66A1
|
|
00667E 1 6E A0 66 ror L66A0
|
|
006681 1 4E A1 66 lsr L66A1
|
|
006684 1 6E A0 66 ror L66A0
|
|
006687 1 AD A0 66 lda L66A0
|
|
00668A 1 20 BC 62 L668A: jsr L62BC
|
|
00668D 1 8D 09 D2 L668D: sta $D209
|
|
006690 1 A9 01 lda #$01
|
|
006692 1 8D 08 D2 sta $D208
|
|
006695 1 A0 4B ldy #$4B
|
|
006697 1 A9 08 lda #$08
|
|
006699 1 A2 D2 ldx #$D2
|
|
00669B 1 20 00 D0 jsr LD000
|
|
00669E 1 60 rts
|
|
00669F 1
|
|
00669F 1 00 L669F: brk
|
|
0066A0 1 00 L66A0: brk
|
|
0066A1 1 00 L66A1: brk
|
|
0066A2 1 AE 25 EC L66A2: ldx $EC25
|
|
0066A5 1 F0 03 beq L66AA
|
|
0066A7 1 4C F2 66 jmp L66F2
|
|
0066AA 1
|
|
0066AA 1 A9 01 L66AA: lda #$01
|
|
0066AC 1 8D 6B E2 sta $E26B
|
|
0066AF 1 A0 34 ldy #$34
|
|
0066B1 1 A9 6A lda #$6A
|
|
0066B3 1 A2 E2 ldx #$E2
|
|
0066B5 1 20 00 D0 jsr LD000
|
|
0066B8 1 A9 01 lda #$01
|
|
0066BA 1 8D 6E E2 sta $E26E
|
|
0066BD 1 A9 02 lda #$02
|
|
0066BF 1 8D 6C E2 sta $E26C
|
|
0066C2 1 A9 01 lda #$01
|
|
0066C4 1 8D 6D E2 sta $E26D
|
|
0066C7 1 A0 35 ldy #$35
|
|
0066C9 1 A9 6C lda #$6C
|
|
0066CB 1 A2 E2 ldx #$E2
|
|
0066CD 1 20 00 D0 jsr LD000
|
|
0066D0 1 A9 04 lda #$04
|
|
0066D2 1 8D 6D E2 sta $E26D
|
|
0066D5 1 A0 35 ldy #$35
|
|
0066D7 1 A9 6C lda #$6C
|
|
0066D9 1 A2 E2 ldx #$E2
|
|
0066DB 1 20 00 D0 jsr LD000
|
|
0066DE 1 A9 05 lda #$05
|
|
0066E0 1 8D 6D E2 sta $E26D
|
|
0066E3 1 A0 35 ldy #$35
|
|
0066E5 1 A9 6C lda #$6C
|
|
0066E7 1 A2 E2 ldx #$E2
|
|
0066E9 1 20 00 D0 jsr LD000
|
|
0066EC 1 A9 00 lda #$00
|
|
0066EE 1 8D 59 43 sta L4359
|
|
0066F1 1 60 rts
|
|
0066F2 1
|
|
0066F2 1 CA L66F2: dex
|
|
0066F3 1 BD D1 E6 lda $E6D1,x
|
|
0066F6 1 29 0F and #$0F
|
|
0066F8 1 AA tax
|
|
0066F9 1 E8 inx
|
|
0066FA 1 8E 68 E2 stx $E268
|
|
0066FD 1 A9 01 lda #$01
|
|
0066FF 1 8D 69 E2 sta $E269
|
|
006702 1 A0 36 ldy #$36
|
|
006704 1 A9 67 lda #$67
|
|
006706 1 A2 E2 ldx #$E2
|
|
006708 1 20 00 D0 jsr LD000
|
|
00670B 1 60 rts
|
|
00670C 1
|
|
00670C 1 A9 01 L670C: lda #$01
|
|
00670E 1 8D 6E E2 sta $E26E
|
|
006711 1 A9 02 lda #$02
|
|
006713 1 8D 6C E2 sta $E26C
|
|
006716 1 A9 03 lda #$03
|
|
006718 1 20 3A 67 jsr L673A
|
|
00671B 1 A9 05 lda #$05
|
|
00671D 1 8D 6C E2 sta $E26C
|
|
006720 1 A9 07 lda #$07
|
|
006722 1 20 3A 67 jsr L673A
|
|
006725 1 A9 08 lda #$08
|
|
006727 1 20 3A 67 jsr L673A
|
|
00672A 1 A9 0A lda #$0A
|
|
00672C 1 20 3A 67 jsr L673A
|
|
00672F 1 A9 0B lda #$0B
|
|
006731 1 20 3A 67 jsr L673A
|
|
006734 1 A9 0D lda #$0D
|
|
006736 1 20 3A 67 jsr L673A
|
|
006739 1 60 rts
|
|
00673A 1
|
|
00673A 1 8D 6D E2 L673A: sta $E26D
|
|
00673D 1 A0 35 ldy #$35
|
|
00673F 1 A9 6C lda #$6C
|
|
006741 1 A2 E2 ldx #$E2
|
|
006743 1 20 00 D0 jsr LD000
|
|
006746 1 60 rts
|
|
006747 1
|
|
006747 1 A9 00 L6747: lda #$00
|
|
006749 1 8D 6E E2 sta $E26E
|
|
00674C 1 A9 02 lda #$02
|
|
00674E 1 8D .byte $8D
|
|
00674F 1 6C .byte $6C
|
|
006750 1 E2 L6750: .byte $E2
|
|
006751 1 A9 03 lda #$03
|
|
006753 1 20 75 67 jsr L6775
|
|
006756 1 A9 05 lda #$05
|
|
006758 1 8D 6C E2 sta $E26C
|
|
00675B 1 A9 07 lda #$07
|
|
00675D 1 20 75 67 jsr L6775
|
|
006760 1 A9 08 lda #$08
|
|
006762 1 20 75 67 jsr L6775
|
|
006765 1 A9 0A lda #$0A
|
|
006767 1 20 75 67 jsr L6775
|
|
00676A 1 A9 0B lda #$0B
|
|
00676C 1 20 75 67 jsr L6775
|
|
00676F 1 A9 0D lda #$0D
|
|
006771 1 20 75 67 jsr L6775
|
|
006774 1 60 rts
|
|
006775 1
|
|
006775 1 8D 6D E2 L6775: sta $E26D
|
|
006778 1 A0 35 ldy #$35
|
|
00677A 1 A9 6C lda #$6C
|
|
00677C 1 A2 E2 ldx #$E2
|
|
00677E 1 20 00 D0 jsr LD000
|
|
006781 1 60 rts
|
|
006782 1
|
|
006782 1 A9 00 L6782: lda #$00
|
|
006784 1 8D 6E E2 sta $E26E
|
|
006787 1 4C 8F 67 jmp L678F
|
|
00678A 1
|
|
00678A 1 A9 01 L678A: lda #$01
|
|
00678C 1 8D 6E E2 sta $E26E
|
|
00678F 1 A9 02 L678F: lda #$02
|
|
006791 1 8D 6C E2 sta $E26C
|
|
006794 1 A9 0B lda #$0B
|
|
006796 1 8D 6D E2 sta $E26D
|
|
006799 1 A0 35 ldy #$35
|
|
00679B 1 A9 6C lda #$6C
|
|
00679D 1 A2 E2 ldx #$E2
|
|
00679F 1 20 00 D0 jsr LD000
|
|
0067A2 1 60 rts
|
|
0067A3 1
|
|
0067A3 1 A9 01 L67A3: lda #$01
|
|
0067A5 1 8D 6E E2 sta $E26E
|
|
0067A8 1 4C B0 67 jmp L67B0
|
|
0067AB 1
|
|
0067AB 1 A9 00 L67AB: lda #$00
|
|
0067AD 1 8D 6E E2 sta $E26E
|
|
0067B0 1 A9 03 L67B0: lda #$03
|
|
0067B2 1 8D 6C E2 sta $E26C
|
|
0067B5 1 A9 02 lda #$02
|
|
0067B7 1 20 CA 67 jsr L67CA
|
|
0067BA 1 A9 03 lda #$03
|
|
0067BC 1 20 CA 67 jsr L67CA
|
|
0067BF 1 A9 04 lda #$04
|
|
0067C1 1 20 CA 67 jsr L67CA
|
|
0067C4 1 A9 80 lda #$80
|
|
0067C6 1 8D 44 D3 sta $D344
|
|
0067C9 1 60 rts
|
|
0067CA 1
|
|
0067CA 1 8D 6D E2 L67CA: sta $E26D
|
|
0067CD 1 A0 35 ldy #$35
|
|
0067CF 1 A9 6C lda #$6C
|
|
0067D1 1 A2 E2 ldx #$E2
|
|
0067D3 1 20 00 D0 jsr LD000
|
|
0067D6 1 60 rts
|
|
0067D7 1
|
|
0067D7 1 AD 21 DF L67D7: lda $DF21
|
|
0067DA 1 D0 03 bne L67DF
|
|
0067DC 1 4C 1B 68 jmp L681B
|
|
0067DF 1
|
|
0067DF 1 AA L67DF: tax
|
|
0067E0 1 CA dex
|
|
0067E1 1 AD 0D D2 lda $D20D
|
|
0067E4 1 DD 22 DF L67E4: cmp $DF22,x
|
|
0067E7 1 F0 05 beq L67EE
|
|
0067E9 1 CA dex
|
|
0067EA 1 10 F8 bpl L67E4
|
|
0067EC 1 30 08 bmi L67F6
|
|
0067EE 1 2C AA D2 L67EE: bit $D2AA
|
|
0067F1 1 30 41 bmi L6834
|
|
0067F3 1 4C 80 68 jmp L6880
|
|
0067F6 1
|
|
0067F6 1 2C 61 C0 L67F6: bit $C061
|
|
0067F9 1 10 1D bpl L6818
|
|
0067FB 1 AD 20 DF lda $DF20
|
|
0067FE 1 D0 18 bne L6818
|
|
006800 1 A0 02 ldy #$02
|
|
006802 1 A9 0D lda #$0D
|
|
006804 1 A2 D2 ldx #$D2
|
|
006806 1 20 40 D0 jsr LD040
|
|
006809 1 AE 21 DF ldx $DF21
|
|
00680C 1 AD 0D D2 lda $D20D
|
|
00680F 1 9D 22 DF sta $DF22,x
|
|
006812 1 EE 21 DF inc $DF21
|
|
006815 1 4C 34 68 jmp L6834
|
|
006818 1
|
|
006818 1 20 2B 6D L6818: jsr L6D2B
|
|
00681B 1 A0 02 L681B: ldy #$02
|
|
00681D 1 A9 0D lda #$0D
|
|
00681F 1 A2 D2 ldx #$D2
|
|
006821 1 20 40 D0 jsr LD040
|
|
006824 1 A9 01 lda #$01
|
|
006826 1 8D 21 DF sta $DF21
|
|
006829 1 AD 0D D2 lda $D20D
|
|
00682C 1 8D 22 DF sta $DF22
|
|
00682F 1 A9 00 lda #$00
|
|
006831 1 8D 20 DF sta $DF20
|
|
006834 1 2C AA D2 L6834: bit $D2AA
|
|
006837 1 10 47 bpl L6880
|
|
006839 1 AD 0D D2 lda $D20D
|
|
00683C 1 8D FC EB sta $EBFC
|
|
00683F 1 A0 0A ldy #$0A
|
|
006841 1 A9 FC lda #$FC
|
|
006843 1 A2 EB ldx #$EB
|
|
006845 1 20 40 D0 jsr LD040
|
|
006848 1 AA tax
|
|
006849 1 AD FC EB lda $EBFC
|
|
00684C 1 F0 2A beq L6878
|
|
00684E 1 20 00 8F jsr L8F00
|
|
006851 1 C9 FF cmp #$FF
|
|
006853 1 D0 03 bne L6858
|
|
006855 1 4C 23 45 jmp L4523
|
|
006858 1
|
|
006858 1 AD FC EB L6858: lda $EBFC
|
|
00685B 1 CD FB EB cmp $EBFB
|
|
00685E 1 D0 03 bne L6863
|
|
006860 1 4C 23 45 jmp L4523
|
|
006863 1
|
|
006863 1 AD FC EB L6863: lda $EBFC
|
|
006866 1 10 0A bpl L6872
|
|
006868 1 29 7F and #$7F
|
|
00686A 1 48 pha
|
|
00686B 1 20 0D 6F jsr L6F0D
|
|
00686E 1 68 pla
|
|
00686F 1 4C 78 5E jmp L5E78
|
|
006872 1
|
|
006872 1 20 3F 6A L6872: jsr L6A3F
|
|
006875 1 4C 23 45 jmp L4523
|
|
006878 1
|
|
006878 1 8A L6878: txa
|
|
006879 1 C9 02 cmp #$02
|
|
00687B 1 D0 12 bne L688F
|
|
00687D 1 4C 23 45 jmp L4523
|
|
006880 1
|
|
006880 1 AD 0D D2 L6880: lda $D20D
|
|
006883 1 CD FB EB cmp $EBFB
|
|
006886 1 F0 06 beq L688E
|
|
006888 1 20 8A 6A jsr L6A8A
|
|
00688B 1 20 96 D0 jsr LD096
|
|
00688E 1 60 L688E: rts
|
|
00688F 1
|
|
00688F 1 AE 21 DF L688F: ldx $DF21
|
|
006892 1 CA dex
|
|
006893 1 8A L6893: txa
|
|
006894 1 48 pha
|
|
006895 1 BD 22 DF lda $DF22,x
|
|
006898 1 8D 2D E2 sta $E22D
|
|
00689B 1 A0 03 ldy #$03
|
|
00689D 1 A9 2D lda #$2D
|
|
00689F 1 A2 E2 ldx #$E2
|
|
0068A1 1 20 40 D0 jsr LD040
|
|
0068A4 1 68 pla
|
|
0068A5 1 AA tax
|
|
0068A6 1 CA dex
|
|
0068A7 1 10 EA bpl L6893
|
|
0068A9 1 60 rts
|
|
0068AA 1
|
|
0068AA 1 20 10 45 L68AA: jsr L4510
|
|
0068AD 1 2C 61 C0 bit $C061
|
|
0068B0 1 10 01 bpl L68B3
|
|
0068B2 1 60 rts
|
|
0068B3 1
|
|
0068B3 1 20 2B 6D L68B3: jsr L6D2B
|
|
0068B6 1 A2 03 ldx #$03
|
|
0068B8 1 BD 09 D2 L68B8: lda $D209,x
|
|
0068BB 1 9D 30 E2 sta $E230,x
|
|
0068BE 1 9D 34 E2 sta $E234,x
|
|
0068C1 1 CA dex
|
|
0068C2 1 10 F4 bpl L68B8
|
|
0068C4 1 20 F0 48 jsr L48F0
|
|
0068C7 1 AD .byte $AD
|
|
0068C8 1 08 php
|
|
0068C9 1 D2 C9 L68C9: cmp ($C9)
|
|
0068CB 1 04 F0 tsb $F0
|
|
0068CD 1 01 60 ora ($60,x)
|
|
0068CF 1 A0 08 ldy #$08
|
|
0068D1 1 A9 93 lda #$93
|
|
0068D3 1 A2 D2 ldx #$D2
|
|
0068D5 1 20 00 D0 jsr LD000
|
|
0068D8 1 20 FA 48 jsr L48FA
|
|
0068DB 1 A0 12 ldy #$12
|
|
0068DD 1 A9 30 lda #$30
|
|
0068DF 1 A2 E2 ldx #$E2
|
|
0068E1 1 20 00 D0 jsr LD000
|
|
0068E4 1 20 F0 48 L68E4: jsr L48F0
|
|
0068E7 1 AD 08 D2 lda $D208
|
|
0068EA 1 C9 04 cmp #$04
|
|
0068EC 1 F0 44 beq L6932
|
|
0068EE 1 A0 12 ldy #$12
|
|
0068F0 1 A9 30 lda #$30
|
|
0068F2 1 A2 E2 ldx #$E2
|
|
0068F4 1 20 00 D0 jsr LD000
|
|
0068F7 1 A2 00 ldx #$00
|
|
0068F9 1 EC A0 DE L68F9: cpx $DEA0
|
|
0068FC 1 D0 06 bne L6904
|
|
0068FE 1 A9 00 lda #$00
|
|
006900 1 8D 20 DF sta $DF20
|
|
006903 1 60 rts
|
|
006904 1
|
|
006904 1 8A L6904: txa
|
|
006905 1 48 pha
|
|
006906 1 BD A1 DE lda $DEA1,x
|
|
006909 1 8D 2F E2 sta $E22F
|
|
00690C 1 A0 0D ldy #$0D
|
|
00690E 1 A9 2F lda #$2F
|
|
006910 1 A2 E2 ldx #$E2
|
|
006912 1 20 40 D0 jsr LD040
|
|
006915 1 F0 15 beq L692C
|
|
006917 1 A0 02 ldy #$02
|
|
006919 1 A9 2F lda #$2F
|
|
00691B 1 A2 E2 ldx #$E2
|
|
00691D 1 20 40 D0 jsr LD040
|
|
006920 1 AE 21 DF ldx $DF21
|
|
006923 1 EE 21 DF inc $DF21
|
|
006926 1 AD 2F E2 lda $E22F
|
|
006929 1 9D 22 DF sta $DF22,x
|
|
00692C 1 68 L692C: pla
|
|
00692D 1 AA tax
|
|
00692E 1 E8 inx
|
|
00692F 1 4C F9 68 jmp L68F9
|
|
006932 1
|
|
006932 1 AD 09 D2 L6932: lda $D209
|
|
006935 1 38 sec
|
|
006936 1 ED 39 6A sbc L6A39
|
|
006939 1 8D 35 6A sta L6A35
|
|
00693C 1 AD 0A D2 lda $D20A
|
|
00693F 1 ED 3A 6A sbc L6A3A
|
|
006942 1 8D 36 6A sta L6A36
|
|
006945 1 AD 0B D2 lda $D20B
|
|
006948 1 38 sec
|
|
006949 1 ED 3B 6A sbc L6A3B
|
|
00694C 1 8D 37 6A sta L6A37
|
|
00694F 1 AD 0C D2 lda $D20C
|
|
006952 1 ED 3C 6A sbc L6A3C
|
|
006955 1 8D 38 6A sta L6A38
|
|
006958 1 AD 36 6A lda L6A36
|
|
00695B 1 10 0B bpl L6968
|
|
00695D 1 AD 35 6A lda L6A35
|
|
006960 1 49 FF eor #$FF
|
|
006962 1 8D 35 6A sta L6A35
|
|
006965 1 EE 35 6A inc L6A35
|
|
006968 1 AD 38 6A L6968: lda L6A38
|
|
00696B 1 10 0B bpl L6978
|
|
00696D 1 AD 37 6A lda L6A37
|
|
006970 1 49 FF eor #$FF
|
|
006972 1 8D 37 6A sta L6A37
|
|
006975 1 EE 37 6A inc L6A37
|
|
006978 1 AD 35 6A L6978: lda L6A35
|
|
00697B 1 C9 05 cmp #$05
|
|
00697D 1 B0 0A bcs L6989
|
|
00697F 1 AD 37 6A lda L6A37
|
|
006982 1 C9 05 cmp #$05
|
|
006984 1 B0 03 bcs L6989
|
|
006986 1 4C E4 68 jmp L68E4
|
|
006989 1
|
|
006989 1 A0 12 L6989: ldy #$12
|
|
00698B 1 A9 30 lda #$30
|
|
00698D 1 A2 E2 ldx #$E2
|
|
00698F 1 20 00 D0 jsr LD000
|
|
006992 1 A2 03 ldx #$03
|
|
006994 1 BD 09 D2 L6994: lda $D209,x
|
|
006997 1 9D 39 6A sta L6A39,x
|
|
00699A 1 CA dex
|
|
00699B 1 10 F7 bpl L6994
|
|
00699D 1 AD 09 D2 lda $D209
|
|
0069A0 1 CD 34 E2 cmp $E234
|
|
0069A3 1 AD 0A D2 lda $D20A
|
|
0069A6 1 ED 35 E2 sbc $E235
|
|
0069A9 1 10 27 bpl L69D2
|
|
0069AB 1 AD 09 D2 lda $D209
|
|
0069AE 1 CD 30 E2 cmp $E230
|
|
0069B1 1 AD 0A D2 lda $D20A
|
|
0069B4 1 ED 31 E2 sbc $E231
|
|
0069B7 1 30 05 bmi L69BE
|
|
0069B9 1 2C 3D 6A bit L6A3D
|
|
0069BC 1 10 14 bpl L69D2
|
|
0069BE 1 AD 09 D2 L69BE: lda $D209
|
|
0069C1 1 8D 30 E2 sta $E230
|
|
0069C4 1 AD 0A D2 lda $D20A
|
|
0069C7 1 8D 31 E2 sta $E231
|
|
0069CA 1 A9 80 lda #$80
|
|
0069CC 1 8D 3D 6A sta L6A3D
|
|
0069CF 1 4C E3 69 jmp L69E3
|
|
0069D2 1
|
|
0069D2 1 AD 09 D2 L69D2: lda $D209
|
|
0069D5 1 8D 34 E2 sta $E234
|
|
0069D8 1 AD 0A D2 lda $D20A
|
|
0069DB 1 8D 35 E2 sta $E235
|
|
0069DE 1 A9 00 lda #$00
|
|
0069E0 1 8D 3D 6A sta L6A3D
|
|
0069E3 1 AD 0B D2 L69E3: lda $D20B
|
|
0069E6 1 CD 36 E2 cmp $E236
|
|
0069E9 1 AD 0C D2 lda $D20C
|
|
0069EC 1 ED 37 E2 sbc $E237
|
|
0069EF 1 10 27 bpl L6A18
|
|
0069F1 1 AD 0B D2 lda $D20B
|
|
0069F4 1 CD 32 E2 cmp $E232
|
|
0069F7 1 AD 0C D2 lda $D20C
|
|
0069FA 1 ED 33 E2 sbc $E233
|
|
0069FD 1 30 05 bmi L6A04
|
|
0069FF 1 2C 3E 6A bit L6A3E
|
|
006A02 1 10 14 bpl L6A18
|
|
006A04 1 AD 0B D2 L6A04: lda $D20B
|
|
006A07 1 8D 32 E2 sta $E232
|
|
006A0A 1 AD 0C D2 lda $D20C
|
|
006A0D 1 8D 33 E2 sta $E233
|
|
006A10 1 A9 80 lda #$80
|
|
006A12 1 8D 3E 6A sta L6A3E
|
|
006A15 1 4C 29 6A jmp L6A29
|
|
006A18 1
|
|
006A18 1 AD 0B D2 L6A18: lda $D20B
|
|
006A1B 1 8D 36 E2 sta $E236
|
|
006A1E 1 AD 0C D2 lda $D20C
|
|
006A21 1 8D 37 E2 sta $E237
|
|
006A24 1 A9 00 lda #$00
|
|
006A26 1 8D 3E 6A sta L6A3E
|
|
006A29 1 A0 12 L6A29: ldy #$12
|
|
006A2B 1 A9 30 lda #$30
|
|
006A2D 1 A2 E2 ldx #$E2
|
|
006A2F 1 20 00 D0 jsr LD000
|
|
006A32 1 4C E4 68 jmp L68E4
|
|
006A35 1
|
|
006A35 1 00 L6A35: brk
|
|
006A36 1 00 L6A36: brk
|
|
006A37 1 00 L6A37: brk
|
|
006A38 1 00 L6A38: brk
|
|
006A39 1 00 L6A39: brk
|
|
006A3A 1 00 L6A3A: brk
|
|
006A3B 1 00 L6A3B: brk
|
|
006A3C 1 00 L6A3C: brk
|
|
006A3D 1 00 L6A3D: brk
|
|
006A3E 1 00 L6A3E: brk
|
|
006A3F 1 A2 07 L6A3F: ldx #$07
|
|
006A41 1 DD 26 EC L6A41: cmp $EC26,x
|
|
006A44 1 F0 3A beq L6A80
|
|
006A46 1 CA dex
|
|
006A47 1 10 F8 bpl L6A41
|
|
006A49 1 20 E3 86 jsr L86E3
|
|
006A4C 1 18 clc
|
|
006A4D 1 69 09 adc #$09
|
|
006A4F 1 85 06 sta L0006
|
|
006A51 1 8A txa
|
|
006A52 1 69 00 adc #$00
|
|
006A54 1 85 07 sta $07
|
|
006A56 1 A0 00 ldy #$00
|
|
006A58 1 B1 06 lda (L0006),y
|
|
006A5A 1 A8 tay
|
|
006A5B 1 88 dey
|
|
006A5C 1 B1 06 L6A5C: lda (L0006),y
|
|
006A5E 1 99 20 02 sta $0220,y
|
|
006A61 1 88 dey
|
|
006A62 1 10 F8 bpl L6A5C
|
|
006A64 1 CE 20 02 dec $0220
|
|
006A67 1 A9 2F lda #$2F
|
|
006A69 1 8D 21 02 sta $0221
|
|
006A6C 1 A9 20 lda #$20
|
|
006A6E 1 A2 02 ldx #$02
|
|
006A70 1 AC 20 02 ldy $0220
|
|
006A73 1 20 B7 6F jsr L6FB7
|
|
006A76 1 A9 20 lda #$20
|
|
006A78 1 A2 02 ldx #$02
|
|
006A7A 1 AC 20 02 ldy $0220
|
|
006A7D 1 4C 4B 6F jmp L6F4B
|
|
006A80 1
|
|
006A80 1 E8 L6A80: inx
|
|
006A81 1 8A txa
|
|
006A82 1 48 pha
|
|
006A83 1 20 0D 6F jsr L6F0D
|
|
006A86 1 68 pla
|
|
006A87 1 4C 78 5E jmp L5E78
|
|
006A8A 1
|
|
006A8A 1 8D BE E6 L6A8A: sta $E6BE
|
|
006A8D 1 20 96 D0 jsr LD096
|
|
006A90 1 AD BE E6 lda $E6BE
|
|
006A93 1 A2 07 ldx #$07
|
|
006A95 1 DD 26 EC L6A95: cmp $EC26,x
|
|
006A98 1 F0 06 beq L6AA0
|
|
006A9A 1 CA dex
|
|
006A9B 1 10 F8 bpl L6A95
|
|
006A9D 1 4C 1E 6B jmp L6B1E
|
|
006AA0 1
|
|
006AA0 1 E8 L6AA0: inx
|
|
006AA1 1 EC 25 EC cpx $EC25
|
|
006AA4 1 D0 01 bne L6AA7
|
|
006AA6 1 60 rts
|
|
006AA7 1
|
|
006AA7 1 8E 9F DE L6AA7: stx $DE9F
|
|
006AAA 1 20 9A D0 jsr LD09A
|
|
006AAD 1 AD BE E6 lda $E6BE
|
|
006AB0 1 20 E3 86 jsr L86E3
|
|
006AB3 1 85 06 sta L0006
|
|
006AB5 1 86 07 stx $07
|
|
006AB7 1 A0 02 ldy #$02
|
|
006AB9 1 B1 06 lda (L0006),y
|
|
006ABB 1 09 80 ora #$80
|
|
006ABD 1 91 06 sta (L0006),y
|
|
006ABF 1 A0 02 ldy #$02
|
|
006AC1 1 B1 06 lda (L0006),y
|
|
006AC3 1 29 0F and #$0F
|
|
006AC5 1 8D 12 D2 sta $D212
|
|
006AC8 1 F0 0E beq L6AD8
|
|
006ACA 1 CD 25 EC cmp $EC25
|
|
006ACD 1 D0 20 bne L6AEF
|
|
006ACF 1 20 F2 44 jsr L44F2
|
|
006AD2 1 AD BE E6 lda $E6BE
|
|
006AD5 1 20 15 89 jsr L8915
|
|
006AD8 1 A0 03 L6AD8: ldy #$03
|
|
006ADA 1 A9 BE lda #$BE
|
|
006ADC 1 A2 E6 ldx #$E6
|
|
006ADE 1 20 40 D0 jsr LD040
|
|
006AE1 1 AD 12 D2 lda $D212
|
|
006AE4 1 F0 09 beq L6AEF
|
|
006AE6 1 AD BE E6 lda $E6BE
|
|
006AE9 1 20 93 88 jsr L8893
|
|
006AEC 1 20 10 45 jsr L4510
|
|
006AEF 1 AD BE E6 L6AEF: lda $E6BE
|
|
006AF2 1 AE F1 E1 ldx $E1F1
|
|
006AF5 1 CA dex
|
|
006AF6 1 DD F2 E1 L6AF6: cmp $E1F2,x
|
|
006AF9 1 F0 06 beq L6B01
|
|
006AFB 1 CA dex
|
|
006AFC 1 10 F8 bpl L6AF6
|
|
006AFE 1 20 54 70 jsr L7054
|
|
006B01 1 A0 42 L6B01: ldy #$42
|
|
006B03 1 A9 9F lda #$9F
|
|
006B05 1 A2 DE ldx #$DE
|
|
006B07 1 20 00 D0 jsr LD000
|
|
006B0A 1 AD 9F DE lda $DE9F
|
|
006B0D 1 8D 25 EC sta $EC25
|
|
006B10 1 20 19 6C jsr L6C19
|
|
006B13 1 20 F2 40 jsr L40F2
|
|
006B16 1 A9 00 lda #$00
|
|
006B18 1 8D 9F DE sta $DE9F
|
|
006B1B 1 4C 9A D0 jmp LD09A
|
|
006B1E 1
|
|
006B1E 1 AD 2E EC L6B1E: lda $EC2E
|
|
006B21 1 C9 08 cmp #$08
|
|
006B23 1 90 0A bcc L6B2F
|
|
006B25 1 A9 05 lda #$05
|
|
006B27 1 20 CC 48 jsr L48CC
|
|
006B2A 1 AE 56 E2 ldx $E256
|
|
006B2D 1 9A txs
|
|
006B2E 1 60 rts
|
|
006B2F 1
|
|
006B2F 1 A2 00 L6B2F: ldx #$00
|
|
006B31 1 BD 26 EC L6B31: lda $EC26,x
|
|
006B34 1 F0 04 beq L6B3A
|
|
006B36 1 E8 inx
|
|
006B37 1 4C 31 6B jmp L6B31
|
|
006B3A 1
|
|
006B3A 1 AD BE E6 L6B3A: lda $E6BE
|
|
006B3D 1 9D 26 EC sta $EC26,x
|
|
006B40 1 E8 inx
|
|
006B41 1 8E 9F DE stx $DE9F
|
|
006B44 1 20 9A D0 jsr LD09A
|
|
006B47 1 EE 2E EC inc $EC2E
|
|
006B4A 1 AE 9F DE ldx $DE9F
|
|
006B4D 1 CA dex
|
|
006B4E 1 A9 00 lda #$00
|
|
006B50 1 9D D1 E6 sta $E6D1,x
|
|
006B53 1 AD 2E EC lda $EC2E
|
|
006B56 1 C9 02 cmp #$02
|
|
006B58 1 B0 06 bcs L6B60
|
|
006B5A 1 20 C5 6E jsr L6EC5
|
|
006B5D 1 4C 68 6B jmp L6B68
|
|
006B60 1
|
|
006B60 1 A9 00 L6B60: lda #$00
|
|
006B62 1 8D 69 E2 sta $E269
|
|
006B65 1 20 0F 6C jsr L6C0F
|
|
006B68 1 A9 01 L6B68: lda #$01
|
|
006B6A 1 8D 68 E2 sta $E268
|
|
006B6D 1 8D 69 E2 sta $E269
|
|
006B70 1 20 0F 6C jsr L6C0F
|
|
006B73 1 AD BE E6 lda $E6BE
|
|
006B76 1 20 E3 86 jsr L86E3
|
|
006B79 1 85 06 sta L0006
|
|
006B7B 1 86 07 stx $07
|
|
006B7D 1 A0 02 ldy #$02
|
|
006B7F 1 B1 06 lda (L0006),y
|
|
006B81 1 09 80 ora #$80
|
|
006B83 1 91 06 sta (L0006),y
|
|
006B85 1 A0 02 ldy #$02
|
|
006B87 1 B1 06 lda (L0006),y
|
|
006B89 1 29 0F and #$0F
|
|
006B8B 1 8D 12 D2 sta $D212
|
|
006B8E 1 F0 11 beq L6BA1
|
|
006B90 1 CD 25 EC cmp $EC25
|
|
006B93 1 D0 23 bne L6BB8
|
|
006B95 1 20 F2 44 jsr L44F2
|
|
006B98 1 20 8E 6E jsr L6E8E
|
|
006B9B 1 AD BE E6 lda $E6BE
|
|
006B9E 1 20 15 89 jsr L8915
|
|
006BA1 1 A0 03 L6BA1: ldy #$03
|
|
006BA3 1 A9 BE lda #$BE
|
|
006BA5 1 A2 E6 ldx #$E6
|
|
006BA7 1 20 40 D0 jsr LD040
|
|
006BAA 1 AD 12 D2 lda $D212
|
|
006BAD 1 F0 09 beq L6BB8
|
|
006BAF 1 AD BE E6 lda $E6BE
|
|
006BB2 1 20 93 88 jsr L8893
|
|
006BB5 1 20 10 45 jsr L4510
|
|
006BB8 1 20 4B 74 L6BB8: jsr L744B
|
|
006BBB 1 AD 9F DE lda $DE9F
|
|
006BBE 1 20 EF 86 jsr L86EF
|
|
006BC1 1 A0 38 ldy #$38
|
|
006BC3 1 20 00 D0 jsr LD000
|
|
006BC6 1 AD 25 EC lda $EC25
|
|
006BC9 1 8D 12 D2 sta $D212
|
|
006BCC 1 20 F2 44 jsr L44F2
|
|
006BCF 1 20 EF 78 jsr L78EF
|
|
006BD2 1 20 52 6E jsr L6E52
|
|
006BD5 1 A9 00 lda #$00
|
|
006BD7 1 8D 0E 6C sta L6C0E
|
|
006BDA 1 AD 0E 6C L6BDA: lda L6C0E
|
|
006BDD 1 CD A0 DE cmp $DEA0
|
|
006BE0 1 F0 12 beq L6BF4
|
|
006BE2 1 AA tax
|
|
006BE3 1 BD A1 DE lda $DEA1,x
|
|
006BE6 1 20 E3 86 jsr L86E3
|
|
006BE9 1 A0 01 ldy #$01
|
|
006BEB 1 20 40 D0 jsr LD040
|
|
006BEE 1 EE 0E 6C inc L6C0E
|
|
006BF1 1 4C DA 6B jmp L6BDA
|
|
006BF4 1
|
|
006BF4 1 AD 9F DE L6BF4: lda $DE9F
|
|
006BF7 1 8D 25 EC sta $EC25
|
|
006BFA 1 20 B1 6D jsr L6DB1
|
|
006BFD 1 20 6E 6E jsr L6E6E
|
|
006C00 1 20 96 D0 jsr LD096
|
|
006C03 1 A9 00 lda #$00
|
|
006C05 1 8D 9F DE sta $DE9F
|
|
006C08 1 20 9A D0 jsr LD09A
|
|
006C0B 1 4C 10 45 jmp L4510
|
|
006C0E 1
|
|
006C0E 1 00 L6C0E: brk
|
|
006C0F 1 A0 36 L6C0F: ldy #$36
|
|
006C11 1 A9 67 lda #$67
|
|
006C13 1 A2 E2 ldx #$E2
|
|
006C15 1 20 00 D0 jsr LD000
|
|
006C18 1 60 rts
|
|
006C19 1
|
|
006C19 1 AE 9F DE L6C19: ldx $DE9F
|
|
006C1C 1 CA dex
|
|
006C1D 1 BD D1 E6 lda $E6D1,x
|
|
006C20 1 30 03 bmi L6C25
|
|
006C22 1 4C CD 6C jmp L6CCD
|
|
006C25 1
|
|
006C25 1 20 F6 87 L6C25: jsr L87F6
|
|
006C28 1 AD 9F DE lda $DE9F
|
|
006C2B 1 8D 12 D2 sta $D212
|
|
006C2E 1 20 F2 44 jsr L44F2
|
|
006C31 1 2C 52 41 bit L4152
|
|
006C34 1 30 03 bmi L6C39
|
|
006C36 1 20 EF 78 jsr L78EF
|
|
006C39 1 AD 9F DE L6C39: lda $DE9F
|
|
006C3C 1 8D 12 D2 sta $D212
|
|
006C3F 1 20 05 45 jsr L4505
|
|
006C42 1 2C 52 41 L6C42: bit L4152
|
|
006C45 1 30 03 bmi L6C4A
|
|
006C47 1 20 8E 6E jsr L6E8E
|
|
006C4A 1 AE 9F DE L6C4A: ldx $DE9F
|
|
006C4D 1 CA dex
|
|
006C4E 1 BD 26 EC lda $EC26,x
|
|
006C51 1 A2 00 ldx #$00
|
|
006C53 1 DD F2 E1 L6C53: cmp $E1F2,x
|
|
006C56 1 F0 07 beq L6C5F
|
|
006C58 1 E8 inx
|
|
006C59 1 EC F1 E1 cpx $E1F1
|
|
006C5C 1 D0 F5 bne L6C53
|
|
006C5E 1 60 rts
|
|
006C5F 1
|
|
006C5F 1 8A L6C5F: txa
|
|
006C60 1 0A asl a
|
|
006C61 1 AA tax
|
|
006C62 1 BD 02 E2 lda $E202,x
|
|
006C65 1 8D 1D E7 sta $E71D
|
|
006C68 1 85 06 sta L0006
|
|
006C6A 1 BD 03 E2 lda $E203,x
|
|
006C6D 1 8D 1E E7 sta $E71E
|
|
006C70 1 85 07 sta $07
|
|
006C72 1 AD 83 C0 lda $C083
|
|
006C75 1 AD 83 C0 lda $C083
|
|
006C78 1 A0 00 ldy #$00
|
|
006C7A 1 B1 06 lda (L0006),y
|
|
006C7C 1 A8 tay
|
|
006C7D 1 AD 8B C0 lda LCBANK1
|
|
006C80 1 AD 8B C0 lda LCBANK1
|
|
006C83 1 98 tya
|
|
006C84 1 8D 1F E7 sta $E71F
|
|
006C87 1 EE 1D E7 inc $E71D
|
|
006C8A 1 D0 03 bne L6C8F
|
|
006C8C 1 EE 1E E7 inc $E71E
|
|
006C8F 1 A9 10 L6C8F: lda #$10
|
|
006C91 1 8D DB E6 sta $E6DB
|
|
006C94 1 8D DF E6 sta $E6DF
|
|
006C97 1 8D E3 E6 sta $E6E3
|
|
006C9A 1 8D E7 E6 sta $E6E7
|
|
006C9D 1 A9 00 lda #$00
|
|
006C9F 1 8D DC E6 sta $E6DC
|
|
006CA2 1 8D E0 E6 sta $E6E0
|
|
006CA5 1 8D E4 E6 sta $E6E4
|
|
006CA8 1 8D E8 E6 sta $E6E8
|
|
006CAB 1 A9 00 lda #$00
|
|
006CAD 1 8D CC 6C sta L6CCC
|
|
006CB0 1 AD CC 6C L6CB0: lda L6CCC
|
|
006CB3 1 CD A0 DE cmp $DEA0
|
|
006CB6 1 F0 0D beq L6CC5
|
|
006CB8 1 AA tax
|
|
006CB9 1 BD A1 DE lda $DEA1,x
|
|
006CBC 1 20 3F 81 jsr L813F
|
|
006CBF 1 EE CC 6C inc L6CCC
|
|
006CC2 1 4C B0 6C jmp L6CB0
|
|
006CC5 1
|
|
006CC5 1 20 10 45 L6CC5: jsr L4510
|
|
006CC8 1 20 13 88 jsr L8813
|
|
006CCB 1 60 rts
|
|
006CCC 1
|
|
006CCC 1 00 L6CCC: brk
|
|
006CCD 1 AD 9F DE L6CCD: lda $DE9F
|
|
006CD0 1 8D 12 D2 sta $D212
|
|
006CD3 1 20 F2 44 jsr L44F2
|
|
006CD6 1 2C 52 41 bit L4152
|
|
006CD9 1 30 03 bmi L6CDE
|
|
006CDB 1 20 EF 78 jsr L78EF
|
|
006CDE 1 20 52 6E L6CDE: jsr L6E52
|
|
006CE1 1 20 8E 6E jsr L6E8E
|
|
006CE4 1 A2 07 ldx #$07
|
|
006CE6 1 BD 1D D2 L6CE6: lda $D21D,x
|
|
006CE9 1 9D 30 E2 sta $E230,x
|
|
006CEC 1 CA dex
|
|
006CED 1 10 F7 bpl L6CE6
|
|
006CEF 1 A2 00 ldx #$00
|
|
006CF1 1 8A txa
|
|
006CF2 1 48 pha
|
|
006CF3 1 EC A0 DE L6CF3: cpx $DEA0
|
|
006CF6 1 D0 11 bne L6D09
|
|
006CF8 1 68 pla
|
|
006CF9 1 20 10 45 jsr L4510
|
|
006CFC 1 AD 9F DE lda $DE9F
|
|
006CFF 1 8D 12 D2 sta $D212
|
|
006D02 1 20 F2 44 jsr L44F2
|
|
006D05 1 20 6E 6E jsr L6E6E
|
|
006D08 1 60 rts
|
|
006D09 1
|
|
006D09 1 8A L6D09: txa
|
|
006D0A 1 48 pha
|
|
006D0B 1 BD A1 DE lda $DEA1,x
|
|
006D0E 1 8D 2F E2 sta $E22F
|
|
006D11 1 A0 0D ldy #$0D
|
|
006D13 1 A9 2F lda #$2F
|
|
006D15 1 A2 E2 ldx #$E2
|
|
006D17 1 20 40 D0 jsr LD040
|
|
006D1A 1 F0 09 beq L6D25
|
|
006D1C 1 A0 03 ldy #$03
|
|
006D1E 1 A9 2F lda #$2F
|
|
006D20 1 A2 E2 ldx #$E2
|
|
006D22 1 20 40 D0 jsr LD040
|
|
006D25 1 68 L6D25: pla
|
|
006D26 1 AA tax
|
|
006D27 1 E8 inx
|
|
006D28 1 4C F3 6C jmp L6CF3
|
|
006D2B 1
|
|
006D2B 1 AD 21 DF L6D2B: lda $DF21
|
|
006D2E 1 D0 01 bne L6D31
|
|
006D30 1 60 rts
|
|
006D31 1
|
|
006D31 1 A9 00 L6D31: lda #$00
|
|
006D33 1 8D B0 6D sta L6DB0
|
|
006D36 1 AD 20 DF lda $DF20
|
|
006D39 1 8D 30 E2 sta $E230
|
|
006D3C 1 F0 3F beq L6D7D
|
|
006D3E 1 CD 25 EC cmp $EC25
|
|
006D41 1 F0 0A beq L6D4D
|
|
006D43 1 20 97 89 jsr L8997
|
|
006D46 1 A9 00 lda #$00
|
|
006D48 1 8D 30 E2 sta $E230
|
|
006D4B 1 F0 09 beq L6D56
|
|
006D4D 1 8D 12 D2 L6D4D: sta $D212
|
|
006D50 1 20 F2 44 jsr L44F2
|
|
006D53 1 20 8E 6E jsr L6E8E
|
|
006D56 1 AD B0 6D L6D56: lda L6DB0
|
|
006D59 1 CD 21 DF cmp $DF21
|
|
006D5C 1 F0 3D beq L6D9B
|
|
006D5E 1 AA tax
|
|
006D5F 1 BD 22 DF lda $DF22,x
|
|
006D62 1 8D 2F E2 sta $E22F
|
|
006D65 1 20 15 89 jsr L8915
|
|
006D68 1 A0 0B ldy #$0B
|
|
006D6A 1 A9 2F lda #$2F
|
|
006D6C 1 A2 E2 ldx #$E2
|
|
006D6E 1 20 40 D0 jsr LD040
|
|
006D71 1 AD 2F E2 lda $E22F
|
|
006D74 1 20 93 88 jsr L8893
|
|
006D77 1 EE B0 6D inc L6DB0
|
|
006D7A 1 4C 56 6D jmp L6D56
|
|
006D7D 1
|
|
006D7D 1 AD B0 6D L6D7D: lda L6DB0
|
|
006D80 1 CD 21 DF cmp $DF21
|
|
006D83 1 F0 16 beq L6D9B
|
|
006D85 1 AA tax
|
|
006D86 1 BD 22 DF lda $DF22,x
|
|
006D89 1 8D 2F E2 sta $E22F
|
|
006D8C 1 A0 0B ldy #$0B
|
|
006D8E 1 A9 2F lda #$2F
|
|
006D90 1 A2 E2 ldx #$E2
|
|
006D92 1 20 40 D0 jsr LD040
|
|
006D95 1 EE B0 6D inc L6DB0
|
|
006D98 1 4C 7D 6D jmp L6D7D
|
|
006D9B 1
|
|
006D9B 1 A9 00 L6D9B: lda #$00
|
|
006D9D 1 AE 21 DF ldx $DF21
|
|
006DA0 1 CA dex
|
|
006DA1 1 9D 22 DF L6DA1: sta $DF22,x
|
|
006DA4 1 CA dex
|
|
006DA5 1 10 FA bpl L6DA1
|
|
006DA7 1 8D 21 DF sta $DF21
|
|
006DAA 1 8D 20 DF sta $DF20
|
|
006DAD 1 4C 10 45 jmp L4510
|
|
006DB0 1
|
|
006DB0 1 00 L6DB0: brk
|
|
006DB1 1 AE 25 EC L6DB1: ldx $EC25
|
|
006DB4 1 CA dex
|
|
006DB5 1 BD D1 E6 lda $E6D1,x
|
|
006DB8 1 30 06 bmi L6DC0
|
|
006DBA 1 20 6B 7B jsr L7B6B
|
|
006DBD 1 4C C9 6D jmp L6DC9
|
|
006DC0 1
|
|
006DC0 1 20 52 6E L6DC0: jsr L6E52
|
|
006DC3 1 20 6B 7B jsr L7B6B
|
|
006DC6 1 20 6E 6E jsr L6E6E
|
|
006DC9 1 AD 25 EC L6DC9: lda $EC25
|
|
006DCC 1 8D 12 D2 sta $D212
|
|
006DCF 1 20 F2 44 jsr L44F2
|
|
006DD2 1 AD 5F 7B lda L7B5F
|
|
006DD5 1 CD 1D D2 cmp $D21D
|
|
006DD8 1 AD 60 7B lda L7B60
|
|
006DDB 1 ED 1E D2 sbc $D21E
|
|
006DDE 1 30 1E bmi L6DFE
|
|
006DE0 1 AD 21 D2 lda $D221
|
|
006DE3 1 CD 63 7B cmp L7B63
|
|
006DE6 1 AD 22 D2 lda $D222
|
|
006DE9 1 ED 64 7B sbc L7B64
|
|
006DEC 1 30 10 bmi L6DFE
|
|
006DEE 1 A9 02 lda #$02
|
|
006DF0 1 8D 08 D2 sta $D208
|
|
006DF3 1 A9 00 lda #$00
|
|
006DF5 1 8D 09 D2 sta $D209
|
|
006DF8 1 20 48 6E jsr L6E48
|
|
006DFB 1 4C 0E 6E jmp L6E0E
|
|
006DFE 1
|
|
006DFE 1 A9 02 L6DFE: lda #$02
|
|
006E00 1 8D 08 D2 sta $D208
|
|
006E03 1 A9 01 lda #$01
|
|
006E05 1 8D 09 D2 sta $D209
|
|
006E08 1 20 48 6E jsr L6E48
|
|
006E0B 1 20 6D 65 jsr L656D
|
|
006E0E 1 AD 61 7B L6E0E: lda L7B61
|
|
006E11 1 CD 1F D2 cmp $D21F
|
|
006E14 1 AD 62 7B lda L7B62
|
|
006E17 1 ED 20 D2 sbc $D220
|
|
006E1A 1 30 1C bmi L6E38
|
|
006E1C 1 AD 23 D2 lda $D223
|
|
006E1F 1 CD 65 7B cmp L7B65
|
|
006E22 1 AD 24 D2 lda $D224
|
|
006E25 1 ED 66 7B sbc L7B66
|
|
006E28 1 30 0E bmi L6E38
|
|
006E2A 1 A9 01 lda #$01
|
|
006E2C 1 8D 08 D2 sta $D208
|
|
006E2F 1 A9 00 lda #$00
|
|
006E31 1 8D 09 D2 sta $D209
|
|
006E34 1 20 48 6E jsr L6E48
|
|
006E37 1 60 rts
|
|
006E38 1
|
|
006E38 1 A9 01 L6E38: lda #$01
|
|
006E3A 1 8D 08 D2 sta $D208
|
|
006E3D 1 A9 01 lda #$01
|
|
006E3F 1 8D 09 D2 sta $D209
|
|
006E42 1 20 48 6E jsr L6E48
|
|
006E45 1 4C 04 66 jmp L6604
|
|
006E48 1
|
|
006E48 1 A0 4C L6E48: ldy #$4C
|
|
006E4A 1 A9 08 lda #$08
|
|
006E4C 1 A2 D2 ldx #$D2
|
|
006E4E 1 20 00 D0 jsr LD000
|
|
006E51 1 60 rts
|
|
006E52 1
|
|
006E52 1 A9 00 L6E52: lda #$00
|
|
006E54 1 8D 6D 6E sta L6E6D
|
|
006E57 1 AD 6D 6E L6E57: lda L6E6D
|
|
006E5A 1 CD A0 DE cmp $DEA0
|
|
006E5D 1 F0 0D beq L6E6C
|
|
006E5F 1 AA tax
|
|
006E60 1 BD A1 DE lda $DEA1,x
|
|
006E63 1 20 15 89 jsr L8915
|
|
006E66 1 EE 6D 6E inc L6E6D
|
|
006E69 1 4C 57 6E jmp L6E57
|
|
006E6C 1
|
|
006E6C 1 60 L6E6C: rts
|
|
006E6D 1
|
|
006E6D 1 00 L6E6D: brk
|
|
006E6E 1 A9 00 L6E6E: lda #$00
|
|
006E70 1 8D 89 6E sta L6E89
|
|
006E73 1 AD 89 6E L6E73: lda L6E89
|
|
006E76 1 CD A0 DE cmp $DEA0
|
|
006E79 1 F0 0D beq L6E88
|
|
006E7B 1 AA tax
|
|
006E7C 1 BD A1 DE lda $DEA1,x
|
|
006E7F 1 20 93 88 jsr L8893
|
|
006E82 1 EE 89 6E inc L6E89
|
|
006E85 1 4C 73 6E jmp L6E73
|
|
006E88 1
|
|
006E88 1 60 L6E88: rts
|
|
006E89 1
|
|
006E89 1 00 L6E89: brk
|
|
006E8A 1 A9 80 L6E8A: lda #$80
|
|
006E8C 1 F0 02 beq L6E90
|
|
006E8E 1 A9 00 L6E8E: lda #$00
|
|
006E90 1 8D C4 6E L6E90: sta L6EC4
|
|
006E93 1 AD 17 D2 lda $D217
|
|
006E96 1 18 clc
|
|
006E97 1 69 0F adc #$0F
|
|
006E99 1 8D 17 D2 sta $D217
|
|
006E9C 1 AD 18 D2 lda $D218
|
|
006E9F 1 69 00 adc #$00
|
|
006EA1 1 8D 18 D2 sta $D218
|
|
006EA4 1 AD 1F D2 lda $D21F
|
|
006EA7 1 18 clc
|
|
006EA8 1 69 0F adc #$0F
|
|
006EAA 1 8D 1F D2 sta $D21F
|
|
006EAD 1 AD 20 D2 lda $D220
|
|
006EB0 1 69 00 adc #$00
|
|
006EB2 1 8D 20 D2 sta $D220
|
|
006EB5 1 2C C4 6E bit L6EC4
|
|
006EB8 1 30 09 bmi L6EC3
|
|
006EBA 1 A0 04 ldy #$04
|
|
006EBC 1 A9 15 lda #$15
|
|
006EBE 1 A2 D2 ldx #$D2
|
|
006EC0 1 20 00 D0 jsr LD000
|
|
006EC3 1 60 L6EC3: rts
|
|
006EC4 1
|
|
006EC4 1 00 L6EC4: brk
|
|
006EC5 1 A9 00 L6EC5: lda #$00
|
|
006EC7 1 8D 6B E2 sta $E26B
|
|
006ECA 1 A0 34 ldy #$34
|
|
006ECC 1 A9 6A lda #$6A
|
|
006ECE 1 A2 E2 ldx #$E2
|
|
006ED0 1 20 00 D0 jsr LD000
|
|
006ED3 1 A9 00 lda #$00
|
|
006ED5 1 8D 6E E2 sta $E26E
|
|
006ED8 1 A9 02 lda #$02
|
|
006EDA 1 8D 6C E2 sta $E26C
|
|
006EDD 1 A9 01 lda #$01
|
|
006EDF 1 8D 6D E2 sta $E26D
|
|
006EE2 1 A0 35 ldy #$35
|
|
006EE4 1 A9 6C lda #$6C
|
|
006EE6 1 A2 E2 ldx #$E2
|
|
006EE8 1 20 00 D0 jsr LD000
|
|
006EEB 1 A9 04 lda #$04
|
|
006EED 1 8D 6D E2 sta $E26D
|
|
006EF0 1 A0 35 ldy #$35
|
|
006EF2 1 A9 6C lda #$6C
|
|
006EF4 1 A2 E2 ldx #$E2
|
|
006EF6 1 20 00 D0 jsr LD000
|
|
006EF9 1 A9 05 lda #$05
|
|
006EFB 1 8D 6D E2 sta $E26D
|
|
006EFE 1 A0 35 ldy #$35
|
|
006F00 1 A9 6C lda #$6C
|
|
006F02 1 A2 E2 ldx #$E2
|
|
006F04 1 20 00 D0 jsr LD000
|
|
006F07 1 A9 80 lda #$80
|
|
006F09 1 8D 59 43 sta L4359
|
|
006F0C 1 60 rts
|
|
006F0D 1
|
|
006F0D 1 20 FB 86 L6F0D: jsr L86FB
|
|
006F10 1 85 06 sta L0006
|
|
006F12 1 8D 48 6F sta L6F48
|
|
006F15 1 86 07 stx $07
|
|
006F17 1 8E 49 6F stx L6F49
|
|
006F1A 1 A0 00 ldy #$00
|
|
006F1C 1 B1 06 lda (L0006),y
|
|
006F1E 1 8D 4A 6F sta L6F4A
|
|
006F21 1 C8 iny
|
|
006F22 1 C8 L6F22: iny
|
|
006F23 1 B1 06 lda (L0006),y
|
|
006F25 1 C9 2F cmp #$2F
|
|
006F27 1 F0 08 beq L6F31
|
|
006F29 1 CC 4A 6F cpy L6F4A
|
|
006F2C 1 F0 04 beq L6F32
|
|
006F2E 1 4C 22 6F jmp L6F22
|
|
006F31 1
|
|
006F31 1 88 L6F31: dey
|
|
006F32 1 8C 4A 6F L6F32: sty L6F4A
|
|
006F35 1 A5 06 lda L0006
|
|
006F37 1 A6 07 ldx $07
|
|
006F39 1 20 B7 6F jsr L6FB7
|
|
006F3C 1 AD 48 6F lda L6F48
|
|
006F3F 1 AE 49 6F ldx L6F49
|
|
006F42 1 AC 4A 6F ldy L6F4A
|
|
006F45 1 4C 4B 6F jmp L6F4B
|
|
006F48 1
|
|
006F48 1 00 L6F48: brk
|
|
006F49 1 00 L6F49: brk
|
|
006F4A 1 00 L6F4A: brk
|
|
006F4B 1 85 06 L6F4B: sta L0006
|
|
006F4D 1 86 07 stx $07
|
|
006F4F 1 8C 5D 70 sty L705D
|
|
006F52 1 B1 06 L6F52: lda (L0006),y
|
|
006F54 1 99 5D 70 sta L705D,y
|
|
006F57 1 88 dey
|
|
006F58 1 D0 F8 bne L6F52
|
|
006F5A 1 20 EC 72 jsr L72EC
|
|
006F5D 1 D0 30 bne L6F8F
|
|
006F5F 1 AD 4B 70 lda L704B
|
|
006F62 1 F0 2B beq L6F8F
|
|
006F64 1 CE 4B 70 L6F64: dec L704B
|
|
006F67 1 30 26 bmi L6F8F
|
|
006F69 1 AE 4B 70 ldx L704B
|
|
006F6C 1 BD 4C 70 lda L704C,x
|
|
006F6F 1 38 sec
|
|
006F70 1 E9 01 sbc #$01
|
|
006F72 1 0A asl a
|
|
006F73 1 AA tax
|
|
006F74 1 AD BD 70 lda L70BD
|
|
006F77 1 9D 8B EB sta $EB8B,x
|
|
006F7A 1 AD BE 70 lda L70BE
|
|
006F7D 1 9D 8C EB sta $EB8C,x
|
|
006F80 1 AD BB 70 lda L70BB
|
|
006F83 1 9D 9B EB sta $EB9B,x
|
|
006F86 1 AD BC 70 lda L70BC
|
|
006F89 1 9D 9C EB sta $EB9C,x
|
|
006F8C 1 4C 64 6F jmp L6F64
|
|
006F8F 1
|
|
006F8F 1 60 L6F8F: rts
|
|
006F90 1
|
|
006F90 1 85 0A L6F90: sta $0A
|
|
006F92 1 86 0B stx $0B
|
|
006F94 1 A0 00 ldy #$00
|
|
006F96 1 B1 0A lda ($0A),y
|
|
006F98 1 A8 tay
|
|
006F99 1 B1 0A L6F99: lda ($0A),y
|
|
006F9B 1 C9 2F cmp #$2F
|
|
006F9D 1 F0 0A beq L6FA9
|
|
006F9F 1 88 dey
|
|
006FA0 1 10 F7 bpl L6F99
|
|
006FA2 1 A0 01 ldy #$01
|
|
006FA4 1 88 L6FA4: dey
|
|
006FA5 1 B1 0A lda ($0A),y
|
|
006FA7 1 A8 tay
|
|
006FA8 1 60 rts
|
|
006FA9 1
|
|
006FA9 1 C0 01 L6FA9: cpy #$01
|
|
006FAB 1 F0 F7 beq L6FA4
|
|
006FAD 1 88 dey
|
|
006FAE 1 60 rts
|
|
006FAF 1
|
|
006FAF 1 85 06 L6FAF: sta L0006
|
|
006FB1 1 86 07 stx $07
|
|
006FB3 1 A9 80 lda #$80
|
|
006FB5 1 D0 06 bne L6FBD
|
|
006FB7 1 85 06 L6FB7: sta L0006
|
|
006FB9 1 86 07 stx $07
|
|
006FBB 1 A9 00 lda #$00
|
|
006FBD 1 8D 4A 70 L6FBD: sta L704A
|
|
006FC0 1 2C 4A 70 bit L704A
|
|
006FC3 1 10 05 bpl L6FCA
|
|
006FC5 1 A0 00 ldy #$00
|
|
006FC7 1 B1 06 lda (L0006),y
|
|
006FC9 1 A8 tay
|
|
006FCA 1 8C 76 4F L6FCA: sty L4F76
|
|
006FCD 1 B1 06 L6FCD: lda (L0006),y
|
|
006FCF 1 99 76 4F sta L4F76,y
|
|
006FD2 1 88 dey
|
|
006FD3 1 D0 F8 bne L6FCD
|
|
006FD5 1 A9 76 lda #$76
|
|
006FD7 1 A2 4F ldx #$4F
|
|
006FD9 1 20 BA 87 jsr L87BA
|
|
006FDC 1 A9 00 lda #$00
|
|
006FDE 1 8D 4B 70 sta L704B
|
|
006FE1 1 8D 49 70 sta L7049
|
|
006FE4 1 EE 49 70 L6FE4: inc L7049
|
|
006FE7 1 AD 49 70 lda L7049
|
|
006FEA 1 C9 09 cmp #$09
|
|
006FEC 1 90 08 bcc L6FF6
|
|
006FEE 1 2C 4A 70 bit L704A
|
|
006FF1 1 10 02 bpl L6FF5
|
|
006FF3 1 A9 00 lda #$00
|
|
006FF5 1 60 L6FF5: rts
|
|
006FF6 1
|
|
006FF6 1 20 EF 86 L6FF6: jsr L86EF
|
|
006FF9 1 85 06 sta L0006
|
|
006FFB 1 86 07 stx $07
|
|
006FFD 1 A0 0A ldy #$0A
|
|
006FFF 1 B1 06 lda (L0006),y
|
|
007001 1 F0 E1 beq L6FE4
|
|
007003 1 AD 49 70 lda L7049
|
|
007006 1 20 FB 86 jsr L86FB
|
|
007009 1 85 06 sta L0006
|
|
00700B 1 86 07 stx $07
|
|
00700D 1 A0 00 ldy #$00
|
|
00700F 1 B1 06 lda (L0006),y
|
|
007011 1 A8 tay
|
|
007012 1 CD 76 4F cmp L4F76
|
|
007015 1 F0 10 beq L7027
|
|
007017 1 2C 4A 70 bit L704A
|
|
00701A 1 30 C8 bmi L6FE4
|
|
00701C 1 AC 76 4F ldy L4F76
|
|
00701F 1 C8 iny
|
|
007020 1 B1 06 lda (L0006),y
|
|
007022 1 C9 2F cmp #$2F
|
|
007024 1 D0 BE bne L6FE4
|
|
007026 1 88 dey
|
|
007027 1 B1 06 L7027: lda (L0006),y
|
|
007029 1 D9 76 4F cmp L4F76,y
|
|
00702C 1 D0 B6 bne L6FE4
|
|
00702E 1 88 dey
|
|
00702F 1 D0 F6 bne L7027
|
|
007031 1 2C 4A 70 bit L704A
|
|
007034 1 30 0F bmi L7045
|
|
007036 1 AE 4B 70 ldx L704B
|
|
007039 1 AD 49 70 lda L7049
|
|
00703C 1 9D 4C 70 sta L704C,x
|
|
00703F 1 EE 4B 70 inc L704B
|
|
007042 1 4C E4 6F jmp L6FE4
|
|
007045 1
|
|
007045 1 AD 49 70 L7045: lda L7049
|
|
007048 1 60 rts
|
|
007049 1
|
|
007049 1 00 L7049: brk
|
|
00704A 1 00 L704A: brk
|
|
00704B 1 00 L704B: brk
|
|
00704C 1 00 L704C: brk
|
|
00704D 1 00 brk
|
|
00704E 1 00 brk
|
|
00704F 1 00 brk
|
|
007050 1 00 brk
|
|
007051 1 00 brk
|
|
007052 1 00 brk
|
|
007053 1 00 brk
|
|
007054 1 4C C5 70 L7054: jmp L70C5
|
|
007057 1
|
|
007057 1 03 .byte $03
|
|
007058 1 5D 70 00 eor a:$70,x
|
|
00705B 1 08 php
|
|
00705C 1 00 L705C: brk
|
|
00705D 1 00 L705D: brk
|
|
00705E 1 00 brk
|
|
00705F 1 00 brk
|
|
007060 1 00 brk
|
|
007061 1 00 brk
|
|
007062 1 00 brk
|
|
007063 1 00 brk
|
|
007064 1 00 brk
|
|
007065 1 00 brk
|
|
007066 1 00 brk
|
|
007067 1 00 brk
|
|
007068 1 00 brk
|
|
007069 1 00 brk
|
|
00706A 1 00 brk
|
|
00706B 1 00 brk
|
|
00706C 1 00 brk
|
|
00706D 1 00 brk
|
|
00706E 1 00 brk
|
|
00706F 1 00 brk
|
|
007070 1 00 brk
|
|
007071 1 00 brk
|
|
007072 1 00 brk
|
|
007073 1 00 brk
|
|
007074 1 00 brk
|
|
007075 1 00 brk
|
|
007076 1 00 brk
|
|
007077 1 00 brk
|
|
007078 1 00 brk
|
|
007079 1 00 brk
|
|
00707A 1 00 brk
|
|
00707B 1 00 brk
|
|
00707C 1 00 brk
|
|
00707D 1 00 brk
|
|
00707E 1 00 brk
|
|
00707F 1 00 brk
|
|
007080 1 00 brk
|
|
007081 1 00 brk
|
|
007082 1 00 brk
|
|
007083 1 00 brk
|
|
007084 1 00 brk
|
|
007085 1 00 brk
|
|
007086 1 00 brk
|
|
007087 1 00 brk
|
|
007088 1 00 brk
|
|
007089 1 00 brk
|
|
00708A 1 00 brk
|
|
00708B 1 00 brk
|
|
00708C 1 00 brk
|
|
00708D 1 00 brk
|
|
00708E 1 00 brk
|
|
00708F 1 00 brk
|
|
007090 1 00 brk
|
|
007091 1 00 brk
|
|
007092 1 00 brk
|
|
007093 1 00 brk
|
|
007094 1 00 brk
|
|
007095 1 00 brk
|
|
007096 1 00 brk
|
|
007097 1 00 brk
|
|
007098 1 00 brk
|
|
007099 1 00 brk
|
|
00709A 1 00 brk
|
|
00709B 1 00 brk
|
|
00709C 1 00 brk
|
|
00709D 1 00 brk
|
|
00709E 1 04 .byte $04
|
|
00709F 1 00 L709F: brk
|
|
0070A0 1 00 brk
|
|
0070A1 1 0C 00 02 tsb $0200
|
|
0070A4 1 00 brk
|
|
0070A5 1 00 brk
|
|
0070A6 1 01 .byte $01
|
|
0070A7 1 00 L70A7: brk
|
|
0070A8 1 0A asl a
|
|
0070A9 1 5D 70 00 eor a:$70,x
|
|
0070AC 1 00 brk
|
|
0070AD 1 00 L70AD: brk
|
|
0070AE 1 00 L70AE: brk
|
|
0070AF 1 00 brk
|
|
0070B0 1 00 L70B0: brk
|
|
0070B1 1 00 L70B1: brk
|
|
0070B2 1 00 brk
|
|
0070B3 1 00 brk
|
|
0070B4 1 00 brk
|
|
0070B5 1 00 brk
|
|
0070B6 1 00 brk
|
|
0070B7 1 00 brk
|
|
0070B8 1 00 brk
|
|
0070B9 1 00 brk
|
|
0070BA 1 00 brk
|
|
0070BB 1 00 L70BB: brk
|
|
0070BC 1 00 L70BC: brk
|
|
0070BD 1 00 L70BD: brk
|
|
0070BE 1 00 L70BE: brk
|
|
0070BF 1 00 L70BF: brk
|
|
0070C0 1 00 L70C0: brk
|
|
0070C1 1 00 L70C1: brk
|
|
0070C2 1 00 L70C2: brk
|
|
0070C3 1 00 L70C3: brk
|
|
0070C4 1 00 L70C4: brk
|
|
0070C5 1 8D A7 72 L70C5: sta L72A7
|
|
0070C8 1 20 F6 87 jsr L87F6
|
|
0070CB 1 A2 40 ldx #$40
|
|
0070CD 1 BD B0 E1 L70CD: lda $E1B0,x
|
|
0070D0 1 9D 5D 70 sta L705D,x
|
|
0070D3 1 CA dex
|
|
0070D4 1 10 F7 bpl L70CD
|
|
0070D6 1 20 AA 72 jsr L72AA
|
|
0070D9 1 AD 5C 70 lda L705C
|
|
0070DC 1 8D 9F 70 sta L709F
|
|
0070DF 1 8D A7 70 sta L70A7
|
|
0070E2 1 20 CE 72 jsr L72CE
|
|
0070E5 1 20 E2 72 jsr L72E2
|
|
0070E8 1 A2 00 ldx #$00
|
|
0070EA 1 BD 23 0C L70EA: lda $0C23,x
|
|
0070ED 1 9D BF 70 sta L70BF,x
|
|
0070F0 1 E8 inx
|
|
0070F1 1 E0 04 cpx #$04
|
|
0070F3 1 D0 F5 bne L70EA
|
|
0070F5 1 AD 5D 48 lda L485D
|
|
0070F8 1 38 sec
|
|
0070F9 1 ED 5F 48 sbc L485F
|
|
0070FC 1 8D A8 72 sta L72A8
|
|
0070FF 1 AD 5E 48 lda L485E
|
|
007102 1 ED 60 48 sbc L4860
|
|
007105 1 8D A9 72 sta L72A9
|
|
007108 1 A2 05 ldx #$05
|
|
00710A 1 4E A9 72 L710A: lsr L72A9
|
|
00710D 1 6E A8 72 ror L72A8
|
|
007110 1 CA dex
|
|
007111 1 E0 00 cpx #$00
|
|
007113 1 D0 F5 bne L710A
|
|
007115 1 AD C2 70 lda L70C2
|
|
007118 1 D0 2D bne L7147
|
|
00711A 1 AD 9E DD lda $DD9E
|
|
00711D 1 18 clc
|
|
00711E 1 6D C1 70 adc L70C1
|
|
007121 1 B0 24 bcs L7147
|
|
007123 1 C9 7C cmp #$7C
|
|
007125 1 B0 20 bcs L7147
|
|
007127 1 AD A8 72 lda L72A8
|
|
00712A 1 38 sec
|
|
00712B 1 ED 31 BF sbc $BF31
|
|
00712E 1 8D A8 72 sta L72A8
|
|
007131 1 AD A9 72 lda L72A9
|
|
007134 1 E9 00 sbc #$00
|
|
007136 1 8D A9 72 sta L72A9
|
|
007139 1 AD A8 72 lda L72A8
|
|
00713C 1 CD C1 70 cmp L70C1
|
|
00713F 1 AD A9 72 lda L72A9
|
|
007142 1 ED C2 70 sbc L70C2
|
|
007145 1 B0 22 bcs L7169
|
|
007147 1 AD 2E EC L7147: lda $EC2E
|
|
00714A 1 20 19 8B jsr L8B19
|
|
00714D 1 CE 2E EC dec $EC2E
|
|
007150 1 20 23 45 jsr L4523
|
|
007153 1 20 D8 72 jsr L72D8
|
|
007156 1 AD 25 EC lda $EC25
|
|
007159 1 F0 04 beq L715F
|
|
00715B 1 A9 03 lda #$03
|
|
00715D 1 D0 02 bne L7161
|
|
00715F 1 A9 04 L715F: lda #$04
|
|
007161 1 20 CC 48 L7161: jsr L48CC
|
|
007164 1 AE 56 E2 ldx $E256
|
|
007167 1 9A txs
|
|
007168 1 60 rts
|
|
007169 1
|
|
007169 1 AD 5F 48 L7169: lda L485F
|
|
00716C 1 85 06 sta L0006
|
|
00716E 1 AD 60 48 lda L4860
|
|
007171 1 85 07 sta $07
|
|
007173 1 AD F1 E1 lda $E1F1
|
|
007176 1 0A asl a
|
|
007177 1 AA tax
|
|
007178 1 A5 06 lda L0006
|
|
00717A 1 9D 02 E2 sta $E202,x
|
|
00717D 1 A5 07 lda $07
|
|
00717F 1 9D 03 E2 sta $E203,x
|
|
007182 1 AE F1 E1 ldx $E1F1
|
|
007185 1 AD A7 72 lda L72A7
|
|
007188 1 9D F2 E1 sta $E1F2,x
|
|
00718B 1 EE F1 E1 inc $E1F1
|
|
00718E 1 AD C1 70 lda L70C1
|
|
007191 1 48 pha
|
|
007192 1 AD 83 C0 lda $C083
|
|
007195 1 AD 83 C0 lda $C083
|
|
007198 1 A0 00 ldy #$00
|
|
00719A 1 68 pla
|
|
00719B 1 91 06 sta (L0006),y
|
|
00719D 1 AD 8B C0 lda LCBANK1
|
|
0071A0 1 AD 8B C0 lda LCBANK1
|
|
0071A3 1 A9 FF lda #$FF
|
|
0071A5 1 8D C4 70 sta L70C4
|
|
0071A8 1 A9 00 lda #$00
|
|
0071AA 1 8D C3 70 sta L70C3
|
|
0071AD 1 A9 04 lda #$04
|
|
0071AF 1 85 08 sta $08
|
|
0071B1 1 A9 0C lda #$0C
|
|
0071B3 1 85 09 sta $09
|
|
0071B5 1 E6 06 inc L0006
|
|
0071B7 1 A5 06 lda L0006
|
|
0071B9 1 D0 02 bne L71BD
|
|
0071BB 1 E6 07 inc $07
|
|
0071BD 1 EE C4 70 L71BD: inc L70C4
|
|
0071C0 1 AD C4 70 lda L70C4
|
|
0071C3 1 CD C1 70 cmp L70C1
|
|
0071C6 1 D0 03 bne L71CB
|
|
0071C8 1 4C 96 72 jmp L7296
|
|
0071CB 1
|
|
0071CB 1 EE C3 70 L71CB: inc L70C3
|
|
0071CE 1 AD C3 70 lda L70C3
|
|
0071D1 1 CD C0 70 cmp L70C0
|
|
0071D4 1 F0 11 beq L71E7
|
|
0071D6 1 A5 08 lda $08
|
|
0071D8 1 18 clc
|
|
0071D9 1 6D BF 70 adc L70BF
|
|
0071DC 1 85 08 sta $08
|
|
0071DE 1 A5 09 lda $09
|
|
0071E0 1 69 00 adc #$00
|
|
0071E2 1 85 09 sta $09
|
|
0071E4 1 4C F7 71 jmp L71F7
|
|
0071E7 1
|
|
0071E7 1 A9 00 L71E7: lda #$00
|
|
0071E9 1 8D C3 70 sta L70C3
|
|
0071EC 1 A9 04 lda #$04
|
|
0071EE 1 85 08 sta $08
|
|
0071F0 1 A9 0C lda #$0C
|
|
0071F2 1 85 09 sta $09
|
|
0071F4 1 20 CE 72 jsr L72CE
|
|
0071F7 1 A2 00 L71F7: ldx #$00
|
|
0071F9 1 A0 00 ldy #$00
|
|
0071FB 1 B1 08 lda ($08),y
|
|
0071FD 1 29 0F and #$0F
|
|
0071FF 1 9D 00 1F sta $1F00,x
|
|
007202 1 D0 1F bne L7223
|
|
007204 1 EE C3 70 inc L70C3
|
|
007207 1 AD C3 70 lda L70C3
|
|
00720A 1 CD C0 70 cmp L70C0
|
|
00720D 1 D0 03 bne L7212
|
|
00720F 1 4C E7 71 jmp L71E7
|
|
007212 1
|
|
007212 1 A5 08 L7212: lda $08
|
|
007214 1 18 clc
|
|
007215 1 6D BF 70 adc L70BF
|
|
007218 1 85 08 sta $08
|
|
00721A 1 A5 09 lda $09
|
|
00721C 1 69 00 adc #$00
|
|
00721E 1 85 09 sta $09
|
|
007220 1 4C F7 71 jmp L71F7
|
|
007223 1
|
|
007223 1 C8 L7223: iny
|
|
007224 1 E8 inx
|
|
007225 1 B1 08 L7225: lda ($08),y
|
|
007227 1 9D 00 1F sta $1F00,x
|
|
00722A 1 C8 iny
|
|
00722B 1 E8 inx
|
|
00722C 1 E0 11 cpx #$11
|
|
00722E 1 D0 F5 bne L7225
|
|
007230 1 A0 13 ldy #$13
|
|
007232 1 B1 08 lda ($08),y
|
|
007234 1 9D 00 1F sta $1F00,x
|
|
007237 1 E8 inx
|
|
007238 1 C8 iny
|
|
007239 1 B1 08 lda ($08),y
|
|
00723B 1 9D 00 1F sta $1F00,x
|
|
00723E 1 A0 18 ldy #$18
|
|
007240 1 E8 inx
|
|
007241 1 B1 08 L7241: lda ($08),y
|
|
007243 1 9D 00 1F sta $1F00,x
|
|
007246 1 E8 inx
|
|
007247 1 C8 iny
|
|
007248 1 C0 1C cpy #$1C
|
|
00724A 1 D0 F5 bne L7241
|
|
00724C 1 A0 21 ldy #$21
|
|
00724E 1 B1 08 L724E: lda ($08),y
|
|
007250 1 9D 00 1F sta $1F00,x
|
|
007253 1 E8 inx
|
|
007254 1 C8 iny
|
|
007255 1 C0 25 cpy #$25
|
|
007257 1 D0 F5 bne L724E
|
|
007259 1 A0 1E ldy #$1E
|
|
00725B 1 B1 08 lda ($08),y
|
|
00725D 1 9D 00 1F sta $1F00,x
|
|
007260 1 E8 inx
|
|
007261 1 A0 25 L7261: ldy #$25
|
|
007263 1 B1 08 lda ($08),y
|
|
007265 1 9D 00 1F sta $1F00,x
|
|
007268 1 E8 inx
|
|
007269 1 C8 iny
|
|
00726A 1 B1 08 lda ($08),y
|
|
00726C 1 9D 00 1F sta $1F00,x
|
|
00726F 1 AD 83 C0 lda $C083
|
|
007272 1 AD 83 C0 lda $C083
|
|
007275 1 A2 1F ldx #$1F
|
|
007277 1 A0 1F ldy #$1F
|
|
007279 1 BD 00 1F L7279: lda $1F00,x
|
|
00727C 1 91 06 sta (L0006),y
|
|
00727E 1 CA dex
|
|
00727F 1 88 dey
|
|
007280 1 10 F7 bpl L7279
|
|
007282 1 AD 8B C0 lda LCBANK1
|
|
007285 1 AD 8B C0 lda LCBANK1
|
|
007288 1 A9 20 lda #$20
|
|
00728A 1 18 clc
|
|
00728B 1 65 06 adc L0006
|
|
00728D 1 85 06 sta L0006
|
|
00728F 1 90 02 bcc L7293
|
|
007291 1 E6 07 inc $07
|
|
007293 1 4C BD 71 L7293: jmp L71BD
|
|
007296 1
|
|
007296 1 A5 06 L7296: lda L0006
|
|
007298 1 8D 5F 48 sta L485F
|
|
00729B 1 A5 07 lda $07
|
|
00729D 1 8D 60 48 sta L4860
|
|
0072A0 1 20 D8 72 jsr L72D8
|
|
0072A3 1 20 13 88 jsr L8813
|
|
0072A6 1 60 rts
|
|
0072A7 1
|
|
0072A7 1 00 L72A7: brk
|
|
0072A8 1 00 L72A8: brk
|
|
0072A9 1 00 L72A9: brk
|
|
0072AA 1 A0 C8 L72AA: ldy #$C8
|
|
0072AC 1 A9 57 lda #$57
|
|
0072AE 1 A2 70 ldx #$70
|
|
0072B0 1 20 BA 46 jsr L46BA
|
|
0072B3 1 F0 18 beq L72CD
|
|
0072B5 1 20 54 D1 jsr LD154
|
|
0072B8 1 20 1F 8B jsr L8B1F
|
|
0072BB 1 AD 20 DF lda $DF20
|
|
0072BE 1 D0 09 bne L72C9
|
|
0072C0 1 AD BE E6 lda $E6BE
|
|
0072C3 1 8D 3F 53 sta L533F
|
|
0072C6 1 20 A8 59 jsr L59A8
|
|
0072C9 1 AE 56 E2 L72C9: ldx $E256
|
|
0072CC 1 9A txs
|
|
0072CD 1 60 L72CD: rts
|
|
0072CE 1
|
|
0072CE 1 A0 CA L72CE: ldy #$CA
|
|
0072D0 1 A9 9E lda #$9E
|
|
0072D2 1 A2 70 ldx #$70
|
|
0072D4 1 20 BA 46 jsr L46BA
|
|
0072D7 1 60 rts
|
|
0072D8 1
|
|
0072D8 1 A0 CC L72D8: ldy #$CC
|
|
0072DA 1 A9 A6 lda #$A6
|
|
0072DC 1 A2 70 ldx #$70
|
|
0072DE 1 20 BA 46 jsr L46BA
|
|
0072E1 1 60 rts
|
|
0072E2 1
|
|
0072E2 1 AD 04 0C L72E2: lda $0C04
|
|
0072E5 1 29 F0 and #$F0
|
|
0072E7 1 C9 F0 cmp #$F0
|
|
0072E9 1 F0 01 beq L72EC
|
|
0072EB 1 60 rts
|
|
0072EC 1
|
|
0072EC 1 A0 C4 L72EC: ldy #$C4
|
|
0072EE 1 A9 A8 lda #$A8
|
|
0072F0 1 A2 70 ldx #$70
|
|
0072F2 1 20 BA 46 jsr L46BA
|
|
0072F5 1 F0 01 beq L72F8
|
|
0072F7 1 60 rts
|
|
0072F8 1
|
|
0072F8 1 AD AD 70 L72F8: lda L70AD
|
|
0072FB 1 8D BD 70 sta L70BD
|
|
0072FE 1 AD AE 70 lda L70AE
|
|
007301 1 8D BE 70 sta L70BE
|
|
007304 1 AD AD 70 lda L70AD
|
|
007307 1 38 sec
|
|
007308 1 ED B0 70 sbc L70B0
|
|
00730B 1 8D BB 70 sta L70BB
|
|
00730E 1 AD AE 70 lda L70AE
|
|
007311 1 ED B1 70 sbc L70B1
|
|
007314 1 8D BC 70 sta L70BC
|
|
007317 1 AD BD 70 lda L70BD
|
|
00731A 1 38 sec
|
|
00731B 1 ED BB 70 sbc L70BB
|
|
00731E 1 8D BD 70 sta L70BD
|
|
007321 1 AD BE 70 lda L70BE
|
|
007324 1 ED BC 70 sbc L70BC
|
|
007327 1 8D BE 70 sta L70BE
|
|
00732A 1 4E BC 70 lsr L70BC
|
|
00732D 1 6E BB 70 ror L70BB
|
|
007330 1 08 php
|
|
007331 1 4E BE 70 lsr L70BE
|
|
007334 1 6E BD 70 ror L70BD
|
|
007337 1 28 plp
|
|
007338 1 90 08 bcc L7342
|
|
00733A 1 EE BD 70 inc L70BD
|
|
00733D 1 D0 03 bne L7342
|
|
00733F 1 EE BE 70 inc L70BE
|
|
007342 1 A9 00 L7342: lda #$00
|
|
007344 1 60 rts
|
|
007345 1
|
|
007345 1 8D 45 74 L7345: sta L7445
|
|
007348 1 A2 00 ldx #$00
|
|
00734A 1 BD F2 E1 L734A: lda $E1F2,x
|
|
00734D 1 CD 45 74 cmp L7445
|
|
007350 1 F0 06 beq L7358
|
|
007352 1 E8 inx
|
|
007353 1 E0 08 cpx #$08
|
|
007355 1 D0 F3 bne L734A
|
|
007357 1 60 rts
|
|
007358 1
|
|
007358 1 8E 46 74 L7358: stx L7446
|
|
00735B 1 CA dex
|
|
00735C 1 E8 L735C: inx
|
|
00735D 1 BD F3 E1 lda $E1F3,x
|
|
007360 1 9D F2 E1 sta $E1F2,x
|
|
007363 1 EC F1 E1 cpx $E1F1
|
|
007366 1 D0 F4 bne L735C
|
|
007368 1 CE F1 E1 dec $E1F1
|
|
00736B 1 AD 46 74 lda L7446
|
|
00736E 1 CD F1 E1 cmp $E1F1
|
|
007371 1 D0 12 bne L7385
|
|
007373 1 AE 46 74 ldx L7446
|
|
007376 1 0A asl a
|
|
007377 1 AA tax
|
|
007378 1 BD 02 E2 lda $E202,x
|
|
00737B 1 8D 5F 48 sta L485F
|
|
00737E 1 BD 03 E2 lda $E203,x
|
|
007381 1 8D 60 48 sta L4860
|
|
007384 1 60 rts
|
|
007385 1
|
|
007385 1 AD 46 74 L7385: lda L7446
|
|
007388 1 0A asl a
|
|
007389 1 AA tax
|
|
00738A 1 BD 02 E2 lda $E202,x
|
|
00738D 1 85 06 sta L0006
|
|
00738F 1 BD 03 E2 lda $E203,x
|
|
007392 1 85 07 sta $07
|
|
007394 1 E8 inx
|
|
007395 1 E8 inx
|
|
007396 1 BD 02 E2 lda $E202,x
|
|
007399 1 85 08 sta $08
|
|
00739B 1 BD 03 E2 lda $E203,x
|
|
00739E 1 85 09 sta $09
|
|
0073A0 1 A0 00 ldy #$00
|
|
0073A2 1 20 F6 87 jsr L87F6
|
|
0073A5 1 AD 83 C0 L73A5: lda $C083
|
|
0073A8 1 AD 83 C0 lda $C083
|
|
0073AB 1 B1 08 lda ($08),y
|
|
0073AD 1 91 06 sta (L0006),y
|
|
0073AF 1 AD 8B C0 lda LCBANK1
|
|
0073B2 1 AD 8B C0 lda LCBANK1
|
|
0073B5 1 E6 06 inc L0006
|
|
0073B7 1 D0 02 bne L73BB
|
|
0073B9 1 E6 07 inc $07
|
|
0073BB 1 E6 08 L73BB: inc $08
|
|
0073BD 1 D0 02 bne L73C1
|
|
0073BF 1 E6 09 inc $09
|
|
0073C1 1 A5 09 L73C1: lda $09
|
|
0073C3 1 CD 60 48 cmp L4860
|
|
0073C6 1 D0 DD bne L73A5
|
|
0073C8 1 A5 08 lda $08
|
|
0073CA 1 CD 5F 48 cmp L485F
|
|
0073CD 1 D0 D6 bne L73A5
|
|
0073CF 1 20 13 88 jsr L8813
|
|
0073D2 1 AD F1 E1 lda $E1F1
|
|
0073D5 1 0A asl a
|
|
0073D6 1 AA tax
|
|
0073D7 1 AD 5F 48 lda L485F
|
|
0073DA 1 38 sec
|
|
0073DB 1 FD 02 E2 sbc $E202,x
|
|
0073DE 1 8D 47 74 sta L7447
|
|
0073E1 1 AD 60 48 lda L4860
|
|
0073E4 1 FD 03 E2 sbc $E203,x
|
|
0073E7 1 8D 48 74 sta L7448
|
|
0073EA 1 EE 46 74 inc L7446
|
|
0073ED 1 AD 46 74 L73ED: lda L7446
|
|
0073F0 1 CD F1 E1 cmp $E1F1
|
|
0073F3 1 D0 03 bne L73F8
|
|
0073F5 1 4C 29 74 jmp L7429
|
|
0073F8 1
|
|
0073F8 1 AD 46 74 L73F8: lda L7446
|
|
0073FB 1 0A asl a
|
|
0073FC 1 AA tax
|
|
0073FD 1 BD 04 E2 lda $E204,x
|
|
007400 1 38 sec
|
|
007401 1 FD 02 E2 sbc $E202,x
|
|
007404 1 8D 49 74 sta L7449
|
|
007407 1 BD 05 E2 lda $E205,x
|
|
00740A 1 FD 03 E2 sbc $E203,x
|
|
00740D 1 8D 4A 74 sta L744A
|
|
007410 1 BD 00 E2 lda $E200,x
|
|
007413 1 18 clc
|
|
007414 1 6D 49 74 adc L7449
|
|
007417 1 9D 02 E2 sta $E202,x
|
|
00741A 1 BD 01 E2 lda $E201,x
|
|
00741D 1 6D 4A 74 adc L744A
|
|
007420 1 9D 03 E2 sta $E203,x
|
|
007423 1 EE 46 74 inc L7446
|
|
007426 1 4C ED 73 jmp L73ED
|
|
007429 1
|
|
007429 1 AD F1 E1 L7429: lda $E1F1
|
|
00742C 1 38 sec
|
|
00742D 1 E9 01 sbc #$01
|
|
00742F 1 0A asl a
|
|
007430 1 AA tax
|
|
007431 1 BD 02 E2 lda $E202,x
|
|
007434 1 18 clc
|
|
007435 1 6D 47 74 adc L7447
|
|
007438 1 8D 5F 48 sta L485F
|
|
00743B 1 BD 03 E2 lda $E203,x
|
|
00743E 1 6D 48 74 adc L7448
|
|
007441 1 8D 60 48 sta L4860
|
|
007444 1 60 rts
|
|
007445 1
|
|
007445 1 00 L7445: brk
|
|
007446 1 00 L7446: brk
|
|
007447 1 00 L7447: brk
|
|
007448 1 00 L7448: brk
|
|
007449 1 00 L7449: brk
|
|
00744A 1 00 L744A: brk
|
|
00744B 1 AD 9F DE L744B: lda $DE9F
|
|
00744E 1 0A asl a
|
|
00744F 1 AA tax
|
|
007450 1 BD BF E6 lda $E6BF,x
|
|
007453 1 85 08 sta $08
|
|
007455 1 BD C0 E6 lda $E6C0,x
|
|
007458 1 85 09 sta $09
|
|
00745A 1 A0 09 ldy #$09
|
|
00745C 1 B1 06 lda (L0006),y
|
|
00745E 1 A8 tay
|
|
00745F 1 20 F6 87 jsr L87F6
|
|
007462 1 A5 06 lda L0006
|
|
007464 1 18 clc
|
|
007465 1 69 09 adc #$09
|
|
007467 1 85 06 sta L0006
|
|
007469 1 90 02 bcc L746D
|
|
00746B 1 E6 07 inc $07
|
|
00746D 1 98 L746D: tya
|
|
00746E 1 AA tax
|
|
00746F 1 A0 00 ldy #$00
|
|
007471 1 B1 06 L7471: lda (L0006),y
|
|
007473 1 91 08 sta ($08),y
|
|
007475 1 C8 iny
|
|
007476 1 CA dex
|
|
007477 1 D0 F8 bne L7471
|
|
007479 1 A9 20 lda #$20
|
|
00747B 1 91 08 sta ($08),y
|
|
00747D 1 A0 02 ldy #$02
|
|
00747F 1 B1 08 lda ($08),y
|
|
007481 1 29 DF and #$DF
|
|
007483 1 91 08 sta ($08),y
|
|
007485 1 20 13 88 jsr L8813
|
|
007488 1 A0 02 ldy #$02
|
|
00748A 1 B1 06 lda (L0006),y
|
|
00748C 1 29 0F and #$0F
|
|
00748E 1 D0 43 bne L74D3
|
|
007490 1 20 F6 87 jsr L87F6
|
|
007493 1 AD 9F DE lda $DE9F
|
|
007496 1 20 FB 86 jsr L86FB
|
|
007499 1 85 08 sta $08
|
|
00749B 1 86 09 stx $09
|
|
00749D 1 A5 06 lda L0006
|
|
00749F 1 18 clc
|
|
0074A0 1 69 09 adc #$09
|
|
0074A2 1 85 06 sta L0006
|
|
0074A4 1 90 02 bcc L74A8
|
|
0074A6 1 E6 07 inc $07
|
|
0074A8 1 A0 00 L74A8: ldy #$00
|
|
0074AA 1 B1 06 lda (L0006),y
|
|
0074AC 1 A8 tay
|
|
0074AD 1 B1 06 L74AD: lda (L0006),y
|
|
0074AF 1 91 08 sta ($08),y
|
|
0074B1 1 88 dey
|
|
0074B2 1 10 F9 bpl L74AD
|
|
0074B4 1 A0 00 ldy #$00
|
|
0074B6 1 B1 08 lda ($08),y
|
|
0074B8 1 38 sec
|
|
0074B9 1 E9 01 sbc #$01
|
|
0074BB 1 91 08 sta ($08),y
|
|
0074BD 1 A0 01 ldy #$01
|
|
0074BF 1 A9 2F lda #$2F
|
|
0074C1 1 91 08 sta ($08),y
|
|
0074C3 1 A0 00 ldy #$00
|
|
0074C5 1 B1 08 lda ($08),y
|
|
0074C7 1 A8 tay
|
|
0074C8 1 B1 08 L74C8: lda ($08),y
|
|
0074CA 1 99 B0 E1 sta $E1B0,y
|
|
0074CD 1 88 dey
|
|
0074CE 1 10 F8 bpl L74C8
|
|
0074D0 1 4C 69 75 jmp L7569
|
|
0074D3 1
|
|
0074D3 1 A8 L74D3: tay
|
|
0074D4 1 A9 00 lda #$00
|
|
0074D6 1 8D 20 76 sta L7620
|
|
0074D9 1 20 F6 87 jsr L87F6
|
|
0074DC 1 98 tya
|
|
0074DD 1 48 pha
|
|
0074DE 1 20 FB 86 jsr L86FB
|
|
0074E1 1 85 06 sta L0006
|
|
0074E3 1 86 07 stx $07
|
|
0074E5 1 68 pla
|
|
0074E6 1 0A asl a
|
|
0074E7 1 AA tax
|
|
0074E8 1 BD BF E6 lda $E6BF,x
|
|
0074EB 1 85 08 sta $08
|
|
0074ED 1 BD C0 E6 lda $E6C0,x
|
|
0074F0 1 85 09 sta $09
|
|
0074F2 1 A0 00 ldy #$00
|
|
0074F4 1 B1 06 lda (L0006),y
|
|
0074F6 1 18 clc
|
|
0074F7 1 71 08 adc ($08),y
|
|
0074F9 1 C9 43 cmp #$43
|
|
0074FB 1 90 10 bcc L750D
|
|
0074FD 1 A9 40 lda #$40
|
|
0074FF 1 20 54 D1 jsr LD154
|
|
007502 1 20 1F 8B jsr L8B1F
|
|
007505 1 CE 2E EC dec $EC2E
|
|
007508 1 AE 56 E2 ldx $E256
|
|
00750B 1 9A txs
|
|
00750C 1 60 rts
|
|
00750D 1
|
|
00750D 1 A0 00 L750D: ldy #$00
|
|
00750F 1 B1 06 lda (L0006),y
|
|
007511 1 A8 tay
|
|
007512 1 B1 06 L7512: lda (L0006),y
|
|
007514 1 99 B0 E1 sta $E1B0,y
|
|
007517 1 88 dey
|
|
007518 1 10 F8 bpl L7512
|
|
00751A 1 A9 2F lda #$2F
|
|
00751C 1 8D B1 E1 sta $E1B1
|
|
00751F 1 EE B0 E1 inc $E1B0
|
|
007522 1 AE B0 E1 ldx $E1B0
|
|
007525 1 9D B0 E1 sta $E1B0,x
|
|
007528 1 AD BE E6 lda $E6BE
|
|
00752B 1 20 E3 86 jsr L86E3
|
|
00752E 1 85 08 sta $08
|
|
007530 1 86 09 stx $09
|
|
007532 1 AE B0 E1 ldx $E1B0
|
|
007535 1 A0 09 ldy #$09
|
|
007537 1 B1 08 lda ($08),y
|
|
007539 1 18 clc
|
|
00753A 1 6D B0 E1 adc $E1B0
|
|
00753D 1 8D B0 E1 sta $E1B0
|
|
007540 1 CE B0 E1 dec $E1B0
|
|
007543 1 CE B0 E1 dec $E1B0
|
|
007546 1 A0 0A ldy #$0A
|
|
007548 1 C8 L7548: iny
|
|
007549 1 E8 inx
|
|
00754A 1 B1 08 lda ($08),y
|
|
00754C 1 9D B0 E1 sta $E1B0,x
|
|
00754F 1 EC B0 E1 cpx $E1B0
|
|
007552 1 D0 F4 bne L7548
|
|
007554 1 AD 9F DE lda $DE9F
|
|
007557 1 20 FB 86 jsr L86FB
|
|
00755A 1 85 08 sta $08
|
|
00755C 1 86 09 stx $09
|
|
00755E 1 AC B0 E1 ldy $E1B0
|
|
007561 1 B9 B0 E1 L7561: lda $E1B0,y
|
|
007564 1 91 08 sta ($08),y
|
|
007566 1 88 dey
|
|
007567 1 10 F8 bpl L7561
|
|
007569 1 A5 08 L7569: lda $08
|
|
00756B 1 A6 09 ldx $09
|
|
00756D 1 20 BA 87 jsr L87BA
|
|
007570 1 AD 9F DE lda $DE9F
|
|
007573 1 20 EF 86 jsr L86EF
|
|
007576 1 85 06 sta L0006
|
|
007578 1 86 07 stx $07
|
|
00757A 1 A0 14 ldy #$14
|
|
00757C 1 AD 9F DE lda $DE9F
|
|
00757F 1 38 sec
|
|
007580 1 E9 01 sbc #$01
|
|
007582 1 0A asl a
|
|
007583 1 0A asl a
|
|
007584 1 0A asl a
|
|
007585 1 0A asl a
|
|
007586 1 48 pha
|
|
007587 1 69 05 adc #$05
|
|
007589 1 91 06 sta (L0006),y
|
|
00758B 1 C8 iny
|
|
00758C 1 A9 00 lda #$00
|
|
00758E 1 91 06 sta (L0006),y
|
|
007590 1 C8 iny
|
|
007591 1 68 pla
|
|
007592 1 4A lsr a
|
|
007593 1 18 clc
|
|
007594 1 69 1B adc #$1B
|
|
007596 1 91 06 sta (L0006),y
|
|
007598 1 C8 iny
|
|
007599 1 A9 00 lda #$00
|
|
00759B 1 91 06 sta (L0006),y
|
|
00759D 1 A9 00 lda #$00
|
|
00759F 1 A0 1F ldy #$1F
|
|
0075A1 1 A2 03 ldx #$03
|
|
0075A3 1 91 06 L75A3: sta (L0006),y
|
|
0075A5 1 88 dey
|
|
0075A6 1 CA dex
|
|
0075A7 1 10 FA bpl L75A3
|
|
0075A9 1 A0 04 ldy #$04
|
|
0075AB 1 B1 06 lda (L0006),y
|
|
0075AD 1 29 FE and #$FE
|
|
0075AF 1 91 06 sta (L0006),y
|
|
0075B1 1 C8 iny
|
|
0075B2 1 B1 06 lda (L0006),y
|
|
0075B4 1 29 FE and #$FE
|
|
0075B6 1 91 06 sta (L0006),y
|
|
0075B8 1 A9 00 lda #$00
|
|
0075BA 1 A0 07 ldy #$07
|
|
0075BC 1 91 06 sta (L0006),y
|
|
0075BE 1 A0 09 ldy #$09
|
|
0075C0 1 91 06 sta (L0006),y
|
|
0075C2 1 20 13 88 jsr L8813
|
|
0075C5 1 AD BE E6 lda $E6BE
|
|
0075C8 1 20 54 70 jsr L7054
|
|
0075CB 1 AD BE E6 lda $E6BE
|
|
0075CE 1 20 E3 86 jsr L86E3
|
|
0075D1 1 85 06 sta L0006
|
|
0075D3 1 86 07 stx $07
|
|
0075D5 1 A0 02 ldy #$02
|
|
0075D7 1 B1 06 lda (L0006),y
|
|
0075D9 1 29 0F and #$0F
|
|
0075DB 1 F0 1D beq L75FA
|
|
0075DD 1 AA tax
|
|
0075DE 1 CA dex
|
|
0075DF 1 8A txa
|
|
0075E0 1 0A asl a
|
|
0075E1 1 AA tax
|
|
0075E2 1 BD 8B EB lda $EB8B,x
|
|
0075E5 1 8D BD 70 sta L70BD
|
|
0075E8 1 BD 8C EB lda $EB8C,x
|
|
0075EB 1 8D BE 70 sta L70BE
|
|
0075EE 1 BD 9B EB lda $EB9B,x
|
|
0075F1 1 8D BB 70 sta L70BB
|
|
0075F4 1 BD 9C EB lda $EB9C,x
|
|
0075F7 1 8D BC 70 sta L70BC
|
|
0075FA 1 AE 9F DE L75FA: ldx $DE9F
|
|
0075FD 1 CA dex
|
|
0075FE 1 8A txa
|
|
0075FF 1 0A asl a
|
|
007600 1 AA tax
|
|
007601 1 AD BD 70 lda L70BD
|
|
007604 1 9D 8B EB sta $EB8B,x
|
|
007607 1 AD BE 70 lda L70BE
|
|
00760A 1 9D 8C EB sta $EB8C,x
|
|
00760D 1 AD BB 70 lda L70BB
|
|
007610 1 9D 9B EB sta $EB9B,x
|
|
007613 1 AD BC 70 lda L70BC
|
|
007616 1 9D 9C EB sta $EB9C,x
|
|
007619 1 AD 9F DE lda $DE9F
|
|
00761C 1 20 35 76 jsr L7635
|
|
00761F 1 60 rts
|
|
007620 1
|
|
007620 1 00 L7620: brk
|
|
007621 1 00 L7621: brk
|
|
007622 1 00 L7622: brk
|
|
007623 1 00 L7623: brk
|
|
007624 1 00 L7624: brk
|
|
007625 1 00 L7625: brk
|
|
007626 1 34 L7626: .byte $34
|
|
007627 1 00 L7627: brk
|
|
007628 1 10 00 bpl L762A
|
|
00762A 1 00 L762A: brk
|
|
00762B 1 00 L762B: brk
|
|
00762C 1 00 L762C: brk
|
|
00762D 1 00 L762D: brk
|
|
00762E 1 05 L762E: .byte $05
|
|
00762F 1 00 L762F: brk
|
|
007630 1 00 L7630: brk
|
|
007631 1 00 L7631: brk
|
|
007632 1 00 L7632: brk
|
|
007633 1 00 L7633: brk
|
|
007634 1 00 L7634: brk
|
|
007635 1 48 L7635: pha
|
|
007636 1 A9 00 lda #$00
|
|
007638 1 F0 0D beq L7647
|
|
00763A 1 48 L763A: pha
|
|
00763B 1 AE 9F DE ldx $DE9F
|
|
00763E 1 CA dex
|
|
00763F 1 BD 26 EC lda $EC26,x
|
|
007642 1 8D BE E6 sta $E6BE
|
|
007645 1 A9 80 lda #$80
|
|
007647 1 8D 34 76 L7647: sta L7634
|
|
00764A 1 68 pla
|
|
00764B 1 8D 21 76 sta L7621
|
|
00764E 1 20 F6 87 jsr L87F6
|
|
007651 1 A2 03 ldx #$03
|
|
007653 1 BD 26 76 L7653: lda L7626,x
|
|
007656 1 9D 2A 76 sta L762A,x
|
|
007659 1 CA dex
|
|
00765A 1 10 F7 bpl L7653
|
|
00765C 1 A9 00 lda #$00
|
|
00765E 1 8D 2F 76 sta L762F
|
|
007661 1 8D 25 76 sta L7625
|
|
007664 1 A2 03 ldx #$03
|
|
007666 1 9D 30 76 L7666: sta L7630,x
|
|
007669 1 CA dex
|
|
00766A 1 10 FA bpl L7666
|
|
00766C 1 AD BE E6 lda $E6BE
|
|
00766F 1 AE F1 E1 L766F: ldx $E1F1
|
|
007672 1 CA dex
|
|
007673 1 DD F2 E1 L7673: cmp $E1F2,x
|
|
007676 1 F0 04 beq L767C
|
|
007678 1 CA dex
|
|
007679 1 10 F8 bpl L7673
|
|
00767B 1 60 rts
|
|
00767C 1
|
|
00767C 1 8A L767C: txa
|
|
00767D 1 0A asl a
|
|
00767E 1 AA tax
|
|
00767F 1 BD 02 E2 lda $E202,x
|
|
007682 1 85 06 sta L0006
|
|
007684 1 BD 03 E2 lda $E203,x
|
|
007687 1 85 07 sta $07
|
|
007689 1 AD 83 C0 lda $C083
|
|
00768C 1 AD 83 C0 lda $C083
|
|
00768F 1 A0 00 ldy #$00
|
|
007691 1 B1 06 lda (L0006),y
|
|
007693 1 8D 64 77 sta L7764
|
|
007696 1 AD 8B C0 lda LCBANK1
|
|
007699 1 AD 8B C0 lda LCBANK1
|
|
00769C 1 E6 06 inc L0006
|
|
00769E 1 A5 06 lda L0006
|
|
0076A0 1 D0 02 bne L76A4
|
|
0076A2 1 E6 07 inc $07
|
|
0076A4 1 AD 9F DE L76A4: lda $DE9F
|
|
0076A7 1 8D 25 EC sta $EC25
|
|
0076AA 1 AD 25 76 L76AA: lda L7625
|
|
0076AD 1 CD 64 77 cmp L7764
|
|
0076B0 1 F0 09 beq L76BB
|
|
0076B2 1 20 68 77 jsr L7768
|
|
0076B5 1 EE 25 76 inc L7625
|
|
0076B8 1 4C AA 76 jmp L76AA
|
|
0076BB 1
|
|
0076BB 1 2C 34 76 L76BB: bit L7634
|
|
0076BE 1 10 04 bpl L76C4
|
|
0076C0 1 20 13 88 jsr L8813
|
|
0076C3 1 60 rts
|
|
0076C4 1
|
|
0076C4 1 20 6B 7B L76C4: jsr L7B6B
|
|
0076C7 1 AD 21 76 lda L7621
|
|
0076CA 1 20 EF 86 jsr L86EF
|
|
0076CD 1 85 06 sta L0006
|
|
0076CF 1 86 07 stx $07
|
|
0076D1 1 A0 16 ldy #$16
|
|
0076D3 1 AD 65 7B lda L7B65
|
|
0076D6 1 38 sec
|
|
0076D7 1 F1 06 sbc (L0006),y
|
|
0076D9 1 8D 65 7B sta L7B65
|
|
0076DC 1 AD 66 7B lda L7B66
|
|
0076DF 1 E9 00 sbc #$00
|
|
0076E1 1 8D 66 7B sta L7B66
|
|
0076E4 1 AD 63 7B lda L7B63
|
|
0076E7 1 C9 AA cmp #$AA
|
|
0076E9 1 AD 64 7B lda L7B64
|
|
0076EC 1 E9 00 sbc #$00
|
|
0076EE 1 30 15 bmi L7705
|
|
0076F0 1 AD 63 7B lda L7B63
|
|
0076F3 1 C9 C2 cmp #$C2
|
|
0076F5 1 AD 64 7B lda L7B64
|
|
0076F8 1 E9 01 sbc #$01
|
|
0076FA 1 10 10 bpl L770C
|
|
0076FC 1 AD 63 7B lda L7B63
|
|
0076FF 1 AE 64 7B ldx L7B64
|
|
007702 1 4C 10 77 jmp L7710
|
|
007705 1
|
|
007705 1 A9 AA L7705: lda #$AA
|
|
007707 1 A2 00 ldx #$00
|
|
007709 1 4C 10 77 jmp L7710
|
|
00770C 1
|
|
00770C 1 A9 C2 L770C: lda #$C2
|
|
00770E 1 A2 01 ldx #$01
|
|
007710 1 A0 20 L7710: ldy #$20
|
|
007712 1 91 06 sta (L0006),y
|
|
007714 1 8A txa
|
|
007715 1 C8 iny
|
|
007716 1 91 06 sta (L0006),y
|
|
007718 1 AD 65 7B lda L7B65
|
|
00771B 1 C9 32 cmp #$32
|
|
00771D 1 AD 66 7B lda L7B66
|
|
007720 1 E9 00 sbc #$00
|
|
007722 1 30 15 bmi L7739
|
|
007724 1 AD 65 7B lda L7B65
|
|
007727 1 C9 6C cmp #$6C
|
|
007729 1 AD 66 7B lda L7B66
|
|
00772C 1 E9 00 sbc #$00
|
|
00772E 1 10 10 bpl L7740
|
|
007730 1 AD 65 7B lda L7B65
|
|
007733 1 AE 66 7B ldx L7B66
|
|
007736 1 4C 44 77 jmp L7744
|
|
007739 1
|
|
007739 1 A9 32 L7739: lda #$32
|
|
00773B 1 A2 00 ldx #$00
|
|
00773D 1 4C 44 77 jmp L7744
|
|
007740 1
|
|
007740 1 A9 6C L7740: lda #$6C
|
|
007742 1 A2 00 ldx #$00
|
|
007744 1 A0 22 L7744: ldy #$22
|
|
007746 1 91 06 sta (L0006),y
|
|
007748 1 8A txa
|
|
007749 1 C8 iny
|
|
00774A 1 91 06 sta (L0006),y
|
|
00774C 1 AD 67 77 lda L7767
|
|
00774F 1 A0 06 ldy #$06
|
|
007751 1 91 06 sta (L0006),y
|
|
007753 1 A0 08 ldy #$08
|
|
007755 1 91 06 sta (L0006),y
|
|
007757 1 AD BE E6 lda $E6BE
|
|
00775A 1 AE 21 76 ldx L7621
|
|
00775D 1 20 60 8B jsr L8B60
|
|
007760 1 20 13 88 jsr L8813
|
|
007763 1 60 rts
|
|
007764 1
|
|
007764 1 00 L7764: brk
|
|
007765 1 00 brk
|
|
007766 1 00 brk
|
|
007767 1 14 L7767: .byte $14
|
|
007768 1 EE 9E DD L7768: inc $DD9E
|
|
00776B 1 20 5E D0 jsr LD05E
|
|
00776E 1 AE A0 DE ldx $DEA0
|
|
007771 1 EE A0 DE inc $DEA0
|
|
007774 1 9D A1 DE sta $DEA1,x
|
|
007777 1 20 E3 86 jsr L86E3
|
|
00777A 1 85 08 sta $08
|
|
00777C 1 86 09 stx $09
|
|
00777E 1 AD 83 C0 lda $C083
|
|
007781 1 AD 83 C0 lda $C083
|
|
007784 1 A0 00 ldy #$00
|
|
007786 1 B1 06 lda (L0006),y
|
|
007788 1 8D 00 18 sta $1800
|
|
00778B 1 C8 iny
|
|
00778C 1 A2 00 ldx #$00
|
|
00778E 1 B1 06 L778E: lda (L0006),y
|
|
007790 1 9D 02 18 sta $1802,x
|
|
007793 1 E8 inx
|
|
007794 1 C8 iny
|
|
007795 1 EC 00 18 cpx $1800
|
|
007798 1 D0 F4 bne L778E
|
|
00779A 1 EE 00 18 inc $1800
|
|
00779D 1 EE 00 18 inc $1800
|
|
0077A0 1 A9 20 lda #$20
|
|
0077A2 1 8D 01 18 sta $1801
|
|
0077A5 1 AE 00 18 ldx $1800
|
|
0077A8 1 9D 00 18 sta $1800,x
|
|
0077AB 1 A0 10 ldy #$10
|
|
0077AD 1 B1 06 lda (L0006),y
|
|
0077AF 1 C9 B3 cmp #$B3
|
|
0077B1 1 F0 19 beq L77CC
|
|
0077B3 1 C9 FF cmp #$FF
|
|
0077B5 1 D0 23 bne L77DA
|
|
0077B7 1 A0 00 ldy #$00
|
|
0077B9 1 B1 06 lda (L0006),y
|
|
0077BB 1 A8 tay
|
|
0077BC 1 AE D0 77 ldx L77D0
|
|
0077BF 1 B1 06 L77BF: lda (L0006),y
|
|
0077C1 1 DD D0 77 cmp L77D0,x
|
|
0077C4 1 D0 12 bne L77D8
|
|
0077C6 1 88 dey
|
|
0077C7 1 F0 0F beq L77D8
|
|
0077C9 1 CA dex
|
|
0077CA 1 D0 F3 bne L77BF
|
|
0077CC 1 A9 01 L77CC: lda #$01
|
|
0077CE 1 D0 0A bne L77DA
|
|
0077D0 1 07 2E L77D0: rmb0 $2E
|
|
0077D2 1 53 .byte $53
|
|
0077D3 1 59 53 54 eor L5453,y
|
|
0077D6 1 45 4D eor $4D
|
|
0077D8 1 A9 FF L77D8: lda #$FF
|
|
0077DA 1 A8 L77DA: tay
|
|
0077DB 1 AD 8B C0 lda LCBANK1
|
|
0077DE 1 AD 8B C0 lda LCBANK1
|
|
0077E1 1 98 tya
|
|
0077E2 1 20 A1 78 jsr L78A1
|
|
0077E5 1 A9 00 lda #$00
|
|
0077E7 1 A2 18 ldx #$18
|
|
0077E9 1 20 BA 87 jsr L87BA
|
|
0077EC 1 A0 09 ldy #$09
|
|
0077EE 1 A2 00 ldx #$00
|
|
0077F0 1 BD 00 18 L77F0: lda $1800,x
|
|
0077F3 1 91 08 sta ($08),y
|
|
0077F5 1 C8 iny
|
|
0077F6 1 E8 inx
|
|
0077F7 1 EC 00 18 cpx $1800
|
|
0077FA 1 D0 F4 bne L77F0
|
|
0077FC 1 BD 00 18 lda $1800,x
|
|
0077FF 1 91 08 sta ($08),y
|
|
007801 1 A2 00 ldx #$00
|
|
007803 1 A0 03 ldy #$03
|
|
007805 1 BD 2A 76 L7805: lda L762A,x
|
|
007808 1 91 08 sta ($08),y
|
|
00780A 1 E8 inx
|
|
00780B 1 C8 iny
|
|
00780C 1 E0 04 cpx #$04
|
|
00780E 1 D0 F5 bne L7805
|
|
007810 1 AD A0 DE lda $DEA0
|
|
007813 1 CD 2E 76 cmp L762E
|
|
007816 1 F0 02 beq L781A
|
|
007818 1 B0 0C bcs L7826
|
|
00781A 1 AD 2A 76 L781A: lda L762A
|
|
00781D 1 8D 30 76 sta L7630
|
|
007820 1 AD 2B 76 lda L762B
|
|
007823 1 8D 31 76 sta L7631
|
|
007826 1 AD 2C 76 L7826: lda L762C
|
|
007829 1 8D 32 76 sta L7632
|
|
00782C 1 AD 2D 76 lda L762D
|
|
00782F 1 8D 33 76 sta L7633
|
|
007832 1 EE 2F 76 inc L762F
|
|
007835 1 AD 2F 76 lda L762F
|
|
007838 1 CD 2E 76 cmp L762E
|
|
00783B 1 D0 25 bne L7862
|
|
00783D 1 AD 2C 76 lda L762C
|
|
007840 1 18 clc
|
|
007841 1 69 20 adc #$20
|
|
007843 1 8D 2C 76 sta L762C
|
|
007846 1 AD 2D 76 lda L762D
|
|
007849 1 69 00 adc #$00
|
|
00784B 1 8D 2D 76 sta L762D
|
|
00784E 1 AD 26 76 lda L7626
|
|
007851 1 8D 2A 76 sta L762A
|
|
007854 1 AD 27 76 lda L7627
|
|
007857 1 8D 2B 76 sta L762B
|
|
00785A 1 A9 00 lda #$00
|
|
00785C 1 8D 2F 76 sta L762F
|
|
00785F 1 4C 70 78 jmp L7870
|
|
007862 1
|
|
007862 1 AD 2A 76 L7862: lda L762A
|
|
007865 1 18 clc
|
|
007866 1 69 50 adc #$50
|
|
007868 1 8D 2A 76 sta L762A
|
|
00786B 1 90 03 bcc L7870
|
|
00786D 1 EE 2B 76 inc L762B
|
|
007870 1 AD 9F DE L7870: lda $DE9F
|
|
007873 1 0D 24 76 ora L7624
|
|
007876 1 A0 02 ldy #$02
|
|
007878 1 91 08 sta ($08),y
|
|
00787A 1 A0 07 ldy #$07
|
|
00787C 1 AD 22 76 lda L7622
|
|
00787F 1 91 08 sta ($08),y
|
|
007881 1 C8 iny
|
|
007882 1 AD 23 76 lda L7623
|
|
007885 1 91 08 sta ($08),y
|
|
007887 1 AE A0 DE ldx $DEA0
|
|
00788A 1 CA dex
|
|
00788B 1 BD A1 DE lda $DEA1,x
|
|
00788E 1 20 93 88 jsr L8893
|
|
007891 1 A5 06 lda L0006
|
|
007893 1 18 clc
|
|
007894 1 69 20 adc #$20
|
|
007896 1 85 06 sta L0006
|
|
007898 1 A5 07 lda $07
|
|
00789A 1 69 00 adc #$00
|
|
00789C 1 85 07 sta $07
|
|
00789E 1 60 rts
|
|
00789F 1
|
|
00789F 1 00 brk
|
|
0078A0 1 00 brk
|
|
0078A1 1 8D EE 78 L78A1: sta L78EE
|
|
0078A4 1 20 F6 87 jsr L87F6
|
|
0078A7 1 AD 00 FB lda $FB00
|
|
0078AA 1 85 06 sta L0006
|
|
0078AC 1 AD 01 FB lda $FB01
|
|
0078AF 1 85 07 sta $07
|
|
0078B1 1 A0 00 ldy #$00
|
|
0078B3 1 B1 06 lda (L0006),y
|
|
0078B5 1 A8 tay
|
|
0078B6 1 B1 06 L78B6: lda (L0006),y
|
|
0078B8 1 CD EE 78 cmp L78EE
|
|
0078BB 1 F0 05 beq L78C2
|
|
0078BD 1 88 dey
|
|
0078BE 1 10 F6 bpl L78B6
|
|
0078C0 1 A0 01 ldy #$01
|
|
0078C2 1 AD 04 FB L78C2: lda $FB04
|
|
0078C5 1 85 06 sta L0006
|
|
0078C7 1 AD 05 FB lda $FB05
|
|
0078CA 1 85 07 sta $07
|
|
0078CC 1 B1 06 lda (L0006),y
|
|
0078CE 1 8D 24 76 sta L7624
|
|
0078D1 1 88 dey
|
|
0078D2 1 98 tya
|
|
0078D3 1 0A asl a
|
|
0078D4 1 A8 tay
|
|
0078D5 1 AD 02 FB lda $FB02
|
|
0078D8 1 85 06 sta L0006
|
|
0078DA 1 AD 03 FB lda $FB03
|
|
0078DD 1 85 07 sta $07
|
|
0078DF 1 B1 06 lda (L0006),y
|
|
0078E1 1 8D 22 76 sta L7622
|
|
0078E4 1 C8 iny
|
|
0078E5 1 B1 06 lda (L0006),y
|
|
0078E7 1 8D 23 76 sta L7623
|
|
0078EA 1 20 13 88 jsr L8813
|
|
0078ED 1 60 rts
|
|
0078EE 1
|
|
0078EE 1 00 L78EE: brk
|
|
0078EF 1 AD 1D D2 L78EF: lda $D21D
|
|
0078F2 1 8D BE EB sta $EBBE
|
|
0078F5 1 18 clc
|
|
0078F6 1 69 05 adc #$05
|
|
0078F8 1 8D BA EB sta $EBBA
|
|
0078FB 1 AD 1E D2 lda $D21E
|
|
0078FE 1 8D BF EB sta $EBBF
|
|
007901 1 69 00 adc #$00
|
|
007903 1 8D BB EB sta $EBBB
|
|
007906 1 AD 1F D2 lda $D21F
|
|
007909 1 18 clc
|
|
00790A 1 69 0C adc #$0C
|
|
00790C 1 8D C0 EB sta $EBC0
|
|
00790F 1 8D C4 EB sta $EBC4
|
|
007912 1 AD 20 D2 lda $D220
|
|
007915 1 69 00 adc #$00
|
|
007917 1 8D C1 EB sta $EBC1
|
|
00791A 1 8D C5 EB sta $EBC5
|
|
00791D 1 A0 0E ldy #$0E
|
|
00791F 1 A9 BE lda #$BE
|
|
007921 1 A2 EB ldx #$EB
|
|
007923 1 20 00 D0 jsr LD000
|
|
007926 1 AD 21 D2 lda $D221
|
|
007929 1 8D C2 EB sta $EBC2
|
|
00792C 1 AD 22 D2 lda $D222
|
|
00792F 1 8D C3 EB sta $EBC3
|
|
007932 1 20 FA 48 jsr L48FA
|
|
007935 1 A0 10 ldy #$10
|
|
007937 1 A9 C2 lda #$C2
|
|
007939 1 A2 EB ldx #$EB
|
|
00793B 1 20 00 D0 jsr LD000
|
|
00793E 1 AD C0 EB lda $EBC0
|
|
007941 1 18 clc
|
|
007942 1 69 02 adc #$02
|
|
007944 1 8D C0 EB sta $EBC0
|
|
007947 1 8D C4 EB sta $EBC4
|
|
00794A 1 AD C1 EB lda $EBC1
|
|
00794D 1 69 00 adc #$00
|
|
00794F 1 8D C1 EB sta $EBC1
|
|
007952 1 8D C5 EB sta $EBC5
|
|
007955 1 A0 0E ldy #$0E
|
|
007957 1 A9 BE lda #$BE
|
|
007959 1 A2 EB ldx #$EB
|
|
00795B 1 20 00 D0 jsr LD000
|
|
00795E 1 A0 10 ldy #$10
|
|
007960 1 A9 .byte $A9
|
|
007961 1 C2 L7961: .byte $C2
|
|
007962 1 A2 EB ldx #$EB
|
|
007964 1 20 00 D0 jsr LD000
|
|
007967 1 AD 1F D2 lda $D21F
|
|
00796A 1 18 clc
|
|
00796B 1 69 0A adc #$0A
|
|
00796D 1 8D BC EB sta $EBBC
|
|
007970 1 AD 20 D2 lda $D220
|
|
007973 1 69 00 L7973: adc #$00
|
|
007975 1 8D BD EB sta $EBBD
|
|
007978 1 AD A0 DE lda $DEA0
|
|
00797B 1 A2 00 ldx #$00
|
|
00797D 1 20 E0 7A jsr L7AE0
|
|
007980 1 AD A0 DE lda $DEA0
|
|
007983 1 C9 02 cmp #$02
|
|
007985 1 B0 03 bcs L798A
|
|
007987 1 CE B3 EB dec $EBB3
|
|
00798A 1 A0 0E L798A: ldy #$0E
|
|
00798C 1 A9 BA lda #$BA
|
|
00798E 1 A2 EB ldx #$EB
|
|
007990 1 20 00 D0 jsr LD000
|
|
007993 1 20 D7 7A jsr L7AD7
|
|
007996 1 A9 B3 lda #$B3
|
|
007998 1 A2 EB ldx #$EB
|
|
00799A 1 20 80 87 jsr L8780
|
|
00799D 1 AD A0 DE lda $DEA0
|
|
0079A0 1 C9 02 cmp #$02
|
|
0079A2 1 B0 03 bcs L79A7
|
|
0079A4 1 EE B3 EB inc $EBB3
|
|
0079A7 1 20 F7 79 L79A7: jsr L79F7
|
|
0079AA 1 AE 25 EC ldx $EC25
|
|
0079AD 1 CA dex
|
|
0079AE 1 8A txa
|
|
0079AF 1 0A asl a
|
|
0079B0 1 AA tax
|
|
0079B1 1 BD 8B EB lda $EB8B,x
|
|
0079B4 1 A8 tay
|
|
0079B5 1 BD 8C EB lda $EB8C,x
|
|
0079B8 1 AA tax
|
|
0079B9 1 98 tya
|
|
0079BA 1 20 E0 7A jsr L7AE0
|
|
0079BD 1 A0 0E ldy #$0E
|
|
0079BF 1 A9 EB lda #$EB
|
|
0079C1 1 A2 EB ldx #$EB
|
|
0079C3 1 20 00 D0 jsr LD000
|
|
0079C6 1 20 D7 7A jsr L7AD7
|
|
0079C9 1 A9 C6 lda #$C6
|
|
0079CB 1 A2 EB ldx #$EB
|
|
0079CD 1 20 80 87 jsr L8780
|
|
0079D0 1 AE 25 EC ldx $EC25
|
|
0079D3 1 CA dex
|
|
0079D4 1 8A txa
|
|
0079D5 1 0A asl a
|
|
0079D6 1 AA tax
|
|
0079D7 1 BD 9B EB lda $EB9B,x
|
|
0079DA 1 A8 tay
|
|
0079DB 1 BD 9C EB lda $EB9C,x
|
|
0079DE 1 AA tax
|
|
0079DF 1 98 tya
|
|
0079E0 1 20 E0 7A jsr L7AE0
|
|
0079E3 1 A0 0E ldy #$0E
|
|
0079E5 1 A9 EF lda #$EF
|
|
0079E7 1 A2 EB ldx #$EB
|
|
0079E9 1 20 00 D0 jsr LD000
|
|
0079EC 1 20 D7 7A jsr L7AD7
|
|
0079EF 1 A9 D0 lda #$D0
|
|
0079F1 1 A2 EB ldx #$EB
|
|
0079F3 1 20 80 87 jsr L8780
|
|
0079F6 1 60 rts
|
|
0079F7 1
|
|
0079F7 1 AD 21 D2 L79F7: lda $D221
|
|
0079FA 1 38 sec
|
|
0079FB 1 ED 1D D2 sbc $D21D
|
|
0079FE 1 8D DE 7A sta L7ADE
|
|
007A01 1 AD 22 D2 lda $D222
|
|
007A04 1 ED 1E D2 sbc $D21E
|
|
007A07 1 8D DF 7A sta L7ADF
|
|
007A0A 1 AD DE 7A lda L7ADE
|
|
007A0D 1 38 sec
|
|
007A0E 1 ED F3 EB sbc $EBF3
|
|
007A11 1 8D DE 7A sta L7ADE
|
|
007A14 1 AD DF 7A lda L7ADF
|
|
007A17 1 ED F4 EB sbc $EBF4
|
|
007A1A 1 8D DF 7A sta L7ADF
|
|
007A1D 1 10 03 bpl L7A22
|
|
007A1F 1 4C 86 7A jmp L7A86
|
|
007A22 1
|
|
007A22 1 AD DE 7A L7A22: lda L7ADE
|
|
007A25 1 38 sec
|
|
007A26 1 ED F9 EB sbc $EBF9
|
|
007A29 1 8D DE 7A sta L7ADE
|
|
007A2C 1 AD DF 7A lda L7ADF
|
|
007A2F 1 ED FA EB sbc $EBFA
|
|
007A32 1 8D DF 7A sta L7ADF
|
|
007A35 1 10 03 bpl L7A3A
|
|
007A37 1 4C 86 7A jmp L7A86
|
|
007A3A 1
|
|
007A3A 1 AD E7 EB L7A3A: lda $EBE7
|
|
007A3D 1 18 clc
|
|
007A3E 1 6D DE 7A adc L7ADE
|
|
007A41 1 8D EF EB sta $EBEF
|
|
007A44 1 AD E8 EB lda $EBE8
|
|
007A47 1 6D DF 7A adc L7ADF
|
|
007A4A 1 8D F0 EB sta $EBF0
|
|
007A4D 1 AD DF 7A lda L7ADF
|
|
007A50 1 F0 07 beq L7A59
|
|
007A52 1 AD DE 7A lda L7ADE
|
|
007A55 1 C9 18 cmp #$18
|
|
007A57 1 90 11 bcc L7A6A
|
|
007A59 1 AD EF EB L7A59: lda $EBEF
|
|
007A5C 1 38 sec
|
|
007A5D 1 E9 0C sbc #$0C
|
|
007A5F 1 8D EF EB sta $EBEF
|
|
007A62 1 AD F0 EB lda $EBF0
|
|
007A65 1 E9 00 sbc #$00
|
|
007A67 1 8D F0 EB sta $EBF0
|
|
007A6A 1 4E DF 7A L7A6A: lsr L7ADF
|
|
007A6D 1 6E DE 7A ror L7ADE
|
|
007A70 1 AD E3 EB lda $EBE3
|
|
007A73 1 18 clc
|
|
007A74 1 6D DE 7A adc L7ADE
|
|
007A77 1 8D EB EB sta $EBEB
|
|
007A7A 1 AD E4 EB lda $EBE4
|
|
007A7D 1 6D DF 7A adc L7ADF
|
|
007A80 1 8D EC EB sta $EBEC
|
|
007A83 1 4C 9E 7A jmp L7A9E
|
|
007A86 1
|
|
007A86 1 AD E3 EB L7A86: lda $EBE3
|
|
007A89 1 8D EB EB sta $EBEB
|
|
007A8C 1 AD E4 EB lda $EBE4
|
|
007A8F 1 8D EC EB sta $EBEC
|
|
007A92 1 AD E7 EB lda $EBE7
|
|
007A95 1 8D EF EB sta $EBEF
|
|
007A98 1 AD E8 EB lda $EBE8
|
|
007A9B 1 8D F0 EB sta $EBF0
|
|
007A9E 1 AD EB EB L7A9E: lda $EBEB
|
|
007AA1 1 18 clc
|
|
007AA2 1 6D 1D D2 adc $D21D
|
|
007AA5 1 8D EB EB sta $EBEB
|
|
007AA8 1 AD EC EB lda $EBEC
|
|
007AAB 1 6D 1E D2 adc $D21E
|
|
007AAE 1 8D EC EB sta $EBEC
|
|
007AB1 1 AD EF EB lda $EBEF
|
|
007AB4 1 18 clc
|
|
007AB5 1 6D 1D D2 adc $D21D
|
|
007AB8 1 8D EF EB sta $EBEF
|
|
007ABB 1 AD F0 EB lda $EBF0
|
|
007ABE 1 6D 1E D2 adc $D21E
|
|
007AC1 1 8D F0 EB sta $EBF0
|
|
007AC4 1 AD BC EB lda $EBBC
|
|
007AC7 1 8D ED EB sta $EBED
|
|
007ACA 1 8D F1 EB sta $EBF1
|
|
007ACD 1 AD BD EB lda $EBBD
|
|
007AD0 1 8D EE EB sta $EBEE
|
|
007AD3 1 8D F2 EB sta $EBF2
|
|
007AD6 1 60 rts
|
|
007AD7 1
|
|
007AD7 1 A9 DC L7AD7: lda #$DC
|
|
007AD9 1 A2 EB ldx #$EB
|
|
007ADB 1 4C 80 87 jmp L8780
|
|
007ADE 1
|
|
007ADE 1 00 L7ADE: brk
|
|
007ADF 1 00 L7ADF: brk
|
|
007AE0 1 8D 5B 7B L7AE0: sta L7B5B
|
|
007AE3 1 8E 5C 7B stx L7B5C
|
|
007AE6 1 A2 06 ldx #$06
|
|
007AE8 1 A9 20 lda #$20
|
|
007AEA 1 9D DC EB L7AEA: sta $EBDC,x
|
|
007AED 1 CA dex
|
|
007AEE 1 D0 FA bne L7AEA
|
|
007AF0 1 A9 00 lda #$00
|
|
007AF2 1 8D 5E 7B sta L7B5E
|
|
007AF5 1 A0 00 ldy #$00
|
|
007AF7 1 A2 00 ldx #$00
|
|
007AF9 1 A9 00 L7AF9: lda #$00
|
|
007AFB 1 8D 5D 7B sta L7B5D
|
|
007AFE 1 AD 5B 7B L7AFE: lda L7B5B
|
|
007B01 1 DD 53 7B cmp L7B53,x
|
|
007B04 1 AD 5C 7B lda L7B5C
|
|
007B07 1 FD 54 7B sbc L7B54,x
|
|
007B0A 1 10 25 bpl L7B31
|
|
007B0C 1 AD 5D 7B lda L7B5D
|
|
007B0F 1 D0 09 bne L7B1A
|
|
007B11 1 2C 5E 7B bit L7B5E
|
|
007B14 1 30 04 bmi L7B1A
|
|
007B16 1 A9 20 lda #$20
|
|
007B18 1 D0 0A bne L7B24
|
|
007B1A 1 18 L7B1A: clc
|
|
007B1B 1 69 30 adc #$30
|
|
007B1D 1 48 pha
|
|
007B1E 1 A9 80 lda #$80
|
|
007B20 1 8D 5E 7B sta L7B5E
|
|
007B23 1 68 pla
|
|
007B24 1 99 DE EB L7B24: sta $EBDE,y
|
|
007B27 1 C8 iny
|
|
007B28 1 E8 inx
|
|
007B29 1 E8 inx
|
|
007B2A 1 E0 08 cpx #$08
|
|
007B2C 1 F0 1C beq L7B4A
|
|
007B2E 1 4C F9 7A jmp L7AF9
|
|
007B31 1
|
|
007B31 1 EE 5D 7B L7B31: inc L7B5D
|
|
007B34 1 AD 5B 7B lda L7B5B
|
|
007B37 1 38 sec
|
|
007B38 1 FD 53 7B sbc L7B53,x
|
|
007B3B 1 8D 5B 7B sta L7B5B
|
|
007B3E 1 AD 5C 7B lda L7B5C
|
|
007B41 1 FD 54 7B sbc L7B54,x
|
|
007B44 1 8D 5C 7B sta L7B5C
|
|
007B47 1 4C FE 7A jmp L7AFE
|
|
007B4A 1
|
|
007B4A 1 AD 5B 7B L7B4A: lda L7B5B
|
|
007B4D 1 09 30 ora #$30
|
|
007B4F 1 99 DE EB sta $EBDE,y
|
|
007B52 1 60 rts
|
|
007B53 1
|
|
007B53 1 10 L7B53: .byte $10
|
|
007B54 1 27 E8 L7B54: rmb2 $E8
|
|
007B56 1 03 .byte $03
|
|
007B57 1 64 00 stz L0000
|
|
007B59 1 0A asl a
|
|
007B5A 1 00 brk
|
|
007B5B 1 00 L7B5B: brk
|
|
007B5C 1 00 L7B5C: brk
|
|
007B5D 1 00 L7B5D: brk
|
|
007B5E 1 00 L7B5E: brk
|
|
007B5F 1 00 L7B5F: brk
|
|
007B60 1 00 L7B60: brk
|
|
007B61 1 00 L7B61: brk
|
|
007B62 1 00 L7B62: brk
|
|
007B63 1 00 L7B63: brk
|
|
007B64 1 00 L7B64: brk
|
|
007B65 1 00 L7B65: brk
|
|
007B66 1 00 L7B66: brk
|
|
007B67 1 00 L7B67: brk
|
|
007B68 1 00 L7B68: brk
|
|
007B69 1 00 L7B69: brk
|
|
007B6A 1 00 L7B6A: brk
|
|
007B6B 1 A2 03 L7B6B: ldx #$03
|
|
007B6D 1 A9 00 lda #$00
|
|
007B6F 1 9D 63 7B L7B6F: sta L7B63,x
|
|
007B72 1 CA dex
|
|
007B73 1 10 FA bpl L7B6F
|
|
007B75 1 8D 5B 7D sta L7D5B
|
|
007B78 1 A9 FF lda #$FF
|
|
007B7A 1 8D 5F 7B sta L7B5F
|
|
007B7D 1 8D 61 7B sta L7B61
|
|
007B80 1 A9 7F lda #$7F
|
|
007B82 1 8D 60 7B sta L7B60
|
|
007B85 1 8D 62 7B sta L7B62
|
|
007B88 1 AE 9F DE ldx $DE9F
|
|
007B8B 1 CA dex
|
|
007B8C 1 BD D1 E6 lda $E6D1,x
|
|
007B8F 1 10 3A bpl L7BCB
|
|
007B91 1 AD A0 DE lda $DEA0
|
|
007B94 1 D0 0B bne L7BA1
|
|
007B96 1 A9 00 L7B96: lda #$00
|
|
007B98 1 A2 03 ldx #$03
|
|
007B9A 1 9D 5F 7B L7B9A: sta L7B5F,x
|
|
007B9D 1 CA dex
|
|
007B9E 1 10 FA bpl L7B9A
|
|
007BA0 1 60 rts
|
|
007BA1 1
|
|
007BA1 1 18 L7BA1: clc
|
|
007BA2 1 69 02 adc #$02
|
|
007BA4 1 A2 00 ldx #$00
|
|
007BA6 1 8E 5C 7D stx L7D5C
|
|
007BA9 1 0A asl a
|
|
007BAA 1 2E 5C 7D rol L7D5C
|
|
007BAD 1 0A asl a
|
|
007BAE 1 2E 5C 7D rol L7D5C
|
|
007BB1 1 0A asl a
|
|
007BB2 1 2E 5C 7D rol L7D5C
|
|
007BB5 1 8D 65 7B sta L7B65
|
|
007BB8 1 AD 5C 7D lda L7D5C
|
|
007BBB 1 8D 66 7B sta L7B66
|
|
007BBE 1 A9 68 lda #$68
|
|
007BC0 1 8D 63 7B sta L7B63
|
|
007BC3 1 A9 01 lda #$01
|
|
007BC5 1 8D 64 7B sta L7B64
|
|
007BC8 1 4C 96 7B jmp L7B96
|
|
007BCB 1
|
|
007BCB 1 AD A0 DE L7BCB: lda $DEA0
|
|
007BCE 1 C9 01 cmp #$01
|
|
007BD0 1 D0 1D bne L7BEF
|
|
007BD2 1 AD A1 DE lda $DEA1
|
|
007BD5 1 20 E3 86 jsr L86E3
|
|
007BD8 1 85 06 sta L0006
|
|
007BDA 1 86 07 stx $07
|
|
007BDC 1 A0 06 ldy #$06
|
|
007BDE 1 A2 03 ldx #$03
|
|
007BE0 1 B1 06 L7BE0: lda (L0006),y
|
|
007BE2 1 9D 5F 7B sta L7B5F,x
|
|
007BE5 1 9D 63 7B sta L7B63,x
|
|
007BE8 1 88 dey
|
|
007BE9 1 CA dex
|
|
007BEA 1 10 F4 bpl L7BE0
|
|
007BEC 1 4C F7 7B jmp L7BF7
|
|
007BEF 1
|
|
007BEF 1 AD 5B 7D L7BEF: lda L7D5B
|
|
007BF2 1 CD A0 DE cmp $DEA0
|
|
007BF5 1 D0 3F bne L7C36
|
|
007BF7 1 AD 63 7B L7BF7: lda L7B63
|
|
007BFA 1 18 clc
|
|
007BFB 1 69 32 adc #$32
|
|
007BFD 1 8D 63 7B sta L7B63
|
|
007C00 1 90 03 bcc L7C05
|
|
007C02 1 EE 64 7B inc L7B64
|
|
007C05 1 AD 65 7B L7C05: lda L7B65
|
|
007C08 1 18 clc
|
|
007C09 1 69 20 adc #$20
|
|
007C0B 1 8D 65 7B sta L7B65
|
|
007C0E 1 90 03 bcc L7C13
|
|
007C10 1 EE 66 7B inc L7B66
|
|
007C13 1 AD 5F 7B L7C13: lda L7B5F
|
|
007C16 1 38 sec
|
|
007C17 1 E9 32 sbc #$32
|
|
007C19 1 8D 5F 7B sta L7B5F
|
|
007C1C 1 AD 60 7B lda L7B60
|
|
007C1F 1 E9 00 sbc #$00
|
|
007C21 1 8D 60 7B sta L7B60
|
|
007C24 1 AD 61 7B lda L7B61
|
|
007C27 1 38 sec
|
|
007C28 1 E9 0F sbc #$0F
|
|
007C2A 1 8D 61 7B sta L7B61
|
|
007C2D 1 AD 62 7B lda L7B62
|
|
007C30 1 E9 00 sbc #$00
|
|
007C32 1 8D 62 7B sta L7B62
|
|
007C35 1 60 rts
|
|
007C36 1
|
|
007C36 1 AA L7C36: tax
|
|
007C37 1 BD A1 DE lda $DEA1,x
|
|
007C3A 1 20 E3 86 jsr L86E3
|
|
007C3D 1 85 06 sta L0006
|
|
007C3F 1 86 07 stx $07
|
|
007C41 1 A0 02 ldy #$02
|
|
007C43 1 B1 06 lda (L0006),y
|
|
007C45 1 29 0F and #$0F
|
|
007C47 1 CD 5C 7D cmp L7D5C
|
|
007C4A 1 D0 06 bne L7C52
|
|
007C4C 1 EE 5B 7D inc L7D5B
|
|
007C4F 1 4C EF 7B jmp L7BEF
|
|
007C52 1
|
|
007C52 1 A0 06 L7C52: ldy #$06
|
|
007C54 1 A2 03 ldx #$03
|
|
007C56 1 B1 06 L7C56: lda (L0006),y
|
|
007C58 1 9D 67 7B sta L7B67,x
|
|
007C5B 1 88 dey
|
|
007C5C 1 CA dex
|
|
007C5D 1 10 F7 bpl L7C56
|
|
007C5F 1 2C 60 7B bit L7B60
|
|
007C62 1 30 24 bmi L7C88
|
|
007C64 1 2C 68 7B bit L7B68
|
|
007C67 1 30 65 bmi L7CCE
|
|
007C69 1 AD 67 7B lda L7B67
|
|
007C6C 1 CD 5F 7B cmp L7B5F
|
|
007C6F 1 AD 68 7B lda L7B68
|
|
007C72 1 ED 60 7B sbc L7B60
|
|
007C75 1 30 57 bmi L7CCE
|
|
007C77 1 AD 67 7B lda L7B67
|
|
007C7A 1 CD 63 7B cmp L7B63
|
|
007C7D 1 AD 68 7B lda L7B68
|
|
007C80 1 ED 64 7B sbc L7B64
|
|
007C83 1 10 3A bpl L7CBF
|
|
007C85 1 4C DA 7C jmp L7CDA
|
|
007C88 1
|
|
007C88 1 2C 68 7B L7C88: bit L7B68
|
|
007C8B 1 30 16 bmi L7CA3
|
|
007C8D 1 2C 64 7B bit L7B64
|
|
007C90 1 30 48 bmi L7CDA
|
|
007C92 1 AD 67 7B lda L7B67
|
|
007C95 1 CD 63 7B cmp L7B63
|
|
007C98 1 AD 68 7B lda L7B68
|
|
007C9B 1 ED 64 7B sbc L7B64
|
|
007C9E 1 30 3A bmi L7CDA
|
|
007CA0 1 4C BF 7C jmp L7CBF
|
|
007CA3 1
|
|
007CA3 1 AD 67 7B L7CA3: lda L7B67
|
|
007CA6 1 CD 5F 7B cmp L7B5F
|
|
007CA9 1 AD 68 7B lda L7B68
|
|
007CAC 1 ED 60 7B sbc L7B60
|
|
007CAF 1 30 1D bmi L7CCE
|
|
007CB1 1 AD 67 7B lda L7B67
|
|
007CB4 1 CD 63 7B cmp L7B63
|
|
007CB7 1 AD 68 7B lda L7B68
|
|
007CBA 1 ED 64 7B sbc L7B64
|
|
007CBD 1 30 1B bmi L7CDA
|
|
007CBF 1 AD 67 7B L7CBF: lda L7B67
|
|
007CC2 1 8D 63 7B sta L7B63
|
|
007CC5 1 AD 68 7B lda L7B68
|
|
007CC8 1 8D 64 7B sta L7B64
|
|
007CCB 1 4C DA 7C jmp L7CDA
|
|
007CCE 1
|
|
007CCE 1 AD 67 7B L7CCE: lda L7B67
|
|
007CD1 1 8D 5F 7B sta L7B5F
|
|
007CD4 1 AD 68 7B lda L7B68
|
|
007CD7 1 8D 60 7B sta L7B60
|
|
007CDA 1 2C 62 7B L7CDA: bit L7B62
|
|
007CDD 1 30 24 bmi L7D03
|
|
007CDF 1 2C 6A 7B bit L7B6A
|
|
007CE2 1 30 65 bmi L7D49
|
|
007CE4 1 AD 69 7B lda L7B69
|
|
007CE7 1 CD 61 7B cmp L7B61
|
|
007CEA 1 AD 6A 7B lda L7B6A
|
|
007CED 1 ED 62 7B sbc L7B62
|
|
007CF0 1 30 57 bmi L7D49
|
|
007CF2 1 AD 69 7B lda L7B69
|
|
007CF5 1 CD 65 7B cmp L7B65
|
|
007CF8 1 AD 6A 7B lda L7B6A
|
|
007CFB 1 ED 66 7B sbc L7B66
|
|
007CFE 1 10 3A bpl L7D3A
|
|
007D00 1 4C 55 7D jmp L7D55
|
|
007D03 1
|
|
007D03 1 2C 6A 7B L7D03: bit L7B6A
|
|
007D06 1 30 16 bmi L7D1E
|
|
007D08 1 2C 66 7B bit L7B66
|
|
007D0B 1 30 48 bmi L7D55
|
|
007D0D 1 AD 69 7B lda L7B69
|
|
007D10 1 CD 65 7B cmp L7B65
|
|
007D13 1 AD 6A 7B lda L7B6A
|
|
007D16 1 ED 66 7B sbc L7B66
|
|
007D19 1 30 3A bmi L7D55
|
|
007D1B 1 4C 3A 7D jmp L7D3A
|
|
007D1E 1
|
|
007D1E 1 AD 69 7B L7D1E: lda L7B69
|
|
007D21 1 CD 61 7B cmp L7B61
|
|
007D24 1 AD 6A 7B lda L7B6A
|
|
007D27 1 ED 62 7B sbc L7B62
|
|
007D2A 1 30 1D bmi L7D49
|
|
007D2C 1 AD 69 7B lda L7B69
|
|
007D2F 1 CD 65 7B cmp L7B65
|
|
007D32 1 AD 6A 7B lda L7B6A
|
|
007D35 1 ED 66 7B sbc L7B66
|
|
007D38 1 30 1B bmi L7D55
|
|
007D3A 1 AD 69 7B L7D3A: lda L7B69
|
|
007D3D 1 8D 65 7B sta L7B65
|
|
007D40 1 AD 6A 7B lda L7B6A
|
|
007D43 1 8D 66 7B sta L7B66
|
|
007D46 1 4C 55 7D jmp L7D55
|
|
007D49 1
|
|
007D49 1 AD 69 7B L7D49: lda L7B69
|
|
007D4C 1 8D 61 7B sta L7B61
|
|
007D4F 1 AD 6A 7B lda L7B6A
|
|
007D52 1 8D 62 7B sta L7B62
|
|
007D55 1 EE 5B 7D L7D55: inc L7D5B
|
|
007D58 1 4C EF 7B jmp L7BEF
|
|
007D5B 1
|
|
007D5B 1 00 L7D5B: brk
|
|
007D5C 1 00 L7D5C: brk
|
|
007D5D 1 20 EF 86 L7D5D: jsr L86EF
|
|
007D60 1 85 06 sta L0006
|
|
007D62 1 86 07 stx $07
|
|
007D64 1 A0 23 ldy #$23
|
|
007D66 1 A2 07 ldx #$07
|
|
007D68 1 B1 06 L7D68: lda (L0006),y
|
|
007D6A 1 9D 94 7D sta L7D94,x
|
|
007D6D 1 88 dey
|
|
007D6E 1 CA dex
|
|
007D6F 1 10 F7 bpl L7D68
|
|
007D71 1 AD 98 7D lda L7D98
|
|
007D74 1 38 sec
|
|
007D75 1 ED 94 7D sbc L7D94
|
|
007D78 1 48 pha
|
|
007D79 1 AD 99 7D lda L7D99
|
|
007D7C 1 ED 95 7D sbc L7D95
|
|
007D7F 1 48 pha
|
|
007D80 1 AD 9A 7D lda L7D9A
|
|
007D83 1 38 sec
|
|
007D84 1 ED 96 7D sbc L7D96
|
|
007D87 1 48 pha
|
|
007D88 1 AD 9B 7D lda L7D9B
|
|
007D8B 1 ED 97 7D sbc L7D97
|
|
007D8E 1 68 pla
|
|
007D8F 1 A8 tay
|
|
007D90 1 68 pla
|
|
007D91 1 AA tax
|
|
007D92 1 68 pla
|
|
007D93 1 60 rts
|
|
007D94 1
|
|
007D94 1 00 L7D94: brk
|
|
007D95 1 00 L7D95: brk
|
|
007D96 1 00 L7D96: brk
|
|
007D97 1 00 L7D97: brk
|
|
007D98 1 00 L7D98: brk
|
|
007D99 1 00 L7D99: brk
|
|
007D9A 1 00 L7D9A: brk
|
|
007D9B 1 00 L7D9B: brk
|
|
007D9C 1 4C 9F 7D L7D9C: jmp L7D9F
|
|
007D9F 1
|
|
007D9F 1 AE 9F DE L7D9F: ldx $DE9F
|
|
007DA2 1 CA dex
|
|
007DA3 1 BD 26 EC lda $EC26,x
|
|
007DA6 1 A2 00 ldx #$00
|
|
007DA8 1 DD F2 E1 L7DA8: cmp $E1F2,x
|
|
007DAB 1 F0 07 beq L7DB4
|
|
007DAD 1 E8 inx
|
|
007DAE 1 EC F1 E1 cpx $E1F1
|
|
007DB1 1 D0 F5 bne L7DA8
|
|
007DB3 1 60 rts
|
|
007DB4 1
|
|
007DB4 1 8A L7DB4: txa
|
|
007DB5 1 0A asl a
|
|
007DB6 1 AA tax
|
|
007DB7 1 BD 02 E2 lda $E202,x
|
|
007DBA 1 85 06 sta L0006
|
|
007DBC 1 8D 01 08 sta $0801
|
|
007DBF 1 BD 03 E2 lda $E203,x
|
|
007DC2 1 85 07 sta $07
|
|
007DC4 1 8D 02 08 sta $0802
|
|
007DC7 1 AD 83 C0 lda $C083
|
|
007DCA 1 AD 83 C0 lda $C083
|
|
007DCD 1 A9 00 lda #$00
|
|
007DCF 1 8D 00 08 sta L0800
|
|
007DD2 1 A8 tay
|
|
007DD3 1 B1 06 lda (L0006),y
|
|
007DD5 1 8D 03 08 sta $0803
|
|
007DD8 1 E6 06 inc L0006
|
|
007DDA 1 EE 01 08 inc $0801
|
|
007DDD 1 D0 05 bne L7DE4
|
|
007DDF 1 E6 07 inc $07
|
|
007DE1 1 EE 02 08 inc $0802
|
|
007DE4 1 AD 00 08 L7DE4: lda L0800
|
|
007DE7 1 CD 03 08 cmp $0803
|
|
007DEA 1 F0 20 beq L7E0C
|
|
007DEC 1 20 CA 80 jsr L80CA
|
|
007DEF 1 A0 00 ldy #$00
|
|
007DF1 1 B1 06 lda (L0006),y
|
|
007DF3 1 29 7F and #$7F
|
|
007DF5 1 91 06 sta (L0006),y
|
|
007DF7 1 A0 17 ldy #$17
|
|
007DF9 1 B1 06 lda (L0006),y
|
|
007DFB 1 D0 09 bne L7E06
|
|
007DFD 1 C8 iny
|
|
007DFE 1 B1 06 lda (L0006),y
|
|
007E00 1 D0 04 bne L7E06
|
|
007E02 1 A9 01 lda #$01
|
|
007E04 1 91 06 sta (L0006),y
|
|
007E06 1 EE 00 08 L7E06: inc L0800
|
|
007E09 1 4C E4 7D jmp L7DE4
|
|
007E0C 1
|
|
007E0C 1 AD 8B C0 L7E0C: lda LCBANK1
|
|
007E0F 1 AD 8B C0 lda LCBANK1
|
|
007E12 1 AE 9F DE ldx $DE9F
|
|
007E15 1 CA dex
|
|
007E16 1 BD D1 E6 lda $E6D1,x
|
|
007E19 1 C9 81 cmp #$81
|
|
007E1B 1 F0 03 beq L7E20
|
|
007E1D 1 4C C1 7E jmp L7EC1
|
|
007E20 1
|
|
007E20 1 AD 83 C0 L7E20: lda $C083
|
|
007E23 1 AD 83 C0 lda $C083
|
|
007E26 1 A9 5A lda #$5A
|
|
007E28 1 A2 0F ldx #$0F
|
|
007E2A 1 9D 08 08 L7E2A: sta $0808,x
|
|
007E2D 1 CA dex
|
|
007E2E 1 10 FA bpl L7E2A
|
|
007E30 1 A9 00 lda #$00
|
|
007E32 1 8D 05 08 sta $0805
|
|
007E35 1 8D 00 08 sta L0800
|
|
007E38 1 AD 05 08 L7E38: lda $0805
|
|
007E3B 1 CD 03 08 cmp $0803
|
|
007E3E 1 D0 03 bne L7E43
|
|
007E40 1 4C F5 80 jmp L80F5
|
|
007E43 1
|
|
007E43 1 20 CA 80 L7E43: jsr L80CA
|
|
007E46 1 A0 00 ldy #$00
|
|
007E48 1 B1 06 lda (L0006),y
|
|
007E4A 1 30 36 bmi L7E82
|
|
007E4C 1 29 0F and #$0F
|
|
007E4E 1 8D 04 08 sta $0804
|
|
007E51 1 A0 01 ldy #$01
|
|
007E53 1 B1 06 L7E53: lda (L0006),y
|
|
007E55 1 D9 07 08 cmp $0807,y
|
|
007E58 1 F0 05 beq L7E5F
|
|
007E5A 1 B0 26 bcs L7E82
|
|
007E5C 1 4C 67 7E jmp L7E67
|
|
007E5F 1
|
|
007E5F 1 C8 L7E5F: iny
|
|
007E60 1 C0 10 cpy #$10
|
|
007E62 1 D0 EF bne L7E53
|
|
007E64 1 4C 82 7E jmp L7E82
|
|
007E67 1
|
|
007E67 1 AD 00 08 L7E67: lda L0800
|
|
007E6A 1 8D 06 08 sta $0806
|
|
007E6D 1 A2 0F ldx #$0F
|
|
007E6F 1 A9 20 lda #$20
|
|
007E71 1 9D 08 08 L7E71: sta $0808,x
|
|
007E74 1 CA dex
|
|
007E75 1 10 FA bpl L7E71
|
|
007E77 1 AC 04 08 ldy $0804
|
|
007E7A 1 B1 06 L7E7A: lda (L0006),y
|
|
007E7C 1 99 07 08 sta $0807,y
|
|
007E7F 1 88 dey
|
|
007E80 1 D0 F8 bne L7E7A
|
|
007E82 1 EE 00 08 L7E82: inc L0800
|
|
007E85 1 AD 00 08 lda L0800
|
|
007E88 1 CD 03 08 cmp $0803
|
|
007E8B 1 F0 03 beq L7E90
|
|
007E8D 1 4C 43 7E jmp L7E43
|
|
007E90 1
|
|
007E90 1 EE 05 08 L7E90: inc $0805
|
|
007E93 1 AD 06 08 lda $0806
|
|
007E96 1 8D 00 08 sta L0800
|
|
007E99 1 20 CA 80 jsr L80CA
|
|
007E9C 1 A0 00 ldy #$00
|
|
007E9E 1 B1 06 lda (L0006),y
|
|
007EA0 1 09 80 ora #$80
|
|
007EA2 1 91 06 sta (L0006),y
|
|
007EA4 1 A9 5A lda #$5A
|
|
007EA6 1 A2 0F ldx #$0F
|
|
007EA8 1 9D 08 08 L7EA8: sta $0808,x
|
|
007EAB 1 CA dex
|
|
007EAC 1 10 FA bpl L7EA8
|
|
007EAE 1 AE 05 08 ldx $0805
|
|
007EB1 1 CA dex
|
|
007EB2 1 AC 06 08 ldy $0806
|
|
007EB5 1 C8 iny
|
|
007EB6 1 20 2B 81 jsr L812B
|
|
007EB9 1 A9 00 lda #$00
|
|
007EBB 1 8D 00 08 sta L0800
|
|
007EBE 1 4C 38 7E jmp L7E38
|
|
007EC1 1
|
|
007EC1 1 C9 82 L7EC1: cmp #$82
|
|
007EC3 1 F0 03 beq L7EC8
|
|
007EC5 1 4C 58 7F jmp L7F58
|
|
007EC8 1
|
|
007EC8 1 AD 83 C0 L7EC8: lda $C083
|
|
007ECB 1 AD 83 C0 lda $C083
|
|
007ECE 1 A9 00 lda #$00
|
|
007ED0 1 8D 08 08 sta $0808
|
|
007ED3 1 8D 09 08 sta $0809
|
|
007ED6 1 8D 05 08 sta $0805
|
|
007ED9 1 8D 00 08 sta L0800
|
|
007EDC 1 AD 05 08 L7EDC: lda $0805
|
|
007EDF 1 CD 03 08 cmp $0803
|
|
007EE2 1 D0 03 bne L7EE7
|
|
007EE4 1 4C F5 80 jmp L80F5
|
|
007EE7 1
|
|
007EE7 1 20 CA 80 L7EE7: jsr L80CA
|
|
007EEA 1 A0 00 ldy #$00
|
|
007EEC 1 B1 06 lda (L0006),y
|
|
007EEE 1 30 2B bmi L7F1B
|
|
007EF0 1 A0 18 ldy #$18
|
|
007EF2 1 B1 06 lda (L0006),y
|
|
007EF4 1 CD 09 08 cmp $0809
|
|
007EF7 1 F0 05 beq L7EFE
|
|
007EF9 1 B0 0D bcs L7F08
|
|
007EFB 1 4C 1B 7F jmp L7F1B
|
|
007EFE 1
|
|
007EFE 1 88 L7EFE: dey
|
|
007EFF 1 B1 06 lda (L0006),y
|
|
007F01 1 CD 08 08 cmp $0808
|
|
007F04 1 F0 15 beq L7F1B
|
|
007F06 1 90 13 bcc L7F1B
|
|
007F08 1 A0 18 L7F08: ldy #$18
|
|
007F0A 1 B1 06 lda (L0006),y
|
|
007F0C 1 8D 09 08 sta $0809
|
|
007F0F 1 88 dey
|
|
007F10 1 B1 06 lda (L0006),y
|
|
007F12 1 8D 08 08 sta $0808
|
|
007F15 1 AD 00 08 lda L0800
|
|
007F18 1 8D 06 08 sta $0806
|
|
007F1B 1 EE 00 08 L7F1B: inc L0800
|
|
007F1E 1 AD 00 08 lda L0800
|
|
007F21 1 CD 03 08 cmp $0803
|
|
007F24 1 F0 03 beq L7F29
|
|
007F26 1 4C E7 7E jmp L7EE7
|
|
007F29 1
|
|
007F29 1 EE 05 08 L7F29: inc $0805
|
|
007F2C 1 AD 06 08 lda $0806
|
|
007F2F 1 8D 00 08 sta L0800
|
|
007F32 1 20 CA 80 jsr L80CA
|
|
007F35 1 A0 00 ldy #$00
|
|
007F37 1 B1 06 lda (L0006),y
|
|
007F39 1 09 80 ora #$80
|
|
007F3B 1 91 06 sta (L0006),y
|
|
007F3D 1 A9 00 lda #$00
|
|
007F3F 1 8D 08 08 sta $0808
|
|
007F42 1 8D 09 08 sta $0809
|
|
007F45 1 AE 05 08 ldx $0805
|
|
007F48 1 CA dex
|
|
007F49 1 AC 06 08 ldy $0806
|
|
007F4C 1 C8 iny
|
|
007F4D 1 20 2B 81 jsr L812B
|
|
007F50 1 A9 00 lda #$00
|
|
007F52 1 8D 00 08 sta L0800
|
|
007F55 1 4C DC 7E jmp L7EDC
|
|
007F58 1
|
|
007F58 1 C9 83 L7F58: cmp #$83
|
|
007F5A 1 F0 03 beq L7F5F
|
|
007F5C 1 4C 1F 80 jmp L801F
|
|
007F5F 1
|
|
007F5F 1 AD 83 C0 L7F5F: lda $C083
|
|
007F62 1 AD 83 C0 lda $C083
|
|
007F65 1 A9 00 lda #$00
|
|
007F67 1 8D 08 08 sta $0808
|
|
007F6A 1 8D 09 08 sta $0809
|
|
007F6D 1 8D 05 08 sta $0805
|
|
007F70 1 8D 00 08 sta L0800
|
|
007F73 1 AD 05 08 L7F73: lda $0805
|
|
007F76 1 CD 03 08 cmp $0803
|
|
007F79 1 D0 03 bne L7F7E
|
|
007F7B 1 4C F5 80 jmp L80F5
|
|
007F7E 1
|
|
007F7E 1 20 CA 80 L7F7E: jsr L80CA
|
|
007F81 1 A0 00 ldy #$00
|
|
007F83 1 B1 06 lda (L0006),y
|
|
007F85 1 30 26 bmi L7FAD
|
|
007F87 1 A0 12 ldy #$12
|
|
007F89 1 B1 06 lda (L0006),y
|
|
007F8B 1 CD 09 08 cmp $0809
|
|
007F8E 1 F0 02 beq L7F92
|
|
007F90 1 B0 0A bcs L7F9C
|
|
007F92 1 88 L7F92: dey
|
|
007F93 1 B1 06 lda (L0006),y
|
|
007F95 1 CD 08 08 cmp $0808
|
|
007F98 1 F0 02 beq L7F9C
|
|
007F9A 1 90 11 bcc L7FAD
|
|
007F9C 1 B1 06 L7F9C: lda (L0006),y
|
|
007F9E 1 8D 08 08 sta $0808
|
|
007FA1 1 C8 iny
|
|
007FA2 1 B1 06 lda (L0006),y
|
|
007FA4 1 8D 09 08 sta $0809
|
|
007FA7 1 AD 00 08 lda L0800
|
|
007FAA 1 8D 06 08 sta $0806
|
|
007FAD 1 EE 00 08 L7FAD: inc L0800
|
|
007FB0 1 AD 00 08 lda L0800
|
|
007FB3 1 CD 03 08 cmp $0803
|
|
007FB6 1 F0 03 beq L7FBB
|
|
007FB8 1 4C 7E 7F jmp L7F7E
|
|
007FBB 1
|
|
007FBB 1 EE 05 08 L7FBB: inc $0805
|
|
007FBE 1 AD 06 08 lda $0806
|
|
007FC1 1 8D 00 08 sta L0800
|
|
007FC4 1 20 CA 80 jsr L80CA
|
|
007FC7 1 A0 00 ldy #$00
|
|
007FC9 1 B1 06 lda (L0006),y
|
|
007FCB 1 09 80 ora #$80
|
|
007FCD 1 91 06 sta (L0006),y
|
|
007FCF 1 A9 00 lda #$00
|
|
007FD1 1 8D 08 08 sta $0808
|
|
007FD4 1 8D 09 08 sta $0809
|
|
007FD7 1 AE 05 08 ldx $0805
|
|
007FDA 1 CA dex
|
|
007FDB 1 AC 06 08 ldy $0806
|
|
007FDE 1 C8 iny
|
|
007FDF 1 20 2B 81 jsr L812B
|
|
007FE2 1 A9 00 lda #$00
|
|
007FE4 1 8D 00 08 sta L0800
|
|
007FE7 1 4C 73 7F jmp L7F73
|
|
007FEA 1
|
|
007FEA 1 AD 8B C0 lda LCBANK1
|
|
007FED 1 AD 8B C0 lda LCBANK1
|
|
007FF0 1 A9 54 lda #$54
|
|
007FF2 1 8D D9 E6 sta $E6D9
|
|
007FF5 1 A9 00 lda #$00
|
|
007FF7 1 8D DA E6 sta $E6DA
|
|
007FFA 1 A9 CB lda #$CB
|
|
007FFC 1 8D DD E6 sta $E6DD
|
|
007FFF 1 A9 00 lda #$00
|
|
008001 1 8D DE E6 sta $E6DE
|
|
008004 1 A9 00 lda #$00
|
|
008006 1 8D E1 E6 sta $E6E1
|
|
008009 1 8D E2 E6 sta $E6E2
|
|
00800C 1 A9 E7 lda #$E7
|
|
00800E 1 8D E5 E6 sta $E6E5
|
|
008011 1 A9 00 lda #$00
|
|
008013 1 8D E6 E6 sta $E6E6
|
|
008016 1 AD 83 C0 lda $C083
|
|
008019 1 AD 83 C0 lda $C083
|
|
00801C 1 4C F5 80 jmp L80F5
|
|
00801F 1
|
|
00801F 1 C9 84 L801F: cmp #$84
|
|
008021 1 F0 01 beq L8024
|
|
008023 1 60 rts
|
|
008024 1
|
|
008024 1 AD 00 FB L8024: lda $FB00
|
|
008027 1 85 08 sta $08
|
|
008029 1 AD 01 FB lda $FB01
|
|
00802C 1 85 09 sta $09
|
|
00802E 1 A0 00 ldy #$00
|
|
008030 1 B1 08 lda ($08),y
|
|
008032 1 8D 07 08 sta $0807
|
|
008035 1 A8 tay
|
|
008036 1 B1 08 L8036: lda ($08),y
|
|
008038 1 99 07 08 sta $0807,y
|
|
00803B 1 88 dey
|
|
00803C 1 D0 F8 bne L8036
|
|
00803E 1 AD 83 C0 lda $C083
|
|
008041 1 AD 83 C0 lda $C083
|
|
008044 1 A9 00 lda #$00
|
|
008046 1 8D 05 08 sta $0805
|
|
008049 1 8D 00 08 sta L0800
|
|
00804C 1 A9 FF lda #$FF
|
|
00804E 1 8D 06 08 sta $0806
|
|
008051 1 AD 05 08 L8051: lda $0805
|
|
008054 1 CD 03 08 cmp $0803
|
|
008057 1 D0 03 bne L805C
|
|
008059 1 4C F5 80 jmp L80F5
|
|
00805C 1
|
|
00805C 1 20 CA 80 L805C: jsr L80CA
|
|
00805F 1 A0 00 ldy #$00
|
|
008061 1 B1 06 lda (L0006),y
|
|
008063 1 30 19 bmi L807E
|
|
008065 1 A0 10 ldy #$10
|
|
008067 1 B1 06 lda (L0006),y
|
|
008069 1 AE 07 08 ldx $0807
|
|
00806C 1 E0 00 cpx #$00
|
|
00806E 1 F0 05 beq L8075
|
|
008070 1 DD 08 08 cmp $0808,x
|
|
008073 1 D0 09 bne L807E
|
|
008075 1 AD 00 08 L8075: lda L0800
|
|
008078 1 8D 06 08 sta $0806
|
|
00807B 1 4C 9E 80 jmp L809E
|
|
00807E 1
|
|
00807E 1 EE 00 08 L807E: inc L0800
|
|
008081 1 AD 00 08 lda L0800
|
|
008084 1 CD 03 08 cmp $0803
|
|
008087 1 F0 03 beq L808C
|
|
008089 1 4C 5C 80 jmp L805C
|
|
00808C 1
|
|
00808C 1 AD 06 08 L808C: lda $0806
|
|
00808F 1 C9 FF cmp #$FF
|
|
008091 1 D0 0B bne L809E
|
|
008093 1 CE 07 08 dec $0807
|
|
008096 1 A9 00 lda #$00
|
|
008098 1 8D 00 08 sta L0800
|
|
00809B 1 4C 5C 80 jmp L805C
|
|
00809E 1
|
|
00809E 1 EE 05 08 L809E: inc $0805
|
|
0080A1 1 AD 06 08 lda $0806
|
|
0080A4 1 8D 00 08 sta L0800
|
|
0080A7 1 20 CA 80 jsr L80CA
|
|
0080AA 1 A0 00 ldy #$00
|
|
0080AC 1 B1 06 lda (L0006),y
|
|
0080AE 1 09 80 ora #$80
|
|
0080B0 1 91 06 sta (L0006),y
|
|
0080B2 1 AE 05 08 ldx $0805
|
|
0080B5 1 CA dex
|
|
0080B6 1 AC 06 08 ldy $0806
|
|
0080B9 1 C8 iny
|
|
0080BA 1 20 2B 81 jsr L812B
|
|
0080BD 1 A9 00 lda #$00
|
|
0080BF 1 8D 00 08 sta L0800
|
|
0080C2 1 A9 FF lda #$FF
|
|
0080C4 1 8D 06 08 sta $0806
|
|
0080C7 1 4C 51 80 jmp L8051
|
|
0080CA 1
|
|
0080CA 1 A9 00 L80CA: lda #$00
|
|
0080CC 1 8D 04 08 sta $0804
|
|
0080CF 1 AD 00 08 lda L0800
|
|
0080D2 1 0A asl a
|
|
0080D3 1 2E 04 08 rol $0804
|
|
0080D6 1 0A asl a
|
|
0080D7 1 2E 04 08 rol $0804
|
|
0080DA 1 0A asl a
|
|
0080DB 1 2E 04 08 rol $0804
|
|
0080DE 1 0A asl a
|
|
0080DF 1 2E 04 08 rol $0804
|
|
0080E2 1 0A asl a
|
|
0080E3 1 2E 04 08 rol $0804
|
|
0080E6 1 18 clc
|
|
0080E7 1 6D 01 08 adc $0801
|
|
0080EA 1 85 06 sta L0006
|
|
0080EC 1 AD 02 08 lda $0802
|
|
0080EF 1 6D 04 08 adc $0804
|
|
0080F2 1 85 07 sta $07
|
|
0080F4 1 60 rts
|
|
0080F5 1
|
|
0080F5 1 A9 00 L80F5: lda #$00
|
|
0080F7 1 8D 00 08 sta L0800
|
|
0080FA 1 AD 00 08 L80FA: lda L0800
|
|
0080FD 1 CD 03 08 cmp $0803
|
|
008100 1 F0 22 beq L8124
|
|
008102 1 20 CA 80 jsr L80CA
|
|
008105 1 A0 00 ldy #$00
|
|
008107 1 B1 06 lda (L0006),y
|
|
008109 1 29 7F and #$7F
|
|
00810B 1 91 06 sta (L0006),y
|
|
00810D 1 A0 17 ldy #$17
|
|
00810F 1 B1 06 lda (L0006),y
|
|
008111 1 D0 0B bne L811E
|
|
008113 1 C8 iny
|
|
008114 1 B1 06 lda (L0006),y
|
|
008116 1 C9 01 cmp #$01
|
|
008118 1 D0 04 bne L811E
|
|
00811A 1 A9 00 lda #$00
|
|
00811C 1 91 06 sta (L0006),y
|
|
00811E 1 EE 00 08 L811E: inc L0800
|
|
008121 1 4C FA 80 jmp L80FA
|
|
008124 1
|
|
008124 1 AD 8B C0 L8124: lda LCBANK1
|
|
008127 1 AD 8B C0 lda LCBANK1
|
|
00812A 1 60 rts
|
|
00812B 1
|
|
00812B 1 AD 8B C0 L812B: lda LCBANK1
|
|
00812E 1 AD 8B C0 lda LCBANK1
|
|
008131 1 98 tya
|
|
008132 1 9D A1 DE sta $DEA1,x
|
|
008135 1 AD 83 C0 lda $C083
|
|
008138 1 AD 83 C0 lda $C083
|
|
00813B 1 60 rts
|
|
00813C 1
|
|
00813C 1 00 L813C: brk
|
|
00813D 1 00 brk
|
|
00813E 1 08 L813E: php
|
|
00813F 1 A0 00 L813F: ldy #$00
|
|
008141 1 AA tax
|
|
008142 1 CA dex
|
|
008143 1 8A txa
|
|
008144 1 8C 3C 81 sty L813C
|
|
008147 1 0A asl a
|
|
008148 1 2E 3C 81 rol L813C
|
|
00814B 1 0A asl a
|
|
00814C 1 2E 3C 81 rol L813C
|
|
00814F 1 0A asl a
|
|
008150 1 2E 3C 81 rol L813C
|
|
008153 1 0A asl a
|
|
008154 1 2E 3C 81 rol L813C
|
|
008157 1 0A asl a
|
|
008158 1 2E 3C 81 rol L813C
|
|
00815B 1 18 clc
|
|
00815C 1 6D 1D E7 adc $E71D
|
|
00815F 1 85 06 sta L0006
|
|
008161 1 AD 1E E7 lda $E71E
|
|
008164 1 6D 3C 81 adc L813C
|
|
008167 1 85 07 sta $07
|
|
008169 1 AD 83 C0 lda $C083
|
|
00816C 1 AD 83 C0 lda $C083
|
|
00816F 1 A0 1F ldy #$1F
|
|
008171 1 B1 06 L8171: lda (L0006),y
|
|
008173 1 99 43 EC sta $EC43,y
|
|
008176 1 88 dey
|
|
008177 1 10 F8 bpl L8171
|
|
008179 1 AD 8B C0 lda LCBANK1
|
|
00817C 1 AD 8B C0 lda LCBANK1
|
|
00817F 1 A2 31 ldx #$31
|
|
008181 1 A9 20 lda #$20
|
|
008183 1 9D EB E6 L8183: sta $E6EB,x
|
|
008186 1 CA dex
|
|
008187 1 10 FA bpl L8183
|
|
008189 1 A9 00 lda #$00
|
|
00818B 1 8D EB E6 sta $E6EB
|
|
00818E 1 AD DF E6 lda $E6DF
|
|
008191 1 18 clc
|
|
008192 1 6D 3E 81 adc L813E
|
|
008195 1 8D DF E6 sta $E6DF
|
|
008198 1 90 03 bcc L819D
|
|
00819A 1 EE E0 E6 inc $E6E0
|
|
00819D 1 AD E3 E6 L819D: lda $E6E3
|
|
0081A0 1 18 clc
|
|
0081A1 1 6D 3E 81 adc L813E
|
|
0081A4 1 8D E3 E6 sta $E6E3
|
|
0081A7 1 90 03 bcc L81AC
|
|
0081A9 1 EE E4 E6 inc $E6E4
|
|
0081AC 1 AD E7 E6 L81AC: lda $E6E7
|
|
0081AF 1 18 clc
|
|
0081B0 1 6D 3E 81 adc L813E
|
|
0081B3 1 8D E7 E6 sta $E6E7
|
|
0081B6 1 90 03 bcc L81BB
|
|
0081B8 1 EE E8 E6 inc $E6E8
|
|
0081BB 1 AD DB E6 L81BB: lda $E6DB
|
|
0081BE 1 CD 23 D2 cmp $D223
|
|
0081C1 1 AD DC E6 lda $E6DC
|
|
0081C4 1 ED 24 D2 sbc $D224
|
|
0081C7 1 30 10 bmi L81D9
|
|
0081C9 1 AD DB E6 lda $E6DB
|
|
0081CC 1 18 clc
|
|
0081CD 1 6D 3E 81 adc L813E
|
|
0081D0 1 8D DB E6 sta $E6DB
|
|
0081D3 1 90 03 bcc L81D8
|
|
0081D5 1 EE DC E6 inc $E6DC
|
|
0081D8 1 60 L81D8: rts
|
|
0081D9 1
|
|
0081D9 1 AD DB E6 L81D9: lda $E6DB
|
|
0081DC 1 18 clc
|
|
0081DD 1 6D 3E 81 adc L813E
|
|
0081E0 1 8D DB E6 sta $E6DB
|
|
0081E3 1 90 03 bcc L81E8
|
|
0081E5 1 EE DC E6 inc $E6DC
|
|
0081E8 1 AD DB E6 L81E8: lda $E6DB
|
|
0081EB 1 CD 1F D2 cmp $D21F
|
|
0081EE 1 AD DC E6 lda $E6DC
|
|
0081F1 1 ED 20 D2 sbc $D220
|
|
0081F4 1 10 01 bpl L81F7
|
|
0081F6 1 60 rts
|
|
0081F7 1
|
|
0081F7 1 20 1F 82 L81F7: jsr L821F
|
|
0081FA 1 A9 D9 lda #$D9
|
|
0081FC 1 A2 E6 ldx #$E6
|
|
0081FE 1 20 1C D0 jsr LD01C
|
|
008201 1 20 41 82 jsr L8241
|
|
008204 1 A9 DD lda #$DD
|
|
008206 1 A2 E6 ldx #$E6
|
|
008208 1 20 1C D0 jsr LD01C
|
|
00820B 1 20 53 82 jsr L8253
|
|
00820E 1 A9 E1 lda #$E1
|
|
008210 1 A2 E6 ldx #$E6
|
|
008212 1 20 1C D0 jsr LD01C
|
|
008215 1 20 0F 83 jsr L830F
|
|
008218 1 A9 E5 lda #$E5
|
|
00821A 1 A2 E6 ldx #$E6
|
|
00821C 1 4C 1C D0 jmp LD01C
|
|
00821F 1
|
|
00821F 1 AD 43 EC L821F: lda $EC43
|
|
008222 1 29 0F and #$0F
|
|
008224 1 8D EB E6 sta $E6EB
|
|
008227 1 AA tax
|
|
008228 1 BD 43 EC L8228: lda $EC43,x
|
|
00822B 1 9D EC E6 sta $E6EC,x
|
|
00822E 1 CA dex
|
|
00822F 1 D0 F7 bne L8228
|
|
008231 1 A9 20 lda #$20
|
|
008233 1 8D EC E6 sta $E6EC
|
|
008236 1 EE EB E6 inc $E6EB
|
|
008239 1 A9 EB lda #$EB
|
|
00823B 1 A2 E6 ldx #$E6
|
|
00823D 1 20 BA 87 jsr L87BA
|
|
008240 1 60 rts
|
|
008241 1
|
|
008241 1 AD 53 EC L8241: lda $EC53
|
|
008244 1 20 07 87 jsr L8707
|
|
008247 1 A2 04 ldx #$04
|
|
008249 1 BD C5 DF L8249: lda $DFC5,x
|
|
00824C 1 9D EB E6 sta $E6EB,x
|
|
00824F 1 CA dex
|
|
008250 1 10 F7 bpl L8249
|
|
008252 1 60 rts
|
|
008253 1
|
|
008253 1 AD 54 EC L8253: lda $EC54
|
|
008256 1 AE 55 EC ldx $EC55
|
|
008259 1 8D 72 82 L8259: sta L8272
|
|
00825C 1 8E 73 82 stx L8273
|
|
00825F 1 4C 76 82 jmp L8276
|
|
008262 1
|
|
008262 1 20 42 6C L8262: jsr L6C42
|
|
008265 1 6F 63 6B bbr6 $63,L82D3
|
|
008268 1 73 .byte $73
|
|
008269 1 20 .byte $20
|
|
00826A 1 10 L826A: .byte $10
|
|
00826B 1 27 E8 L826B: rmb2 $E8
|
|
00826D 1 03 .byte $03
|
|
00826E 1 64 00 stz L0000
|
|
008270 1 0A asl a
|
|
008271 1 00 brk
|
|
008272 1 00 L8272: brk
|
|
008273 1 00 L8273: brk
|
|
008274 1 00 L8274: brk
|
|
008275 1 00 L8275: brk
|
|
008276 1 A2 11 L8276: ldx #$11
|
|
008278 1 A9 20 lda #$20
|
|
00827A 1 9D EB E6 L827A: sta $E6EB,x
|
|
00827D 1 CA dex
|
|
00827E 1 10 FA bpl L827A
|
|
008280 1 A9 00 lda #$00
|
|
008282 1 8D EB E6 sta $E6EB
|
|
008285 1 8D 75 82 sta L8275
|
|
008288 1 A0 00 ldy #$00
|
|
00828A 1 A2 00 ldx #$00
|
|
00828C 1 A9 00 L828C: lda #$00
|
|
00828E 1 8D 74 82 sta L8274
|
|
008291 1 AD 72 82 L8291: lda L8272
|
|
008294 1 DD 6A 82 cmp L826A,x
|
|
008297 1 AD 73 82 lda L8273
|
|
00829A 1 FD 6B 82 sbc L826B,x
|
|
00829D 1 10 24 bpl L82C3
|
|
00829F 1 AD 74 82 lda L8274
|
|
0082A2 1 D0 09 bne L82AD
|
|
0082A4 1 2C 75 82 bit L8275
|
|
0082A7 1 30 04 bmi L82AD
|
|
0082A9 1 A9 20 lda #$20
|
|
0082AB 1 D0 09 bne L82B6
|
|
0082AD 1 09 30 L82AD: ora #$30
|
|
0082AF 1 48 pha
|
|
0082B0 1 A9 80 lda #$80
|
|
0082B2 1 8D 75 82 sta L8275
|
|
0082B5 1 68 pla
|
|
0082B6 1 99 ED E6 L82B6: sta $E6ED,y
|
|
0082B9 1 C8 iny
|
|
0082BA 1 E8 inx
|
|
0082BB 1 E8 inx
|
|
0082BC 1 E0 08 cpx #$08
|
|
0082BE 1 F0 1C beq L82DC
|
|
0082C0 1 4C 8C 82 jmp L828C
|
|
0082C3 1
|
|
0082C3 1 EE 74 82 L82C3: inc L8274
|
|
0082C6 1 AD 72 82 lda L8272
|
|
0082C9 1 38 sec
|
|
0082CA 1 FD 6A 82 sbc L826A,x
|
|
0082CD 1 8D 72 82 sta L8272
|
|
0082D0 1 AD 73 82 lda L8273
|
|
0082D3 1 FD 6B 82 L82D3: sbc L826B,x
|
|
0082D6 1 8D 73 82 sta L8273
|
|
0082D9 1 4C 91 82 jmp L8291
|
|
0082DC 1
|
|
0082DC 1 AD 72 82 L82DC: lda L8272
|
|
0082DF 1 09 30 ora #$30
|
|
0082E1 1 99 ED E6 sta $E6ED,y
|
|
0082E4 1 C8 iny
|
|
0082E5 1 A2 00 ldx #$00
|
|
0082E7 1 BD 62 82 L82E7: lda L8262,x
|
|
0082EA 1 99 ED E6 sta $E6ED,y
|
|
0082ED 1 C8 iny
|
|
0082EE 1 E8 inx
|
|
0082EF 1 EC 62 82 cpx L8262
|
|
0082F2 1 D0 F3 bne L82E7
|
|
0082F4 1 AD 74 82 lda L8274
|
|
0082F7 1 D0 0C bne L8305
|
|
0082F9 1 2C 75 82 bit L8275
|
|
0082FC 1 30 07 bmi L8305
|
|
0082FE 1 AD 72 82 lda L8272
|
|
008301 1 C9 02 cmp #$02
|
|
008303 1 90 04 bcc L8309
|
|
008305 1 A9 0D L8305: lda #$0D
|
|
008307 1 D0 02 bne L830B
|
|
008309 1 A9 0C L8309: lda #$0C
|
|
00830B 1 8D EB E6 L830B: sta $E6EB
|
|
00830E 1 60 rts
|
|
00830F 1
|
|
00830F 1 A2 15 L830F: ldx #$15
|
|
008311 1 A9 20 lda #$20
|
|
008313 1 9D EB E6 L8313: sta $E6EB,x
|
|
008316 1 CA dex
|
|
008317 1 10 FA bpl L8313
|
|
008319 1 A9 01 lda #$01
|
|
00831B 1 8D EB E6 sta $E6EB
|
|
00831E 1 A9 EB lda #$EB
|
|
008320 1 85 08 sta $08
|
|
008322 1 A9 E6 lda #$E6
|
|
008324 1 85 09 sta $09
|
|
008326 1 AD 5A EC lda $EC5A
|
|
008329 1 0D 5B EC ora $EC5B
|
|
00832C 1 D0 06 bne L8334
|
|
00832E 1 8D DC 83 sta L83DC
|
|
008331 1 4C A9 83 jmp L83A9
|
|
008334 1
|
|
008334 1 AD 5B EC L8334: lda $EC5B
|
|
008337 1 29 FE and #$FE
|
|
008339 1 4A lsr a
|
|
00833A 1 8D DB 83 sta L83DB
|
|
00833D 1 AD 5B EC lda $EC5B
|
|
008340 1 6A ror a
|
|
008341 1 AD 5A EC lda $EC5A
|
|
008344 1 6A ror a
|
|
008345 1 4A lsr a
|
|
008346 1 4A lsr a
|
|
008347 1 4A lsr a
|
|
008348 1 4A lsr a
|
|
008349 1 8D DC 83 sta L83DC
|
|
00834C 1 AD 5A EC lda $EC5A
|
|
00834F 1 29 1F and #$1F
|
|
008351 1 8D DD 83 sta L83DD
|
|
008354 1 20 A9 83 jsr L83A9
|
|
008357 1 20 5D 83 jsr L835D
|
|
00835A 1 4C B8 83 jmp L83B8
|
|
00835D 1
|
|
00835D 1 A9 20 L835D: lda #$20
|
|
00835F 1 8D DF 83 sta L83DF
|
|
008362 1 8D E0 83 sta L83E0
|
|
008365 1 8D E1 83 sta L83E1
|
|
008368 1 A2 02 ldx #$02
|
|
00836A 1 AD DD 83 lda L83DD
|
|
00836D 1 09 30 ora #$30
|
|
00836F 1 A8 tay
|
|
008370 1 AD DD 83 lda L83DD
|
|
008373 1 C9 0A cmp #$0A
|
|
008375 1 90 0F bcc L8386
|
|
008377 1 E8 inx
|
|
008378 1 A0 31 ldy #$31
|
|
00837A 1 C9 14 cmp #$14
|
|
00837C 1 90 08 bcc L8386
|
|
00837E 1 A0 32 ldy #$32
|
|
008380 1 C9 1E cmp #$1E
|
|
008382 1 90 02 bcc L8386
|
|
008384 1 A0 33 ldy #$33
|
|
008386 1 8E DE 83 L8386: stx L83DE
|
|
008389 1 8C DF 83 sty L83DF
|
|
00838C 1 E0 02 cpx #$02
|
|
00838E 1 F0 12 beq L83A2
|
|
008390 1 98 tya
|
|
008391 1 29 03 and #$03
|
|
008393 1 A8 tay
|
|
008394 1 AD DD 83 lda L83DD
|
|
008397 1 38 L8397: sec
|
|
008398 1 E9 0A sbc #$0A
|
|
00839A 1 88 dey
|
|
00839B 1 D0 FA bne L8397
|
|
00839D 1 09 30 ora #$30
|
|
00839F 1 8D E0 83 sta L83E0
|
|
0083A2 1 A9 DE L83A2: lda #$DE
|
|
0083A4 1 A2 83 ldx #$83
|
|
0083A6 1 4C A4 84 jmp L84A4
|
|
0083A9 1
|
|
0083A9 1 AD DC 83 L83A9: lda L83DC
|
|
0083AC 1 0A asl a
|
|
0083AD 1 A8 tay
|
|
0083AE 1 B9 E3 83 lda L83E3,y
|
|
0083B1 1 AA tax
|
|
0083B2 1 B9 E2 83 lda L83E2,y
|
|
0083B5 1 4C A4 84 jmp L84A4
|
|
0083B8 1
|
|
0083B8 1 AE 90 84 L83B8: ldx L8490
|
|
0083BB 1 AD DB 83 L83BB: lda L83DB
|
|
0083BE 1 38 sec
|
|
0083BF 1 FD 90 84 sbc L8490,x
|
|
0083C2 1 10 03 bpl L83C7
|
|
0083C4 1 CA dex
|
|
0083C5 1 D0 F4 bne L83BB
|
|
0083C7 1 A8 L83C7: tay
|
|
0083C8 1 BD 9A 84 lda L849A,x
|
|
0083CB 1 8D 8E 84 sta L848E
|
|
0083CE 1 B9 9A 84 lda L849A,y
|
|
0083D1 1 8D 8F 84 sta L848F
|
|
0083D4 1 A9 8A lda #$8A
|
|
0083D6 1 A2 84 ldx #$84
|
|
0083D8 1 4C A4 84 jmp L84A4
|
|
0083DB 1
|
|
0083DB 1 00 L83DB: brk
|
|
0083DC 1 00 L83DC: brk
|
|
0083DD 1 00 L83DD: brk
|
|
0083DE 1 03 L83DE: .byte $03
|
|
0083DF 1 20 L83DF: .byte $20
|
|
0083E0 1 20 L83E0: .byte $20
|
|
0083E1 1 20 L83E1: .byte $20
|
|
0083E2 1 FC L83E2: .byte $FC
|
|
0083E3 1 83 L83E3: .byte $83
|
|
0083E4 1 06 84 asl $84
|
|
0083E6 1 11 84 ora ($84),y
|
|
0083E8 1 1C 84 27 trb $2784
|
|
0083EB 1 84 32 sty $32
|
|
0083ED 1 84 3D sty $3D
|
|
0083EF 1 84 48 sty $48
|
|
0083F1 1 84 53 sty $53
|
|
0083F3 1 84 5E sty $5E
|
|
0083F5 1 84 69 sty $69
|
|
0083F7 1 84 74 sty $74
|
|
0083F9 1 84 7F sty $7F
|
|
0083FB 1 84 09 sty $09
|
|
0083FD 1 6E 6F 20 ror $206F
|
|
008400 1 64 61 stz $61
|
|
008402 1 74 65 stz $65,x
|
|
008404 1 20 20 0A jsr L0A20
|
|
008407 1 4A lsr a
|
|
008408 1 61 6E adc ($6E,x)
|
|
00840A 1 75 61 adc $61,x
|
|
00840C 1 72 79 adc ($79)
|
|
00840E 1 20 20 20 jsr L2020
|
|
008411 1 0A asl a
|
|
008412 1 46 65 lsr $65
|
|
008414 1 62 .byte $62
|
|
008415 1 72 75 adc ($75)
|
|
008417 1 61 72 adc ($72,x)
|
|
008419 1 79 20 20 adc L2020,y
|
|
00841C 1 0A asl a
|
|
00841D 1 4D 61 72 eor L7261
|
|
008420 1 63 .byte $63
|
|
008421 1 68 pla
|
|
008422 1 20 20 20 jsr L2020
|
|
008425 1 20 20 0A jsr L0A20
|
|
008428 1 41 70 eor ($70,x)
|
|
00842A 1 72 69 adc ($69)
|
|
00842C 1 6C 20 20 jmp (L2020)
|
|
00842F 1
|
|
00842F 1 20 20 20 jsr L2020
|
|
008432 1 0A asl a
|
|
008433 1 4D 61 79 eor L7961
|
|
008436 1 20 20 20 jsr L2020
|
|
008439 1 20 20 20 jsr L2020
|
|
00843C 1 20 0A 4A jsr L4A0A
|
|
00843F 1 75 6E adc $6E,x
|
|
008441 1 65 20 adc L0020
|
|
008443 1 20 20 20 jsr L2020
|
|
008446 1 20 20 0A jsr L0A20
|
|
008449 1 4A lsr a
|
|
00844A 1 75 6C adc $6C,x
|
|
00844C 1 79 20 20 adc L2020,y
|
|
00844F 1 20 20 20 jsr L2020
|
|
008452 1 20 0A 41 jsr L410A
|
|
008455 1 75 67 adc $67,x
|
|
008457 1 75 73 adc $73,x
|
|
008459 1 74 20 stz L0020,x
|
|
00845B 1 20 20 20 jsr L2020
|
|
00845E 1 0A asl a
|
|
00845F 1 53 .byte $53
|
|
008460 1 65 70 adc $70
|
|
008462 1 74 65 stz $65,x
|
|
008464 1 6D 62 65 adc L6562
|
|
008467 1 72 20 adc (L0020)
|
|
008469 1 0A asl a
|
|
00846A 1 4F 63 74 bbr4 $63,L84E1
|
|
00846D 1 6F 62 65 bbr6 $62,L84D5
|
|
008470 1 72 20 adc (L0020)
|
|
008472 1 20 20 0A jsr L0A20
|
|
008475 1 4E 6F 76 lsr L766F
|
|
008478 1 65 6D adc $6D
|
|
00847A 1 62 .byte $62
|
|
00847B 1 65 72 adc $72
|
|
00847D 1 20 20 0A jsr L0A20
|
|
008480 1 44 .byte $44
|
|
008481 1 65 63 adc $63
|
|
008483 1 65 6D adc $6D
|
|
008485 1 62 .byte $62
|
|
008486 1 65 72 adc $72
|
|
008488 1 20 20 05 jsr L0520
|
|
00848B 1 20 31 39 jsr L3931
|
|
00848E 1 38 L848E: sec
|
|
00848F 1 35 L848F: .byte $35
|
|
008490 1 09 0A L8490: ora #$0A
|
|
008492 1 14 1E trb $1E
|
|
008494 1 28 plp
|
|
008495 1 32 3C and ($3C)
|
|
008497 1 46 50 lsr $50
|
|
008499 1 5A phy
|
|
00849A 1 30 31 L849A: bmi L84CD
|
|
00849C 1 32 33 and ($33)
|
|
00849E 1 34 35 bit $35,x
|
|
0084A0 1 36 37 rol $37,x
|
|
0084A2 1 38 sec
|
|
0084A3 1 39 .byte $39
|
|
0084A4 1 85 06 L84A4: sta L0006
|
|
0084A6 1 86 07 stx $07
|
|
0084A8 1 A0 00 ldy #$00
|
|
0084AA 1 B1 08 lda ($08),y
|
|
0084AC 1 8D D0 84 sta L84D0
|
|
0084AF 1 18 clc
|
|
0084B0 1 71 06 adc (L0006),y
|
|
0084B2 1 91 08 sta ($08),y
|
|
0084B4 1 B1 06 lda (L0006),y
|
|
0084B6 1 8D CB 84 sta L84CB
|
|
0084B9 1 EE D0 84 inc L84D0
|
|
0084BC 1 C8 iny
|
|
0084BD 1 B1 06 lda (L0006),y
|
|
0084BF 1 8C CF 84 sty L84CF
|
|
0084C2 1 AC D0 84 ldy L84D0
|
|
0084C5 1 91 08 sta ($08),y
|
|
0084C7 1 AC CF 84 ldy L84CF
|
|
0084CA 1 C0 .byte $C0
|
|
0084CB 1 00 L84CB: brk
|
|
0084CC 1 90 .byte $90
|
|
0084CD 1 EB L84CD: .byte $EB
|
|
0084CE 1 60 rts
|
|
0084CF 1
|
|
0084CF 1 00 L84CF: brk
|
|
0084D0 1 00 L84D0: brk
|
|
0084D1 1 20 F6 87 L84D1: jsr L87F6
|
|
0084D4 1 2C .byte $2C
|
|
0084D5 1 1B L84D5: .byte $1B
|
|
0084D6 1 5B .byte $5B
|
|
0084D7 1 30 03 bmi L84DC
|
|
0084D9 1 20 52 6E jsr L6E52
|
|
0084DC 1 AD 21 D2 L84DC: lda $D221
|
|
0084DF 1 38 sec
|
|
0084E0 1 ED .byte $ED
|
|
0084E1 1 1D D2 8D L84E1: ora L8DD2,x
|
|
0084E4 1 F8 sed
|
|
0084E5 1 85 AD sta $AD
|
|
0084E7 1 22 .byte $22
|
|
0084E8 1 D2 ED cmp ($ED)
|
|
0084EA 1 1E D2 8D asl L8DD2,x
|
|
0084ED 1 F9 85 AD sbc LAD85,y
|
|
0084F0 1 23 .byte $23
|
|
0084F1 1 D2 38 cmp ($38)
|
|
0084F3 1 ED 1F D2 sbc $D21F
|
|
0084F6 1 8D FA 85 sta L85FA
|
|
0084F9 1 AD 24 D2 lda $D224
|
|
0084FC 1 ED 20 D2 sbc $D220
|
|
0084FF 1 8D FB 85 sta L85FB
|
|
008502 1 AD 08 D2 lda $D208
|
|
008505 1 C9 01 cmp #$01
|
|
008507 1 D0 03 bne L850C
|
|
008509 1 0A asl a
|
|
00850A 1 D0 02 bne L850E
|
|
00850C 1 A9 00 L850C: lda #$00
|
|
00850E 1 8D F1 85 L850E: sta L85F1
|
|
008511 1 AD 25 EC lda $EC25
|
|
008514 1 20 EF 86 jsr L86EF
|
|
008517 1 85 06 sta L0006
|
|
008519 1 86 07 stx $07
|
|
00851B 1 A9 06 lda #$06
|
|
00851D 1 18 clc
|
|
00851E 1 6D F1 85 adc L85F1
|
|
008521 1 A8 tay
|
|
008522 1 B1 06 lda (L0006),y
|
|
008524 1 48 pha
|
|
008525 1 20 6B 7B jsr L7B6B
|
|
008528 1 AE F1 85 ldx L85F1
|
|
00852B 1 BD 63 7B lda L7B63,x
|
|
00852E 1 38 sec
|
|
00852F 1 FD 5F 7B sbc L7B5F,x
|
|
008532 1 8D F2 85 sta L85F2
|
|
008535 1 BD 64 7B lda L7B64,x
|
|
008538 1 FD 60 7B sbc L7B60,x
|
|
00853B 1 8D F3 85 sta L85F3
|
|
00853E 1 AE F1 85 ldx L85F1
|
|
008541 1 AD F2 85 lda L85F2
|
|
008544 1 38 sec
|
|
008545 1 FD F8 85 sbc L85F8,x
|
|
008548 1 8D F2 85 sta L85F2
|
|
00854B 1 AD F3 85 lda L85F3
|
|
00854E 1 FD F9 85 sbc L85F9,x
|
|
008551 1 8D F3 85 sta L85F3
|
|
008554 1 10 0C bpl L8562
|
|
008556 1 BD F8 85 lda L85F8,x
|
|
008559 1 8D F2 85 sta L85F2
|
|
00855C 1 BD F9 85 lda L85F9,x
|
|
00855F 1 8D F3 85 sta L85F3
|
|
008562 1 4E F3 85 L8562: lsr L85F3
|
|
008565 1 6E F2 85 ror L85F2
|
|
008568 1 4E F3 85 lsr L85F3
|
|
00856B 1 6E F2 85 ror L85F2
|
|
00856E 1 AD F2 85 lda L85F2
|
|
008571 1 A8 tay
|
|
008572 1 68 pla
|
|
008573 1 AA tax
|
|
008574 1 AD 09 D2 lda $D209
|
|
008577 1 20 BC 62 jsr L62BC
|
|
00857A 1 A2 00 ldx #$00
|
|
00857C 1 8E F2 85 stx L85F2
|
|
00857F 1 0A asl a
|
|
008580 1 2E F2 85 rol L85F2
|
|
008583 1 0A asl a
|
|
008584 1 2E F2 85 rol L85F2
|
|
008587 1 AE F1 85 ldx L85F1
|
|
00858A 1 18 clc
|
|
00858B 1 7D 5F 7B adc L7B5F,x
|
|
00858E 1 9D 1D D2 sta $D21D,x
|
|
008591 1 AD F2 85 lda L85F2
|
|
008594 1 7D 60 7B adc L7B60,x
|
|
008597 1 9D 1E D2 sta $D21E,x
|
|
00859A 1 AD 25 EC lda $EC25
|
|
00859D 1 20 5D 7D jsr L7D5D
|
|
0085A0 1 8D F4 85 sta L85F4
|
|
0085A3 1 8E F5 85 stx L85F5
|
|
0085A6 1 8C F6 85 sty L85F6
|
|
0085A9 1 AD F1 85 lda L85F1
|
|
0085AC 1 F0 15 beq L85C3
|
|
0085AE 1 AD 1F D2 lda $D21F
|
|
0085B1 1 18 clc
|
|
0085B2 1 6D F6 85 adc L85F6
|
|
0085B5 1 8D 23 D2 sta $D223
|
|
0085B8 1 AD 20 D2 lda $D220
|
|
0085BB 1 69 00 adc #$00
|
|
0085BD 1 8D 24 D2 sta $D224
|
|
0085C0 1 4C D6 85 jmp L85D6
|
|
0085C3 1
|
|
0085C3 1 AD 1D D2 L85C3: lda $D21D
|
|
0085C6 1 18 clc
|
|
0085C7 1 6D F4 85 adc L85F4
|
|
0085CA 1 8D 21 D2 sta $D221
|
|
0085CD 1 AD 1E D2 lda $D21E
|
|
0085D0 1 6D F5 85 adc L85F5
|
|
0085D3 1 8D 22 D2 sta $D222
|
|
0085D6 1 AD 25 EC L85D6: lda $EC25
|
|
0085D9 1 20 EF 86 jsr L86EF
|
|
0085DC 1 85 06 sta L0006
|
|
0085DE 1 86 07 stx $07
|
|
0085E0 1 A0 23 ldy #$23
|
|
0085E2 1 A2 07 ldx #$07
|
|
0085E4 1 BD 1D D2 L85E4: lda $D21D,x
|
|
0085E7 1 91 06 sta (L0006),y
|
|
0085E9 1 88 dey
|
|
0085EA 1 CA dex
|
|
0085EB 1 10 F7 bpl L85E4
|
|
0085ED 1 20 13 88 jsr L8813
|
|
0085F0 1 60 rts
|
|
0085F1 1
|
|
0085F1 1 00 L85F1: brk
|
|
0085F2 1 00 L85F2: brk
|
|
0085F3 1 00 L85F3: brk
|
|
0085F4 1 00 L85F4: brk
|
|
0085F5 1 00 L85F5: brk
|
|
0085F6 1 00 L85F6: brk
|
|
0085F7 1 00 brk
|
|
0085F8 1 00 L85F8: brk
|
|
0085F9 1 00 L85F9: brk
|
|
0085FA 1 00 L85FA: brk
|
|
0085FB 1 00 L85FB: brk
|
|
0085FC 1 A2 03 L85FC: ldx #$03
|
|
0085FE 1 BD 09 D2 L85FE: lda $D209,x
|
|
008601 1 9D A0 86 sta L86A0,x
|
|
008604 1 9D FD EB sta $EBFD,x
|
|
008607 1 CA dex
|
|
008608 1 10 F4 bpl L85FE
|
|
00860A 1 A9 00 lda #$00
|
|
00860C 1 8D 9F 86 sta L869F
|
|
00860F 1 AD AB D2 lda $D2AB
|
|
008612 1 0A asl a
|
|
008613 1 2E 9F 86 rol L869F
|
|
008616 1 8D 9E 86 sta L869E
|
|
008619 1 CE 9E 86 L8619: dec L869E
|
|
00861C 1 D0 08 bne L8626
|
|
00861E 1 CE 9F 86 dec L869F
|
|
008621 1 AD 9F 86 lda L869F
|
|
008624 1 D0 2F bne L8655
|
|
008626 1 20 F0 48 L8626: jsr L48F0
|
|
008629 1 20 58 86 jsr L8658
|
|
00862C 1 30 27 bmi L8655
|
|
00862E 1 A9 FF lda #$FF
|
|
008630 1 8D A6 86 sta L86A6
|
|
008633 1 AD 08 D2 lda $D208
|
|
008636 1 8D A5 86 sta L86A5
|
|
008639 1 C9 00 cmp #$00
|
|
00863B 1 F0 DC beq L8619
|
|
00863D 1 C9 04 cmp #$04
|
|
00863F 1 F0 D8 beq L8619
|
|
008641 1 C9 02 cmp #$02
|
|
008643 1 D0 06 bne L864B
|
|
008645 1 20 E6 48 jsr L48E6
|
|
008648 1 4C 19 86 jmp L8619
|
|
00864B 1
|
|
00864B 1 C9 01 L864B: cmp #$01
|
|
00864D 1 D0 06 bne L8655
|
|
00864F 1 20 E6 48 jsr L48E6
|
|
008652 1 A9 00 lda #$00
|
|
008654 1 60 rts
|
|
008655 1
|
|
008655 1 A9 FF L8655: lda #$FF
|
|
008657 1 60 rts
|
|
008658 1
|
|
008658 1 AD 09 D2 L8658: lda $D209
|
|
00865B 1 38 sec
|
|
00865C 1 ED A0 86 sbc L86A0
|
|
00865F 1 8D A4 86 sta L86A4
|
|
008662 1 AD 0A D2 lda $D20A
|
|
008665 1 ED A1 86 sbc L86A1
|
|
008668 1 10 0A bpl L8674
|
|
00866A 1 AD A4 86 lda L86A4
|
|
00866D 1 C9 F8 cmp #$F8
|
|
00866F 1 B0 0A bcs L867B
|
|
008671 1 A9 FF L8671: lda #$FF
|
|
008673 1 60 rts
|
|
008674 1
|
|
008674 1 AD A4 86 L8674: lda L86A4
|
|
008677 1 C9 08 cmp #$08
|
|
008679 1 B0 F6 bcs L8671
|
|
00867B 1 AD 0B D2 L867B: lda $D20B
|
|
00867E 1 38 sec
|
|
00867F 1 ED A2 86 sbc L86A2
|
|
008682 1 8D A4 86 sta L86A4
|
|
008685 1 AD 0C D2 lda $D20C
|
|
008688 1 ED A3 86 sbc L86A3
|
|
00868B 1 10 07 bpl L8694
|
|
00868D 1 AD A4 86 lda L86A4
|
|
008690 1 C9 F9 cmp #$F9
|
|
008692 1 B0 07 bcs L869B
|
|
008694 1 AD A4 86 L8694: lda L86A4
|
|
008697 1 C9 07 cmp #$07
|
|
008699 1 B0 D6 bcs L8671
|
|
00869B 1 A9 00 L869B: lda #$00
|
|
00869D 1 60 rts
|
|
00869E 1
|
|
00869E 1 00 L869E: brk
|
|
00869F 1 00 L869F: brk
|
|
0086A0 1 00 L86A0: brk
|
|
0086A1 1 00 L86A1: brk
|
|
0086A2 1 00 L86A2: brk
|
|
0086A3 1 00 L86A3: brk
|
|
0086A4 1 00 L86A4: brk
|
|
0086A5 1 00 L86A5: brk
|
|
0086A6 1 00 L86A6: brk
|
|
0086A7 1 A2 00 L86A7: ldx #$00
|
|
0086A9 1 8E C0 86 stx L86C0
|
|
0086AC 1 0A asl a
|
|
0086AD 1 2E C0 86 rol L86C0
|
|
0086B0 1 0A asl a
|
|
0086B1 1 2E C0 86 rol L86C0
|
|
0086B4 1 0A asl a
|
|
0086B5 1 2E C0 86 rol L86C0
|
|
0086B8 1 0A asl a
|
|
0086B9 1 2E C0 86 rol L86C0
|
|
0086BC 1 AE C0 86 ldx L86C0
|
|
0086BF 1 60 rts
|
|
0086C0 1
|
|
0086C0 1 00 L86C0: brk
|
|
0086C1 1 A2 00 L86C1: ldx #$00
|
|
0086C3 1 8E E2 86 stx L86E2
|
|
0086C6 1 0A asl a
|
|
0086C7 1 2E E2 86 rol L86E2
|
|
0086CA 1 0A asl a
|
|
0086CB 1 2E E2 86 rol L86E2
|
|
0086CE 1 0A asl a
|
|
0086CF 1 2E E2 86 rol L86E2
|
|
0086D2 1 0A asl a
|
|
0086D3 1 2E E2 86 rol L86E2
|
|
0086D6 1 0A asl a
|
|
0086D7 1 2E E2 86 rol L86E2
|
|
0086DA 1 0A asl a
|
|
0086DB 1 2E E2 86 rol L86E2
|
|
0086DE 1 AE E2 86 ldx L86E2
|
|
0086E1 1 60 rts
|
|
0086E2 1
|
|
0086E2 1 00 L86E2: brk
|
|
0086E3 1 0A L86E3: asl a
|
|
0086E4 1 AA tax
|
|
0086E5 1 BD 9F DD lda $DD9F,x
|
|
0086E8 1 48 pha
|
|
0086E9 1 BD A0 DD lda $DDA0,x
|
|
0086EC 1 AA tax
|
|
0086ED 1 68 pla
|
|
0086EE 1 60 rts
|
|
0086EF 1
|
|
0086EF 1 0A L86EF: asl a
|
|
0086F0 1 AA tax
|
|
0086F1 1 BD A1 DF lda $DFA1,x
|
|
0086F4 1 48 pha
|
|
0086F5 1 BD A2 DF lda $DFA2,x
|
|
0086F8 1 AA tax
|
|
0086F9 1 68 pla
|
|
0086FA 1 60 rts
|
|
0086FB 1
|
|
0086FB 1 0A L86FB: asl a
|
|
0086FC 1 AA tax
|
|
0086FD 1 BD B3 DF lda $DFB3,x
|
|
008700 1 48 pha
|
|
008701 1 BD B4 DF lda $DFB4,x
|
|
008704 1 AA tax
|
|
008705 1 68 pla
|
|
008706 1 60 rts
|
|
008707 1
|
|
008707 1 8D 7F 87 L8707: sta L877F
|
|
00870A 1 AD 00 FB lda $FB00
|
|
00870D 1 85 06 sta L0006
|
|
00870F 1 AD 01 FB lda $FB01
|
|
008712 1 85 07 sta $07
|
|
008714 1 A0 00 ldy #$00
|
|
008716 1 B1 06 lda (L0006),y
|
|
008718 1 A8 tay
|
|
008719 1 B1 06 L8719: lda (L0006),y
|
|
00871B 1 CD 7F 87 cmp L877F
|
|
00871E 1 F0 06 beq L8726
|
|
008720 1 88 dey
|
|
008721 1 D0 F6 bne L8719
|
|
008723 1 4C 45 87 jmp L8745
|
|
008726 1
|
|
008726 1 98 L8726: tya
|
|
008727 1 0A asl a
|
|
008728 1 0A asl a
|
|
008729 1 A8 tay
|
|
00872A 1 AD 06 FB lda $FB06
|
|
00872D 1 85 06 sta L0006
|
|
00872F 1 AD 07 FB lda $FB07
|
|
008732 1 85 07 sta $07
|
|
008734 1 A2 00 ldx #$00
|
|
008736 1 B1 06 L8736: lda (L0006),y
|
|
008738 1 9D C6 DF sta $DFC6,x
|
|
00873B 1 C8 iny
|
|
00873C 1 E8 inx
|
|
00873D 1 E0 04 cpx #$04
|
|
00873F 1 D0 F5 bne L8736
|
|
008741 1 8E C5 DF stx $DFC5
|
|
008744 1 60 rts
|
|
008745 1
|
|
008745 1 A9 04 L8745: lda #$04
|
|
008747 1 8D C5 DF sta $DFC5
|
|
00874A 1 A9 20 lda #$20
|
|
00874C 1 8D C6 DF sta $DFC6
|
|
00874F 1 A9 24 lda #$24
|
|
008751 1 8D C7 DF sta $DFC7
|
|
008754 1 AD 7F 87 lda L877F
|
|
008757 1 4A lsr a
|
|
008758 1 4A lsr a
|
|
008759 1 4A lsr a
|
|
00875A 1 4A lsr a
|
|
00875B 1 C9 0A cmp #$0A
|
|
00875D 1 B0 05 bcs L8764
|
|
00875F 1 18 clc
|
|
008760 1 69 30 adc #$30
|
|
008762 1 D0 03 bne L8767
|
|
008764 1 18 L8764: clc
|
|
008765 1 69 37 adc #$37
|
|
008767 1 8D C8 DF L8767: sta $DFC8
|
|
00876A 1 AD 7F 87 lda L877F
|
|
00876D 1 29 0F and #$0F
|
|
00876F 1 C9 0A cmp #$0A
|
|
008771 1 B0 05 bcs L8778
|
|
008773 1 18 clc
|
|
008774 1 69 30 adc #$30
|
|
008776 1 D0 03 bne L877B
|
|
008778 1 18 L8778: clc
|
|
008779 1 69 37 adc #$37
|
|
00877B 1 8D C9 DF L877B: sta $DFC9
|
|
00877E 1 60 rts
|
|
00877F 1
|
|
00877F 1 00 L877F: brk
|
|
008780 1 85 06 L8780: sta L0006
|
|
008782 1 86 07 stx $07
|
|
008784 1 A0 00 ldy #$00
|
|
008786 1 B1 06 lda (L0006),y
|
|
008788 1 F0 11 beq L879B
|
|
00878A 1 85 08 sta $08
|
|
00878C 1 E6 06 inc L0006
|
|
00878E 1 D0 02 bne L8792
|
|
008790 1 E6 07 inc $07
|
|
008792 1 A0 19 L8792: ldy #$19
|
|
008794 1 A9 06 lda #$06
|
|
008796 1 A2 00 ldx #$00
|
|
008798 1 20 00 D0 jsr LD000
|
|
00879B 1 60 L879B: rts
|
|
00879C 1
|
|
00879C 1 85 06 sta L0006
|
|
00879E 1 86 07 stx $07
|
|
0087A0 1 A0 00 ldy #$00
|
|
0087A2 1 B1 06 lda (L0006),y
|
|
0087A4 1 85 08 sta $08
|
|
0087A6 1 E6 06 inc L0006
|
|
0087A8 1 D0 02 bne L87AC
|
|
0087AA 1 E6 07 inc $07
|
|
0087AC 1 A0 18 L87AC: ldy #$18
|
|
0087AE 1 A9 06 lda #$06
|
|
0087B0 1 A2 00 ldx #$00
|
|
0087B2 1 20 00 D0 jsr LD000
|
|
0087B5 1 A5 09 lda $09
|
|
0087B7 1 A6 0A ldx $0A
|
|
0087B9 1 60 rts
|
|
0087BA 1
|
|
0087BA 1 86 0B L87BA: stx $0B
|
|
0087BC 1 85 0A sta $0A
|
|
0087BE 1 A0 00 ldy #$00
|
|
0087C0 1 B1 0A lda ($0A),y
|
|
0087C2 1 A8 tay
|
|
0087C3 1 D0 01 bne L87C6
|
|
0087C5 1 60 rts
|
|
0087C6 1
|
|
0087C6 1 88 L87C6: dey
|
|
0087C7 1 F0 02 beq L87CB
|
|
0087C9 1 10 01 bpl L87CC
|
|
0087CB 1 60 L87CB: rts
|
|
0087CC 1
|
|
0087CC 1 B1 0A L87CC: lda ($0A),y
|
|
0087CE 1 29 7F and #$7F
|
|
0087D0 1 C9 2F cmp #$2F
|
|
0087D2 1 F0 08 beq L87DC
|
|
0087D4 1 C9 20 cmp #$20
|
|
0087D6 1 F0 04 beq L87DC
|
|
0087D8 1 C9 2E cmp #$2E
|
|
0087DA 1 D0 04 bne L87E0
|
|
0087DC 1 88 L87DC: dey
|
|
0087DD 1 4C C6 87 jmp L87C6
|
|
0087E0 1
|
|
0087E0 1 C8 L87E0: iny
|
|
0087E1 1 B1 0A lda ($0A),y
|
|
0087E3 1 29 7F and #$7F
|
|
0087E5 1 C9 41 cmp #$41
|
|
0087E7 1 90 09 bcc L87F2
|
|
0087E9 1 C9 5B cmp #$5B
|
|
0087EB 1 B0 05 bcs L87F2
|
|
0087ED 1 18 clc
|
|
0087EE 1 69 20 adc #$20
|
|
0087F0 1 91 0A sta ($0A),y
|
|
0087F2 1 88 L87F2: dey
|
|
0087F3 1 4C C6 87 jmp L87C6
|
|
0087F6 1
|
|
0087F6 1 68 L87F6: pla
|
|
0087F7 1 8D 11 88 sta L8811
|
|
0087FA 1 68 pla
|
|
0087FB 1 8D 12 88 sta L8812
|
|
0087FE 1 A2 00 ldx #$00
|
|
008800 1 B5 06 L8800: lda L0006,x
|
|
008802 1 48 pha
|
|
008803 1 E8 inx
|
|
008804 1 E0 04 cpx #$04
|
|
008806 1 D0 F8 bne L8800
|
|
008808 1 AD 12 88 lda L8812
|
|
00880B 1 48 pha
|
|
00880C 1 AD 11 88 lda L8811
|
|
00880F 1 48 pha
|
|
008810 1 60 rts
|
|
008811 1
|
|
008811 1 00 L8811: brk
|
|
008812 1 00 L8812: brk
|
|
008813 1 68 L8813: pla
|
|
008814 1 8D 2E 88 sta L882E
|
|
008817 1 68 pla
|
|
008818 1 8D 2F 88 sta L882F
|
|
00881B 1 A2 03 ldx #$03
|
|
00881D 1 68 L881D: pla
|
|
00881E 1 95 06 sta L0006,x
|
|
008820 1 CA dex
|
|
008821 1 E0 FF cpx #$FF
|
|
008823 1 D0 F8 bne L881D
|
|
008825 1 AD 2F 88 lda L882F
|
|
008828 1 48 pha
|
|
008829 1 AD 2E 88 lda L882E
|
|
00882C 1 48 pha
|
|
00882D 1 60 rts
|
|
00882E 1
|
|
00882E 1 00 L882E: brk
|
|
00882F 1 00 L882F: brk
|
|
008830 1 00 L8830: brk
|
|
008831 1 00 L8831: brk
|
|
008832 1 00 L8832: brk
|
|
008833 1 00 L8833: brk
|
|
008834 1 00 brk
|
|
008835 1 00 brk
|
|
008836 1 00 brk
|
|
008837 1 00 brk
|
|
008838 1 00 brk
|
|
008839 1 00 brk
|
|
00883A 1 00 brk
|
|
00883B 1 00 brk
|
|
00883C 1 00 brk
|
|
00883D 1 00 brk
|
|
00883E 1 00 brk
|
|
00883F 1 00 brk
|
|
008840 1 00 brk
|
|
008841 1 00 brk
|
|
008842 1 00 brk
|
|
008843 1 00 brk
|
|
008844 1 00 brk
|
|
008845 1 00 brk
|
|
008846 1 00 brk
|
|
008847 1 00 brk
|
|
008848 1 00 brk
|
|
008849 1 00 brk
|
|
00884A 1 00 brk
|
|
00884B 1 00 brk
|
|
00884C 1 00 brk
|
|
00884D 1 00 brk
|
|
00884E 1 00 brk
|
|
00884F 1 00 brk
|
|
008850 1 00 brk
|
|
008851 1 00 brk
|
|
008852 1 00 brk
|
|
008853 1 00 brk
|
|
008854 1 00 brk
|
|
008855 1 A8 L8855: tay
|
|
008856 1 20 F6 87 jsr L87F6
|
|
008859 1 98 tya
|
|
00885A 1 20 EF 86 jsr L86EF
|
|
00885D 1 85 06 sta L0006
|
|
00885F 1 86 07 stx $07
|
|
008861 1 A2 00 ldx #$00
|
|
008863 1 A0 14 ldy #$14
|
|
008865 1 B1 06 L8865: lda (L0006),y
|
|
008867 1 9D 30 88 sta L8830,x
|
|
00886A 1 C8 iny
|
|
00886B 1 E8 inx
|
|
00886C 1 E0 24 cpx #$24
|
|
00886E 1 D0 F5 bne L8865
|
|
008870 1 20 13 88 jsr L8813
|
|
008873 1 60 rts
|
|
008874 1
|
|
008874 1 A8 L8874: tay
|
|
008875 1 20 F6 87 jsr L87F6
|
|
008878 1 98 tya
|
|
008879 1 20 EF 86 jsr L86EF
|
|
00887C 1 85 06 sta L0006
|
|
00887E 1 86 07 stx $07
|
|
008880 1 A2 00 ldx #$00
|
|
008882 1 A0 14 ldy #$14
|
|
008884 1 BD 30 88 L8884: lda L8830,x
|
|
008887 1 91 06 sta (L0006),y
|
|
008889 1 C8 iny
|
|
00888A 1 E8 inx
|
|
00888B 1 E0 24 cpx #$24
|
|
00888D 1 D0 F5 bne L8884
|
|
00888F 1 20 13 88 jsr L8813
|
|
008892 1 60 rts
|
|
008893 1
|
|
008893 1 A8 L8893: tay
|
|
008894 1 20 F6 87 jsr L87F6
|
|
008897 1 98 tya
|
|
008898 1 20 E3 86 jsr L86E3
|
|
00889B 1 85 06 sta L0006
|
|
00889D 1 86 07 stx $07
|
|
00889F 1 AD 25 EC lda $EC25
|
|
0088A2 1 20 EF 86 jsr L86EF
|
|
0088A5 1 85 08 sta $08
|
|
0088A7 1 86 09 stx $09
|
|
0088A9 1 A0 17 ldy #$17
|
|
0088AB 1 A2 03 ldx #$03
|
|
0088AD 1 B1 08 L88AD: lda ($08),y
|
|
0088AF 1 9D 0D 89 sta L890D,x
|
|
0088B2 1 88 dey
|
|
0088B3 1 CA dex
|
|
0088B4 1 10 F7 bpl L88AD
|
|
0088B6 1 A0 1F ldy #$1F
|
|
0088B8 1 A2 03 ldx #$03
|
|
0088BA 1 B1 08 L88BA: lda ($08),y
|
|
0088BC 1 9D 11 89 sta L8911,x
|
|
0088BF 1 88 dey
|
|
0088C0 1 CA dex
|
|
0088C1 1 10 F7 bpl L88BA
|
|
0088C3 1 A0 03 ldy #$03
|
|
0088C5 1 B1 06 lda (L0006),y
|
|
0088C7 1 18 clc
|
|
0088C8 1 6D 0D 89 adc L890D
|
|
0088CB 1 91 06 sta (L0006),y
|
|
0088CD 1 C8 iny
|
|
0088CE 1 B1 06 lda (L0006),y
|
|
0088D0 1 6D 0E 89 adc L890E
|
|
0088D3 1 91 06 sta (L0006),y
|
|
0088D5 1 C8 iny
|
|
0088D6 1 B1 06 lda (L0006),y
|
|
0088D8 1 18 clc
|
|
0088D9 1 6D 0F 89 adc L890F
|
|
0088DC 1 91 06 sta (L0006),y
|
|
0088DE 1 C8 iny
|
|
0088DF 1 B1 06 lda (L0006),y
|
|
0088E1 1 6D 10 89 adc L8910
|
|
0088E4 1 91 06 sta (L0006),y
|
|
0088E6 1 A0 03 ldy #$03
|
|
0088E8 1 B1 06 lda (L0006),y
|
|
0088EA 1 38 sec
|
|
0088EB 1 ED 11 89 sbc L8911
|
|
0088EE 1 91 06 sta (L0006),y
|
|
0088F0 1 C8 iny
|
|
0088F1 1 B1 06 lda (L0006),y
|
|
0088F3 1 ED 12 89 sbc L8912
|
|
0088F6 1 91 06 sta (L0006),y
|
|
0088F8 1 C8 iny
|
|
0088F9 1 B1 06 lda (L0006),y
|
|
0088FB 1 38 sec
|
|
0088FC 1 ED 13 89 sbc L8913
|
|
0088FF 1 91 06 sta (L0006),y
|
|
008901 1 C8 iny
|
|
008902 1 B1 06 lda (L0006),y
|
|
008904 1 ED 14 89 sbc L8914
|
|
008907 1 91 06 sta (L0006),y
|
|
008909 1 20 13 88 jsr L8813
|
|
00890C 1 60 rts
|
|
00890D 1
|
|
00890D 1 00 L890D: brk
|
|
00890E 1 00 L890E: brk
|
|
00890F 1 00 L890F: brk
|
|
008910 1 00 L8910: brk
|
|
008911 1 00 L8911: brk
|
|
008912 1 00 L8912: brk
|
|
008913 1 00 L8913: brk
|
|
008914 1 00 L8914: brk
|
|
008915 1 A8 L8915: tay
|
|
008916 1 20 F6 87 jsr L87F6
|
|
008919 1 98 tya
|
|
00891A 1 20 E3 86 jsr L86E3
|
|
00891D 1 85 06 sta L0006
|
|
00891F 1 86 07 stx $07
|
|
008921 1 AD 25 EC L8921: lda $EC25
|
|
008924 1 20 EF 86 jsr L86EF
|
|
008927 1 85 08 sta $08
|
|
008929 1 86 09 stx $09
|
|
00892B 1 A0 17 ldy #$17
|
|
00892D 1 A2 03 ldx #$03
|
|
00892F 1 B1 08 L892F: lda ($08),y
|
|
008931 1 9D 8F 89 sta L898F,x
|
|
008934 1 88 dey
|
|
008935 1 CA dex
|
|
008936 1 10 F7 bpl L892F
|
|
008938 1 A0 1F ldy #$1F
|
|
00893A 1 A2 03 ldx #$03
|
|
00893C 1 B1 08 L893C: lda ($08),y
|
|
00893E 1 9D 93 89 sta L8993,x
|
|
008941 1 88 dey
|
|
008942 1 CA dex
|
|
008943 1 10 F7 bpl L893C
|
|
008945 1 A0 03 ldy #$03
|
|
008947 1 B1 06 lda (L0006),y
|
|
008949 1 38 sec
|
|
00894A 1 ED 8F 89 sbc L898F
|
|
00894D 1 91 06 sta (L0006),y
|
|
00894F 1 C8 iny
|
|
008950 1 B1 06 lda (L0006),y
|
|
008952 1 ED 90 89 sbc L8990
|
|
008955 1 91 06 sta (L0006),y
|
|
008957 1 C8 iny
|
|
008958 1 B1 06 lda (L0006),y
|
|
00895A 1 38 sec
|
|
00895B 1 ED 91 89 sbc L8991
|
|
00895E 1 91 06 sta (L0006),y
|
|
008960 1 C8 iny
|
|
008961 1 B1 06 lda (L0006),y
|
|
008963 1 ED 92 89 sbc L8992
|
|
008966 1 91 06 sta (L0006),y
|
|
008968 1 A0 03 ldy #$03
|
|
00896A 1 B1 06 lda (L0006),y
|
|
00896C 1 18 clc
|
|
00896D 1 6D 93 89 adc L8993
|
|
008970 1 91 06 sta (L0006),y
|
|
008972 1 C8 iny
|
|
008973 1 B1 06 lda (L0006),y
|
|
008975 1 6D 94 89 adc L8994
|
|
008978 1 91 06 sta (L0006),y
|
|
00897A 1 C8 iny
|
|
00897B 1 B1 06 lda (L0006),y
|
|
00897D 1 18 clc
|
|
00897E 1 6D 95 89 adc L8995
|
|
008981 1 91 06 sta (L0006),y
|
|
008983 1 C8 iny
|
|
008984 1 B1 06 lda (L0006),y
|
|
008986 1 6D 96 89 adc L8996
|
|
008989 1 91 06 sta (L0006),y
|
|
00898B 1 20 13 88 jsr L8813
|
|
00898E 1 60 rts
|
|
00898F 1
|
|
00898F 1 00 L898F: brk
|
|
008990 1 00 L8990: brk
|
|
008991 1 00 L8991: brk
|
|
008992 1 00 L8992: brk
|
|
008993 1 00 L8993: brk
|
|
008994 1 00 L8994: brk
|
|
008995 1 00 L8995: brk
|
|
008996 1 00 L8996: brk
|
|
008997 1 A9 00 L8997: lda #$00
|
|
008999 1 AA tax
|
|
00899A 1 9D 65 D2 L899A: sta $D265,x
|
|
00899D 1 9D 5D D2 sta $D25D,x
|
|
0089A0 1 9D 69 D2 sta $D269,x
|
|
0089A3 1 E8 inx
|
|
0089A4 1 E0 04 cpx #$04
|
|
0089A6 1 D0 F2 bne L899A
|
|
0089A8 1 A0 04 ldy #$04
|
|
0089AA 1 A9 5D lda #$5D
|
|
0089AC 1 A2 D2 ldx #$D2
|
|
0089AE 1 20 00 D0 jsr LD000
|
|
0089B1 1 60 rts
|
|
0089B2 1
|
|
0089B2 1 02 .byte $02
|
|
0089B3 1 00 L89B3: brk
|
|
0089B4 1 00 brk
|
|
0089B5 1 08 php
|
|
0089B6 1 8D C3 8A L89B6: sta L8AC3
|
|
0089B9 1 8C C4 8A sty L8AC4
|
|
0089BC 1 29 F0 and #$F0
|
|
0089BE 1 8D B3 89 sta L89B3
|
|
0089C1 1 A0 C5 ldy #$C5
|
|
0089C3 1 A9 B2 lda #$B2
|
|
0089C5 1 A2 89 ldx #$89
|
|
0089C7 1 20 BA 46 jsr L46BA
|
|
0089CA 1 F0 11 beq L89DD
|
|
0089CC 1 48 L89CC: pha
|
|
0089CD 1 AC C4 8A ldy L8AC4
|
|
0089D0 1 A9 00 lda #$00
|
|
0089D2 1 99 A0 E1 sta $E1A0,y
|
|
0089D5 1 CE A0 DE dec $DEA0
|
|
0089D8 1 CE 9E DD dec $DD9E
|
|
0089DB 1 68 pla
|
|
0089DC 1 60 rts
|
|
0089DD 1
|
|
0089DD 1 AD 00 08 L89DD: lda L0800
|
|
0089E0 1 29 0F and #$0F
|
|
0089E2 1 D0 06 bne L89EA
|
|
0089E4 1 AD 01 08 lda $0801
|
|
0089E7 1 4C CC 89 jmp L89CC
|
|
0089EA 1
|
|
0089EA 1 20 F6 87 L89EA: jsr L87F6
|
|
0089ED 1 20 5E D0 jsr LD05E
|
|
0089F0 1 AC C4 8A ldy L8AC4
|
|
0089F3 1 99 A0 E1 sta $E1A0,y
|
|
0089F6 1 20 E3 86 jsr L86E3
|
|
0089F9 1 85 06 sta L0006
|
|
0089FB 1 86 07 stx $07
|
|
0089FD 1 A2 00 ldx #$00
|
|
0089FF 1 A0 09 ldy #$09
|
|
008A01 1 A9 20 lda #$20
|
|
008A03 1 91 06 L8A03: sta (L0006),y
|
|
008A05 1 C8 iny
|
|
008A06 1 E8 inx
|
|
008A07 1 E0 12 cpx #$12
|
|
008A09 1 D0 F8 bne L8A03
|
|
008A0B 1 A0 09 ldy #$09
|
|
008A0D 1 AD 00 08 lda L0800
|
|
008A10 1 29 0F and #$0F
|
|
008A12 1 8D 00 08 sta L0800
|
|
008A15 1 91 06 sta (L0006),y
|
|
008A17 1 A9 00 lda #$00
|
|
008A19 1 A2 08 ldx #$08
|
|
008A1B 1 20 BA 87 jsr L87BA
|
|
008A1E 1 A2 00 ldx #$00
|
|
008A20 1 A0 0B ldy #$0B
|
|
008A22 1 BD 01 08 L8A22: lda $0801,x
|
|
008A25 1 91 06 sta (L0006),y
|
|
008A27 1 C8 iny
|
|
008A28 1 E8 inx
|
|
008A29 1 EC 00 08 cpx L0800
|
|
008A2C 1 D0 F4 bne L8A22
|
|
008A2E 1 A0 09 ldy #$09
|
|
008A30 1 B1 06 lda (L0006),y
|
|
008A32 1 18 clc
|
|
008A33 1 69 02 adc #$02
|
|
008A35 1 91 06 sta (L0006),y
|
|
008A37 1 AD C3 8A lda L8AC3
|
|
008A3A 1 C9 3E cmp #$3E
|
|
008A3C 1 F0 1B beq L8A59
|
|
008A3E 1 29 0F and #$0F
|
|
008A40 1 C9 04 cmp #$04
|
|
008A42 1 D0 31 bne L8A75
|
|
008A44 1 AD C3 8A lda L8AC3
|
|
008A47 1 29 70 and #$70
|
|
008A49 1 4A lsr a
|
|
008A4A 1 4A lsr a
|
|
008A4B 1 4A lsr a
|
|
008A4C 1 4A lsr a
|
|
008A4D 1 09 C0 ora #$C0
|
|
008A4F 1 8D 54 8A sta L8A54
|
|
008A52 1 AD .byte $AD
|
|
008A53 1 FB .byte $FB
|
|
008A54 1 C7 29 L8A54: smb4 $29
|
|
008A56 1 01 F0 ora ($F0,x)
|
|
008A58 1 0E .byte $0E
|
|
008A59 1 A0 07 L8A59: ldy #$07
|
|
008A5B 1 A9 CC lda #$CC
|
|
008A5D 1 91 06 sta (L0006),y
|
|
008A5F 1 C8 iny
|
|
008A60 1 A9 A9 lda #$A9
|
|
008A62 1 91 06 sta (L0006),y
|
|
008A64 1 4C 96 8A jmp L8A96
|
|
008A67 1
|
|
008A67 1 A0 07 L8A67: ldy #$07
|
|
008A69 1 A9 50 lda #$50
|
|
008A6B 1 91 06 sta (L0006),y
|
|
008A6D 1 C8 iny
|
|
008A6E 1 A9 AA lda #$AA
|
|
008A70 1 91 06 sta (L0006),y
|
|
008A72 1 4C 96 8A jmp L8A96
|
|
008A75 1
|
|
008A75 1 C9 0B L8A75: cmp #$0B
|
|
008A77 1 D0 0E bne L8A87
|
|
008A79 1 A0 07 ldy #$07
|
|
008A7B 1 A9 20 lda #$20
|
|
008A7D 1 91 06 sta (L0006),y
|
|
008A7F 1 C8 iny
|
|
008A80 1 A9 AA lda #$AA
|
|
008A82 1 91 06 sta (L0006),y
|
|
008A84 1 4C 96 8A jmp L8A96
|
|
008A87 1
|
|
008A87 1 C9 00 L8A87: cmp #$00
|
|
008A89 1 D0 DC bne L8A67
|
|
008A8B 1 A0 07 ldy #$07
|
|
008A8D 1 A9 80 lda #$80
|
|
008A8F 1 91 06 sta (L0006),y
|
|
008A91 1 C8 iny
|
|
008A92 1 A9 A9 lda #$A9
|
|
008A94 1 91 06 sta (L0006),y
|
|
008A96 1 A0 02 L8A96: ldy #$02
|
|
008A98 1 A9 00 lda #$00
|
|
008A9A 1 91 06 sta (L0006),y
|
|
008A9C 1 EE C4 8A inc L8AC4
|
|
008A9F 1 AD C4 8A lda L8AC4
|
|
008AA2 1 0A asl a
|
|
008AA3 1 0A asl a
|
|
008AA4 1 AA tax
|
|
008AA5 1 A0 03 ldy #$03
|
|
008AA7 1 BD C5 8A L8AA7: lda L8AC5,x
|
|
008AAA 1 91 06 sta (L0006),y
|
|
008AAC 1 E8 inx
|
|
008AAD 1 C8 iny
|
|
008AAE 1 C0 07 cpy #$07
|
|
008AB0 1 D0 F5 bne L8AA7
|
|
008AB2 1 AE A0 DE ldx $DEA0
|
|
008AB5 1 CA dex
|
|
008AB6 1 A0 00 ldy #$00
|
|
008AB8 1 B1 06 lda (L0006),y
|
|
008ABA 1 9D A1 DE sta $DEA1,x
|
|
008ABD 1 20 13 88 jsr L8813
|
|
008AC0 1 A9 00 lda #$00
|
|
008AC2 1 60 rts
|
|
008AC3 1
|
|
008AC3 1 00 L8AC3: brk
|
|
008AC4 1 00 L8AC4: brk
|
|
008AC5 1 00 L8AC5: brk
|
|
008AC6 1 00 brk
|
|
008AC7 1 00 brk
|
|
008AC8 1 00 brk
|
|
008AC9 1 EA nop
|
|
008ACA 1 01 10 ora ($10,x)
|
|
008ACC 1 00 brk
|
|
008ACD 1 EA nop
|
|
008ACE 1 01 2D ora ($2D,x)
|
|
008AD0 1 00 brk
|
|
008AD1 1 EA nop
|
|
008AD2 1 01 4B ora ($4B,x)
|
|
008AD4 1 00 brk
|
|
008AD5 1 EA nop
|
|
008AD6 1 01 67 ora ($67,x)
|
|
008AD8 1 00 brk
|
|
008AD9 1 EA nop
|
|
008ADA 1 01 83 ora ($83,x)
|
|
008ADC 1 00 brk
|
|
008ADD 1 90 01 bcc L8AE0
|
|
008ADF 1 A0 .byte $A0
|
|
008AE0 1 00 L8AE0: brk
|
|
008AE1 1 36 01 rol $01,x
|
|
008AE3 1 A0 00 ldy #$00
|
|
008AE5 1 DC .byte $DC
|
|
008AE6 1 00 brk
|
|
008AE7 1 A0 00 ldy #$00
|
|
008AE9 1 82 .byte $82
|
|
008AEA 1 00 brk
|
|
008AEB 1 A0 00 ldy #$00
|
|
008AED 1 28 plp
|
|
008AEE 1 00 brk
|
|
008AEF 1 A0 00 ldy #$00
|
|
008AF1 1 01 24 ora ($24,x)
|
|
008AF3 1 48 pha
|
|
008AF4 1 AE A0 DE L8AF4: ldx $DEA0
|
|
008AF7 1 CA dex
|
|
008AF8 1 DD A1 DE L8AF8: cmp $DEA1,x
|
|
008AFB 1 F0 04 beq L8B01
|
|
008AFD 1 CA dex
|
|
008AFE 1 10 F8 bpl L8AF8
|
|
008B00 1 60 rts
|
|
008B01 1
|
|
008B01 1 BD A2 DE L8B01: lda $DEA2,x
|
|
008B04 1 9D A1 DE sta $DEA1,x
|
|
008B07 1 E8 inx
|
|
008B08 1 EC A0 DE cpx $DEA0
|
|
008B0B 1 D0 F4 bne L8B01
|
|
008B0D 1 CE A0 DE dec $DEA0
|
|
008B10 1 AE A0 DE ldx $DEA0
|
|
008B13 1 A9 00 lda #$00
|
|
008B15 1 9D A1 DE sta $DEA1,x
|
|
008B18 1 60 rts
|
|
008B19 1
|
|
008B19 1 20 F6 87 L8B19: jsr L87F6
|
|
008B1C 1 4C 2E 8B jmp L8B2E
|
|
008B1F 1
|
|
008B1F 1 AD BE E6 L8B1F: lda $E6BE
|
|
008B22 1 D0 01 bne L8B25
|
|
008B24 1 60 rts
|
|
008B25 1
|
|
008B25 1 20 F6 87 L8B25: jsr L87F6
|
|
008B28 1 AD BE E6 lda $E6BE
|
|
008B2B 1 20 45 73 jsr L7345
|
|
008B2E 1 AD BE E6 L8B2E: lda $E6BE
|
|
008B31 1 A2 07 ldx #$07
|
|
008B33 1 DD 26 EC L8B33: cmp $EC26,x
|
|
008B36 1 F0 06 beq L8B3E
|
|
008B38 1 CA dex
|
|
008B39 1 10 F8 bpl L8B33
|
|
008B3B 1 4C 43 8B jmp L8B43
|
|
008B3E 1
|
|
008B3E 1 A9 00 L8B3E: lda #$00
|
|
008B40 1 9D 26 EC sta $EC26,x
|
|
008B43 1 AD BE E6 L8B43: lda $E6BE
|
|
008B46 1 20 E3 86 jsr L86E3
|
|
008B49 1 85 06 sta L0006
|
|
008B4B 1 86 07 stx $07
|
|
008B4D 1 A0 02 ldy #$02
|
|
008B4F 1 B1 06 lda (L0006),y
|
|
008B51 1 29 7F and #$7F
|
|
008B53 1 91 06 sta (L0006),y
|
|
008B55 1 20 44 42 jsr L4244
|
|
008B58 1 20 13 88 jsr L8813
|
|
008B5B 1 60 rts
|
|
008B5C 1
|
|
008B5C 1 A0 80 L8B5C: ldy #$80
|
|
008B5E 1 D0 02 bne L8B62
|
|
008B60 1 A0 00 L8B60: ldy #$00
|
|
008B62 1 8C 4A 8D L8B62: sty L8D4A
|
|
008B65 1 8D 4B 8D sta L8D4B
|
|
008B68 1 8E 4C 8D stx L8D4C
|
|
008B6B 1 8A txa
|
|
008B6C 1 20 EF 86 jsr L86EF
|
|
008B6F 1 85 06 sta L0006
|
|
008B71 1 86 07 stx $07
|
|
008B73 1 A9 14 lda #$14
|
|
008B75 1 18 clc
|
|
008B76 1 69 23 adc #$23
|
|
008B78 1 A8 tay
|
|
008B79 1 A2 23 ldx #$23
|
|
008B7B 1 B1 06 L8B7B: lda (L0006),y
|
|
008B7D 1 9D 15 D2 sta $D215,x
|
|
008B80 1 88 dey
|
|
008B81 1 CA dex
|
|
008B82 1 10 F7 bpl L8B7B
|
|
008B84 1 AD 4B 8D lda L8D4B
|
|
008B87 1 20 E3 86 jsr L86E3
|
|
008B8A 1 85 06 sta L0006
|
|
008B8C 1 86 07 stx $07
|
|
008B8E 1 A0 03 ldy #$03
|
|
008B90 1 B1 06 lda (L0006),y
|
|
008B92 1 18 clc
|
|
008B93 1 69 07 adc #$07
|
|
008B95 1 8D 00 08 sta L0800
|
|
008B98 1 8D 04 08 sta $0804
|
|
008B9B 1 C8 iny
|
|
008B9C 1 B1 06 lda (L0006),y
|
|
008B9E 1 69 00 adc #$00
|
|
008BA0 1 8D 01 08 sta $0801
|
|
008BA3 1 8D 05 08 sta $0805
|
|
008BA6 1 C8 iny
|
|
008BA7 1 B1 06 lda (L0006),y
|
|
008BA9 1 18 clc
|
|
008BAA 1 69 07 adc #$07
|
|
008BAC 1 8D 02 08 sta $0802
|
|
008BAF 1 8D 06 08 sta $0806
|
|
008BB2 1 C8 iny
|
|
008BB3 1 B1 06 lda (L0006),y
|
|
008BB5 1 69 00 adc #$00
|
|
008BB7 1 8D 03 08 sta $0803
|
|
008BBA 1 8D 07 08 sta $0807
|
|
008BBD 1 A0 5B ldy #$5B
|
|
008BBF 1 A2 03 ldx #$03
|
|
008BC1 1 BD 15 D2 L8BC1: lda $D215,x
|
|
008BC4 1 99 00 08 sta L0800,y
|
|
008BC7 1 88 dey
|
|
008BC8 1 CA dex
|
|
008BC9 1 10 F6 bpl L8BC1
|
|
008BCB 1 AD 21 D2 lda $D221
|
|
008BCE 1 38 sec
|
|
008BCF 1 ED 1D D2 sbc $D21D
|
|
008BD2 1 8D 54 8D sta L8D54
|
|
008BD5 1 AD 22 D2 lda $D222
|
|
008BD8 1 ED 1E D2 sbc $D21E
|
|
008BDB 1 8D 55 8D sta L8D55
|
|
008BDE 1 AD 23 D2 lda $D223
|
|
008BE1 1 38 sec
|
|
008BE2 1 ED 1F D2 sbc $D21F
|
|
008BE5 1 8D 56 8D sta L8D56
|
|
008BE8 1 AD 24 D2 lda $D224
|
|
008BEB 1 ED 20 D2 sbc $D220
|
|
008BEE 1 8D 57 8D sta L8D57
|
|
008BF1 1 AD 58 08 lda $0858
|
|
008BF4 1 18 clc
|
|
008BF5 1 6D 54 8D adc L8D54
|
|
008BF8 1 8D 5C 08 sta $085C
|
|
008BFB 1 AD 59 08 lda $0859
|
|
008BFE 1 6D 55 8D adc L8D55
|
|
008C01 1 8D 5D 08 sta $085D
|
|
008C04 1 AD 5A 08 lda $085A
|
|
008C07 1 18 clc
|
|
008C08 1 6D 56 8D adc L8D56
|
|
008C0B 1 8D 5E 08 sta $085E
|
|
008C0E 1 AD 5B 08 lda $085B
|
|
008C11 1 6D 57 8D adc L8D57
|
|
008C14 1 8D 5F 08 sta $085F
|
|
008C17 1 A9 00 lda #$00
|
|
008C19 1 8D 4E 8D sta L8D4E
|
|
008C1C 1 8D 4F 8D sta L8D4F
|
|
008C1F 1 8D 4D 8D sta L8D4D
|
|
008C22 1 AD 58 08 lda $0858
|
|
008C25 1 38 sec
|
|
008C26 1 ED 00 08 sbc L0800
|
|
008C29 1 8D 50 8D sta L8D50
|
|
008C2C 1 AD 59 08 lda $0859
|
|
008C2F 1 ED 01 08 sbc $0801
|
|
008C32 1 8D 51 8D sta L8D51
|
|
008C35 1 AD 5A 08 lda $085A
|
|
008C38 1 38 sec
|
|
008C39 1 ED 02 08 sbc $0802
|
|
008C3C 1 8D 52 8D sta L8D52
|
|
008C3F 1 AD 5B 08 lda $085B
|
|
008C42 1 ED 03 08 sbc $0803
|
|
008C45 1 8D 53 8D sta L8D53
|
|
008C48 1 2C 51 8D bit L8D51
|
|
008C4B 1 10 1D bpl L8C6A
|
|
008C4D 1 A9 80 lda #$80
|
|
008C4F 1 8D 4E 8D sta L8D4E
|
|
008C52 1 AD 50 8D lda L8D50
|
|
008C55 1 49 FF eor #$FF
|
|
008C57 1 8D 50 8D sta L8D50
|
|
008C5A 1 AD 51 8D lda L8D51
|
|
008C5D 1 49 FF eor #$FF
|
|
008C5F 1 8D 51 8D sta L8D51
|
|
008C62 1 EE 50 8D inc L8D50
|
|
008C65 1 D0 03 bne L8C6A
|
|
008C67 1 EE 51 8D inc L8D51
|
|
008C6A 1 2C 53 8D L8C6A: bit L8D53
|
|
008C6D 1 10 1D bpl L8C8C
|
|
008C6F 1 A9 80 lda #$80
|
|
008C71 1 8D 4F 8D sta L8D4F
|
|
008C74 1 AD 52 8D lda L8D52
|
|
008C77 1 49 FF eor #$FF
|
|
008C79 1 8D 52 8D sta L8D52
|
|
008C7C 1 AD 53 8D lda L8D53
|
|
008C7F 1 49 FF eor #$FF
|
|
008C81 1 8D 53 8D sta L8D53
|
|
008C84 1 EE 52 8D inc L8D52
|
|
008C87 1 D0 03 bne L8C8C
|
|
008C89 1 EE 53 8D inc L8D53
|
|
008C8C 1 4E 51 8D L8C8C: lsr L8D51
|
|
008C8F 1 6E 50 8D ror L8D50
|
|
008C92 1 4E 53 8D lsr L8D53
|
|
008C95 1 6E 52 8D ror L8D52
|
|
008C98 1 4E 55 8D lsr L8D55
|
|
008C9B 1 6E 54 8D ror L8D54
|
|
008C9E 1 4E 57 8D lsr L8D57
|
|
008CA1 1 6E 56 8D ror L8D56
|
|
008CA4 1 A9 0A lda #$0A
|
|
008CA6 1 38 sec
|
|
008CA7 1 ED 4D 8D sbc L8D4D
|
|
008CAA 1 0A asl a
|
|
008CAB 1 0A asl a
|
|
008CAC 1 0A asl a
|
|
008CAD 1 AA tax
|
|
008CAE 1 2C 4E 8D bit L8D4E
|
|
008CB1 1 10 16 bpl L8CC9
|
|
008CB3 1 AD 00 08 lda L0800
|
|
008CB6 1 38 sec
|
|
008CB7 1 ED 50 8D sbc L8D50
|
|
008CBA 1 9D 00 08 sta L0800,x
|
|
008CBD 1 AD 01 08 lda $0801
|
|
008CC0 1 ED 51 8D sbc L8D51
|
|
008CC3 1 9D 01 08 sta $0801,x
|
|
008CC6 1 4C DC 8C jmp L8CDC
|
|
008CC9 1
|
|
008CC9 1 AD 00 08 L8CC9: lda L0800
|
|
008CCC 1 18 clc
|
|
008CCD 1 6D 50 8D adc L8D50
|
|
008CD0 1 9D 00 08 sta L0800,x
|
|
008CD3 1 AD 01 08 lda $0801
|
|
008CD6 1 6D 51 8D adc L8D51
|
|
008CD9 1 9D 01 08 sta $0801,x
|
|
008CDC 1 2C 4F 8D L8CDC: bit L8D4F
|
|
008CDF 1 10 16 bpl L8CF7
|
|
008CE1 1 AD 02 08 lda $0802
|
|
008CE4 1 38 sec
|
|
008CE5 1 ED 52 8D sbc L8D52
|
|
008CE8 1 9D 02 08 sta $0802,x
|
|
008CEB 1 AD 03 08 lda $0803
|
|
008CEE 1 ED 53 8D sbc L8D53
|
|
008CF1 1 9D 03 08 sta $0803,x
|
|
008CF4 1 4C 0A 8D jmp L8D0A
|
|
008CF7 1
|
|
008CF7 1 AD 02 08 L8CF7: lda $0802
|
|
008CFA 1 18 clc
|
|
008CFB 1 6D 52 8D adc L8D52
|
|
008CFE 1 9D 02 08 sta $0802,x
|
|
008D01 1 AD 03 08 lda $0803
|
|
008D04 1 6D 53 8D adc L8D53
|
|
008D07 1 9D 03 08 sta $0803,x
|
|
008D0A 1 BD 00 08 L8D0A: lda L0800,x
|
|
008D0D 1 18 clc
|
|
008D0E 1 6D 54 8D adc L8D54
|
|
008D11 1 9D 04 08 sta $0804,x
|
|
008D14 1 BD 01 08 lda $0801,x
|
|
008D17 1 6D 55 8D adc L8D55
|
|
008D1A 1 9D 05 08 sta $0805,x
|
|
008D1D 1 BD 02 08 lda $0802,x
|
|
008D20 1 18 clc
|
|
008D21 1 6D 56 8D adc L8D56
|
|
008D24 1 9D 06 08 sta $0806,x
|
|
008D27 1 BD 03 08 lda $0803,x
|
|
008D2A 1 6D 57 8D adc L8D57
|
|
008D2D 1 9D 07 08 sta $0807,x
|
|
008D30 1 EE 4D 8D inc L8D4D
|
|
008D33 1 AD 4D 8D lda L8D4D
|
|
008D36 1 C9 0A cmp #$0A
|
|
008D38 1 F0 03 beq L8D3D
|
|
008D3A 1 4C 8C 8C jmp L8C8C
|
|
008D3D 1
|
|
008D3D 1 2C 4A 8D L8D3D: bit L8D4A
|
|
008D40 1 30 04 bmi L8D46
|
|
008D42 1 20 58 8D jsr L8D58
|
|
008D45 1 60 rts
|
|
008D46 1
|
|
008D46 1 20 B3 8D L8D46: jsr L8DB3
|
|
008D49 1 60 L8D49: rts
|
|
008D4A 1
|
|
008D4A 1 00 L8D4A: brk
|
|
008D4B 1 00 L8D4B: brk
|
|
008D4C 1 00 L8D4C: brk
|
|
008D4D 1 00 L8D4D: brk
|
|
008D4E 1 00 L8D4E: brk
|
|
008D4F 1 00 L8D4F: brk
|
|
008D50 1 00 L8D50: brk
|
|
008D51 1 00 L8D51: brk
|
|
008D52 1 00 L8D52: brk
|
|
008D53 1 00 L8D53: brk
|
|
008D54 1 00 L8D54: brk
|
|
008D55 1 00 L8D55: brk
|
|
008D56 1 00 L8D56: brk
|
|
008D57 1 00 L8D57: brk
|
|
008D58 1 A9 00 L8D58: lda #$00
|
|
008D5A 1 8D B2 8D sta L8DB2
|
|
008D5D 1 20 10 45 jsr L4510
|
|
008D60 1 A0 08 ldy #$08
|
|
008D62 1 A9 93 lda #$93
|
|
008D64 1 A2 D2 ldx #$D2
|
|
008D66 1 20 00 D0 jsr LD000
|
|
008D69 1 20 FA 48 jsr L48FA
|
|
008D6C 1 AD B2 8D L8D6C: lda L8DB2
|
|
008D6F 1 C9 0C cmp #$0C
|
|
008D71 1 B0 16 bcs L8D89
|
|
008D73 1 0A asl a
|
|
008D74 1 0A asl a
|
|
008D75 1 0A asl a
|
|
008D76 1 18 clc
|
|
008D77 1 69 07 adc #$07
|
|
008D79 1 AA tax
|
|
008D7A 1 A0 07 ldy #$07
|
|
008D7C 1 BD 00 08 L8D7C: lda L0800,x
|
|
008D7F 1 99 30 E2 sta $E230,y
|
|
008D82 1 CA dex
|
|
008D83 1 88 dey
|
|
008D84 1 10 F6 bpl L8D7C
|
|
008D86 1 20 10 8E jsr L8E10
|
|
008D89 1 AD B2 8D L8D89: lda L8DB2
|
|
008D8C 1 38 sec
|
|
008D8D 1 E9 02 sbc #$02
|
|
008D8F 1 30 16 bmi L8DA7
|
|
008D91 1 0A asl a
|
|
008D92 1 0A L8D92: asl a
|
|
008D93 1 0A asl a
|
|
008D94 1 18 clc
|
|
008D95 1 69 07 adc #$07
|
|
008D97 1 AA tax
|
|
008D98 1 A0 07 ldy #$07
|
|
008D9A 1 BD 00 08 L8D9A: lda L0800,x
|
|
008D9D 1 99 30 E2 sta $E230,y
|
|
008DA0 1 CA dex
|
|
008DA1 1 88 dey
|
|
008DA2 1 10 F6 bpl L8D9A
|
|
008DA4 1 20 10 8E jsr L8E10
|
|
008DA7 1 EE B2 8D L8DA7: inc L8DB2
|
|
008DAA 1 AD B2 8D lda L8DB2
|
|
008DAD 1 C9 0E cmp #$0E
|
|
008DAF 1 D0 BB bne L8D6C
|
|
008DB1 1 60 rts
|
|
008DB2 1
|
|
008DB2 1 00 L8DB2: brk
|
|
008DB3 1 A9 0B L8DB3: lda #$0B
|
|
008DB5 1 8D 0F 8E sta L8E0F
|
|
008DB8 1 20 10 45 jsr L4510
|
|
008DBB 1 A0 08 ldy #$08
|
|
008DBD 1 A9 93 lda #$93
|
|
008DBF 1 A2 D2 ldx #$D2
|
|
008DC1 1 20 00 D0 jsr LD000
|
|
008DC4 1 20 FA 48 jsr L48FA
|
|
008DC7 1 AD 0F 8E L8DC7: lda L8E0F
|
|
008DCA 1 30 18 bmi L8DE4
|
|
008DCC 1 F0 16 beq L8DE4
|
|
008DCE 1 0A asl a
|
|
008DCF 1 0A asl a
|
|
008DD0 1 0A asl a
|
|
008DD1 1 18 clc
|
|
008DD2 1 69 07 L8DD2: adc #$07
|
|
008DD4 1 AA tax
|
|
008DD5 1 A0 07 ldy #$07
|
|
008DD7 1 BD 00 08 L8DD7: lda L0800,x
|
|
008DDA 1 99 30 E2 sta $E230,y
|
|
008DDD 1 CA dex
|
|
008DDE 1 88 dey
|
|
008DDF 1 10 F6 bpl L8DD7
|
|
008DE1 1 20 10 8E jsr L8E10
|
|
008DE4 1 AD 0F 8E L8DE4: lda L8E0F
|
|
008DE7 1 18 clc
|
|
008DE8 1 69 02 adc #$02
|
|
008DEA 1 C9 0E cmp #$0E
|
|
008DEC 1 B0 16 bcs L8E04
|
|
008DEE 1 0A asl a
|
|
008DEF 1 0A L8DEF: asl a
|
|
008DF0 1 0A asl a
|
|
008DF1 1 18 clc
|
|
008DF2 1 69 07 adc #$07
|
|
008DF4 1 AA tax
|
|
008DF5 1 A0 07 ldy #$07
|
|
008DF7 1 BD 00 08 lda L0800,x
|
|
008DFA 1 99 30 E2 sta $E230,y
|
|
008DFD 1 CA dex
|
|
008DFE 1 88 dey
|
|
008DFF 1 10 .byte $10
|
|
008E00 1 UNKNOWN_CALL:
|
|
008E00 1 F6 20 inc L0020,x
|
|
008E02 1 10 8E bpl L8D92
|
|
008E04 1 CE 0F 8E L8E04: dec L8E0F
|
|
008E07 1 AD 0F 8E lda L8E0F
|
|
008E0A 1 C9 FD cmp #$FD
|
|
008E0C 1 D0 B9 bne L8DC7
|
|
008E0E 1 60 rts
|
|
008E0F 1
|
|
008E0F 1 00 L8E0F: brk
|
|
008E10 1 A0 12 L8E10: ldy #$12
|
|
008E12 1 A9 30 lda #$30
|
|
008E14 1 A2 E2 ldx #$E2
|
|
008E16 1 20 00 D0 jsr LD000
|
|
008E19 1 60 rts
|
|
008E1A 1
|
|
008E1A 1 E0 L8E1A: .byte $E0
|
|
008E1B 1 2F L8E1B: .byte $2F
|
|
008E1C 1 01 00 L8E1C: ora (L0000,x)
|
|
008E1E 1 E0 60 cpx #$60
|
|
008E20 1 01 00 ora (L0000,x)
|
|
008E22 1 E0 74 cpx #$74
|
|
008E24 1 01 00 ora (L0000,x)
|
|
008E26 1 E0 84 cpx #$84
|
|
008E28 1 01 00 ora (L0000,x)
|
|
008E2A 1 E0 A4 cpx #$A4
|
|
008E2C 1 01 00 ora (L0000,x)
|
|
008E2E 1 E0 AC cpx #$AC
|
|
008E30 1 01 00 ora (L0000,x)
|
|
008E32 1 E0 .byte $E0
|
|
008E33 1 B4 01 L8E33: ldy $01,x
|
|
008E35 1 00 brk
|
|
008E36 1 80 B7 bra L8DEF
|
|
008E38 1 00 brk
|
|
008E39 1 00 brk
|
|
008E3A 1 80 F7 bra L8E33
|
|
008E3C 1 00 brk
|
|
008E3D 1 00 brk
|
|
008E3E 1 00 L8E3E: brk
|
|
008E3F 1 02 L8E3F: .byte $02
|
|
008E40 1 00 brk
|
|
008E41 1 14 00 trb L0000
|
|
008E43 1 10 00 bpl L8E45
|
|
008E45 1 20 00 08 L8E45: jsr L0800
|
|
008E48 1 00 brk
|
|
008E49 1 08 php
|
|
008E4A 1 00 brk
|
|
008E4B 1 08 php
|
|
008E4C 1 00 brk
|
|
008E4D 1 28 plp
|
|
008E4E 1 00 brk
|
|
008E4F 1 10 .byte $10
|
|
008E50 1 00 L8E50: brk
|
|
008E51 1 08 L8E51: php
|
|
008E52 1 00 brk
|
|
008E53 1 08 php
|
|
008E54 1 00 brk
|
|
008E55 1 90 00 bcc L8E57
|
|
008E57 1 50 00 L8E57: bvc L8E59
|
|
008E59 1 70 00 L8E59: bvs L8E5B
|
|
008E5B 1 70 00 L8E5B: bvs L8E5D
|
|
008E5D 1 70 00 L8E5D: bvs L8E5F
|
|
008E5F 1 50 00 L8E5F: bvc L8E61
|
|
008E61 1 90 03 L8E61: bcc L8E66
|
|
008E63 1 68 pla
|
|
008E64 1 8E .byte $8E
|
|
008E65 1 00 brk
|
|
008E66 1 1C L8E66: .byte $1C
|
|
008E67 1 00 L8E67: brk
|
|
008E68 1 08 php
|
|
008E69 1 44 .byte $44
|
|
008E6A 1 65 73 adc $73
|
|
008E6C 1 6B .byte $6B
|
|
008E6D 1 54 .byte $54
|
|
008E6E 1 6F 70 32 bbr6 $70,L8EA3
|
|
008E71 1 02 .byte $02
|
|
008E72 1 00 L8E72: brk
|
|
008E73 1 00 L8E73: brk
|
|
008E74 1 00 L8E74: brk
|
|
008E75 1 00 L8E75: brk
|
|
008E76 1 04 .byte $04
|
|
008E77 1 00 L8E77: brk
|
|
008E78 1 00 L8E78: brk
|
|
008E79 1 00 L8E79: brk
|
|
008E7A 1 00 L8E7A: brk
|
|
008E7B 1 00 L8E7B: brk
|
|
008E7C 1 00 brk
|
|
008E7D 1 00 brk
|
|
008E7E 1 01 00 ora (L0000,x)
|
|
008E80 1 00 L8E80: brk
|
|
008E81 1 48 L8E81: pha
|
|
008E82 1 A9 00 lda #$00
|
|
008E84 1 8D 80 8E sta L8E80
|
|
008E87 1 F0 06 beq L8E8F
|
|
008E89 1 48 L8E89: pha
|
|
008E8A 1 A9 80 lda #$80
|
|
008E8C 1 8D 80 8E sta L8E80
|
|
008E8F 1 68 L8E8F: pla
|
|
008E90 1 0A asl a
|
|
008E91 1 A8 tay
|
|
008E92 1 0A asl a
|
|
008E93 1 AA tax
|
|
008E94 1 BD 1A 8E lda L8E1A,x
|
|
008E97 1 8D 73 8E sta L8E73
|
|
008E9A 1 BD 1B 8E lda L8E1B,x
|
|
008E9D 1 8D 74 8E sta L8E74
|
|
008EA0 1 BD 1C 8E lda L8E1C,x
|
|
008EA3 1 8D 75 8E L8EA3: sta L8E75
|
|
008EA6 1 B9 3E 8E lda L8E3E,y
|
|
008EA9 1 8D 7A 8E sta L8E7A
|
|
008EAC 1 B9 3F 8E lda L8E3F,y
|
|
008EAF 1 8D 7B 8E sta L8E7B
|
|
008EB2 1 B9 50 8E lda L8E50,y
|
|
008EB5 1 8D 78 8E sta L8E78
|
|
008EB8 1 B9 51 8E lda L8E51,y
|
|
008EBB 1 8D 79 8E sta L8E79
|
|
008EBE 1 A0 C8 L8EBE: ldy #$C8
|
|
008EC0 1 A9 62 lda #$62
|
|
008EC2 1 A2 8E ldx #$8E
|
|
008EC4 1 20 BA 46 jsr L46BA
|
|
008EC7 1 F0 0D beq L8ED6
|
|
008EC9 1 A9 00 lda #$00
|
|
008ECB 1 0D 80 8E ora L8E80
|
|
008ECE 1 20 CC 48 jsr L48CC
|
|
008ED1 1 F0 EB beq L8EBE
|
|
008ED3 1 A9 FF lda #$FF
|
|
008ED5 1 60 rts
|
|
008ED6 1
|
|
008ED6 1 AD 67 8E L8ED6: lda L8E67
|
|
008ED9 1 8D 77 8E sta L8E77
|
|
008EDC 1 8D 72 8E sta L8E72
|
|
008EDF 1 A0 CE ldy #$CE
|
|
008EE1 1 A9 71 lda #$71
|
|
008EE3 1 A2 8E ldx #$8E
|
|
008EE5 1 20 BA 46 jsr L46BA
|
|
008EE8 1 A0 CA ldy #$CA
|
|
008EEA 1 A9 76 lda #$76
|
|
008EEC 1 A2 8E ldx #$8E
|
|
008EEE 1 20 BA 46 jsr L46BA
|
|
008EF1 1 A0 CC ldy #$CC
|
|
008EF3 1 A9 7E lda #$7E
|
|
008EF5 1 A2 8E ldx #$8E
|
|
008EF7 1 20 BA 46 jsr L46BA
|
|
008EFA 1 60 rts
|
|
008EFB 1
|
|
008EFB 1 00 brk
|
|
008EFC 1 00 brk
|
|
008EFD 1 00 brk
|
|
008EFE 1 00 brk
|
|
008EFF 1 00 brk
|
|
008F00 1 4C C5 8F L8F00: jmp L8FC5
|
|
008F03 1
|
|
008F03 1 4C E3 97 jmp L97E3
|
|
008F06 1
|
|
008F06 1 4C E3 97 jmp L97E3
|
|
008F09 1
|
|
008F09 1 4C E7 92 L8F09: jmp L92E7
|
|
008F0C 1
|
|
008F0C 1 4C 9B 8F L8F0C: jmp L8F9B
|
|
008F0F 1
|
|
008F0F 1 4C A1 8F L8F0F: jmp L8FA1
|
|
008F12 1
|
|
008F12 1 4C 71 95 L8F12: jmp L9571
|
|
008F15 1
|
|
008F15 1 4C 13 92 L8F15: jmp L9213
|
|
008F18 1
|
|
008F18 1 4C 2A 8F L8F18: jmp L8F2A
|
|
008F1B 1
|
|
008F1B 1 4C 5B 8F L8F1B: jmp L8F5B
|
|
008F1E 1
|
|
008F1E 1 4C E3 97 jmp L97E3
|
|
008F21 1
|
|
008F21 1 4C E3 97 jmp L97E3
|
|
008F24 1
|
|
008F24 1 4C 7E 8F L8F24: jmp L8F7E
|
|
008F27 1
|
|
008F27 1 4C B8 8F L8F27: jmp L8FB8
|
|
008F2A 1
|
|
008F2A 1 A9 00 L8F2A: lda #$00
|
|
008F2C 1 8D 89 91 sta L9189
|
|
008F2F 1 BA tsx
|
|
008F30 1 8E 88 91 stx L9188
|
|
008F33 1 20 48 A2 jsr LA248
|
|
008F36 1 20 3E 99 jsr L993E
|
|
008F39 1 20 71 A2 jsr LA271
|
|
008F3C 1 20 68 99 jsr L9968
|
|
008F3F 1 A9 FF L8F3F: lda #$FF
|
|
008F41 1 8D 5B E0 sta $E05B
|
|
008F44 1 A9 00 lda #$00
|
|
008F46 1 8D 5C E0 sta $E05C
|
|
008F49 1 20 0D 9A jsr L9A0D
|
|
008F4C 1 20 7F 91 jsr L917F
|
|
008F4F 1 20 E8 91 L8F4F: jsr L91E8
|
|
008F52 1 A9 00 lda #$00
|
|
008F54 1 60 rts
|
|
008F55 1
|
|
008F55 1 20 D5 91 jsr L91D5
|
|
008F58 1 4C 4F 8F jmp L8F4F
|
|
008F5B 1
|
|
008F5B 1 A9 00 L8F5B: lda #$00
|
|
008F5D 1 8D 89 91 sta L9189
|
|
008F60 1 BA tsx
|
|
008F61 1 8E 88 91 stx L9188
|
|
008F64 1 20 48 A2 jsr LA248
|
|
008F67 1 A9 00 lda #$00
|
|
008F69 1 20 7E 9E jsr L9E7E
|
|
008F6C 1 20 71 A2 jsr LA271
|
|
008F6F 1 20 82 91 jsr L9182
|
|
008F72 1 20 BF 9E jsr L9EBF
|
|
008F75 1 20 DB 9E jsr L9EDB
|
|
008F78 1 20 7F 91 jsr L917F
|
|
008F7B 1 4C 4F 8F jmp L8F4F
|
|
008F7E 1
|
|
008F7E 1 A9 80 L8F7E: lda #$80
|
|
008F80 1 8D 8C 91 sta L918C
|
|
008F83 1 A9 C0 lda #$C0
|
|
008F85 1 8D 89 91 sta L9189
|
|
008F88 1 BA tsx
|
|
008F89 1 8E 88 91 stx L9188
|
|
008F8C 1 20 48 A2 jsr LA248
|
|
008F8F 1 20 84 99 jsr L9984
|
|
008F92 1 20 71 A2 jsr LA271
|
|
008F95 1 20 BC 99 jsr L99BC
|
|
008F98 1 4C 3F 8F jmp L8F3F
|
|
008F9B 1
|
|
008F9B 1 20 DD 8F L8F9B: jsr L8FDD
|
|
008F9E 1 4C 4F 8F jmp L8F4F
|
|
008FA1 1
|
|
008FA1 1 20 E1 8F L8FA1: jsr L8FE1
|
|
008FA4 1 4C 4F 8F jmp L8F4F
|
|
008FA7 1
|
|
008FA7 1 0A L8FA7: asl a
|
|
008FA8 1 A8 tay
|
|
008FA9 1 B9 9F DD lda $DD9F,y
|
|
008FAC 1 85 06 sta L0006
|
|
008FAE 1 B9 A0 DD lda $DDA0,y
|
|
008FB1 1 85 07 sta $07
|
|
008FB3 1 A0 02 ldy #$02
|
|
008FB5 1 B1 06 lda (L0006),y
|
|
008FB7 1 60 rts
|
|
008FB8 1
|
|
008FB8 1 A9 00 L8FB8: lda #$00
|
|
008FBA 1 8D 8C 91 sta L918C
|
|
008FBD 1 A9 C0 lda #$C0
|
|
008FBF 1 8D 89 91 sta L9189
|
|
008FC2 1 4C EB 8F jmp L8FEB
|
|
008FC5 1
|
|
008FC5 1 AD FC EB L8FC5: lda $EBFC
|
|
008FC8 1 C9 01 cmp #$01
|
|
008FCA 1 D0 04 bne L8FD0
|
|
008FCC 1 A9 80 lda #$80
|
|
008FCE 1 D0 02 bne L8FD2
|
|
008FD0 1 A9 00 L8FD0: lda #$00
|
|
008FD2 1 8D 8A 91 L8FD2: sta L918A
|
|
008FD5 1 A9 00 lda #$00
|
|
008FD7 1 8D 89 91 sta L9189
|
|
008FDA 1 4C EB 8F jmp L8FEB
|
|
008FDD 1
|
|
008FDD 1 A9 00 L8FDD: lda #$00
|
|
008FDF 1 F0 02 beq L8FE3
|
|
008FE1 1 A9 80 L8FE1: lda #$80
|
|
008FE3 1 8D 8B 91 L8FE3: sta L918B
|
|
008FE6 1 A9 80 lda #$80
|
|
008FE8 1 8D 89 91 sta L9189
|
|
008FEB 1 BA L8FEB: tsx
|
|
008FEC 1 8E 88 91 stx L9188
|
|
008FEF 1 A9 00 lda #$00
|
|
008FF1 1 8D 5C E0 sta $E05C
|
|
008FF4 1 20 D5 91 jsr L91D5
|
|
008FF7 1 AD 89 91 lda L9189
|
|
008FFA 1 F0 03 beq L8FFF
|
|
008FFC 1 4C 8C 90 jmp L908C
|
|
008FFF 1
|
|
008FFF 1 2C L8FFF: .byte $2C
|
|
009000 1 8A L9000: txa
|
|
009001 1 91 10 sta ($10),y
|
|
009003 1 0D AD 20 ora $20AD
|
|
009006 1 DF F0 03 bbs5 $F0,L900C
|
|
009009 1 4C 8C 90 jmp L908C
|
|
00900C 1
|
|
00900C 1 68 L900C: pla
|
|
00900D 1 68 pla
|
|
00900E 1 4C 12 40 jmp L4012
|
|
009011 1
|
|
009011 1 AD FC EB lda $EBFC
|
|
009014 1 10 1C bpl L9032
|
|
009016 1 29 7F and #$7F
|
|
009018 1 0A asl a
|
|
009019 1 AA tax
|
|
00901A 1 BD B3 DF lda $DFB3,x
|
|
00901D 1 85 08 sta $08
|
|
00901F 1 BD B4 DF lda $DFB4,x
|
|
009022 1 85 09 sta $09
|
|
009024 1 A9 7B lda #$7B
|
|
009026 1 85 06 sta L0006
|
|
009028 1 A9 91 lda #$91
|
|
00902A 1 85 07 sta $07
|
|
00902C 1 20 A0 91 jsr L91A0
|
|
00902F 1 4C 76 90 jmp L9076
|
|
009032 1
|
|
009032 1 20 A7 8F L9032: jsr L8FA7
|
|
009035 1 29 0F and #$0F
|
|
009037 1 F0 18 beq L9051
|
|
009039 1 0A asl a
|
|
00903A 1 AA tax
|
|
00903B 1 BD B3 DF lda $DFB3,x
|
|
00903E 1 85 08 sta $08
|
|
009040 1 BD B4 DF lda $DFB4,x
|
|
009043 1 85 09 sta $09
|
|
009045 1 AD FC EB lda $EBFC
|
|
009048 1 20 8E 91 jsr L918E
|
|
00904B 1 20 A0 91 jsr L91A0
|
|
00904E 1 4C 76 90 jmp L9076
|
|
009051 1
|
|
009051 1 AD FC EB L9051: lda $EBFC
|
|
009054 1 20 8E 91 jsr L918E
|
|
009057 1 A0 01 ldy #$01
|
|
009059 1 A9 2F lda #$2F
|
|
00905B 1 91 06 sta (L0006),y
|
|
00905D 1 88 dey
|
|
00905E 1 B1 06 lda (L0006),y
|
|
009060 1 8D 6D 90 sta L906D
|
|
009063 1 99 0A E0 sta $E00A,y
|
|
009066 1 C8 L9066: iny
|
|
009067 1 B1 06 lda (L0006),y
|
|
009069 1 99 0A E0 sta $E00A,y
|
|
00906C 1 C0 .byte $C0
|
|
00906D 1 00 L906D: brk
|
|
00906E 1 D0 F6 bne L9066
|
|
009070 1 A0 01 ldy #$01
|
|
009072 1 A9 20 lda #$20
|
|
009074 1 91 06 sta (L0006),y
|
|
009076 1 A0 FF L9076: ldy #$FF
|
|
009078 1 C8 L9078: iny
|
|
009079 1 B9 0A E0 lda $E00A,y
|
|
00907C 1 99 C9 DF sta $DFC9,y
|
|
00907F 1 CC 0A E0 cpy $E00A
|
|
009082 1 D0 F4 bne L9078
|
|
009084 1 AD C9 DF lda $DFC9
|
|
009087 1 F0 03 beq L908C
|
|
009089 1 CE C9 DF dec $DFC9
|
|
00908C 1 A9 00 L908C: lda #$00
|
|
00908E 1 8D E4 97 sta L97E4
|
|
009091 1 20 48 A2 jsr LA248
|
|
009094 1 2C 89 91 bit L9189
|
|
009097 1 70 1B bvs L90B4
|
|
009099 1 30 13 bmi L90AE
|
|
00909B 1 2C 8A 91 bit L918A
|
|
00909E 1 30 06 bmi L90A6
|
|
0090A0 1 20 3E 99 jsr L993E
|
|
0090A3 1 4C DE 90 jmp L90DE
|
|
0090A6 1
|
|
0090A6 1 A9 06 L90A6: lda #$06
|
|
0090A8 1 20 7E 9E jsr L9E7E
|
|
0090AB 1 4C DE 90 jmp L90DE
|
|
0090AE 1
|
|
0090AE 1 20 59 A0 L90AE: jsr LA059
|
|
0090B1 1 4C DE 90 jmp L90DE
|
|
0090B4 1
|
|
0090B4 1 20 E4 A1 L90B4: jsr LA1E4
|
|
0090B7 1 4C DE 90 jmp L90DE
|
|
0090BA 1
|
|
0090BA 1 2C 89 91 L90BA: bit L9189
|
|
0090BD 1 70 19 bvs L90D8
|
|
0090BF 1 30 11 bmi L90D2
|
|
0090C1 1 2C 8A 91 bit L918A
|
|
0090C4 1 30 06 bmi L90CC
|
|
0090C6 1 20 68 99 jsr L9968
|
|
0090C9 1 4C DE 90 jmp L90DE
|
|
0090CC 1
|
|
0090CC 1 20 BF 9E L90CC: jsr L9EBF
|
|
0090CF 1 4C DE 90 jmp L90DE
|
|
0090D2 1
|
|
0090D2 1 20 DF A0 L90D2: jsr LA0DF
|
|
0090D5 1 4C DE 90 jmp L90DE
|
|
0090D8 1
|
|
0090D8 1 20 41 A2 L90D8: jsr LA241
|
|
0090DB 1 4C DE 90 jmp L90DE
|
|
0090DE 1
|
|
0090DE 1 20 F5 91 L90DE: jsr L91F5
|
|
0090E1 1 AD 21 DF lda $DF21
|
|
0090E4 1 D0 03 bne L90E9
|
|
0090E6 1 4C 68 91 jmp L9168
|
|
0090E9 1
|
|
0090E9 1 A2 00 L90E9: ldx #$00
|
|
0090EB 1 8E 7A 91 stx L917A
|
|
0090EE 1 20 F5 91 L90EE: jsr L91F5
|
|
0090F1 1 AE 7A 91 ldx L917A
|
|
0090F4 1 BD 22 DF lda $DF22,x
|
|
0090F7 1 C9 01 cmp #$01
|
|
0090F9 1 F0 45 beq L9140
|
|
0090FB 1 20 8E 91 jsr L918E
|
|
0090FE 1 20 A0 91 jsr L91A0
|
|
009101 1 A9 0A lda #$0A
|
|
009103 1 85 06 sta L0006
|
|
009105 1 A9 E0 lda #$E0
|
|
009107 1 85 07 sta $07
|
|
009109 1 A0 00 ldy #$00
|
|
00910B 1 B1 06 lda (L0006),y
|
|
00910D 1 F0 05 beq L9114
|
|
00910F 1 38 sec
|
|
009110 1 E9 01 sbc #$01
|
|
009112 1 91 06 sta (L0006),y
|
|
009114 1 AD E4 97 L9114: lda L97E4
|
|
009117 1 F0 24 beq L913D
|
|
009119 1 2C 89 91 bit L9189
|
|
00911C 1 30 11 bmi L912F
|
|
00911E 1 2C 8A 91 bit L918A
|
|
009121 1 30 06 bmi L9129
|
|
009123 1 20 01 9A jsr L9A01
|
|
009126 1 4C 40 91 jmp L9140
|
|
009129 1
|
|
009129 1 20 DB 9E L9129: jsr L9EDB
|
|
00912C 1 4C 40 91 jmp L9140
|
|
00912F 1
|
|
00912F 1 70 06 L912F: bvs L9137
|
|
009131 1 20 14 A1 jsr LA114
|
|
009134 1 4C 40 91 jmp L9140
|
|
009137 1
|
|
009137 1 20 71 A2 L9137: jsr LA271
|
|
00913A 1 4C 40 91 jmp L9140
|
|
00913D 1
|
|
00913D 1 20 71 A2 L913D: jsr LA271
|
|
009140 1 EE 7A 91 L9140: inc L917A
|
|
009143 1 AE 7A 91 ldx L917A
|
|
009146 1 EC 21 DF cpx $DF21
|
|
009149 1 D0 A3 bne L90EE
|
|
00914B 1 AD E4 97 lda L97E4
|
|
00914E 1 D0 18 bne L9168
|
|
009150 1 EE E4 97 inc L97E4
|
|
009153 1 2C 89 91 bit L9189
|
|
009156 1 30 05 bmi L915D
|
|
009158 1 2C 8A 91 bit L918A
|
|
00915B 1 10 08 bpl L9165
|
|
00915D 1 20 82 91 L915D: jsr L9182
|
|
009160 1 2C 89 91 bit L9189
|
|
009163 1 70 03 bvs L9168
|
|
009165 1 4C BA 90 L9165: jmp L90BA
|
|
009168 1
|
|
009168 1 20 7F 91 L9168: jsr L917F
|
|
00916B 1 AD FC EB lda $EBFC
|
|
00916E 1 20 8E 91 jsr L918E
|
|
009171 1 A0 01 ldy #$01
|
|
009173 1 A9 20 lda #$20
|
|
009175 1 91 06 sta (L0006),y
|
|
009177 1 A9 00 lda #$00
|
|
009179 1 60 rts
|
|
00917A 1
|
|
00917A 1 00 L917A: brk
|
|
00917B 1 00 brk
|
|
00917C 1 4C L917C: .byte $4C
|
|
00917D 1 00 L917D: brk
|
|
00917E 1 00 L917E: brk
|
|
00917F 1 4C L917F: .byte $4C
|
|
009180 1 00 L9180: brk
|
|
009181 1 00 L9181: brk
|
|
009182 1 4C L9182: .byte $4C
|
|
009183 1 00 L9183: brk
|
|
009184 1 00 L9184: brk
|
|
009185 1 4C L9185: .byte $4C
|
|
009186 1 00 L9186: brk
|
|
009187 1 00 L9187: brk
|
|
009188 1 00 L9188: brk
|
|
009189 1 00 L9189: brk
|
|
00918A 1 00 L918A: brk
|
|
00918B 1 00 L918B: brk
|
|
00918C 1 00 L918C: brk
|
|
00918D 1 00 L918D: brk
|
|
00918E 1 0A L918E: asl a
|
|
00918F 1 A8 tay
|
|
009190 1 B9 9F DD lda $DD9F,y
|
|
009193 1 18 clc
|
|
009194 1 69 09 adc #$09
|
|
009196 1 85 06 sta L0006
|
|
009198 1 B9 A0 DD lda $DDA0,y
|
|
00919B 1 69 00 adc #$00
|
|
00919D 1 85 07 sta $07
|
|
00919F 1 60 rts
|
|
0091A0 1
|
|
0091A0 1 A2 00 L91A0: ldx #$00
|
|
0091A2 1 A0 00 ldy #$00
|
|
0091A4 1 B1 08 lda ($08),y
|
|
0091A6 1 F0 0E beq L91B6
|
|
0091A8 1 8D B3 91 sta L91B3
|
|
0091AB 1 C8 L91AB: iny
|
|
0091AC 1 E8 inx
|
|
0091AD 1 B1 08 lda ($08),y
|
|
0091AF 1 9D 0A E0 sta $E00A,x
|
|
0091B2 1 C0 .byte $C0
|
|
0091B3 1 00 L91B3: brk
|
|
0091B4 1 D0 F5 bne L91AB
|
|
0091B6 1 E8 L91B6: inx
|
|
0091B7 1 A9 2F lda #$2F
|
|
0091B9 1 9D 0A E0 sta $E00A,x
|
|
0091BC 1 A0 00 ldy #$00
|
|
0091BE 1 B1 06 lda (L0006),y
|
|
0091C0 1 F0 0F beq L91D1
|
|
0091C2 1 8D CE 91 sta L91CE
|
|
0091C5 1 C8 iny
|
|
0091C6 1 C8 L91C6: iny
|
|
0091C7 1 E8 inx
|
|
0091C8 1 B1 06 lda (L0006),y
|
|
0091CA 1 9D 0A E0 sta $E00A,x
|
|
0091CD 1 C0 .byte $C0
|
|
0091CE 1 00 L91CE: brk
|
|
0091CF 1 D0 F5 bne L91C6
|
|
0091D1 1 8E 0A E0 L91D1: stx $E00A
|
|
0091D4 1 60 rts
|
|
0091D5 1
|
|
0091D5 1 A0 03 L91D5: ldy #$03
|
|
0091D7 1 A9 39 lda #$39
|
|
0091D9 1 A2 D2 ldx #$D2
|
|
0091DB 1 20 03 40 jsr L4003
|
|
0091DE 1 A0 04 ldy #$04
|
|
0091E0 1 A9 39 lda #$39
|
|
0091E2 1 A2 D2 ldx #$D2
|
|
0091E4 1 20 03 40 jsr L4003
|
|
0091E7 1 60 rts
|
|
0091E8 1
|
|
0091E8 1 20 15 40 L91E8: jsr L4015
|
|
0091EB 1 A0 0C ldy #$0C
|
|
0091ED 1 A9 00 lda #$00
|
|
0091EF 1 A2 00 ldx #$00
|
|
0091F1 1 20 18 40 jsr L4018
|
|
0091F4 1 60 rts
|
|
0091F5 1
|
|
0091F5 1 A9 11 L91F5: lda #$11
|
|
0091F7 1 85 08 sta $08
|
|
0091F9 1 A9 92 lda #$92
|
|
0091FB 1 85 09 sta $09
|
|
0091FD 1 AD 20 DF lda $DF20
|
|
009200 1 F0 0E beq L9210
|
|
009202 1 0A asl a
|
|
009203 1 AA tax
|
|
009204 1 BD B3 DF lda $DFB3,x
|
|
009207 1 85 08 sta $08
|
|
009209 1 BD B4 DF lda $DFB4,x
|
|
00920C 1 85 09 sta $09
|
|
00920E 1 A9 00 lda #$00
|
|
009210 1 60 L9210: rts
|
|
009211 1
|
|
009211 1 00 brk
|
|
009212 1 00 brk
|
|
009213 1 AD 21 DF L9213: lda $DF21
|
|
009216 1 D0 01 bne L9219
|
|
009218 1 60 rts
|
|
009219 1
|
|
009219 1 AE 21 DF L9219: ldx $DF21
|
|
00921C 1 8E 00 08 stx L0800
|
|
00921F 1 CA dex
|
|
009220 1 BD 22 DF L9220: lda $DF22,x
|
|
009223 1 9D 01 08 sta $0801,x
|
|
009226 1 CA dex
|
|
009227 1 10 F7 bpl L9220
|
|
009229 1 20 1E 40 jsr L401E
|
|
00922C 1 A2 00 ldx #$00
|
|
00922E 1 8E 4A 92 stx L924A
|
|
009231 1 AE 4A 92 L9231: ldx L924A
|
|
009234 1 BD 01 08 lda $0801,x
|
|
009237 1 C9 01 cmp #$01
|
|
009239 1 F0 03 beq L923E
|
|
00923B 1 20 4B 92 jsr L924B
|
|
00923E 1 EE 4A 92 L923E: inc L924A
|
|
009241 1 AE 4A 92 ldx L924A
|
|
009244 1 EC 00 08 cpx L0800
|
|
009247 1 D0 E8 bne L9231
|
|
009249 1 60 rts
|
|
00924A 1
|
|
00924A 1 00 L924A: brk
|
|
00924B 1 8D 54 92 L924B: sta L9254
|
|
00924E 1 A0 00 ldy #$00
|
|
009250 1 B9 A0 E1 L9250: lda $E1A0,y
|
|
009253 1 C9 .byte $C9
|
|
009254 1 00 L9254: brk
|
|
009255 1 F0 09 beq L9260
|
|
009257 1 CC 31 BF cpy $BF31
|
|
00925A 1 F0 03 beq L925F
|
|
00925C 1 C8 iny
|
|
00925D 1 D0 F1 bne L9250
|
|
00925F 1 60 L925F: rts
|
|
009260 1
|
|
009260 1 B9 32 BF L9260: lda $BF32,y
|
|
009263 1 8D C7 92 sta L92C7
|
|
009266 1 A2 11 ldx #$11
|
|
009268 1 AD C7 92 lda L92C7
|
|
00926B 1 29 80 and #$80
|
|
00926D 1 F0 02 beq L9271
|
|
00926F 1 A2 21 ldx #$21
|
|
009271 1 8E 84 92 L9271: stx L9284
|
|
009274 1 AD C7 92 lda L92C7
|
|
009277 1 29 70 and #$70
|
|
009279 1 4A lsr a
|
|
00927A 1 4A lsr a
|
|
00927B 1 4A lsr a
|
|
00927C 1 18 clc
|
|
00927D 1 6D 84 92 adc L9284
|
|
009280 1 8D 84 92 sta L9284
|
|
009283 1 AD .byte $AD
|
|
009284 1 00 L9284: brk
|
|
009285 1 BF 85 07 bbs3 $85,L928F
|
|
009288 1 A9 00 lda #$00
|
|
00928A 1 85 06 sta L0006
|
|
00928C 1 A0 07 ldy #$07
|
|
00928E 1 B1 .byte $B1
|
|
00928F 1 06 D0 L928F: asl $D0
|
|
009291 1 CD A0 FB cmp $FBA0
|
|
009294 1 B1 06 lda (L0006),y
|
|
009296 1 29 7F and #$7F
|
|
009298 1 D0 C5 bne L925F
|
|
00929A 1 A0 FF ldy #$FF
|
|
00929C 1 B1 06 lda (L0006),y
|
|
00929E 1 18 clc
|
|
00929F 1 69 03 adc #$03
|
|
0092A1 1 85 06 sta L0006
|
|
0092A3 1 AD C7 92 lda L92C7
|
|
0092A6 1 48 pha
|
|
0092A7 1 2A rol a
|
|
0092A8 1 68 pla
|
|
0092A9 1 08 php
|
|
0092AA 1 29 20 and #$20
|
|
0092AC 1 4A lsr a
|
|
0092AD 1 4A lsr a
|
|
0092AE 1 4A lsr a
|
|
0092AF 1 4A lsr a
|
|
0092B0 1 28 plp
|
|
0092B1 1 69 01 adc #$01
|
|
0092B3 1 8D C1 92 sta L92C1
|
|
0092B6 1 20 BD 92 jsr L92BD
|
|
0092B9 1 04 C0 tsb $C0
|
|
0092BB 1 92 60 sta ($60)
|
|
0092BD 1 6C 06 00 L92BD: jmp (L0006)
|
|
0092C0 1
|
|
0092C0 1 03 .byte $03
|
|
0092C1 1 00 L92C1: brk
|
|
0092C2 1 C5 92 cmp $92
|
|
0092C4 1 04 00 tsb L0000
|
|
0092C6 1 00 brk
|
|
0092C7 1 00 L92C7: brk
|
|
0092C8 1 00 brk
|
|
0092C9 1 0A asl a
|
|
0092CA 1 20 .byte $20
|
|
0092CB 1 02 .byte $02
|
|
0092CC 1 00 L92CC: brk
|
|
0092CD 1 00 L92CD: brk
|
|
0092CE 1 00 L92CE: brk
|
|
0092CF 1 00 L92CF: brk
|
|
0092D0 1 00 brk
|
|
0092D1 1 00 L92D1: brk
|
|
0092D2 1 00 L92D2: brk
|
|
0092D3 1 00 L92D3: brk
|
|
0092D4 1 00 L92D4: brk
|
|
0092D5 1 00 brk
|
|
0092D6 1 00 brk
|
|
0092D7 1 00 L92D7: brk
|
|
0092D8 1 00 L92D8: brk
|
|
0092D9 1 00 brk
|
|
0092DA 1 00 brk
|
|
0092DB 1 00 brk
|
|
0092DC 1 00 brk
|
|
0092DD 1 03 .byte $03
|
|
0092DE 1 00 L92DE: brk
|
|
0092DF 1 00 brk
|
|
0092E0 1 08 php
|
|
0092E1 1 0A asl a
|
|
0092E2 1 00 brk
|
|
0092E3 1 00 L92E3: brk
|
|
0092E4 1 00 L92E4: brk
|
|
0092E5 1 00 L92E5: brk
|
|
0092E6 1 00 L92E6: brk
|
|
0092E7 1 AD 21 DF L92E7: lda $DF21
|
|
0092EA 1 D0 01 bne L92ED
|
|
0092EC 1 60 rts
|
|
0092ED 1
|
|
0092ED 1 A9 00 L92ED: lda #$00
|
|
0092EF 1 8D E6 92 sta L92E6
|
|
0092F2 1 20 D5 91 jsr L91D5
|
|
0092F5 1 AE E6 92 L92F5: ldx L92E6
|
|
0092F8 1 EC 21 DF cpx $DF21
|
|
0092FB 1 D0 03 bne L9300
|
|
0092FD 1 4C 34 95 jmp L9534
|
|
009300 1
|
|
009300 1 AD 20 DF L9300: lda $DF20
|
|
009303 1 F0 2C beq L9331
|
|
009305 1 0A asl a
|
|
009306 1 AA tax
|
|
009307 1 BD B3 DF lda $DFB3,x
|
|
00930A 1 85 08 sta $08
|
|
00930C 1 BD B4 DF lda $DFB4,x
|
|
00930F 1 85 09 sta $09
|
|
009311 1 AE E6 92 ldx L92E6
|
|
009314 1 BD 22 DF lda $DF22,x
|
|
009317 1 20 8E 91 jsr L918E
|
|
00931A 1 20 A0 91 jsr L91A0
|
|
00931D 1 A0 00 ldy #$00
|
|
00931F 1 B9 0A E0 L931F: lda $E00A,y
|
|
009322 1 99 20 02 sta $0220,y
|
|
009325 1 C8 iny
|
|
009326 1 CC 20 02 cpy $0220
|
|
009329 1 D0 F4 bne L931F
|
|
00932B 1 CE 20 02 dec $0220
|
|
00932E 1 4C 56 93 jmp L9356
|
|
009331 1
|
|
009331 1 AE E6 92 L9331: ldx L92E6
|
|
009334 1 BD 22 DF lda $DF22,x
|
|
009337 1 C9 01 cmp #$01
|
|
009339 1 D0 03 bne L933E
|
|
00933B 1 4C 2E 95 jmp L952E
|
|
00933E 1
|
|
00933E 1 20 8E 91 L933E: jsr L918E
|
|
009341 1 A0 00 ldy #$00
|
|
009343 1 B1 06 L9343: lda (L0006),y
|
|
009345 1 99 20 02 sta $0220,y
|
|
009348 1 C8 iny
|
|
009349 1 CC 20 02 cpy $0220
|
|
00934C 1 D0 F5 bne L9343
|
|
00934E 1 CE 20 02 dec $0220
|
|
009351 1 A9 2F lda #$2F
|
|
009353 1 8D 21 02 sta $0221
|
|
009356 1 A0 C4 L9356: ldy #$C4
|
|
009358 1 A9 C9 lda #$C9
|
|
00935A 1 A2 92 ldx #$92
|
|
00935C 1 20 21 40 jsr L4021
|
|
00935F 1 F0 05 beq L9366
|
|
009361 1 20 9B A4 jsr LA49B
|
|
009364 1 F0 F0 beq L9356
|
|
009366 1 AD 20 DF L9366: lda $DF20
|
|
009369 1 F0 1C beq L9387
|
|
00936B 1 A9 80 lda #$80
|
|
00936D 1 8D E3 92 sta L92E3
|
|
009370 1 AD E6 92 lda L92E6
|
|
009373 1 18 clc
|
|
009374 1 69 01 adc #$01
|
|
009376 1 CD 21 DF cmp $DF21
|
|
009379 1 F0 06 beq L9381
|
|
00937B 1 EE E3 92 inc L92E3
|
|
00937E 1 EE E3 92 inc L92E3
|
|
009381 1 20 3F 95 L9381: jsr L953F
|
|
009384 1 4C DB 93 jmp L93DB
|
|
009387 1
|
|
009387 1 A9 81 L9387: lda #$81
|
|
009389 1 8D E3 92 sta L92E3
|
|
00938C 1 AD E6 92 lda L92E6
|
|
00938F 1 18 clc
|
|
009390 1 69 01 adc #$01
|
|
009392 1 CD 21 DF cmp $DF21
|
|
009395 1 F0 06 beq L939D
|
|
009397 1 EE E3 92 inc L92E3
|
|
00939A 1 EE E3 92 inc L92E3
|
|
00939D 1 20 3F 95 L939D: jsr L953F
|
|
0093A0 1 A9 00 lda #$00
|
|
0093A2 1 8D 2E 94 sta L942E
|
|
0093A5 1 AE E6 92 ldx L92E6
|
|
0093A8 1 BD 22 DF lda $DF22,x
|
|
0093AB 1 A0 0F ldy #$0F
|
|
0093AD 1 D9 A0 E1 L93AD: cmp $E1A0,y
|
|
0093B0 1 F0 06 beq L93B8
|
|
0093B2 1 88 dey
|
|
0093B3 1 10 F8 bpl L93AD
|
|
0093B5 1 4C DB 93 jmp L93DB
|
|
0093B8 1
|
|
0093B8 1 B9 32 BF L93B8: lda $BF32,y
|
|
0093BB 1 8D DE 92 sta L92DE
|
|
0093BE 1 A0 80 ldy #$80
|
|
0093C0 1 A9 DD lda #$DD
|
|
0093C2 1 A2 92 ldx #$92
|
|
0093C4 1 20 21 40 jsr L4021
|
|
0093C7 1 D0 12 bne L93DB
|
|
0093C9 1 A0 81 ldy #$81
|
|
0093CB 1 A9 DD lda #$DD
|
|
0093CD 1 A2 92 ldx #$92
|
|
0093CF 1 20 21 40 jsr L4021
|
|
0093D2 1 C9 2B cmp #$2B
|
|
0093D4 1 D0 05 bne L93DB
|
|
0093D6 1 A9 80 lda #$80
|
|
0093D8 1 8D 2E 94 sta L942E
|
|
0093DB 1 AE E6 92 L93DB: ldx L92E6
|
|
0093DE 1 BD 22 DF lda $DF22,x
|
|
0093E1 1 20 8E 91 jsr L918E
|
|
0093E4 1 A9 01 lda #$01
|
|
0093E6 1 8D E3 92 sta L92E3
|
|
0093E9 1 A5 06 lda L0006
|
|
0093EB 1 8D E4 92 sta L92E4
|
|
0093EE 1 A5 07 lda $07
|
|
0093F0 1 8D E5 92 sta L92E5
|
|
0093F3 1 20 3F 95 jsr L953F
|
|
0093F6 1 A9 02 lda #$02
|
|
0093F8 1 8D E3 92 sta L92E3
|
|
0093FB 1 AD 20 DF lda $DF20
|
|
0093FE 1 D0 13 bne L9413
|
|
009400 1 2C 2E 94 bit L942E
|
|
009403 1 30 07 bmi L940C
|
|
009405 1 A9 00 lda #$00
|
|
009407 1 8D E4 92 sta L92E4
|
|
00940A 1 F0 1C beq L9428
|
|
00940C 1 A9 01 L940C: lda #$01
|
|
00940E 1 8D E4 92 sta L92E4
|
|
009411 1 D0 15 bne L9428
|
|
009413 1 AD CC 92 L9413: lda L92CC
|
|
009416 1 29 C3 and #$C3
|
|
009418 1 C9 C3 cmp #$C3
|
|
00941A 1 F0 07 beq L9423
|
|
00941C 1 A9 01 lda #$01
|
|
00941E 1 8D E4 92 sta L92E4
|
|
009421 1 D0 05 bne L9428
|
|
009423 1 A9 00 L9423: lda #$00
|
|
009425 1 8D E4 92 sta L92E4
|
|
009428 1 20 3F 95 L9428: jsr L953F
|
|
00942B 1 4C 2F 94 jmp L942F
|
|
00942E 1
|
|
00942E 1 00 L942E: brk
|
|
00942F 1 A9 03 L942F: lda #$03
|
|
009431 1 8D E3 92 sta L92E3
|
|
009434 1 A9 00 lda #$00
|
|
009436 1 8D 20 02 sta $0220
|
|
009439 1 AD 20 DF lda $DF20
|
|
00943C 1 D0 34 bne L9472
|
|
00943E 1 AD CE 92 lda L92CE
|
|
009441 1 38 sec
|
|
009442 1 ED D1 92 sbc L92D1
|
|
009445 1 48 pha
|
|
009446 1 AD CF 92 lda L92CF
|
|
009449 1 ED D2 92 sbc L92D2
|
|
00944C 1 AA tax
|
|
00944D 1 68 pla
|
|
00944E 1 20 06 40 jsr L4006
|
|
009451 1 20 49 95 jsr L9549
|
|
009454 1 A2 00 ldx #$00
|
|
009456 1 BD EB E6 L9456: lda $E6EB,x
|
|
009459 1 C9 42 cmp #$42
|
|
00945B 1 F0 03 beq L9460
|
|
00945D 1 E8 inx
|
|
00945E 1 D0 F6 bne L9456
|
|
009460 1 8E 20 02 L9460: stx $0220
|
|
009463 1 A9 2F lda #$2F
|
|
009465 1 9D 20 02 sta $0220,x
|
|
009468 1 CA dex
|
|
009469 1 BD EB E6 L9469: lda $E6EB,x
|
|
00946C 1 9D 20 02 sta $0220,x
|
|
00946F 1 CA dex
|
|
009470 1 D0 F7 bne L9469
|
|
009472 1 AD 20 DF L9472: lda $DF20
|
|
009475 1 D0 09 bne L9480
|
|
009477 1 AD CE 92 lda L92CE
|
|
00947A 1 AE CF 92 ldx L92CF
|
|
00947D 1 4C 86 94 jmp L9486
|
|
009480 1
|
|
009480 1 AD D1 92 L9480: lda L92D1
|
|
009483 1 AE D2 92 ldx L92D2
|
|
009486 1 20 06 40 L9486: jsr L4006
|
|
009489 1 20 49 95 jsr L9549
|
|
00948C 1 AE 20 02 ldx $0220
|
|
00948F 1 A0 00 ldy #$00
|
|
009491 1 B9 EC E6 L9491: lda $E6EC,y
|
|
009494 1 9D 21 02 sta $0221,x
|
|
009497 1 E8 inx
|
|
009498 1 C8 iny
|
|
009499 1 CC EB E6 cpy $E6EB
|
|
00949C 1 D0 F3 bne L9491
|
|
00949E 1 98 tya
|
|
00949F 1 18 clc
|
|
0094A0 1 6D 20 02 adc $0220
|
|
0094A3 1 8D 20 02 sta $0220
|
|
0094A6 1 AE 20 02 ldx $0220
|
|
0094A9 1 BD 20 02 L94A9: lda $0220,x
|
|
0094AC 1 9D C9 DF sta $DFC9,x
|
|
0094AF 1 CA dex
|
|
0094B0 1 10 F7 bpl L94A9
|
|
0094B2 1 A9 C9 lda #$C9
|
|
0094B4 1 8D E4 92 sta L92E4
|
|
0094B7 1 A9 DF lda #$DF
|
|
0094B9 1 8D E5 92 sta L92E5
|
|
0094BC 1 20 3F 95 jsr L953F
|
|
0094BF 1 A9 04 lda #$04
|
|
0094C1 1 8D E3 92 sta L92E3
|
|
0094C4 1 AD D7 92 lda L92D7
|
|
0094C7 1 8D 5A EC sta $EC5A
|
|
0094CA 1 AD D8 92 lda L92D8
|
|
0094CD 1 8D 5B EC sta $EC5B
|
|
0094D0 1 20 09 40 jsr L4009
|
|
0094D3 1 A9 EB lda #$EB
|
|
0094D5 1 8D E4 92 sta L92E4
|
|
0094D8 1 A9 E6 lda #$E6
|
|
0094DA 1 8D E5 92 sta L92E5
|
|
0094DD 1 20 3F 95 jsr L953F
|
|
0094E0 1 A9 05 lda #$05
|
|
0094E2 1 8D E3 92 sta L92E3
|
|
0094E5 1 AD D3 92 lda L92D3
|
|
0094E8 1 8D 5A EC sta $EC5A
|
|
0094EB 1 AD D4 92 lda L92D4
|
|
0094EE 1 8D 5B EC sta $EC5B
|
|
0094F1 1 20 09 40 jsr L4009
|
|
0094F4 1 A9 EB lda #$EB
|
|
0094F6 1 8D E4 92 sta L92E4
|
|
0094F9 1 A9 E6 lda #$E6
|
|
0094FB 1 8D E5 92 sta L92E5
|
|
0094FE 1 20 3F 95 jsr L953F
|
|
009501 1 A9 06 lda #$06
|
|
009503 1 8D E3 92 sta L92E3
|
|
009506 1 AD 20 DF lda $DF20
|
|
009509 1 D0 0E bne L9519
|
|
00950B 1 AE 3A 95 ldx L953A
|
|
00950E 1 BD 3A 95 L950E: lda L953A,x
|
|
009511 1 9D C5 DF sta $DFC5,x
|
|
009514 1 CA dex
|
|
009515 1 10 F7 bpl L950E
|
|
009517 1 30 06 bmi L951F
|
|
009519 1 AD CD 92 L9519: lda L92CD
|
|
00951C 1 20 2D 40 jsr L402D
|
|
00951F 1 A9 C5 L951F: lda #$C5
|
|
009521 1 8D E4 92 sta L92E4
|
|
009524 1 A9 DF lda #$DF
|
|
009526 1 8D E5 92 sta L92E5
|
|
009529 1 20 3F 95 jsr L953F
|
|
00952C 1 D0 06 bne L9534
|
|
00952E 1 EE E6 92 L952E: inc L92E6
|
|
009531 1 4C F5 92 jmp L92F5
|
|
009534 1
|
|
009534 1 A9 00 L9534: lda #$00
|
|
009536 1 8D C9 DF sta $DFC9
|
|
009539 1 60 rts
|
|
00953A 1
|
|
00953A 1 04 20 L953A: tsb L0020
|
|
00953C 1 56 4F lsr $4F,x
|
|
00953E 1 4C .byte $4C
|
|
00953F 1 A0 06 L953F: ldy #$06
|
|
009541 1 A9 E3 lda #$E3
|
|
009543 1 A2 92 ldx #$92
|
|
009545 1 20 00 A5 jsr LA500
|
|
009548 1 60 rts
|
|
009549 1
|
|
009549 1 A2 00 L9549: ldx #$00
|
|
00954B 1 BD EC E6 L954B: lda $E6EC,x
|
|
00954E 1 C9 20 cmp #$20
|
|
009550 1 D0 03 bne L9555
|
|
009552 1 E8 inx
|
|
009553 1 D0 F6 bne L954B
|
|
009555 1 A0 00 L9555: ldy #$00
|
|
009557 1 CA dex
|
|
009558 1 BD EC E6 L9558: lda $E6EC,x
|
|
00955B 1 99 EC E6 sta $E6EC,y
|
|
00955E 1 C8 iny
|
|
00955F 1 E8 inx
|
|
009560 1 EC EB E6 cpx $E6EB
|
|
009563 1 D0 F3 bne L9558
|
|
009565 1 8C EB E6 sty $E6EB
|
|
009568 1 60 rts
|
|
009569 1
|
|
009569 1 02 .byte $02
|
|
00956A 1 20 02 C0 jsr RAMRDOFF
|
|
00956D 1 1F .byte $1F
|
|
00956E 1 00 L956E: brk
|
|
00956F 1 00 brk
|
|
009570 1 1F L9570: .byte $1F
|
|
009571 1 A9 00 L9571: lda #$00
|
|
009573 1 8D 06 97 sta L9706
|
|
009576 1 AD 06 97 L9576: lda L9706
|
|
009579 1 CD 21 DF cmp $DF21
|
|
00957C 1 D0 03 bne L9581
|
|
00957E 1 A9 00 lda #$00
|
|
009580 1 60 rts
|
|
009581 1
|
|
009581 1 AE 06 97 L9581: ldx L9706
|
|
009584 1 BD 22 DF lda $DF22,x
|
|
009587 1 C9 01 cmp #$01
|
|
009589 1 D0 06 bne L9591
|
|
00958B 1 EE 06 97 inc L9706
|
|
00958E 1 4C 76 95 jmp L9576
|
|
009591 1
|
|
009591 1 AD 20 DF L9591: lda $DF20
|
|
009594 1 F0 2C beq L95C2
|
|
009596 1 0A asl a
|
|
009597 1 AA tax
|
|
009598 1 BD B3 DF lda $DFB3,x
|
|
00959B 1 85 08 sta $08
|
|
00959D 1 BD B4 DF lda $DFB4,x
|
|
0095A0 1 85 09 sta $09
|
|
0095A2 1 AE 06 97 ldx L9706
|
|
0095A5 1 BD 22 DF lda $DF22,x
|
|
0095A8 1 20 8E 91 jsr L918E
|
|
0095AB 1 20 A0 91 jsr L91A0
|
|
0095AE 1 A0 00 ldy #$00
|
|
0095B0 1 B9 0A E0 L95B0: lda $E00A,y
|
|
0095B3 1 99 20 02 sta $0220,y
|
|
0095B6 1 C8 iny
|
|
0095B7 1 CC 20 02 cpy $0220
|
|
0095BA 1 D0 F4 bne L95B0
|
|
0095BC 1 CE 20 02 dec $0220
|
|
0095BF 1 4C E0 95 jmp L95E0
|
|
0095C2 1
|
|
0095C2 1 AE 06 97 L95C2: ldx L9706
|
|
0095C5 1 BD 22 DF lda $DF22,x
|
|
0095C8 1 20 8E 91 jsr L918E
|
|
0095CB 1 A0 00 ldy #$00
|
|
0095CD 1 B1 06 L95CD: lda (L0006),y
|
|
0095CF 1 99 20 02 sta $0220,y
|
|
0095D2 1 C8 iny
|
|
0095D3 1 CC 20 02 cpy $0220
|
|
0095D6 1 D0 F5 bne L95CD
|
|
0095D8 1 CE 20 02 dec $0220
|
|
0095DB 1 A9 2F lda #$2F
|
|
0095DD 1 8D 21 02 sta $0221
|
|
0095E0 1 AE 06 97 L95E0: ldx L9706
|
|
0095E3 1 BD 22 DF lda $DF22,x
|
|
0095E6 1 20 8E 91 jsr L918E
|
|
0095E9 1 A0 00 ldy #$00
|
|
0095EB 1 B1 06 lda (L0006),y
|
|
0095ED 1 A8 tay
|
|
0095EE 1 B1 06 L95EE: lda (L0006),y
|
|
0095F0 1 99 12 1F sta $1F12,y
|
|
0095F3 1 88 dey
|
|
0095F4 1 10 F8 bpl L95EE
|
|
0095F6 1 A0 00 ldy #$00
|
|
0095F8 1 B1 06 lda (L0006),y
|
|
0095FA 1 A8 tay
|
|
0095FB 1 88 dey
|
|
0095FC 1 38 sec
|
|
0095FD 1 E9 02 sbc #$02
|
|
0095FF 1 8D 00 1F sta $1F00
|
|
009602 1 B1 06 L9602: lda (L0006),y
|
|
009604 1 99 FF 1E sta $1EFF,y
|
|
009607 1 88 dey
|
|
009608 1 C0 01 cpy #$01
|
|
00960A 1 D0 F6 bne L9602
|
|
00960C 1 A9 00 lda #$00
|
|
00960E 1 20 F8 96 jsr L96F8
|
|
009611 1 A9 80 L9611: lda #$80
|
|
009613 1 20 F8 96 jsr L96F8
|
|
009616 1 F0 17 beq L962F
|
|
009618 1 AE 06 97 L9618: ldx L9706
|
|
00961B 1 BD 22 DF lda $DF22,x
|
|
00961E 1 20 8E 91 jsr L918E
|
|
009621 1 AC 12 1F ldy $1F12
|
|
009624 1 B9 12 1F L9624: lda $1F12,y
|
|
009627 1 91 06 sta (L0006),y
|
|
009629 1 88 dey
|
|
00962A 1 10 F8 bpl L9624
|
|
00962C 1 A9 FF lda #$FF
|
|
00962E 1 60 rts
|
|
00962F 1
|
|
00962F 1 84 08 L962F: sty $08
|
|
009631 1 8C 07 97 sty L9707
|
|
009634 1 86 09 stx $09
|
|
009636 1 8E 08 97 stx L9708
|
|
009639 1 AD 20 DF lda $DF20
|
|
00963C 1 F0 0F beq L964D
|
|
00963E 1 0A asl a
|
|
00963F 1 AA tax
|
|
009640 1 BD B3 DF lda $DFB3,x
|
|
009643 1 85 06 sta L0006
|
|
009645 1 BD B4 DF lda $DFB4,x
|
|
009648 1 85 07 sta $07
|
|
00964A 1 4C 55 96 jmp L9655
|
|
00964D 1
|
|
00964D 1 A9 05 L964D: lda #$05
|
|
00964F 1 85 06 sta L0006
|
|
009651 1 A9 97 lda #$97
|
|
009653 1 85 07 sta $07
|
|
009655 1 A0 00 L9655: ldy #$00
|
|
009657 1 B1 06 lda (L0006),y
|
|
009659 1 A8 tay
|
|
00965A 1 B1 06 L965A: lda (L0006),y
|
|
00965C 1 99 C0 1F sta $1FC0,y
|
|
00965F 1 88 dey
|
|
009660 1 10 F8 bpl L965A
|
|
009662 1 EE C0 1F inc $1FC0
|
|
009665 1 AE C0 1F ldx $1FC0
|
|
009668 1 A9 2F lda #$2F
|
|
00966A 1 9D C0 1F sta $1FC0,x
|
|
00966D 1 A0 00 ldy #$00
|
|
00966F 1 B1 08 lda ($08),y
|
|
009671 1 8D 09 97 sta L9709
|
|
009674 1 E8 L9674: inx
|
|
009675 1 C8 iny
|
|
009676 1 B1 08 lda ($08),y
|
|
009678 1 9D C0 1F sta $1FC0,x
|
|
00967B 1 CC 09 97 cpy L9709
|
|
00967E 1 D0 F4 bne L9674
|
|
009680 1 8E C0 1F stx $1FC0
|
|
009683 1 A0 C2 ldy #$C2
|
|
009685 1 A9 69 lda #$69
|
|
009687 1 A2 95 ldx #$95
|
|
009689 1 20 21 40 jsr L4021
|
|
00968C 1 F0 10 beq L969E
|
|
00968E 1 20 30 40 jsr L4030
|
|
009691 1 D0 03 bne L9696
|
|
009693 1 4C 11 96 jmp L9611
|
|
009696 1
|
|
009696 1 A9 40 L9696: lda #$40
|
|
009698 1 20 F8 96 jsr L96F8
|
|
00969B 1 4C 18 96 jmp L9618
|
|
00969E 1
|
|
00969E 1 A9 40 L969E: lda #$40
|
|
0096A0 1 20 F8 96 jsr L96F8
|
|
0096A3 1 AE 06 97 ldx L9706
|
|
0096A6 1 BD 22 DF lda $DF22,x
|
|
0096A9 1 8D 2B E2 sta $E22B
|
|
0096AC 1 A0 0E ldy #$0E
|
|
0096AE 1 A9 2B lda #$2B
|
|
0096B0 1 A2 E2 ldx #$E2
|
|
0096B2 1 20 18 40 jsr L4018
|
|
0096B5 1 AD 07 97 lda L9707
|
|
0096B8 1 85 08 sta $08
|
|
0096BA 1 AD 08 97 lda L9708
|
|
0096BD 1 85 09 sta $09
|
|
0096BF 1 AE 06 97 ldx L9706
|
|
0096C2 1 BD 22 DF lda $DF22,x
|
|
0096C5 1 20 8E 91 jsr L918E
|
|
0096C8 1 A0 00 ldy #$00
|
|
0096CA 1 B1 08 lda ($08),y
|
|
0096CC 1 18 clc
|
|
0096CD 1 69 02 adc #$02
|
|
0096CF 1 91 06 sta (L0006),y
|
|
0096D1 1 B1 08 lda ($08),y
|
|
0096D3 1 A8 tay
|
|
0096D4 1 E6 06 inc L0006
|
|
0096D6 1 D0 02 bne L96DA
|
|
0096D8 1 E6 07 inc $07
|
|
0096DA 1 B1 08 L96DA: lda ($08),y
|
|
0096DC 1 91 06 sta (L0006),y
|
|
0096DE 1 88 dey
|
|
0096DF 1 D0 F9 bne L96DA
|
|
0096E1 1 C6 06 dec L0006
|
|
0096E3 1 A5 06 lda L0006
|
|
0096E5 1 C9 FF cmp #$FF
|
|
0096E7 1 D0 02 bne L96EB
|
|
0096E9 1 C6 07 dec $07
|
|
0096EB 1 B1 06 L96EB: lda (L0006),y
|
|
0096ED 1 A8 tay
|
|
0096EE 1 A9 20 lda #$20
|
|
0096F0 1 91 06 sta (L0006),y
|
|
0096F2 1 EE 06 97 inc L9706
|
|
0096F5 1 4C 76 95 jmp L9576
|
|
0096F8 1
|
|
0096F8 1 8D 6E 95 L96F8: sta L956E
|
|
0096FB 1 A0 09 ldy #$09
|
|
0096FD 1 A9 6E lda #$6E
|
|
0096FF 1 A2 95 ldx #$95
|
|
009701 1 20 00 A5 jsr LA500
|
|
009704 1 60 rts
|
|
009705 1
|
|
009705 1 00 brk
|
|
009706 1 00 L9706: brk
|
|
009707 1 00 L9707: brk
|
|
009708 1 00 L9708: brk
|
|
009709 1 00 L9709: brk
|
|
00970A 1 03 .byte $03
|
|
00970B 1 20 02 00 jsr L0002
|
|
00970E 1 08 php
|
|
00970F 1 00 L970F: brk
|
|
009710 1 04 .byte $04
|
|
009711 1 00 L9711: brk
|
|
009712 1 18 clc
|
|
009713 1 97 04 smb1 $04
|
|
009715 1 00 brk
|
|
009716 1 00 brk
|
|
009717 1 00 brk
|
|
009718 1 00 brk
|
|
009719 1 00 brk
|
|
00971A 1 00 brk
|
|
00971B 1 00 brk
|
|
00971C 1 01 .byte $01
|
|
00971D 1 00 L971D: brk
|
|
00971E 1 04 .byte $04
|
|
00971F 1 00 L971F: brk
|
|
009720 1 AD 97 27 lda $2797
|
|
009723 1 00 brk
|
|
009724 1 00 brk
|
|
009725 1 00 brk
|
|
009726 1 04 .byte $04
|
|
009727 1 00 L9727: brk
|
|
009728 1 2E 97 05 rol $0597
|
|
00972B 1 00 brk
|
|
00972C 1 00 brk
|
|
00972D 1 00 brk
|
|
00972E 1 00 brk
|
|
00972F 1 00 brk
|
|
009730 1 00 brk
|
|
009731 1 00 brk
|
|
009732 1 00 brk
|
|
009733 1 00 brk
|
|
009734 1 00 brk
|
|
009735 1 00 brk
|
|
009736 1 00 brk
|
|
009737 1 01 .byte $01
|
|
009738 1 00 L9738: brk
|
|
009739 1 01 .byte $01
|
|
00973A 1 00 L973A: brk
|
|
00973B 1 01 20 ora (L0020,x)
|
|
00973D 1 02 .byte $02
|
|
00973E 1 03 .byte $03
|
|
00973F 1 20 02 00 jsr L0002
|
|
009742 1 0D .byte $0D
|
|
009743 1 00 L9743: brk
|
|
009744 1 03 .byte $03
|
|
009745 1 C0 1F cpy #$1F
|
|
009747 1 00 brk
|
|
009748 1 11 .byte $11
|
|
009749 1 00 L9749: brk
|
|
00974A 1 04 .byte $04
|
|
00974B 1 00 L974B: brk
|
|
00974C 1 00 brk
|
|
00974D 1 15 .byte $15
|
|
00974E 1 C0 L974E: .byte $C0
|
|
00974F 1 0A L974F: asl a
|
|
009750 1 00 L9750: brk
|
|
009751 1 00 L9751: brk
|
|
009752 1 04 .byte $04
|
|
009753 1 00 L9753: brk
|
|
009754 1 00 brk
|
|
009755 1 15 .byte $15
|
|
009756 1 C0 L9756: .byte $C0
|
|
009757 1 0A L9757: asl a
|
|
009758 1 00 brk
|
|
009759 1 00 brk
|
|
00975A 1 07 C0 L975A: rmb0 $C0
|
|
00975C 1 1F C3 00 bbr1 $C3,L975F
|
|
00975F 1 00 L975F: brk
|
|
009760 1 00 brk
|
|
009761 1 00 brk
|
|
009762 1 00 brk
|
|
009763 1 00 brk
|
|
009764 1 00 brk
|
|
009765 1 00 brk
|
|
009766 1 07 C0 L9766: rmb0 $C0
|
|
009768 1 1F .byte $1F
|
|
009769 1 00 L9769: brk
|
|
00976A 1 00 brk
|
|
00976B 1 00 L976B: brk
|
|
00976C 1 00 brk
|
|
00976D 1 00 L976D: brk
|
|
00976E 1 00 brk
|
|
00976F 1 00 brk
|
|
009770 1 00 brk
|
|
009771 1 00 brk
|
|
009772 1 00 brk
|
|
009773 1 00 brk
|
|
009774 1 0A L9774: asl a
|
|
009775 1 20 .byte $20
|
|
009776 1 02 .byte $02
|
|
009777 1 00 L9777: brk
|
|
009778 1 00 L9778: brk
|
|
009779 1 00 brk
|
|
00977A 1 00 brk
|
|
00977B 1 00 L977B: brk
|
|
00977C 1 00 L977C: brk
|
|
00977D 1 00 L977D: brk
|
|
00977E 1 00 brk
|
|
00977F 1 00 brk
|
|
009780 1 00 brk
|
|
009781 1 00 brk
|
|
009782 1 00 brk
|
|
009783 1 00 brk
|
|
009784 1 00 brk
|
|
009785 1 00 brk
|
|
009786 1 00 brk
|
|
009787 1 0A L9787: asl a
|
|
009788 1 C0 1F cpy #$1F
|
|
00978A 1 00 L978A: brk
|
|
00978B 1 00 brk
|
|
00978C 1 00 L978C: brk
|
|
00978D 1 00 L978D: brk
|
|
00978E 1 00 brk
|
|
00978F 1 00 L978F: brk
|
|
009790 1 00 L9790: brk
|
|
009791 1 00 brk
|
|
009792 1 00 brk
|
|
009793 1 00 brk
|
|
009794 1 00 brk
|
|
009795 1 00 brk
|
|
009796 1 00 brk
|
|
009797 1 00 brk
|
|
009798 1 00 brk
|
|
009799 1 00 brk
|
|
00979A 1 02 .byte $02
|
|
00979B 1 00 L979B: brk
|
|
00979C 1 00 brk
|
|
00979D 1 00 brk
|
|
00979E 1 00 brk
|
|
00979F 1 02 .byte $02
|
|
0097A0 1 00 L97A0: brk
|
|
0097A1 1 00 L97A1: brk
|
|
0097A2 1 00 L97A2: brk
|
|
0097A3 1 00 L97A3: brk
|
|
0097A4 1 02 .byte $02
|
|
0097A5 1 00 L97A5: brk
|
|
0097A6 1 00 L97A6: brk
|
|
0097A7 1 00 L97A7: brk
|
|
0097A8 1 00 L97A8: brk
|
|
0097A9 1 02 .byte $02
|
|
0097AA 1 00 brk
|
|
0097AB 1 00 brk
|
|
0097AC 1 08 php
|
|
0097AD 1 00 L97AD: brk
|
|
0097AE 1 00 L97AE: brk
|
|
0097AF 1 00 brk
|
|
0097B0 1 00 brk
|
|
0097B1 1 00 brk
|
|
0097B2 1 00 brk
|
|
0097B3 1 00 brk
|
|
0097B4 1 00 brk
|
|
0097B5 1 00 brk
|
|
0097B6 1 00 brk
|
|
0097B7 1 00 brk
|
|
0097B8 1 00 brk
|
|
0097B9 1 00 brk
|
|
0097BA 1 00 brk
|
|
0097BB 1 00 brk
|
|
0097BC 1 00 brk
|
|
0097BD 1 00 L97BD: brk
|
|
0097BE 1 00 brk
|
|
0097BF 1 00 brk
|
|
0097C0 1 00 brk
|
|
0097C1 1 00 brk
|
|
0097C2 1 00 brk
|
|
0097C3 1 00 brk
|
|
0097C4 1 00 brk
|
|
0097C5 1 00 brk
|
|
0097C6 1 00 brk
|
|
0097C7 1 00 brk
|
|
0097C8 1 00 brk
|
|
0097C9 1 00 brk
|
|
0097CA 1 00 brk
|
|
0097CB 1 00 brk
|
|
0097CC 1 00 brk
|
|
0097CD 1 00 brk
|
|
0097CE 1 00 brk
|
|
0097CF 1 00 brk
|
|
0097D0 1 00 brk
|
|
0097D1 1 00 brk
|
|
0097D2 1 00 brk
|
|
0097D3 1 00 brk
|
|
0097D4 1 00 brk
|
|
0097D5 1 00 brk
|
|
0097D6 1 00 brk
|
|
0097D7 1 00 brk
|
|
0097D8 1 00 brk
|
|
0097D9 1 00 brk
|
|
0097DA 1 00 brk
|
|
0097DB 1 00 brk
|
|
0097DC 1 00 brk
|
|
0097DD 1 36 9B L97DD: rol $9B,x
|
|
0097DF 1 33 L97DF: .byte $33
|
|
0097E0 1 9B .byte $9B
|
|
0097E1 1 E3 L97E1: .byte $E3
|
|
0097E2 1 97 .byte $97
|
|
0097E3 1 60 L97E3: rts
|
|
0097E4 1
|
|
0097E4 1 00 L97E4: brk
|
|
0097E5 1 AE 0C E1 L97E5: ldx $E10C
|
|
0097E8 1 AD 61 E0 lda $E061
|
|
0097EB 1 9D 62 E0 sta $E062,x
|
|
0097EE 1 E8 inx
|
|
0097EF 1 8E 0C E1 stx $E10C
|
|
0097F2 1 60 rts
|
|
0097F3 1
|
|
0097F3 1 AE 0C E1 L97F3: ldx $E10C
|
|
0097F6 1 CA dex
|
|
0097F7 1 BD 62 E0 lda $E062,x
|
|
0097FA 1 8D 61 E0 sta $E061
|
|
0097FD 1 8E 0C E1 stx $E10C
|
|
009800 1 60 rts
|
|
009801 1
|
|
009801 1 A9 00 L9801: lda #$00
|
|
009803 1 8D 5F E0 sta $E05F
|
|
009806 1 8D 0D E1 sta $E10D
|
|
009809 1 A0 C8 L9809: ldy #$C8
|
|
00980B 1 A9 0A lda #$0A
|
|
00980D 1 A2 97 ldx #$97
|
|
00980F 1 20 21 40 jsr L4021
|
|
009812 1 F0 0A beq L981E
|
|
009814 1 A2 80 ldx #$80
|
|
009816 1 20 33 40 jsr L4033
|
|
009819 1 F0 EE beq L9809
|
|
00981B 1 4C 9F A3 jmp LA39F
|
|
00981E 1
|
|
00981E 1 AD 0F 97 L981E: lda L970F
|
|
009821 1 8D 60 E0 sta $E060
|
|
009824 1 8D 11 97 sta L9711
|
|
009827 1 A0 CA L9827: ldy #$CA
|
|
009829 1 A9 10 lda #$10
|
|
00982B 1 A2 97 ldx #$97
|
|
00982D 1 20 21 40 jsr L4021
|
|
009830 1 F0 0A beq L983C
|
|
009832 1 A2 80 ldx #$80
|
|
009834 1 20 33 40 jsr L4033
|
|
009837 1 F0 EE beq L9827
|
|
009839 1 4C 9F A3 jmp LA39F
|
|
00983C 1
|
|
00983C 1 4C 5B 98 L983C: jmp L985B
|
|
00983F 1
|
|
00983F 1 AD 60 E0 L983F: lda $E060
|
|
009842 1 8D 1D 97 sta L971D
|
|
009845 1 A0 CC L9845: ldy #$CC
|
|
009847 1 A9 1C lda #$1C
|
|
009849 1 A2 97 ldx #$97
|
|
00984B 1 20 21 40 jsr L4021
|
|
00984E 1 F0 0A beq L985A
|
|
009850 1 A2 80 ldx #$80
|
|
009852 1 20 33 40 jsr L4033
|
|
009855 1 F0 EE beq L9845
|
|
009857 1 4C 9F A3 jmp LA39F
|
|
00985A 1
|
|
00985A 1 60 L985A: rts
|
|
00985B 1
|
|
00985B 1 EE 5F E0 L985B: inc $E05F
|
|
00985E 1 AD 60 E0 lda $E060
|
|
009861 1 8D 1F 97 sta L971F
|
|
009864 1 A0 CA L9864: ldy #$CA
|
|
009866 1 A9 1E lda #$1E
|
|
009868 1 A2 97 ldx #$97
|
|
00986A 1 20 21 40 jsr L4021
|
|
00986D 1 F0 0E beq L987D
|
|
00986F 1 C9 4C cmp #$4C
|
|
009871 1 F0 2C beq L989F
|
|
009873 1 A2 80 ldx #$80
|
|
009875 1 20 33 40 jsr L4033
|
|
009878 1 F0 EA beq L9864
|
|
00987A 1 4C 9F A3 jmp LA39F
|
|
00987D 1
|
|
00987D 1 EE 0D E1 L987D: inc $E10D
|
|
009880 1 AD 0D E1 lda $E10D
|
|
009883 1 CD 5E E0 cmp $E05E
|
|
009886 1 90 14 bcc L989C
|
|
009888 1 A9 00 lda #$00
|
|
00988A 1 8D 0D E1 sta $E10D
|
|
00988D 1 AD 60 E0 lda $E060
|
|
009890 1 8D 27 97 sta L9727
|
|
009893 1 A0 CA ldy #$CA
|
|
009895 1 A9 26 lda #$26
|
|
009897 1 A2 97 ldx #$97
|
|
009899 1 20 21 40 jsr L4021
|
|
00989C 1 A9 00 L989C: lda #$00
|
|
00989E 1 60 rts
|
|
00989F 1
|
|
00989F 1 A9 FF L989F: lda #$FF
|
|
0098A1 1 60 rts
|
|
0098A2 1
|
|
0098A2 1 AD 5F E0 L98A2: lda $E05F
|
|
0098A5 1 8D 61 E0 sta $E061
|
|
0098A8 1 20 3F 98 jsr L983F
|
|
0098AB 1 20 E5 97 jsr L97E5
|
|
0098AE 1 20 FD A2 jsr LA2FD
|
|
0098B1 1 4C 01 98 jmp L9801
|
|
0098B4 1
|
|
0098B4 1 20 3F 98 L98B4: jsr L983F
|
|
0098B7 1 20 2A 99 jsr L992A
|
|
0098BA 1 20 22 A3 jsr LA322
|
|
0098BD 1 20 F3 97 jsr L97F3
|
|
0098C0 1 20 01 98 jsr L9801
|
|
0098C3 1 20 C9 98 jsr L98C9
|
|
0098C6 1 4C 27 99 jmp L9927
|
|
0098C9 1
|
|
0098C9 1 AD 5F E0 L98C9: lda $E05F
|
|
0098CC 1 CD 61 E0 cmp $E061
|
|
0098CF 1 F0 06 beq L98D7
|
|
0098D1 1 20 5B 98 jsr L985B
|
|
0098D4 1 4C C9 98 jmp L98C9
|
|
0098D7 1
|
|
0098D7 1 60 L98D7: rts
|
|
0098D8 1
|
|
0098D8 1 A9 00 L98D8: lda #$00
|
|
0098DA 1 8D 5D E0 sta $E05D
|
|
0098DD 1 20 01 98 jsr L9801
|
|
0098E0 1 20 5B 98 L98E0: jsr L985B
|
|
0098E3 1 D0 2D bne L9912
|
|
0098E5 1 AD AD 97 lda L97AD
|
|
0098E8 1 F0 F6 beq L98E0
|
|
0098EA 1 AD AD 97 lda L97AD
|
|
0098ED 1 8D 2D 99 sta L992D
|
|
0098F0 1 29 0F and #$0F
|
|
0098F2 1 8D AD 97 sta L97AD
|
|
0098F5 1 A9 00 lda #$00
|
|
0098F7 1 8D 23 99 sta L9923
|
|
0098FA 1 20 24 99 jsr L9924
|
|
0098FD 1 AD 23 99 lda L9923
|
|
009900 1 D0 DE bne L98E0
|
|
009902 1 AD BD 97 lda L97BD
|
|
009905 1 C9 0F cmp #$0F
|
|
009907 1 D0 D7 bne L98E0
|
|
009909 1 20 A2 98 jsr L98A2
|
|
00990C 1 EE 5D E0 inc $E05D
|
|
00990F 1 4C E0 98 jmp L98E0
|
|
009912 1
|
|
009912 1 AD 5D E0 L9912: lda $E05D
|
|
009915 1 F0 09 beq L9920
|
|
009917 1 20 B4 98 jsr L98B4
|
|
00991A 1 CE 5D E0 dec $E05D
|
|
00991D 1 4C E0 98 jmp L98E0
|
|
009920 1
|
|
009920 1 4C 3F 98 L9920: jmp L983F
|
|
009923 1
|
|
009923 1 00 L9923: brk
|
|
009924 1 6C DD 97 L9924: jmp (L97DD)
|
|
009927 1
|
|
009927 1 6C DF 97 L9927: jmp (L97DF)
|
|
00992A 1
|
|
00992A 1 6C E1 97 L992A: jmp (L97E1)
|
|
00992D 1
|
|
00992D 1 00 L992D: brk
|
|
00992E 1 00 brk
|
|
00992F 1 00 brk
|
|
009930 1 00 brk
|
|
009931 1 36 9B L9931: rol $9B,x
|
|
009933 1 33 .byte $33
|
|
009934 1 9B .byte $9B
|
|
009935 1 E3 .byte $E3
|
|
009936 1 97 .byte $97
|
|
009937 1 00 L9937: brk
|
|
009938 1 00 L9938: brk
|
|
009939 1 00 L9939: brk
|
|
00993A 1 20 02 C0 jsr RAMRDOFF
|
|
00993D 1 1F .byte $1F
|
|
00993E 1 A9 00 L993E: lda #$00
|
|
009940 1 8D 37 99 sta L9937
|
|
009943 1 A9 5A lda #$5A
|
|
009945 1 8D 7D 91 sta L917D
|
|
009948 1 A9 99 lda #$99
|
|
00994A 1 8D 7E 91 sta L917E
|
|
00994D 1 A9 7C lda #$7C
|
|
00994F 1 8D 80 91 sta L9180
|
|
009952 1 A9 99 lda #$99
|
|
009954 1 8D 81 91 sta L9181
|
|
009957 1 4C BF 9B jmp L9BBF
|
|
00995A 1
|
|
00995A 1 8D 38 99 sta L9938
|
|
00995D 1 8E 39 99 stx L9939
|
|
009960 1 A9 01 lda #$01
|
|
009962 1 8D 37 99 sta L9937
|
|
009965 1 4C BF 9B jmp L9BBF
|
|
009968 1
|
|
009968 1 A0 05 L9968: ldy #$05
|
|
00996A 1 B9 31 99 L996A: lda L9931,y
|
|
00996D 1 99 DD 97 sta L97DD,y
|
|
009970 1 88 dey
|
|
009971 1 10 F7 bpl L996A
|
|
009973 1 A9 00 lda #$00
|
|
009975 1 8D 25 A4 sta LA425
|
|
009978 1 8D 8D 91 sta L918D
|
|
00997B 1 60 rts
|
|
00997C 1
|
|
00997C 1 A9 05 lda #$05
|
|
00997E 1 8D 37 99 sta L9937
|
|
009981 1 4C BF 9B jmp L9BBF
|
|
009984 1
|
|
009984 1 A9 00 L9984: lda #$00
|
|
009986 1 8D 37 99 sta L9937
|
|
009989 1 A9 A7 lda #$A7
|
|
00998B 1 8D 7D 91 sta L917D
|
|
00998E 1 A9 99 lda #$99
|
|
009990 1 8D 7E 91 sta L917E
|
|
009993 1 A9 DC lda #$DC
|
|
009995 1 8D 80 91 sta L9180
|
|
009998 1 A9 99 lda #$99
|
|
00999A 1 8D 81 91 sta L9181
|
|
00999D 1 A0 0A ldy #$0A
|
|
00999F 1 A9 37 lda #$37
|
|
0099A1 1 A2 99 ldx #$99
|
|
0099A3 1 20 00 A5 jsr LA500
|
|
0099A6 1 60 rts
|
|
0099A7 1
|
|
0099A7 1 8D 38 99 sta L9938
|
|
0099AA 1 8E 39 99 stx L9939
|
|
0099AD 1 A9 01 lda #$01
|
|
0099AF 1 8D 37 99 sta L9937
|
|
0099B2 1 A0 0A ldy #$0A
|
|
0099B4 1 A9 37 lda #$37
|
|
0099B6 1 A2 99 ldx #$99
|
|
0099B8 1 20 00 A5 jsr LA500
|
|
0099BB 1 60 rts
|
|
0099BC 1
|
|
0099BC 1 A9 80 L99BC: lda #$80
|
|
0099BE 1 8D 8D 91 sta L918D
|
|
0099C1 1 A0 05 ldy #$05
|
|
0099C3 1 B9 31 99 L99C3: lda L9931,y
|
|
0099C6 1 99 DD 97 sta L97DD,y
|
|
0099C9 1 88 dey
|
|
0099CA 1 10 F7 bpl L99C3
|
|
0099CC 1 A9 00 lda #$00
|
|
0099CE 1 8D 25 A4 sta LA425
|
|
0099D1 1 A9 EB lda #$EB
|
|
0099D3 1 8D 86 91 sta L9186
|
|
0099D6 1 A9 99 lda #$99
|
|
0099D8 1 8D 87 91 sta L9187
|
|
0099DB 1 60 rts
|
|
0099DC 1
|
|
0099DC 1 A9 03 lda #$03
|
|
0099DE 1 8D 37 99 sta L9937
|
|
0099E1 1 A0 0A ldy #$0A
|
|
0099E3 1 A9 37 lda #$37
|
|
0099E5 1 A2 99 ldx #$99
|
|
0099E7 1 20 00 A5 jsr LA500
|
|
0099EA 1 60 rts
|
|
0099EB 1
|
|
0099EB 1 A9 04 lda #$04
|
|
0099ED 1 8D 37 99 sta L9937
|
|
0099F0 1 A0 0A ldy #$0A
|
|
0099F2 1 A9 37 lda #$37
|
|
0099F4 1 A2 99 ldx #$99
|
|
0099F6 1 20 00 A5 jsr LA500
|
|
0099F9 1 C9 02 cmp #$02
|
|
0099FB 1 D0 01 bne L99FE
|
|
0099FD 1 60 rts
|
|
0099FE 1
|
|
0099FE 1 4C 9F A3 L99FE: jmp LA39F
|
|
009A01 1
|
|
009A01 1 A9 80 L9A01: lda #$80
|
|
009A03 1 8D 5B E0 sta $E05B
|
|
009A06 1 A9 00 lda #$00
|
|
009A08 1 8D 5C E0 sta $E05C
|
|
009A0B 1 F0 02 beq L9A0F
|
|
009A0D 1 A9 FF L9A0D: lda #$FF
|
|
009A0F 1 8D 31 9B L9A0F: sta L9B31
|
|
009A12 1 A9 02 lda #$02
|
|
009A14 1 8D 37 99 sta L9937
|
|
009A17 1 20 79 A3 jsr LA379
|
|
009A1A 1 2C 89 91 bit L9189
|
|
009A1D 1 50 03 bvc L9A22
|
|
009A1F 1 20 C9 9B jsr L9BC9
|
|
009A22 1 2C 5B E0 L9A22: bit $E05B
|
|
009A25 1 10 49 bpl L9A70
|
|
009A27 1 70 27 bvs L9A50
|
|
009A29 1 AD 31 9B lda L9B31
|
|
009A2C 1 D0 08 bne L9A36
|
|
009A2E 1 AD 20 DF lda $DF20
|
|
009A31 1 D0 03 bne L9A36
|
|
009A33 1 4C 28 9B jmp L9B28
|
|
009A36 1
|
|
009A36 1 AE C0 1F L9A36: ldx $1FC0
|
|
009A39 1 AC 32 9B ldy L9B32
|
|
009A3C 1 88 dey
|
|
009A3D 1 C8 L9A3D: iny
|
|
009A3E 1 E8 inx
|
|
009A3F 1 B9 20 02 lda $0220,y
|
|
009A42 1 9D C0 1F sta $1FC0,x
|
|
009A45 1 CC 20 02 cpy $0220
|
|
009A48 1 D0 F3 bne L9A3D
|
|
009A4A 1 8E C0 1F stx $1FC0
|
|
009A4D 1 4C 70 9A jmp L9A70
|
|
009A50 1
|
|
009A50 1 AE C0 1F L9A50: ldx $1FC0
|
|
009A53 1 A9 2F lda #$2F
|
|
009A55 1 9D C1 1F sta $1FC1,x
|
|
009A58 1 EE C0 1F inc $1FC0
|
|
009A5B 1 A0 00 ldy #$00
|
|
009A5D 1 AE C0 1F ldx $1FC0
|
|
009A60 1 C8 L9A60: iny
|
|
009A61 1 E8 inx
|
|
009A62 1 B9 4B E0 lda $E04B,y
|
|
009A65 1 9D C0 1F sta $1FC0,x
|
|
009A68 1 CC 4B E0 cpy $E04B
|
|
009A6B 1 D0 F3 bne L9A60
|
|
009A6D 1 8E C0 1F stx $1FC0
|
|
009A70 1 A0 C4 L9A70: ldy #$C4
|
|
009A72 1 A9 74 lda #$74
|
|
009A74 1 A2 97 ldx #$97
|
|
009A76 1 20 21 40 jsr L4021
|
|
009A79 1 F0 06 beq L9A81
|
|
009A7B 1 20 9B A4 jsr LA49B
|
|
009A7E 1 4C 70 9A jmp L9A70
|
|
009A81 1
|
|
009A81 1 AD 7B 97 L9A81: lda L977B
|
|
009A84 1 C9 0F cmp #$0F
|
|
009A86 1 F0 08 beq L9A90
|
|
009A88 1 C9 0D cmp #$0D
|
|
009A8A 1 F0 04 beq L9A90
|
|
009A8C 1 A9 00 lda #$00
|
|
009A8E 1 F0 05 beq L9A95
|
|
009A90 1 20 F1 A2 L9A90: jsr LA2F1
|
|
009A93 1 A9 FF lda #$FF
|
|
009A95 1 8D 30 9B L9A95: sta L9B30
|
|
009A98 1 20 0A A4 jsr LA40A
|
|
009A9B 1 AD EE A2 lda LA2EE
|
|
009A9E 1 D0 08 bne L9AA8
|
|
009AA0 1 AD ED A2 lda LA2ED
|
|
009AA3 1 D0 03 bne L9AA8
|
|
009AA5 1 4C 9F A3 jmp LA39F
|
|
009AA8 1
|
|
009AA8 1 A0 07 L9AA8: ldy #$07
|
|
009AAA 1 B9 74 97 L9AAA: lda L9774,y
|
|
009AAD 1 99 66 97 sta L9766,y
|
|
009AB0 1 88 dey
|
|
009AB1 1 C0 02 cpy #$02
|
|
009AB3 1 D0 F5 bne L9AAA
|
|
009AB5 1 A9 C3 lda #$C3
|
|
009AB7 1 8D 69 97 sta L9769
|
|
009ABA 1 AD 5B E0 lda $E05B
|
|
009ABD 1 F0 64 beq L9B23
|
|
009ABF 1 20 01 9C jsr L9C01
|
|
009AC2 1 B0 68 bcs L9B2C
|
|
009AC4 1 A0 11 ldy #$11
|
|
009AC6 1 A2 0B ldx #$0B
|
|
009AC8 1 B9 74 97 L9AC8: lda L9774,y
|
|
009ACB 1 9D 66 97 sta L9766,x
|
|
009ACE 1 CA dex
|
|
009ACF 1 88 dey
|
|
009AD0 1 C0 0D cpy #$0D
|
|
009AD2 1 D0 F4 bne L9AC8
|
|
009AD4 1 AD 6D 97 lda L976D
|
|
009AD7 1 C9 0F cmp #$0F
|
|
009AD9 1 D0 05 bne L9AE0
|
|
009ADB 1 A9 0D lda #$0D
|
|
009ADD 1 8D 6D 97 sta L976D
|
|
009AE0 1 A0 C0 L9AE0: ldy #$C0
|
|
009AE2 1 A9 66 lda #$66
|
|
009AE4 1 A2 97 ldx #$97
|
|
009AE6 1 20 21 40 jsr L4021
|
|
009AE9 1 F0 38 beq L9B23
|
|
009AEB 1 C9 47 cmp #$47
|
|
009AED 1 D0 2E bne L9B1D
|
|
009AEF 1 2C 8D 91 bit L918D
|
|
009AF2 1 30 20 bmi L9B14
|
|
009AF4 1 A9 03 lda #$03
|
|
009AF6 1 8D 37 99 sta L9937
|
|
009AF9 1 20 BF 9B jsr L9BBF
|
|
009AFC 1 48 pha
|
|
009AFD 1 A9 02 lda #$02
|
|
009AFF 1 8D 37 99 sta L9937
|
|
009B02 1 68 pla
|
|
009B03 1 C9 02 cmp #$02
|
|
009B05 1 F0 0D beq L9B14
|
|
009B07 1 C9 03 cmp #$03
|
|
009B09 1 F0 21 beq L9B2C
|
|
009B0B 1 C9 04 cmp #$04
|
|
009B0D 1 D0 0B bne L9B1A
|
|
009B0F 1 A9 80 lda #$80
|
|
009B11 1 8D 8D 91 sta L918D
|
|
009B14 1 20 26 A4 L9B14: jsr LA426
|
|
009B17 1 4C 23 9B jmp L9B23
|
|
009B1A 1
|
|
009B1A 1 4C 9F A3 L9B1A: jmp LA39F
|
|
009B1D 1
|
|
009B1D 1 20 9B A4 L9B1D: jsr LA49B
|
|
009B20 1 4C E0 9A jmp L9AE0
|
|
009B23 1
|
|
009B23 1 AD 30 9B L9B23: lda L9B30
|
|
009B26 1 F0 05 beq L9B2D
|
|
009B28 1 4C D8 98 L9B28: jmp L98D8
|
|
009B2B 1
|
|
009B2B 1 00 brk
|
|
009B2C 1 60 L9B2C: rts
|
|
009B2D 1
|
|
009B2D 1 4C DA 9C L9B2D: jmp L9CDA
|
|
009B30 1
|
|
009B30 1 00 L9B30: brk
|
|
009B31 1 00 L9B31: brk
|
|
009B32 1 00 L9B32: brk
|
|
009B33 1 4C 60 A3 jmp LA360
|
|
009B36 1
|
|
009B36 1 20 D1 A3 jsr LA3D1
|
|
009B39 1 F0 03 beq L9B3E
|
|
009B3B 1 4C 9F A3 jmp LA39F
|
|
009B3E 1
|
|
009B3E 1 AD BD 97 L9B3E: lda L97BD
|
|
009B41 1 C9 0F cmp #$0F
|
|
009B43 1 D0 43 bne L9B88
|
|
009B45 1 20 FD A2 jsr LA2FD
|
|
009B48 1 A0 C4 L9B48: ldy #$C4
|
|
009B4A 1 A9 74 lda #$74
|
|
009B4C 1 A2 97 ldx #$97
|
|
009B4E 1 20 21 40 jsr L4021
|
|
009B51 1 F0 06 beq L9B59
|
|
009B53 1 20 9B A4 jsr LA49B
|
|
009B56 1 4C 48 9B jmp L9B48
|
|
009B59 1
|
|
009B59 1 20 3B A3 L9B59: jsr LA33B
|
|
009B5C 1 20 0A A4 jsr LA40A
|
|
009B5F 1 20 F1 A2 jsr LA2F1
|
|
009B62 1 AD EE A2 lda LA2EE
|
|
009B65 1 D0 08 bne L9B6F
|
|
009B67 1 AD ED A2 lda LA2ED
|
|
009B6A 1 D0 03 bne L9B6F
|
|
009B6C 1 4C 9F A3 jmp LA39F
|
|
009B6F 1
|
|
009B6F 1 20 19 9E L9B6F: jsr L9E19
|
|
009B72 1 B0 06 bcs L9B7A
|
|
009B74 1 20 22 A3 jsr LA322
|
|
009B77 1 4C BE 9B jmp L9BBE
|
|
009B7A 1
|
|
009B7A 1 20 60 A3 L9B7A: jsr LA360
|
|
009B7D 1 20 22 A3 jsr LA322
|
|
009B80 1 A9 FF lda #$FF
|
|
009B82 1 8D 23 99 sta L9923
|
|
009B85 1 4C BE 9B jmp L9BBE
|
|
009B88 1
|
|
009B88 1 20 3B A3 L9B88: jsr LA33B
|
|
009B8B 1 20 FD A2 jsr LA2FD
|
|
009B8E 1 20 0A A4 jsr LA40A
|
|
009B91 1 A0 C4 L9B91: ldy #$C4
|
|
009B93 1 A9 74 lda #$74
|
|
009B95 1 A2 97 ldx #$97
|
|
009B97 1 20 21 40 jsr L4021
|
|
009B9A 1 F0 06 beq L9BA2
|
|
009B9C 1 20 9B A4 jsr LA49B
|
|
009B9F 1 4C 91 9B jmp L9B91
|
|
009BA2 1
|
|
009BA2 1 20 01 9C L9BA2: jsr L9C01
|
|
009BA5 1 90 03 bcc L9BAA
|
|
009BA7 1 4C 9F A3 jmp LA39F
|
|
009BAA 1
|
|
009BAA 1 20 22 A3 L9BAA: jsr LA322
|
|
009BAD 1 20 19 9E jsr L9E19
|
|
009BB0 1 B0 09 bcs L9BBB
|
|
009BB2 1 20 FD A2 jsr LA2FD
|
|
009BB5 1 20 DA 9C jsr L9CDA
|
|
009BB8 1 20 22 A3 jsr LA322
|
|
009BBB 1 20 60 A3 L9BBB: jsr LA360
|
|
009BBE 1 60 L9BBE: rts
|
|
009BBF 1
|
|
009BBF 1 A0 01 L9BBF: ldy #$01
|
|
009BC1 1 A9 37 lda #$37
|
|
009BC3 1 A2 99 ldx #$99
|
|
009BC5 1 20 00 A5 jsr LA500
|
|
009BC8 1 60 rts
|
|
009BC9 1
|
|
009BC9 1 A0 C4 L9BC9: ldy #$C4
|
|
009BCB 1 A9 87 lda #$87
|
|
009BCD 1 A2 97 ldx #$97
|
|
009BCF 1 20 21 40 jsr L4021
|
|
009BD2 1 F0 06 beq L9BDA
|
|
009BD4 1 20 97 A4 jsr LA497
|
|
009BD7 1 4C C9 9B jmp L9BC9
|
|
009BDA 1
|
|
009BDA 1 AD 8C 97 L9BDA: lda L978C
|
|
009BDD 1 38 sec
|
|
009BDE 1 ED 8F 97 sbc L978F
|
|
009BE1 1 8D FF 9B sta L9BFF
|
|
009BE4 1 AD 8D 97 lda L978D
|
|
009BE7 1 ED 90 97 sbc L9790
|
|
009BEA 1 8D 00 9C sta L9C00
|
|
009BED 1 AD FF 9B lda L9BFF
|
|
009BF0 1 CD EF A2 cmp LA2EF
|
|
009BF3 1 AD 00 9C lda L9C00
|
|
009BF6 1 ED F0 A2 sbc LA2F0
|
|
009BF9 1 B0 03 bcs L9BFE
|
|
009BFB 1 4C 85 91 jmp L9185
|
|
009BFE 1
|
|
009BFE 1 60 L9BFE: rts
|
|
009BFF 1
|
|
009BFF 1 00 L9BFF: brk
|
|
009C00 1 00 L9C00: brk
|
|
009C01 1 20 1A 9C L9C01: jsr L9C1A
|
|
009C04 1 90 13 bcc L9C19
|
|
009C06 1 A9 04 lda #$04
|
|
009C08 1 8D 37 99 sta L9937
|
|
009C0B 1 20 BF 9B jsr L9BBF
|
|
009C0E 1 F0 03 beq L9C13
|
|
009C10 1 4C 9F A3 jmp LA39F
|
|
009C13 1
|
|
009C13 1 A9 03 L9C13: lda #$03
|
|
009C15 1 8D 37 99 sta L9937
|
|
009C18 1 38 sec
|
|
009C19 1 60 L9C19: rts
|
|
009C1A 1
|
|
009C1A 1 A0 C4 L9C1A: ldy #$C4
|
|
009C1C 1 A9 74 lda #$74
|
|
009C1E 1 A2 97 ldx #$97
|
|
009C20 1 20 21 40 jsr L4021
|
|
009C23 1 F0 06 beq L9C2B
|
|
009C25 1 20 9B A4 jsr LA49B
|
|
009C28 1 4C 1A 9C jmp L9C1A
|
|
009C2B 1
|
|
009C2B 1 A9 00 L9C2B: lda #$00
|
|
009C2D 1 8D D8 9C sta L9CD8
|
|
009C30 1 8D D9 9C sta L9CD9
|
|
009C33 1 A0 C4 L9C33: ldy #$C4
|
|
009C35 1 A9 87 lda #$87
|
|
009C37 1 A2 97 ldx #$97
|
|
009C39 1 20 21 40 jsr L4021
|
|
009C3C 1 F0 0A beq L9C48
|
|
009C3E 1 C9 46 cmp #$46
|
|
009C40 1 F0 12 beq L9C54
|
|
009C42 1 20 97 A4 jsr LA497
|
|
009C45 1 4C 33 9C jmp L9C33
|
|
009C48 1
|
|
009C48 1 AD 8F 97 L9C48: lda L978F
|
|
009C4B 1 8D D8 9C sta L9CD8
|
|
009C4E 1 AD 90 97 lda L9790
|
|
009C51 1 8D D9 9C sta L9CD9
|
|
009C54 1 AD C0 1F L9C54: lda $1FC0
|
|
009C57 1 8D D6 9C sta L9CD6
|
|
009C5A 1 A0 01 ldy #$01
|
|
009C5C 1 C8 L9C5C: iny
|
|
009C5D 1 CC C0 1F cpy $1FC0
|
|
009C60 1 B0 6A bcs L9CCC
|
|
009C62 1 B9 C0 1F lda $1FC0,y
|
|
009C65 1 C9 2F cmp #$2F
|
|
009C67 1 D0 F3 bne L9C5C
|
|
009C69 1 98 tya
|
|
009C6A 1 8D C0 1F sta $1FC0
|
|
009C6D 1 8D D7 9C sta L9CD7
|
|
009C70 1 A0 C4 L9C70: ldy #$C4
|
|
009C72 1 A9 87 lda #$87
|
|
009C74 1 A2 97 ldx #$97
|
|
009C76 1 20 21 40 jsr L4021
|
|
009C79 1 F0 1A beq L9C95
|
|
009C7B 1 48 pha
|
|
009C7C 1 AD D6 9C lda L9CD6
|
|
009C7F 1 8D C0 1F sta $1FC0
|
|
009C82 1 68 pla
|
|
009C83 1 20 97 A4 jsr LA497
|
|
009C86 1 4C 70 9C jmp L9C70
|
|
009C89 1
|
|
009C89 1 AD D7 9C lda L9CD7
|
|
009C8C 1 8D C0 1F sta $1FC0
|
|
009C8F 1 4C 70 9C jmp L9C70
|
|
009C92 1
|
|
009C92 1 4C 9F A3 jmp LA39F
|
|
009C95 1
|
|
009C95 1 AD 8C 97 L9C95: lda L978C
|
|
009C98 1 38 sec
|
|
009C99 1 ED 8F 97 sbc L978F
|
|
009C9C 1 8D D4 9C sta L9CD4
|
|
009C9F 1 AD 8D 97 lda L978D
|
|
009CA2 1 ED 90 97 sbc L9790
|
|
009CA5 1 8D D5 9C sta L9CD5
|
|
009CA8 1 AD D4 9C lda L9CD4
|
|
009CAB 1 18 clc
|
|
009CAC 1 6D D8 9C adc L9CD8
|
|
009CAF 1 8D D4 9C sta L9CD4
|
|
009CB2 1 AD D5 9C lda L9CD5
|
|
009CB5 1 6D D9 9C adc L9CD9
|
|
009CB8 1 8D D5 9C sta L9CD5
|
|
009CBB 1 AD D4 9C lda L9CD4
|
|
009CBE 1 CD 7C 97 cmp L977C
|
|
009CC1 1 AD D5 9C lda L9CD5
|
|
009CC4 1 ED 7D 97 sbc L977D
|
|
009CC7 1 B0 03 bcs L9CCC
|
|
009CC9 1 38 sec
|
|
009CCA 1 B0 01 bcs L9CCD
|
|
009CCC 1 18 L9CCC: clc
|
|
009CCD 1 AD D6 9C L9CCD: lda L9CD6
|
|
009CD0 1 8D C0 1F sta $1FC0
|
|
009CD3 1 60 rts
|
|
009CD4 1
|
|
009CD4 1 00 L9CD4: brk
|
|
009CD5 1 00 L9CD5: brk
|
|
009CD6 1 00 L9CD6: brk
|
|
009CD7 1 00 L9CD7: brk
|
|
009CD8 1 00 L9CD8: brk
|
|
009CD9 1 00 L9CD9: brk
|
|
009CDA 1 20 F1 A2 L9CDA: jsr LA2F1
|
|
009CDD 1 A9 00 lda #$00
|
|
009CDF 1 8D 17 9E sta L9E17
|
|
009CE2 1 8D 18 9E sta L9E18
|
|
009CE5 1 8D A1 97 sta L97A1
|
|
009CE8 1 8D A2 97 sta L97A2
|
|
009CEB 1 8D A3 97 sta L97A3
|
|
009CEE 1 8D A6 97 sta L97A6
|
|
009CF1 1 8D A7 97 sta L97A7
|
|
009CF4 1 8D A8 97 sta L97A8
|
|
009CF7 1 20 62 9D jsr L9D62
|
|
009CFA 1 20 74 9D jsr L9D74
|
|
009CFD 1 20 81 9D jsr L9D81
|
|
009D00 1 F0 07 beq L9D09
|
|
009D02 1 A9 FF lda #$FF
|
|
009D04 1 8D 17 9E sta L9E17
|
|
009D07 1 D0 03 bne L9D0C
|
|
009D09 1 20 9C 9D L9D09: jsr L9D9C
|
|
009D0C 1 20 A9 9D L9D0C: jsr L9DA9
|
|
009D0F 1 2C 17 9E bit L9E17
|
|
009D12 1 10 14 bpl L9D28
|
|
009D14 1 20 0D 9E jsr L9E0D
|
|
009D17 1 20 81 9D L9D17: jsr L9D81
|
|
009D1A 1 D0 FB bne L9D17
|
|
009D1C 1 20 9C 9D jsr L9D9C
|
|
009D1F 1 A0 CE ldy #$CE
|
|
009D21 1 A9 A4 lda #$A4
|
|
009D23 1 A2 97 ldx #$97
|
|
009D25 1 20 21 40 jsr L4021
|
|
009D28 1 2C 18 9E L9D28: bit L9E18
|
|
009D2B 1 30 24 bmi L9D51
|
|
009D2D 1 20 E8 9D jsr L9DE8
|
|
009D30 1 2C 17 9E bit L9E17
|
|
009D33 1 10 D7 bpl L9D0C
|
|
009D35 1 20 03 9E jsr L9E03
|
|
009D38 1 20 62 9D jsr L9D62
|
|
009D3B 1 20 74 9D jsr L9D74
|
|
009D3E 1 A0 CE ldy #$CE
|
|
009D40 1 A9 9F lda #$9F
|
|
009D42 1 A2 97 ldx #$97
|
|
009D44 1 20 21 40 jsr L4021
|
|
009D47 1 F0 C3 beq L9D0C
|
|
009D49 1 A9 FF lda #$FF
|
|
009D4B 1 8D 18 9E sta L9E18
|
|
009D4E 1 4C 0C 9D jmp L9D0C
|
|
009D51 1
|
|
009D51 1 20 03 9E L9D51: jsr L9E03
|
|
009D54 1 2C 17 9E bit L9E17
|
|
009D57 1 30 03 bmi L9D5C
|
|
009D59 1 20 0D 9E jsr L9E0D
|
|
009D5C 1 20 6D A4 L9D5C: jsr LA46D
|
|
009D5F 1 4C 79 A4 jmp LA479
|
|
009D62 1
|
|
009D62 1 A0 C8 L9D62: ldy #$C8
|
|
009D64 1 A9 3E lda #$3E
|
|
009D66 1 A2 97 ldx #$97
|
|
009D68 1 20 21 40 jsr L4021
|
|
009D6B 1 F0 06 beq L9D73
|
|
009D6D 1 20 9B A4 jsr LA49B
|
|
009D70 1 4C 62 9D jmp L9D62
|
|
009D73 1
|
|
009D73 1 60 L9D73: rts
|
|
009D74 1
|
|
009D74 1 AD 43 97 L9D74: lda L9743
|
|
009D77 1 8D 4B 97 sta L974B
|
|
009D7A 1 8D 38 97 sta L9738
|
|
009D7D 1 8D A0 97 sta L97A0
|
|
009D80 1 60 rts
|
|
009D81 1
|
|
009D81 1 A0 C8 L9D81: ldy #$C8
|
|
009D83 1 A9 44 lda #$44
|
|
009D85 1 A2 97 ldx #$97
|
|
009D87 1 20 21 40 jsr L4021
|
|
009D8A 1 F0 0F beq L9D9B
|
|
009D8C 1 C9 45 cmp #$45
|
|
009D8E 1 F0 06 beq L9D96
|
|
009D90 1 20 97 A4 jsr LA497
|
|
009D93 1 4C 81 9D jmp L9D81
|
|
009D96 1
|
|
009D96 1 20 97 A4 L9D96: jsr LA497
|
|
009D99 1 A9 45 lda #$45
|
|
009D9B 1 60 L9D9B: rts
|
|
009D9C 1
|
|
009D9C 1 AD 49 97 L9D9C: lda L9749
|
|
009D9F 1 8D 53 97 sta L9753
|
|
009DA2 1 8D 3A 97 sta L973A
|
|
009DA5 1 8D A5 97 sta L97A5
|
|
009DA8 1 60 rts
|
|
009DA9 1
|
|
009DA9 1 A9 C0 L9DA9: lda #$C0
|
|
009DAB 1 8D 4E 97 sta L974E
|
|
009DAE 1 A9 0A lda #$0A
|
|
009DB0 1 8D 4F 97 sta L974F
|
|
009DB3 1 A0 CA L9DB3: ldy #$CA
|
|
009DB5 1 A9 4A lda #$4A
|
|
009DB7 1 A2 97 ldx #$97
|
|
009DB9 1 20 21 40 jsr L4021
|
|
009DBC 1 F0 0A beq L9DC8
|
|
009DBE 1 C9 4C cmp #$4C
|
|
009DC0 1 F0 17 beq L9DD9
|
|
009DC2 1 20 9B A4 jsr LA49B
|
|
009DC5 1 4C B3 9D jmp L9DB3
|
|
009DC8 1
|
|
009DC8 1 AD 50 97 L9DC8: lda L9750
|
|
009DCB 1 8D 56 97 sta L9756
|
|
009DCE 1 AD 51 97 lda L9751
|
|
009DD1 1 8D 57 97 sta L9757
|
|
009DD4 1 0D 50 97 ora L9750
|
|
009DD7 1 D0 05 bne L9DDE
|
|
009DD9 1 A9 FF L9DD9: lda #$FF
|
|
009DDB 1 8D 18 9E sta L9E18
|
|
009DDE 1 A0 CF L9DDE: ldy #$CF
|
|
009DE0 1 A9 9F lda #$9F
|
|
009DE2 1 A2 97 ldx #$97
|
|
009DE4 1 20 21 40 jsr L4021
|
|
009DE7 1 60 rts
|
|
009DE8 1
|
|
009DE8 1 A0 CB L9DE8: ldy #$CB
|
|
009DEA 1 A9 52 lda #$52
|
|
009DEC 1 A2 97 ldx #$97
|
|
009DEE 1 20 21 40 jsr L4021
|
|
009DF1 1 F0 06 beq L9DF9
|
|
009DF3 1 20 97 A4 jsr LA497
|
|
009DF6 1 4C E8 9D jmp L9DE8
|
|
009DF9 1
|
|
009DF9 1 A0 CF L9DF9: ldy #$CF
|
|
009DFB 1 A9 A4 lda #$A4
|
|
009DFD 1 A2 97 ldx #$97
|
|
009DFF 1 20 21 40 jsr L4021
|
|
009E02 1 60 rts
|
|
009E03 1
|
|
009E03 1 A0 CC L9E03: ldy #$CC
|
|
009E05 1 A9 39 lda #$39
|
|
009E07 1 A2 97 ldx #$97
|
|
009E09 1 20 21 40 jsr L4021
|
|
009E0C 1 60 rts
|
|
009E0D 1
|
|
009E0D 1 A0 CC L9E0D: ldy #$CC
|
|
009E0F 1 A9 37 lda #$37
|
|
009E11 1 A2 97 ldx #$97
|
|
009E13 1 20 21 40 jsr L4021
|
|
009E16 1 60 rts
|
|
009E17 1
|
|
009E17 1 00 L9E17: brk
|
|
009E18 1 00 L9E18: brk
|
|
009E19 1 A2 07 L9E19: ldx #$07
|
|
009E1B 1 BD 74 97 L9E1B: lda L9774,x
|
|
009E1E 1 9D 5A 97 sta L975A,x
|
|
009E21 1 CA dex
|
|
009E22 1 E0 03 cpx #$03
|
|
009E24 1 D0 F5 bne L9E1B
|
|
009E26 1 A0 C0 L9E26: ldy #$C0
|
|
009E28 1 A9 5A lda #$5A
|
|
009E2A 1 A2 97 ldx #$97
|
|
009E2C 1 20 21 40 jsr L4021
|
|
009E2F 1 F0 3E beq L9E6F
|
|
009E31 1 C9 47 cmp #$47
|
|
009E33 1 D0 34 bne L9E69
|
|
009E35 1 2C 8D 91 bit L918D
|
|
009E38 1 30 26 bmi L9E60
|
|
009E3A 1 A9 03 lda #$03
|
|
009E3C 1 8D 37 99 sta L9937
|
|
009E3F 1 A0 01 ldy #$01
|
|
009E41 1 A9 37 lda #$37
|
|
009E43 1 A2 99 ldx #$99
|
|
009E45 1 20 00 A5 jsr LA500
|
|
009E48 1 48 pha
|
|
009E49 1 A9 02 lda #$02
|
|
009E4B 1 8D 37 99 sta L9937
|
|
009E4E 1 68 pla
|
|
009E4F 1 C9 02 cmp #$02
|
|
009E51 1 F0 0D beq L9E60
|
|
009E53 1 C9 03 cmp #$03
|
|
009E55 1 F0 1A beq L9E71
|
|
009E57 1 C9 04 cmp #$04
|
|
009E59 1 D0 0B bne L9E66
|
|
009E5B 1 A9 80 lda #$80
|
|
009E5D 1 8D 8D 91 sta L918D
|
|
009E60 1 20 26 A4 L9E60: jsr LA426
|
|
009E63 1 4C 6F 9E jmp L9E6F
|
|
009E66 1
|
|
009E66 1 4C 9F A3 L9E66: jmp LA39F
|
|
009E69 1
|
|
009E69 1 20 97 A4 L9E69: jsr LA497
|
|
009E6C 1 4C 26 9E jmp L9E26
|
|
009E6F 1
|
|
009E6F 1 18 L9E6F: clc
|
|
009E70 1 60 rts
|
|
009E71 1
|
|
009E71 1 38 L9E71: sec
|
|
009E72 1 60 rts
|
|
009E73 1
|
|
009E73 1 94 9F L9E73: sty $9F,x
|
|
009E75 1 E3 .byte $E3
|
|
009E76 1 97 2E smb1 $2E
|
|
009E78 1 A0 .byte $A0
|
|
009E79 1 00 L9E79: brk
|
|
009E7A 1 00 L9E7A: brk
|
|
009E7B 1 00 L9E7B: brk
|
|
009E7C 1 20 .byte $20
|
|
009E7D 1 02 .byte $02
|
|
009E7E 1 8D 79 9E L9E7E: sta L9E79
|
|
009E81 1 A9 B1 lda #$B1
|
|
009E83 1 8D 83 91 sta L9183
|
|
009E86 1 A9 9E lda #$9E
|
|
009E88 1 8D 84 91 sta L9184
|
|
009E8B 1 A9 A3 lda #$A3
|
|
009E8D 1 8D 7D 91 sta L917D
|
|
009E90 1 A9 9E lda #$9E
|
|
009E92 1 8D 7E 91 sta L917E
|
|
009E95 1 20 44 A0 jsr LA044
|
|
009E98 1 A9 D3 lda #$D3
|
|
009E9A 1 8D 80 91 sta L9180
|
|
009E9D 1 A9 9E lda #$9E
|
|
009E9F 1 8D 81 91 sta L9181
|
|
009EA2 1 60 rts
|
|
009EA3 1
|
|
009EA3 1 8D 7A 9E sta L9E7A
|
|
009EA6 1 8E 7B 9E stx L9E7B
|
|
009EA9 1 A9 01 lda #$01
|
|
009EAB 1 8D 79 9E sta L9E79
|
|
009EAE 1 4C 44 A0 jmp LA044
|
|
009EB1 1
|
|
009EB1 1 A9 02 lda #$02
|
|
009EB3 1 8D 79 9E sta L9E79
|
|
009EB6 1 20 44 A0 jsr LA044
|
|
009EB9 1 F0 03 beq L9EBE
|
|
009EBB 1 4C 9F A3 jmp LA39F
|
|
009EBE 1
|
|
009EBE 1 60 L9EBE: rts
|
|
009EBF 1
|
|
009EBF 1 A0 05 L9EBF: ldy #$05
|
|
009EC1 1 B9 73 9E L9EC1: lda L9E73,y
|
|
009EC4 1 99 DD 97 sta L97DD,y
|
|
009EC7 1 88 dey
|
|
009EC8 1 10 F7 bpl L9EC1
|
|
009ECA 1 A9 00 lda #$00
|
|
009ECC 1 8D 25 A4 sta LA425
|
|
009ECF 1 8D 8D 91 sta L918D
|
|
009ED2 1 60 rts
|
|
009ED3 1
|
|
009ED3 1 A9 05 lda #$05
|
|
009ED5 1 8D 79 9E sta L9E79
|
|
009ED8 1 4C 44 A0 jmp LA044
|
|
009EDB 1
|
|
009EDB 1 A9 03 L9EDB: lda #$03
|
|
009EDD 1 8D 79 9E sta L9E79
|
|
009EE0 1 20 79 A3 jsr LA379
|
|
009EE3 1 A0 C4 L9EE3: ldy #$C4
|
|
009EE5 1 A9 74 lda #$74
|
|
009EE7 1 A2 97 ldx #$97
|
|
009EE9 1 20 21 40 jsr L4021
|
|
009EEC 1 F0 06 beq L9EF4
|
|
009EEE 1 20 9B A4 jsr LA49B
|
|
009EF1 1 4C E3 9E jmp L9EE3
|
|
009EF4 1
|
|
009EF4 1 AD 7B 97 L9EF4: lda L977B
|
|
009EF7 1 8D 1D 9F sta L9F1D
|
|
009EFA 1 C9 0D cmp #$0D
|
|
009EFC 1 F0 04 beq L9F02
|
|
009EFE 1 A9 00 lda #$00
|
|
009F00 1 F0 02 beq L9F04
|
|
009F02 1 A9 FF L9F02: lda #$FF
|
|
009F04 1 8D 1C 9F L9F04: sta L9F1C
|
|
009F07 1 F0 15 beq L9F1E
|
|
009F09 1 20 D8 98 jsr L98D8
|
|
009F0C 1 AD 1D 9F lda L9F1D
|
|
009F0F 1 C9 0D cmp #$0D
|
|
009F11 1 D0 05 bne L9F18
|
|
009F13 1 A9 FF lda #$FF
|
|
009F15 1 8D 1D 9F sta L9F1D
|
|
009F18 1 4C 1E 9F L9F18: jmp L9F1E
|
|
009F1B 1
|
|
009F1B 1 60 rts
|
|
009F1C 1
|
|
009F1C 1 00 L9F1C: brk
|
|
009F1D 1 00 L9F1D: brk
|
|
009F1E 1 2C 5C E0 L9F1E: bit $E05C
|
|
009F21 1 30 03 bmi L9F26
|
|
009F23 1 20 EF A3 jsr LA3EF
|
|
009F26 1 20 F1 A2 L9F26: jsr LA2F1
|
|
009F29 1 A0 C1 L9F29: ldy #$C1
|
|
009F2B 1 A9 3B lda #$3B
|
|
009F2D 1 A2 97 ldx #$97
|
|
009F2F 1 20 21 40 jsr L4021
|
|
009F32 1 F0 59 beq L9F8D
|
|
009F34 1 C9 4E cmp #$4E
|
|
009F36 1 D0 56 bne L9F8E
|
|
009F38 1 2C 8D 91 bit L918D
|
|
009F3B 1 30 25 bmi L9F62
|
|
009F3D 1 A9 04 lda #$04
|
|
009F3F 1 8D 79 9E sta L9E79
|
|
009F42 1 20 44 A0 jsr LA044
|
|
009F45 1 48 pha
|
|
009F46 1 A9 03 lda #$03
|
|
009F48 1 8D 79 9E sta L9E79
|
|
009F4B 1 68 pla
|
|
009F4C 1 C9 03 cmp #$03
|
|
009F4E 1 F0 3D beq L9F8D
|
|
009F50 1 C9 02 cmp #$02
|
|
009F52 1 F0 0E beq L9F62
|
|
009F54 1 C9 04 cmp #$04
|
|
009F56 1 D0 07 bne L9F5F
|
|
009F58 1 A9 80 lda #$80
|
|
009F5A 1 8D 8D 91 sta L918D
|
|
009F5D 1 D0 03 bne L9F62
|
|
009F5F 1 4C 9F A3 L9F5F: jmp LA39F
|
|
009F62 1
|
|
009F62 1 A0 C4 L9F62: ldy #$C4
|
|
009F64 1 A9 74 lda #$74
|
|
009F66 1 A2 97 ldx #$97
|
|
009F68 1 20 21 40 jsr L4021
|
|
009F6B 1 AD 77 97 lda L9777
|
|
009F6E 1 29 80 and #$80
|
|
009F70 1 D0 1B bne L9F8D
|
|
009F72 1 A9 C3 lda #$C3
|
|
009F74 1 8D 77 97 sta L9777
|
|
009F77 1 A9 07 lda #$07
|
|
009F79 1 8D 74 97 sta L9774
|
|
009F7C 1 A0 C3 ldy #$C3
|
|
009F7E 1 A9 74 lda #$74
|
|
009F80 1 A2 97 ldx #$97
|
|
009F82 1 20 21 40 jsr L4021
|
|
009F85 1 A9 0A lda #$0A
|
|
009F87 1 8D 74 97 sta L9774
|
|
009F8A 1 4C 29 9F jmp L9F29
|
|
009F8D 1
|
|
009F8D 1 60 L9F8D: rts
|
|
009F8E 1
|
|
009F8E 1 20 9B A4 L9F8E: jsr LA49B
|
|
009F91 1 4C 29 9F jmp L9F29
|
|
009F94 1
|
|
009F94 1 20 D1 A3 jsr LA3D1
|
|
009F97 1 F0 03 beq L9F9C
|
|
009F99 1 4C 9F A3 jmp LA39F
|
|
009F9C 1
|
|
009F9C 1 20 FD A2 L9F9C: jsr LA2FD
|
|
009F9F 1 2C 5C E0 bit $E05C
|
|
009FA2 1 30 03 bmi L9FA7
|
|
009FA4 1 20 EF A3 jsr LA3EF
|
|
009FA7 1 20 F1 A2 L9FA7: jsr LA2F1
|
|
009FAA 1 A0 C4 L9FAA: ldy #$C4
|
|
009FAC 1 A9 74 lda #$74
|
|
009FAE 1 A2 97 ldx #$97
|
|
009FB0 1 20 21 40 jsr L4021
|
|
009FB3 1 F0 06 beq L9FBB
|
|
009FB5 1 20 9B A4 jsr LA49B
|
|
009FB8 1 4C AA 9F jmp L9FAA
|
|
009FBB 1
|
|
009FBB 1 AD 7B 97 L9FBB: lda L977B
|
|
009FBE 1 C9 0D cmp #$0D
|
|
009FC0 1 F0 60 beq LA022
|
|
009FC2 1 A0 C1 L9FC2: ldy #$C1
|
|
009FC4 1 A9 3B lda #$3B
|
|
009FC6 1 A2 97 ldx #$97
|
|
009FC8 1 20 21 40 jsr L4021
|
|
009FCB 1 F0 55 beq LA022
|
|
009FCD 1 C9 4E cmp #$4E
|
|
009FCF 1 D0 4B bne LA01C
|
|
009FD1 1 2C 8D 91 bit L918D
|
|
009FD4 1 30 2B bmi LA001
|
|
009FD6 1 A9 04 lda #$04
|
|
009FD8 1 8D 79 9E sta L9E79
|
|
009FDB 1 A0 02 ldy #$02
|
|
009FDD 1 A9 79 lda #$79
|
|
009FDF 1 A2 9E ldx #$9E
|
|
009FE1 1 20 00 A5 jsr LA500
|
|
009FE4 1 48 pha
|
|
009FE5 1 A9 03 lda #$03
|
|
009FE7 1 8D 79 9E sta L9E79
|
|
009FEA 1 68 pla
|
|
009FEB 1 C9 03 cmp #$03
|
|
009FED 1 F0 33 beq LA022
|
|
009FEF 1 C9 02 cmp #$02
|
|
009FF1 1 F0 0E L9FF1: beq LA001
|
|
009FF3 1 C9 04 cmp #$04
|
|
009FF5 1 D0 07 bne L9FFE
|
|
009FF7 1 A9 80 lda #$80
|
|
009FF9 1 8D 8D 91 sta L918D
|
|
009FFC 1 D0 03 bne LA001
|
|
009FFE 1 4C 9F A3 L9FFE: jmp LA39F
|
|
00A001 1
|
|
00A001 1 A9 C3 LA001: lda #$C3
|
|
00A003 1 8D 77 97 sta L9777
|
|
00A006 1 A9 07 lda #$07
|
|
00A008 1 8D 74 97 sta L9774
|
|
00A00B 1 A0 C3 ldy #$C3
|
|
00A00D 1 A9 74 lda #$74
|
|
00A00F 1 A2 97 ldx #$97
|
|
00A011 1 20 21 40 jsr L4021
|
|
00A014 1 A9 0A lda #$0A
|
|
00A016 1 8D 74 97 sta L9774
|
|
00A019 1 4C C2 9F jmp L9FC2
|
|
00A01C 1
|
|
00A01C 1 20 9B A4 LA01C: jsr LA49B
|
|
00A01F 1 4C C2 9F jmp L9FC2
|
|
00A022 1
|
|
00A022 1 4C 22 A3 LA022: jmp LA322
|
|
00A025 1
|
|
00A025 1 20 22 A3 jsr LA322
|
|
00A028 1 A9 FF lda #$FF
|
|
00A02A 1 8D 23 99 sta L9923
|
|
00A02D 1 60 rts
|
|
00A02E 1
|
|
00A02E 1 A0 C1 LA02E: ldy #$C1
|
|
00A030 1 A9 3B lda #$3B
|
|
00A032 1 A2 97 ldx #$97
|
|
00A034 1 20 21 40 jsr L4021
|
|
00A037 1 F0 0A beq LA043
|
|
00A039 1 C9 4E cmp #$4E
|
|
00A03B 1 F0 06 beq LA043
|
|
00A03D 1 20 9B A4 jsr LA49B
|
|
00A040 1 4C 2E A0 jmp LA02E
|
|
00A043 1
|
|
00A043 1 60 LA043: rts
|
|
00A044 1
|
|
00A044 1 A0 02 LA044: ldy #$02
|
|
00A046 1 A9 79 lda #$79
|
|
00A048 1 A2 9E ldx #$9E
|
|
00A04A 1 20 00 A5 jsr LA500
|
|
00A04D 1 60 rts
|
|
00A04E 1
|
|
00A04E 1 70 A1 LA04E: bvs L9FF1
|
|
00A050 1 E3 .byte $E3
|
|
00A051 1 97 E3 smb1 $E3
|
|
00A053 1 97 .byte $97
|
|
00A054 1 00 LA054: brk
|
|
00A055 1 00 LA055: brk
|
|
00A056 1 00 LA056: brk
|
|
00A057 1 20 .byte $20
|
|
00A058 1 02 .byte $02
|
|
00A059 1 A9 00 LA059: lda #$00
|
|
00A05B 1 8D 54 A0 sta LA054
|
|
00A05E 1 2C 8B 91 bit L918B
|
|
00A061 1 10 22 bpl LA085
|
|
00A063 1 A9 D1 lda #$D1
|
|
00A065 1 8D 83 91 sta L9183
|
|
00A068 1 A9 A0 lda #$A0
|
|
00A06A 1 8D 84 91 sta L9184
|
|
00A06D 1 A9 B5 lda #$B5
|
|
00A06F 1 8D 7D 91 sta L917D
|
|
00A072 1 A9 A0 lda #$A0
|
|
00A074 1 8D 7E 91 sta L917E
|
|
00A077 1 20 0A A1 jsr LA10A
|
|
00A07A 1 A9 F8 lda #$F8
|
|
00A07C 1 8D 80 91 sta L9180
|
|
00A07F 1 A9 A0 lda #$A0
|
|
00A081 1 8D 81 91 sta L9181
|
|
00A084 1 60 rts
|
|
00A085 1
|
|
00A085 1 A9 C3 LA085: lda #$C3
|
|
00A087 1 8D 83 91 sta L9183
|
|
00A08A 1 A9 A0 lda #$A0
|
|
00A08C 1 8D 84 91 sta L9184
|
|
00A08F 1 A9 A7 lda #$A7
|
|
00A091 1 8D 7D 91 sta L917D
|
|
00A094 1 A9 A0 lda #$A0
|
|
00A096 1 8D 7E 91 sta L917E
|
|
00A099 1 20 00 A1 jsr LA100
|
|
00A09C 1 A9 F0 lda #$F0
|
|
00A09E 1 8D 80 91 sta L9180
|
|
00A0A1 1 A9 A0 lda #$A0
|
|
00A0A3 1 8D 81 91 sta L9181
|
|
00A0A6 1 60 rts
|
|
00A0A7 1
|
|
00A0A7 1 8D 55 A0 sta LA055
|
|
00A0AA 1 8E 56 A0 stx LA056
|
|
00A0AD 1 A9 01 lda #$01
|
|
00A0AF 1 8D 54 A0 sta LA054
|
|
00A0B2 1 4C 00 A1 jmp LA100
|
|
00A0B5 1
|
|
00A0B5 1 8D 55 A0 sta LA055
|
|
00A0B8 1 8E 56 A0 stx LA056
|
|
00A0BB 1 A9 01 lda #$01
|
|
00A0BD 1 8D 54 A0 sta LA054
|
|
00A0C0 1 4C 0A A1 jmp LA10A
|
|
00A0C3 1
|
|
00A0C3 1 A9 02 lda #$02
|
|
00A0C5 1 8D 54 A0 sta LA054
|
|
00A0C8 1 20 00 A1 jsr LA100
|
|
00A0CB 1 F0 03 beq LA0D0
|
|
00A0CD 1 4C 9F A3 jmp LA39F
|
|
00A0D0 1
|
|
00A0D0 1 60 LA0D0: rts
|
|
00A0D1 1
|
|
00A0D1 1 A9 02 lda #$02
|
|
00A0D3 1 8D 54 A0 sta LA054
|
|
00A0D6 1 20 0A A1 jsr LA10A
|
|
00A0D9 1 F0 03 beq LA0DE
|
|
00A0DB 1 4C 9F A3 jmp LA39F
|
|
00A0DE 1
|
|
00A0DE 1 60 LA0DE: rts
|
|
00A0DF 1
|
|
00A0DF 1 A9 00 LA0DF: lda #$00
|
|
00A0E1 1 8D 25 A4 sta LA425
|
|
00A0E4 1 A0 05 ldy #$05
|
|
00A0E6 1 B9 4E A0 LA0E6: lda LA04E,y
|
|
00A0E9 1 99 DD 97 sta L97DD,y
|
|
00A0EC 1 88 dey
|
|
00A0ED 1 10 F7 bpl LA0E6
|
|
00A0EF 1 60 rts
|
|
00A0F0 1
|
|
00A0F0 1 A9 04 lda #$04
|
|
00A0F2 1 8D 54 A0 sta LA054
|
|
00A0F5 1 4C 00 A1 jmp LA100
|
|
00A0F8 1
|
|
00A0F8 1 A9 04 lda #$04
|
|
00A0FA 1 8D 54 A0 sta LA054
|
|
00A0FD 1 4C 0A A1 jmp LA10A
|
|
00A100 1
|
|
00A100 1 A0 07 LA100: ldy #$07
|
|
00A102 1 A9 54 lda #$54
|
|
00A104 1 A2 A0 ldx #$A0
|
|
00A106 1 20 00 A5 jsr LA500
|
|
00A109 1 60 rts
|
|
00A10A 1
|
|
00A10A 1 A0 08 LA10A: ldy #$08
|
|
00A10C 1 A9 54 lda #$54
|
|
00A10E 1 A2 A0 ldx #$A0
|
|
00A110 1 20 00 A5 jsr LA500
|
|
00A113 1 60 rts
|
|
00A114 1
|
|
00A114 1 A9 03 LA114: lda #$03
|
|
00A116 1 8D 54 A0 sta LA054
|
|
00A119 1 20 79 A3 jsr LA379
|
|
00A11C 1 AE C0 1F ldx $1FC0
|
|
00A11F 1 AC 32 9B ldy L9B32
|
|
00A122 1 88 dey
|
|
00A123 1 C8 LA123: iny
|
|
00A124 1 E8 inx
|
|
00A125 1 B9 20 02 lda $0220,y
|
|
00A128 1 9D C0 1F sta $1FC0,x
|
|
00A12B 1 CC 20 02 cpy $0220
|
|
00A12E 1 D0 F3 bne LA123
|
|
00A130 1 8E C0 1F stx $1FC0
|
|
00A133 1 A0 C4 LA133: ldy #$C4
|
|
00A135 1 A9 74 lda #$74
|
|
00A137 1 A2 97 ldx #$97
|
|
00A139 1 20 21 40 jsr L4021
|
|
00A13C 1 F0 06 beq LA144
|
|
00A13E 1 20 9B A4 jsr LA49B
|
|
00A141 1 4C 33 A1 jmp LA133
|
|
00A144 1
|
|
00A144 1 AD 7B 97 LA144: lda L977B
|
|
00A147 1 8D 69 A1 sta LA169
|
|
00A14A 1 C9 0F cmp #$0F
|
|
00A14C 1 F0 08 beq LA156
|
|
00A14E 1 C9 0D cmp #$0D
|
|
00A150 1 F0 04 beq LA156
|
|
00A152 1 A9 00 lda #$00
|
|
00A154 1 F0 02 beq LA158
|
|
00A156 1 A9 FF LA156: lda #$FF
|
|
00A158 1 8D 68 A1 LA158: sta LA168
|
|
00A15B 1 F0 0D beq LA16A
|
|
00A15D 1 20 D8 98 jsr L98D8
|
|
00A160 1 AD 69 A1 lda LA169
|
|
00A163 1 C9 0F cmp #$0F
|
|
00A165 1 D0 03 bne LA16A
|
|
00A167 1 60 rts
|
|
00A168 1
|
|
00A168 1 00 LA168: brk
|
|
00A169 1 00 LA169: brk
|
|
00A16A 1 20 73 A1 LA16A: jsr LA173
|
|
00A16D 1 4C FD A2 jmp LA2FD
|
|
00A170 1
|
|
00A170 1 20 FD A2 jsr LA2FD
|
|
00A173 1 20 C3 A1 LA173: jsr LA1C3
|
|
00A176 1 20 F1 A2 jsr LA2F1
|
|
00A179 1 A0 C4 LA179: ldy #$C4
|
|
00A17B 1 A9 74 lda #$74
|
|
00A17D 1 A2 97 ldx #$97
|
|
00A17F 1 20 21 40 jsr L4021
|
|
00A182 1 F0 06 beq LA18A
|
|
00A184 1 20 9B A4 jsr LA49B
|
|
00A187 1 4C 79 A1 jmp LA179
|
|
00A18A 1
|
|
00A18A 1 AD 7B 97 LA18A: lda L977B
|
|
00A18D 1 C9 0F cmp #$0F
|
|
00A18F 1 F0 2F beq LA1C0
|
|
00A191 1 C9 0D cmp #$0D
|
|
00A193 1 F0 2B beq LA1C0
|
|
00A195 1 2C 8B 91 bit L918B
|
|
00A198 1 10 04 bpl LA19E
|
|
00A19A 1 A9 C3 lda #$C3
|
|
00A19C 1 D0 02 bne LA1A0
|
|
00A19E 1 A9 21 LA19E: lda #$21
|
|
00A1A0 1 8D 77 97 LA1A0: sta L9777
|
|
00A1A3 1 A9 07 LA1A3: lda #$07
|
|
00A1A5 1 8D 74 97 sta L9774
|
|
00A1A8 1 A0 C3 ldy #$C3
|
|
00A1AA 1 A9 74 lda #$74
|
|
00A1AC 1 A2 97 ldx #$97
|
|
00A1AE 1 20 21 40 jsr L4021
|
|
00A1B1 1 48 pha
|
|
00A1B2 1 A9 0A lda #$0A
|
|
00A1B4 1 8D 74 97 sta L9774
|
|
00A1B7 1 68 pla
|
|
00A1B8 1 F0 06 beq LA1C0
|
|
00A1BA 1 20 9B A4 jsr LA49B
|
|
00A1BD 1 4C A3 A1 jmp LA1A3
|
|
00A1C0 1
|
|
00A1C0 1 4C 22 A3 LA1C0: jmp LA322
|
|
00A1C3 1
|
|
00A1C3 1 AD ED A2 LA1C3: lda LA2ED
|
|
00A1C6 1 38 sec
|
|
00A1C7 1 E9 01 sbc #$01
|
|
00A1C9 1 8D 55 A0 sta LA055
|
|
00A1CC 1 AD EE A2 lda LA2EE
|
|
00A1CF 1 E9 00 sbc #$00
|
|
00A1D1 1 8D 56 A0 sta LA056
|
|
00A1D4 1 2C 8B 91 bit L918B
|
|
00A1D7 1 10 03 bpl LA1DC
|
|
00A1D9 1 4C 0A A1 jmp LA10A
|
|
00A1DC 1
|
|
00A1DC 1 4C 00 A1 LA1DC: jmp LA100
|
|
00A1DF 1
|
|
00A1DF 1 00 LA1DF: brk
|
|
00A1E0 1 ED A2 EF sbc $EFA2
|
|
00A1E3 1 A2 .byte $A2
|
|
00A1E4 1 A9 00 LA1E4: lda #$00
|
|
00A1E6 1 8D DF A1 sta LA1DF
|
|
00A1E9 1 A9 20 lda #$20
|
|
00A1EB 1 8D 83 91 sta L9183
|
|
00A1EE 1 A9 A2 lda #$A2
|
|
00A1F0 1 8D 84 91 sta L9184
|
|
00A1F3 1 A9 11 lda #$11
|
|
00A1F5 1 8D 7D 91 sta L917D
|
|
00A1F8 1 A9 A2 lda #$A2
|
|
00A1FA 1 8D 7E 91 sta L917E
|
|
00A1FD 1 A0 0B ldy #$0B
|
|
00A1FF 1 A9 DF lda #$DF
|
|
00A201 1 A2 A1 ldx #$A1
|
|
00A203 1 20 00 A5 jsr LA500
|
|
00A206 1 A9 33 lda #$33
|
|
00A208 1 8D 80 91 sta L9180
|
|
00A20B 1 A9 A2 lda #$A2
|
|
00A20D 1 8D 81 91 sta L9181
|
|
00A210 1 60 rts
|
|
00A211 1
|
|
00A211 1 A9 01 lda #$01
|
|
00A213 1 8D DF A1 sta LA1DF
|
|
00A216 1 A0 0B ldy #$0B
|
|
00A218 1 A9 DF lda #$DF
|
|
00A21A 1 A2 A1 ldx #$A1
|
|
00A21C 1 20 00 A5 jsr LA500
|
|
00A21F 1 60 LA21F: rts
|
|
00A220 1
|
|
00A220 1 A9 02 lda #$02
|
|
00A222 1 8D DF A1 sta LA1DF
|
|
00A225 1 A0 0B ldy #$0B
|
|
00A227 1 A9 DF lda #$DF
|
|
00A229 1 A2 A1 ldx #$A1
|
|
00A22B 1 20 00 A5 jsr LA500
|
|
00A22E 1 F0 EF beq LA21F
|
|
00A230 1 4C 9F A3 jmp LA39F
|
|
00A233 1
|
|
00A233 1 A9 03 lda #$03
|
|
00A235 1 8D DF A1 sta LA1DF
|
|
00A238 1 A0 0B ldy #$0B
|
|
00A23A 1 A9 DF lda #$DF
|
|
00A23C 1 A2 A1 ldx #$A1
|
|
00A23E 1 20 00 A5 jsr LA500
|
|
00A241 1 60 LA241: rts
|
|
00A242 1
|
|
00A242 1 AE A2 E3 LA242: ldx $E3A2
|
|
00A245 1 97 E3 smb1 $E3
|
|
00A247 1 97 .byte $97
|
|
00A248 1 A9 00 LA248: lda #$00
|
|
00A24A 1 8D 25 A4 sta LA425
|
|
00A24D 1 A0 05 ldy #$05
|
|
00A24F 1 B9 42 A2 LA24F: lda LA242,y
|
|
00A252 1 99 DD 97 sta L97DD,y
|
|
00A255 1 88 dey
|
|
00A256 1 10 F7 bpl LA24F
|
|
00A258 1 A9 00 lda #$00
|
|
00A25A 1 8D ED A2 sta LA2ED
|
|
00A25D 1 8D EE A2 sta LA2EE
|
|
00A260 1 8D EF A2 sta LA2EF
|
|
00A263 1 8D F0 A2 sta LA2F0
|
|
00A266 1 A0 17 ldy #$17
|
|
00A268 1 A9 00 lda #$00
|
|
00A26A 1 99 58 BF LA26A: sta $BF58,y
|
|
00A26D 1 88 dey
|
|
00A26E 1 10 FA bpl LA26A
|
|
00A270 1 60 rts
|
|
00A271 1
|
|
00A271 1 20 79 A3 LA271: jsr LA379
|
|
00A274 1 A0 C4 LA274: ldy #$C4
|
|
00A276 1 A9 74 lda #$74
|
|
00A278 1 A2 97 ldx #$97
|
|
00A27A 1 20 21 40 jsr L4021
|
|
00A27D 1 F0 06 beq LA285
|
|
00A27F 1 20 9B A4 jsr LA49B
|
|
00A282 1 4C 74 A2 jmp LA274
|
|
00A285 1
|
|
00A285 1 AD 7B 97 LA285: lda L977B
|
|
00A288 1 8D AA A2 sta LA2AA
|
|
00A28B 1 C9 0F cmp #$0F
|
|
00A28D 1 F0 08 beq LA297
|
|
00A28F 1 C9 0D cmp #$0D
|
|
00A291 1 F0 04 beq LA297
|
|
00A293 1 A9 00 lda #$00
|
|
00A295 1 F0 02 beq LA299
|
|
00A297 1 A9 FF LA297: lda #$FF
|
|
00A299 1 8D A9 A2 LA299: sta LA2A9
|
|
00A29C 1 F0 0D beq LA2AB
|
|
00A29E 1 20 D8 98 jsr L98D8
|
|
00A2A1 1 AD AA A2 lda LA2AA
|
|
00A2A4 1 C9 0F cmp #$0F
|
|
00A2A6 1 D0 03 bne LA2AB
|
|
00A2A8 1 60 rts
|
|
00A2A9 1
|
|
00A2A9 1 00 LA2A9: brk
|
|
00A2AA 1 00 LA2AA: brk
|
|
00A2AB 1 4C AE A2 LA2AB: jmp LA2AE
|
|
00A2AE 1
|
|
00A2AE 1 2C 89 91 LA2AE: bit L9189
|
|
00A2B1 1 50 21 bvc LA2D4
|
|
00A2B3 1 20 FD A2 jsr LA2FD
|
|
00A2B6 1 A0 C4 ldy #$C4
|
|
00A2B8 1 A9 74 lda #$74
|
|
00A2BA 1 A2 97 ldx #$97
|
|
00A2BC 1 20 21 40 jsr L4021
|
|
00A2BF 1 D0 13 bne LA2D4
|
|
00A2C1 1 AD EF A2 lda LA2EF
|
|
00A2C4 1 18 clc
|
|
00A2C5 1 6D 7C 97 adc L977C
|
|
00A2C8 1 8D EF A2 sta LA2EF
|
|
00A2CB 1 AD F0 A2 lda LA2F0
|
|
00A2CE 1 6D 7D 97 adc L977D
|
|
00A2D1 1 8D F0 A2 sta LA2F0
|
|
00A2D4 1 EE ED A2 LA2D4: inc LA2ED
|
|
00A2D7 1 D0 03 bne LA2DC
|
|
00A2D9 1 EE EE A2 inc LA2EE
|
|
00A2DC 1 2C 89 91 LA2DC: bit L9189
|
|
00A2DF 1 50 03 bvc LA2E4
|
|
00A2E1 1 20 22 A3 jsr LA322
|
|
00A2E4 1 AD ED A2 LA2E4: lda LA2ED
|
|
00A2E7 1 AE EE A2 ldx LA2EE
|
|
00A2EA 1 4C 7C 91 jmp L917C
|
|
00A2ED 1
|
|
00A2ED 1 00 LA2ED: brk
|
|
00A2EE 1 00 LA2EE: brk
|
|
00A2EF 1 00 LA2EF: brk
|
|
00A2F0 1 00 LA2F0: brk
|
|
00A2F1 1 AD ED A2 LA2F1: lda LA2ED
|
|
00A2F4 1 D0 03 bne LA2F9
|
|
00A2F6 1 CE EE A2 dec LA2EE
|
|
00A2F9 1 CE ED A2 LA2F9: dec LA2ED
|
|
00A2FC 1 60 rts
|
|
00A2FD 1
|
|
00A2FD 1 AD AD 97 LA2FD: lda L97AD
|
|
00A300 1 D0 01 bne LA303
|
|
00A302 1 60 rts
|
|
00A303 1
|
|
00A303 1 A2 00 LA303: ldx #$00
|
|
00A305 1 AC 20 02 ldy $0220
|
|
00A308 1 A9 2F lda #$2F
|
|
00A30A 1 99 21 02 sta $0221,y
|
|
00A30D 1 C8 iny
|
|
00A30E 1 EC AD 97 LA30E: cpx L97AD
|
|
00A311 1 B0 0B bcs LA31E
|
|
00A313 1 BD AE 97 lda L97AE,x
|
|
00A316 1 99 21 02 sta $0221,y
|
|
00A319 1 E8 inx
|
|
00A31A 1 C8 iny
|
|
00A31B 1 4C 0E A3 jmp LA30E
|
|
00A31E 1
|
|
00A31E 1 8C 20 02 LA31E: sty $0220
|
|
00A321 1 60 rts
|
|
00A322 1
|
|
00A322 1 AE 20 02 LA322: ldx $0220
|
|
00A325 1 D0 01 bne LA328
|
|
00A327 1 60 rts
|
|
00A328 1
|
|
00A328 1 BD 20 02 LA328: lda $0220,x
|
|
00A32B 1 C9 2F cmp #$2F
|
|
00A32D 1 F0 07 beq LA336
|
|
00A32F 1 CA dex
|
|
00A330 1 D0 F6 bne LA328
|
|
00A332 1 8E 20 02 stx $0220
|
|
00A335 1 60 rts
|
|
00A336 1
|
|
00A336 1 CA LA336: dex
|
|
00A337 1 8E 20 02 stx $0220
|
|
00A33A 1 60 rts
|
|
00A33B 1
|
|
00A33B 1 AD AD 97 LA33B: lda L97AD
|
|
00A33E 1 D0 01 bne LA341
|
|
00A340 1 60 rts
|
|
00A341 1
|
|
00A341 1 A2 00 LA341: ldx #$00
|
|
00A343 1 AC C0 1F ldy $1FC0
|
|
00A346 1 A9 2F lda #$2F
|
|
00A348 1 99 C1 1F sta $1FC1,y
|
|
00A34B 1 C8 iny
|
|
00A34C 1 EC AD 97 LA34C: cpx L97AD
|
|
00A34F 1 B0 0B bcs LA35C
|
|
00A351 1 BD AE 97 lda L97AE,x
|
|
00A354 1 99 C1 1F sta $1FC1,y
|
|
00A357 1 E8 inx
|
|
00A358 1 C8 iny
|
|
00A359 1 4C 4C A3 jmp LA34C
|
|
00A35C 1
|
|
00A35C 1 8C C0 1F LA35C: sty $1FC0
|
|
00A35F 1 60 rts
|
|
00A360 1
|
|
00A360 1 AE C0 1F LA360: ldx $1FC0
|
|
00A363 1 D0 01 bne LA366
|
|
00A365 1 60 rts
|
|
00A366 1
|
|
00A366 1 BD C0 1F LA366: lda $1FC0,x
|
|
00A369 1 C9 2F cmp #$2F
|
|
00A36B 1 F0 07 beq LA374
|
|
00A36D 1 CA dex
|
|
00A36E 1 D0 F6 bne LA366
|
|
00A370 1 8E C0 1F stx $1FC0
|
|
00A373 1 60 rts
|
|
00A374 1
|
|
00A374 1 CA LA374: dex
|
|
00A375 1 8E C0 1F stx $1FC0
|
|
00A378 1 60 rts
|
|
00A379 1
|
|
00A379 1 A0 00 LA379: ldy #$00
|
|
00A37B 1 8C 32 9B sty L9B32
|
|
00A37E 1 88 dey
|
|
00A37F 1 C8 LA37F: iny
|
|
00A380 1 B9 0A E0 lda $E00A,y
|
|
00A383 1 C9 2F cmp #$2F
|
|
00A385 1 D0 03 bne LA38A
|
|
00A387 1 8C 32 9B sty L9B32
|
|
00A38A 1 99 20 02 LA38A: sta $0220,y
|
|
00A38D 1 CC 0A E0 cpy $E00A
|
|
00A390 1 D0 ED bne LA37F
|
|
00A392 1 AC C9 DF ldy $DFC9
|
|
00A395 1 B9 C9 DF LA395: lda $DFC9,y
|
|
00A398 1 99 C0 1F sta $1FC0,y
|
|
00A39B 1 88 dey
|
|
00A39C 1 10 F7 bpl LA395
|
|
00A39E 1 60 rts
|
|
00A39F 1
|
|
00A39F 1 20 7F 91 LA39F: jsr L917F
|
|
00A3A2 1 4C A7 A3 jmp LA3A7
|
|
00A3A5 1
|
|
00A3A5 1 01 00 ora (L0000,x)
|
|
00A3A7 1 A0 CC LA3A7: ldy #$CC
|
|
00A3A9 1 A9 A5 lda #$A5
|
|
00A3AB 1 A2 A3 ldx #$A3
|
|
00A3AD 1 20 21 40 jsr L4021
|
|
00A3B0 1 AD 20 DF lda $DF20
|
|
00A3B3 1 F0 15 beq LA3CA
|
|
00A3B5 1 8D 12 D2 sta $D212
|
|
00A3B8 1 A0 3C ldy #$3C
|
|
00A3BA 1 A9 12 lda #$12
|
|
00A3BC 1 A2 D2 ldx #$D2
|
|
00A3BE 1 20 03 40 jsr L4003
|
|
00A3C1 1 A0 04 ldy #$04
|
|
00A3C3 1 A9 15 lda #$15
|
|
00A3C5 1 A2 D2 ldx #$D2
|
|
00A3C7 1 20 03 40 jsr L4003
|
|
00A3CA 1 AE 88 91 LA3CA: ldx L9188
|
|
00A3CD 1 9A txs
|
|
00A3CE 1 A9 FF lda #$FF
|
|
00A3D0 1 60 rts
|
|
00A3D1 1
|
|
00A3D1 1 A0 2A LA3D1: ldy #$2A
|
|
00A3D3 1 A9 08 lda #$08
|
|
00A3D5 1 A2 D2 ldx #$D2
|
|
00A3D7 1 20 03 40 jsr L4003
|
|
00A3DA 1 AD 08 D2 lda $D208
|
|
00A3DD 1 C9 03 cmp #$03
|
|
00A3DF 1 D0 0B bne LA3EC
|
|
00A3E1 1 AD 09 D2 lda $D209
|
|
00A3E4 1 C9 1B cmp #$1B
|
|
00A3E6 1 D0 04 bne LA3EC
|
|
00A3E8 1 A9 FF lda #$FF
|
|
00A3EA 1 D0 02 bne LA3EE
|
|
00A3EC 1 A9 00 LA3EC: lda #$00
|
|
00A3EE 1 60 LA3EE: rts
|
|
00A3EF 1
|
|
00A3EF 1 AD ED A2 LA3EF: lda LA2ED
|
|
00A3F2 1 38 sec
|
|
00A3F3 1 E9 01 sbc #$01
|
|
00A3F5 1 8D 7A 9E sta L9E7A
|
|
00A3F8 1 AD EE A2 lda LA2EE
|
|
00A3FB 1 E9 00 sbc #$00
|
|
00A3FD 1 8D 7B 9E sta L9E7B
|
|
00A400 1 A0 02 ldy #$02
|
|
00A402 1 A9 79 lda #$79
|
|
00A404 1 A2 9E ldx #$9E
|
|
00A406 1 20 00 A5 jsr LA500
|
|
00A409 1 60 rts
|
|
00A40A 1
|
|
00A40A 1 AD ED A2 LA40A: lda LA2ED
|
|
00A40D 1 38 sec
|
|
00A40E 1 E9 01 sbc #$01
|
|
00A410 1 8D 38 99 sta L9938
|
|
00A413 1 AD EE A2 lda LA2EE
|
|
00A416 1 E9 00 sbc #$00
|
|
00A418 1 8D 39 99 sta L9939
|
|
00A41B 1 A0 01 ldy #$01
|
|
00A41D 1 A9 37 lda #$37
|
|
00A41F 1 A2 99 ldx #$99
|
|
00A421 1 20 00 A5 jsr LA500
|
|
00A424 1 60 rts
|
|
00A425 1
|
|
00A425 1 00 LA425: brk
|
|
00A426 1 20 6D A4 LA426: jsr LA46D
|
|
00A429 1 A9 C3 lda #$C3
|
|
00A42B 1 8D 8A 97 sta L978A
|
|
00A42E 1 20 79 A4 jsr LA479
|
|
00A431 1 AD 78 97 lda L9778
|
|
00A434 1 C9 0F cmp #$0F
|
|
00A436 1 F0 34 beq LA46C
|
|
00A438 1 A0 C8 ldy #$C8
|
|
00A43A 1 A9 44 lda #$44
|
|
00A43C 1 A2 97 ldx #$97
|
|
00A43E 1 20 21 40 jsr L4021
|
|
00A441 1 F0 06 beq LA449
|
|
00A443 1 20 97 A4 jsr LA497
|
|
00A446 1 4C 26 A4 jmp LA426
|
|
00A449 1
|
|
00A449 1 AD 49 97 LA449: lda L9749
|
|
00A44C 1 8D 9B 97 sta L979B
|
|
00A44F 1 8D 3A 97 sta L973A
|
|
00A452 1 A0 D0 LA452: ldy #$D0
|
|
00A454 1 A9 9A lda #$9A
|
|
00A456 1 A2 97 ldx #$97
|
|
00A458 1 20 21 40 jsr L4021
|
|
00A45B 1 F0 06 beq LA463
|
|
00A45D 1 20 97 A4 jsr LA497
|
|
00A460 1 4C 52 A4 jmp LA452
|
|
00A463 1
|
|
00A463 1 A0 CC LA463: ldy #$CC
|
|
00A465 1 A9 39 lda #$39
|
|
00A467 1 A2 97 ldx #$97
|
|
00A469 1 20 21 40 jsr L4021
|
|
00A46C 1 60 LA46C: rts
|
|
00A46D 1
|
|
00A46D 1 A2 0A LA46D: ldx #$0A
|
|
00A46F 1 BD 77 97 LA46F: lda L9777,x
|
|
00A472 1 9D 8A 97 sta L978A,x
|
|
00A475 1 CA dex
|
|
00A476 1 10 F7 bpl LA46F
|
|
00A478 1 60 rts
|
|
00A479 1
|
|
00A479 1 A9 07 LA479: lda #$07
|
|
00A47B 1 8D 87 97 sta L9787
|
|
00A47E 1 A0 C3 ldy #$C3
|
|
00A480 1 A9 87 lda #$87
|
|
00A482 1 A2 97 ldx #$97
|
|
00A484 1 20 21 40 jsr L4021
|
|
00A487 1 48 pha
|
|
00A488 1 A9 0A lda #$0A
|
|
00A48A 1 8D 87 97 sta L9787
|
|
00A48D 1 68 pla
|
|
00A48E 1 F0 06 beq LA496
|
|
00A490 1 20 97 A4 jsr LA497
|
|
00A493 1 4C 79 A4 jmp LA479
|
|
00A496 1
|
|
00A496 1 60 LA496: rts
|
|
00A497 1
|
|
00A497 1 A2 80 LA497: ldx #$80
|
|
00A499 1 D0 02 bne LA49D
|
|
00A49B 1 A2 00 LA49B: ldx #$00
|
|
00A49D 1 8E C5 A4 LA49D: stx LA4C5
|
|
00A4A0 1 C9 45 cmp #$45
|
|
00A4A2 1 F0 0A beq LA4AE
|
|
00A4A4 1 C9 44 cmp #$44
|
|
00A4A6 1 F0 06 beq LA4AE
|
|
00A4A8 1 20 30 40 jsr L4030
|
|
00A4AB 1 D0 15 bne LA4C2
|
|
00A4AD 1 60 rts
|
|
00A4AE 1
|
|
00A4AE 1 2C C5 A4 LA4AE: bit LA4C5
|
|
00A4B1 1 10 05 bpl LA4B8
|
|
00A4B3 1 A9 FD lda #$FD
|
|
00A4B5 1 4C BA A4 jmp LA4BA
|
|
00A4B8 1
|
|
00A4B8 1 A9 FC LA4B8: lda #$FC
|
|
00A4BA 1 20 30 40 LA4BA: jsr L4030
|
|
00A4BD 1 D0 03 bne LA4C2
|
|
00A4BF 1 4C C6 A4 jmp LA4C6
|
|
00A4C2 1
|
|
00A4C2 1 4C LA4C2: .byte $4C
|
|
00A4C3 1 9F LA4C3: .byte $9F
|
|
00A4C4 1 A3 .byte $A3
|
|
00A4C5 1 00 LA4C5: brk
|
|
00A4C6 1 A0 C5 LA4C6: ldy #$C5
|
|
00A4C8 1 A9 A9 lda #$A9
|
|
00A4CA 1 A2 97 ldx #$97
|
|
00A4CC 1 20 21 40 jsr L4021
|
|
00A4CF 1 60 rts
|
|
00A4D0 1
|
|
00A4D0 1 00 brk
|
|
00A4D1 1 00 brk
|
|
00A4D2 1 00 brk
|
|
00A4D3 1 00 brk
|
|
00A4D4 1 00 brk
|
|
00A4D5 1 00 brk
|
|
00A4D6 1 00 brk
|
|
00A4D7 1 00 brk
|
|
00A4D8 1 00 brk
|
|
00A4D9 1 00 brk
|
|
00A4DA 1 00 brk
|
|
00A4DB 1 00 brk
|
|
00A4DC 1 00 brk
|
|
00A4DD 1 00 brk
|
|
00A4DE 1 00 brk
|
|
00A4DF 1 00 brk
|
|
00A4E0 1 00 brk
|
|
00A4E1 1 00 brk
|
|
00A4E2 1 00 brk
|
|
00A4E3 1 00 brk
|
|
00A4E4 1 00 brk
|
|
00A4E5 1 00 brk
|
|
00A4E6 1 00 brk
|
|
00A4E7 1 00 brk
|
|
00A4E8 1 00 brk
|
|
00A4E9 1 00 brk
|
|
00A4EA 1 00 brk
|
|
00A4EB 1 00 brk
|
|
00A4EC 1 00 brk
|
|
00A4ED 1 00 brk
|
|
00A4EE 1 00 brk
|
|
00A4EF 1 00 brk
|
|
00A4F0 1 00 brk
|
|
00A4F1 1 00 brk
|
|
00A4F2 1 00 brk
|
|
00A4F3 1 00 brk
|
|
00A4F4 1 00 brk
|
|
00A4F5 1 00 brk
|
|
00A4F6 1 00 brk
|
|
00A4F7 1 00 brk
|
|
00A4F8 1 00 brk
|
|
00A4F9 1 00 brk
|
|
00A4FA 1 00 brk
|
|
00A4FB 1 00 brk
|
|
00A4FC 1 00 brk
|
|
00A4FD 1 00 brk
|
|
00A4FE 1 00 brk
|
|
00A4FF 1 00 brk
|
|
00A500 1 4C 20 A5 LA500: jmp LA520
|
|
00A503 1
|
|
00A503 1 9C LA503: .byte $9C
|
|
00A504 1 A8 LA504: tay
|
|
00A505 1 57 A9 rmb5 $A9
|
|
00A507 1 D4 .byte $D4
|
|
00A508 1 AC 34 AE ldy LAE34
|
|
00A50B 1 98 tya
|
|
00A50C 1 A8 tay
|
|
00A50D 1 98 tya
|
|
00A50E 1 A8 tay
|
|
00A50F 1 28 plp
|
|
00A510 1 AF 2C B0 bbs2 $2C,LA4C3
|
|
00A513 1 4A lsr a
|
|
00A514 1 B1 68 lda ($68),y
|
|
00A516 1 B2 E1 lda ($E1)
|
|
00A518 1 AA tax
|
|
00A519 1 FA plx
|
|
00A51A 1 AB .byte $AB
|
|
00A51B 1 25 B3 and $B3
|
|
00A51D 1 00 LA51D: brk
|
|
00A51E 1 00 LA51E: brk
|
|
00A51F 1 00 brk
|
|
00A520 1 8D 1D A5 LA520: sta LA51D
|
|
00A523 1 8E 1E A5 stx LA51E
|
|
00A526 1 98 tya
|
|
00A527 1 0A asl a
|
|
00A528 1 AA tax
|
|
00A529 1 BD 03 A5 lda LA503,x
|
|
00A52C 1 8D 65 A5 sta LA565
|
|
00A52F 1 BD 04 A5 lda LA504,x
|
|
00A532 1 8D 66 A5 sta LA566
|
|
00A535 1 A9 00 lda #$00
|
|
00A537 1 8D EB D8 sta $D8EB
|
|
00A53A 1 8D EC D8 sta $D8EC
|
|
00A53D 1 8D F0 D8 sta $D8F0
|
|
00A540 1 8D F1 D8 sta $D8F1
|
|
00A543 1 8D F2 D8 sta $D8F2
|
|
00A546 1 8D E8 D8 sta $D8E8
|
|
00A549 1 8D F5 D8 sta $D8F5
|
|
00A54C 1 8D ED D8 sta $D8ED
|
|
00A54F 1 8D E6 B3 sta LB3E6
|
|
00A552 1 A9 14 lda #$14
|
|
00A554 1 8D E9 D8 sta $D8E9
|
|
00A557 1 A9 98 lda #$98
|
|
00A559 1 8D 9A A8 sta LA89A
|
|
00A55C 1 A9 A8 lda #$A8
|
|
00A55E 1 8D 9B A8 sta LA89B
|
|
00A561 1 20 03 B4 jsr LB403
|
|
00A564 1 4C .byte $4C
|
|
00A565 1 00 LA565: brk
|
|
00A566 1 00 LA566: brk
|
|
00A567 1 AD E8 D8 LA567: lda $D8E8
|
|
00A56A 1 F0 0D beq LA579
|
|
00A56C 1 CE E9 D8 dec $D8E9
|
|
00A56F 1 D0 08 bne LA579
|
|
00A571 1 20 F5 B8 jsr LB8F5
|
|
00A574 1 A9 14 lda #$14
|
|
00A576 1 8D E9 D8 sta $D8E9
|
|
00A579 1 A0 2A LA579: ldy #$2A
|
|
00A57B 1 A9 08 lda #$08
|
|
00A57D 1 A2 D2 ldx #$D2
|
|
00A57F 1 20 00 D0 jsr LD000
|
|
00A582 1 AD 08 D2 lda $D208
|
|
00A585 1 C9 01 cmp #$01
|
|
00A587 1 D0 03 bne LA58C
|
|
00A589 1 4C EE A5 jmp LA5EE
|
|
00A58C 1
|
|
00A58C 1 C9 03 LA58C: cmp #$03
|
|
00A58E 1 D0 03 bne LA593
|
|
00A590 1 4C FD A6 jmp LA6FD
|
|
00A593 1
|
|
00A593 1 AD E8 D8 LA593: lda $D8E8
|
|
00A596 1 F0 CF beq LA567
|
|
00A598 1 A0 40 ldy #$40
|
|
00A59A 1 A9 09 lda #$09
|
|
00A59C 1 A2 D2 ldx #$D2
|
|
00A59E 1 20 00 D0 jsr LD000
|
|
00A5A1 1 AD 0D D2 lda $D20D
|
|
00A5A4 1 D0 03 bne LA5A9
|
|
00A5A6 1 4C 67 A5 jmp LA567
|
|
00A5A9 1
|
|
00A5A9 1 AD 0E D2 LA5A9: lda $D20E
|
|
00A5AC 1 CD 7D D5 cmp $D57D
|
|
00A5AF 1 F0 03 beq LA5B4
|
|
00A5B1 1 4C 67 A5 jmp LA567
|
|
00A5B4 1
|
|
00A5B4 1 AD 7D D5 LA5B4: lda $D57D
|
|
00A5B7 1 20 B9 B7 jsr LB7B9
|
|
00A5BA 1 AD 7D D5 lda $D57D
|
|
00A5BD 1 8D 08 D2 sta $D208
|
|
00A5C0 1 A0 46 ldy #$46
|
|
00A5C2 1 A9 08 lda #$08
|
|
00A5C4 1 A2 D2 ldx #$D2
|
|
00A5C6 1 20 00 D0 jsr LD000
|
|
00A5C9 1 A0 0E ldy #$0E
|
|
00A5CB 1 A9 0D lda #$0D
|
|
00A5CD 1 A2 D2 ldx #$D2
|
|
00A5CF 1 20 00 D0 jsr LD000
|
|
00A5D2 1 A0 13 LA5D2: ldy #$13
|
|
00A5D4 1 A9 AB lda #$AB
|
|
00A5D6 1 A2 D6 ldx #$D6
|
|
00A5D8 1 20 00 D0 jsr LD000
|
|
00A5DB 1 C9 80 cmp #$80
|
|
00A5DD 1 D0 06 bne LA5E5
|
|
00A5DF 1 20 D8 B3 jsr LB3D8
|
|
00A5E2 1 4C E8 A5 jmp LA5E8
|
|
00A5E5 1
|
|
00A5E5 1 20 CA B3 LA5E5: jsr LB3CA
|
|
00A5E8 1 20 B1 BE LA5E8: jsr LBEB1
|
|
00A5EB 1 4C 67 A5 jmp LA567
|
|
00A5EE 1
|
|
00A5EE 1 A0 40 LA5EE: ldy #$40
|
|
00A5F0 1 A9 09 lda #$09
|
|
00A5F2 1 A2 D2 ldx #$D2
|
|
00A5F4 1 20 00 D0 jsr LD000
|
|
00A5F7 1 AD 0D D2 lda $D20D
|
|
00A5FA 1 D0 03 bne LA5FF
|
|
00A5FC 1 A9 FF lda #$FF
|
|
00A5FE 1 60 rts
|
|
00A5FF 1
|
|
00A5FF 1 C9 02 LA5FF: cmp #$02
|
|
00A601 1 D0 03 bne LA606
|
|
00A603 1 4C 09 A6 jmp LA609
|
|
00A606 1
|
|
00A606 1 A9 FF LA606: lda #$FF
|
|
00A608 1 60 rts
|
|
00A609 1
|
|
00A609 1 AD 0E D2 LA609: lda $D20E
|
|
00A60C 1 CD 7D D5 cmp $D57D
|
|
00A60F 1 F0 03 beq LA614
|
|
00A611 1 A9 FF lda #$FF
|
|
00A613 1 60 rts
|
|
00A614 1
|
|
00A614 1 AD 7D D5 LA614: lda $D57D
|
|
00A617 1 20 B9 B7 jsr LB7B9
|
|
00A61A 1 AD 7D D5 lda $D57D
|
|
00A61D 1 8D 08 D2 sta $D208
|
|
00A620 1 A0 46 ldy #$46
|
|
00A622 1 A9 08 lda #$08
|
|
00A624 1 A2 D2 ldx #$D2
|
|
00A626 1 20 00 D0 jsr LD000
|
|
00A629 1 A0 0E ldy #$0E
|
|
00A62B 1 A9 0D lda #$0D
|
|
00A62D 1 A2 D2 ldx #$D2
|
|
00A62F 1 20 00 D0 jsr LD000
|
|
00A632 1 2C E7 D8 bit $D8E7
|
|
00A635 1 50 03 bvc LA63A
|
|
00A637 1 4C 5E A6 jmp LA65E
|
|
00A63A 1
|
|
00A63A 1 A0 13 LA63A: ldy #$13
|
|
00A63C 1 A9 20 lda #$20
|
|
00A63E 1 A2 AE ldx #$AE
|
|
00A640 1 20 00 D0 jsr LD000
|
|
00A643 1 C9 80 cmp #$80
|
|
00A645 1 F0 03 beq LA64A
|
|
00A647 1 4C C1 A6 jmp LA6C1
|
|
00A64A 1
|
|
00A64A 1 20 3B B4 LA64A: jsr LB43B
|
|
00A64D 1 A0 11 ldy #$11
|
|
00A64F 1 A9 20 lda #$20
|
|
00A651 1 A2 AE ldx #$AE
|
|
00A653 1 20 00 D0 jsr LD000
|
|
00A656 1 20 CF B7 jsr LB7CF
|
|
00A659 1 30 02 bmi LA65D
|
|
00A65B 1 A9 00 lda #$00
|
|
00A65D 1 60 LA65D: rts
|
|
00A65E 1
|
|
00A65E 1 A0 13 LA65E: ldy #$13
|
|
00A660 1 A9 28 lda #$28
|
|
00A662 1 A2 AE ldx #$AE
|
|
00A664 1 20 00 D0 jsr LD000
|
|
00A667 1 C9 80 cmp #$80
|
|
00A669 1 D0 14 bne LA67F
|
|
00A66B 1 20 3B B4 jsr LB43B
|
|
00A66E 1 A0 11 ldy #$11
|
|
00A670 1 A9 28 lda #$28
|
|
00A672 1 A2 AE ldx #$AE
|
|
00A674 1 20 00 D0 jsr LD000
|
|
00A677 1 20 D9 B7 jsr LB7D9
|
|
00A67A 1 30 02 bmi LA67E
|
|
00A67C 1 A9 02 lda #$02
|
|
00A67E 1 60 LA67E: rts
|
|
00A67F 1
|
|
00A67F 1 A0 13 LA67F: ldy #$13
|
|
00A681 1 A9 30 lda #$30
|
|
00A683 1 A2 AE ldx #$AE
|
|
00A685 1 20 00 D0 jsr LD000
|
|
00A688 1 C9 80 cmp #$80
|
|
00A68A 1 D0 14 bne LA6A0
|
|
00A68C 1 20 3B B4 jsr LB43B
|
|
00A68F 1 A0 11 ldy #$11
|
|
00A691 1 A9 30 lda #$30
|
|
00A693 1 A2 AE ldx #$AE
|
|
00A695 1 20 00 D0 jsr LD000
|
|
00A698 1 20 DE B7 jsr LB7DE
|
|
00A69B 1 30 02 bmi LA69F
|
|
00A69D 1 A9 03 lda #$03
|
|
00A69F 1 60 LA69F: rts
|
|
00A6A0 1
|
|
00A6A0 1 A0 13 LA6A0: ldy #$13
|
|
00A6A2 1 A9 38 lda #$38
|
|
00A6A4 1 A2 AE ldx #$AE
|
|
00A6A6 1 20 00 D0 jsr LD000
|
|
00A6A9 1 C9 80 cmp #$80
|
|
00A6AB 1 D0 14 bne LA6C1
|
|
00A6AD 1 20 3B B4 jsr LB43B
|
|
00A6B0 1 A0 11 ldy #$11
|
|
00A6B2 1 A9 38 lda #$38
|
|
00A6B4 1 A2 AE ldx #$AE
|
|
00A6B6 1 20 00 D0 jsr LD000
|
|
00A6B9 1 20 E3 B7 jsr LB7E3
|
|
00A6BC 1 30 02 bmi LA6C0
|
|
00A6BE 1 A9 04 lda #$04
|
|
00A6C0 1 60 LA6C0: rts
|
|
00A6C1 1
|
|
00A6C1 1 2C E7 D8 LA6C1: bit $D8E7
|
|
00A6C4 1 10 03 bpl LA6C9
|
|
00A6C6 1 A9 FF lda #$FF
|
|
00A6C8 1 60 rts
|
|
00A6C9 1
|
|
00A6C9 1 A0 13 LA6C9: ldy #$13
|
|
00A6CB 1 A9 10 lda #$10
|
|
00A6CD 1 A2 AE ldx #$AE
|
|
00A6CF 1 20 00 D0 jsr LD000
|
|
00A6D2 1 C9 80 cmp #$80
|
|
00A6D4 1 F0 03 beq LA6D9
|
|
00A6D6 1 4C ED A6 jmp LA6ED
|
|
00A6D9 1
|
|
00A6D9 1 20 3B B4 LA6D9: jsr LB43B
|
|
00A6DC 1 A0 11 ldy #$11
|
|
00A6DE 1 A9 10 lda #$10
|
|
00A6E0 1 A2 AE ldx #$AE
|
|
00A6E2 1 20 00 D0 jsr LD000
|
|
00A6E5 1 20 D4 B7 jsr LB7D4
|
|
00A6E8 1 30 02 bmi LA6EC
|
|
00A6EA 1 A9 01 lda #$01
|
|
00A6EC 1 60 LA6EC: rts
|
|
00A6ED 1
|
|
00A6ED 1 2C E8 D8 LA6ED: bit $D8E8
|
|
00A6F0 1 30 05 bmi LA6F7
|
|
00A6F2 1 A9 FF lda #$FF
|
|
00A6F4 1 4C 99 A8 jmp LA899
|
|
00A6F7 1
|
|
00A6F7 1 20 B8 B9 LA6F7: jsr LB9B8
|
|
00A6FA 1 A9 FF lda #$FF
|
|
00A6FC 1 60 rts
|
|
00A6FD 1
|
|
00A6FD 1 AD 0A D2 LA6FD: lda $D20A
|
|
00A700 1 C9 02 cmp #$02
|
|
00A702 1 D0 16 bne LA71A
|
|
00A704 1 AD 09 D2 lda $D209
|
|
00A707 1 29 7F and #$7F
|
|
00A709 1 C9 08 cmp #$08
|
|
00A70B 1 D0 03 bne LA710
|
|
00A70D 1 4C 15 A8 jmp LA815
|
|
00A710 1
|
|
00A710 1 C9 15 LA710: cmp #$15
|
|
00A712 1 D0 03 bne LA717
|
|
00A714 1 4C 20 A8 jmp LA820
|
|
00A717 1
|
|
00A717 1 A9 FF LA717: lda #$FF
|
|
00A719 1 60 rts
|
|
00A71A 1
|
|
00A71A 1 AD 09 D2 LA71A: lda $D209
|
|
00A71D 1 29 7F and #$7F
|
|
00A71F 1 C9 08 cmp #$08
|
|
00A721 1 D0 0B bne LA72E
|
|
00A723 1 2C ED D8 bit $D8ED
|
|
00A726 1 10 03 bpl LA72B
|
|
00A728 1 4C B8 0C jmp L0CB8
|
|
00A72B 1
|
|
00A72B 1 4C 2B A8 LA72B: jmp LA82B
|
|
00A72E 1
|
|
00A72E 1 C9 15 LA72E: cmp #$15
|
|
00A730 1 D0 0B bne LA73D
|
|
00A732 1 2C ED D8 bit $D8ED
|
|
00A735 1 10 03 bpl LA73A
|
|
00A737 1 4C D7 0C jmp L0CD7
|
|
00A73A 1
|
|
00A73A 1 4C 3E A8 LA73A: jmp LA83E
|
|
00A73D 1
|
|
00A73D 1 C9 0D LA73D: cmp #$0D
|
|
00A73F 1 D0 08 bne LA749
|
|
00A741 1 2C E7 D8 bit $D8E7
|
|
00A744 1 70 D1 bvs LA717
|
|
00A746 1 4C 51 A8 jmp LA851
|
|
00A749 1
|
|
00A749 1 C9 1B LA749: cmp #$1B
|
|
00A74B 1 D0 08 bne LA755
|
|
00A74D 1 2C E7 D8 bit $D8E7
|
|
00A750 1 30 C5 bmi LA717
|
|
00A752 1 4C 6F A8 jmp LA86F
|
|
00A755 1
|
|
00A755 1 C9 7F LA755: cmp #$7F
|
|
00A757 1 D0 03 bne LA75C
|
|
00A759 1 4C 8D A8 jmp LA88D
|
|
00A75C 1
|
|
00A75C 1 C9 0B LA75C: cmp #$0B
|
|
00A75E 1 D0 0B bne LA76B
|
|
00A760 1 2C ED D8 bit $D8ED
|
|
00A763 1 30 03 bmi LA768
|
|
00A765 1 4C 17 A7 jmp LA717
|
|
00A768 1
|
|
00A768 1 4C 14 0D LA768: jmp L0D14
|
|
00A76B 1
|
|
00A76B 1 C9 0A LA76B: cmp #$0A
|
|
00A76D 1 D0 0B bne LA77A
|
|
00A76F 1 2C ED D8 bit $D8ED
|
|
00A772 1 30 03 bmi LA777
|
|
00A774 1 4C 17 A7 jmp LA717
|
|
00A777 1
|
|
00A777 1 4C F9 0C LA777: jmp L0CF9
|
|
00A77A 1
|
|
00A77A 1 2C E7 D8 LA77A: bit $D8E7
|
|
00A77D 1 50 1C bvc LA79B
|
|
00A77F 1 C9 59 cmp #$59
|
|
00A781 1 F0 65 beq LA7E8
|
|
00A783 1 C9 79 cmp #$79
|
|
00A785 1 F0 61 beq LA7E8
|
|
00A787 1 C9 4E cmp #$4E
|
|
00A789 1 F0 6C beq LA7F7
|
|
00A78B 1 C9 6E cmp #$6E
|
|
00A78D 1 F0 68 beq LA7F7
|
|
00A78F 1 C9 41 cmp #$41
|
|
00A791 1 F0 73 beq LA806
|
|
00A793 1 C9 61 cmp #$61
|
|
00A795 1 F0 6F beq LA806
|
|
00A797 1 C9 0D cmp #$0D
|
|
00A799 1 F0 4D beq LA7E8
|
|
00A79B 1 2C F5 D8 LA79B: bit $D8F5
|
|
00A79E 1 30 28 bmi LA7C8
|
|
00A7A0 1 C9 2E cmp #$2E
|
|
00A7A2 1 F0 34 beq LA7D8
|
|
00A7A4 1 C9 30 cmp #$30
|
|
00A7A6 1 B0 03 bcs LA7AB
|
|
00A7A8 1 4C 17 A7 jmp LA717
|
|
00A7AB 1
|
|
00A7AB 1 C9 7B LA7AB: cmp #$7B
|
|
00A7AD 1 90 03 bcc LA7B2
|
|
00A7AF 1 4C 17 A7 jmp LA717
|
|
00A7B2 1
|
|
00A7B2 1 C9 3A LA7B2: cmp #$3A
|
|
00A7B4 1 90 22 bcc LA7D8
|
|
00A7B6 1 C9 41 cmp #$41
|
|
00A7B8 1 B0 03 bcs LA7BD
|
|
00A7BA 1 4C 17 A7 jmp LA717
|
|
00A7BD 1
|
|
00A7BD 1 C9 5B LA7BD: cmp #$5B
|
|
00A7BF 1 90 1C bcc LA7DD
|
|
00A7C1 1 C9 61 cmp #$61
|
|
00A7C3 1 B0 18 bcs LA7DD
|
|
00A7C5 1 4C 17 A7 jmp LA717
|
|
00A7C8 1
|
|
00A7C8 1 C9 20 LA7C8: cmp #$20
|
|
00A7CA 1 B0 03 bcs LA7CF
|
|
00A7CC 1 4C 17 A7 jmp LA717
|
|
00A7CF 1
|
|
00A7CF 1 C9 7E LA7CF: cmp #$7E
|
|
00A7D1 1 F0 0A beq LA7DD
|
|
00A7D3 1 90 08 bcc LA7DD
|
|
00A7D5 1 4C 17 A7 jmp LA717
|
|
00A7D8 1
|
|
00A7D8 1 AE 43 D4 LA7D8: ldx $D443
|
|
00A7DB 1 F0 08 beq LA7E5
|
|
00A7DD 1 AE E8 D8 LA7DD: ldx $D8E8
|
|
00A7E0 1 F0 03 beq LA7E5
|
|
00A7E2 1 20 0B BB jsr LBB0B
|
|
00A7E5 1 A9 FF LA7E5: lda #$FF
|
|
00A7E7 1 60 rts
|
|
00A7E8 1
|
|
00A7E8 1 20 3B B4 LA7E8: jsr LB43B
|
|
00A7EB 1 A0 11 ldy #$11
|
|
00A7ED 1 A9 28 lda #$28
|
|
00A7EF 1 A2 AE ldx #$AE
|
|
00A7F1 1 20 00 D0 jsr LD000
|
|
00A7F4 1 A9 02 lda #$02
|
|
00A7F6 1 60 rts
|
|
00A7F7 1
|
|
00A7F7 1 20 3B B4 LA7F7: jsr LB43B
|
|
00A7FA 1 A0 11 ldy #$11
|
|
00A7FC 1 A9 30 lda #$30
|
|
00A7FE 1 A2 AE ldx #$AE
|
|
00A800 1 20 00 D0 jsr LD000
|
|
00A803 1 A9 03 lda #$03
|
|
00A805 1 60 rts
|
|
00A806 1
|
|
00A806 1 20 3B B4 LA806: jsr LB43B
|
|
00A809 1 A0 11 ldy #$11
|
|
00A80B 1 A9 38 lda #$38
|
|
00A80D 1 A2 AE ldx #$AE
|
|
00A80F 1 20 00 D0 jsr LD000
|
|
00A812 1 A9 04 lda #$04
|
|
00A814 1 60 rts
|
|
00A815 1
|
|
00A815 1 AD E8 D8 LA815: lda $D8E8
|
|
00A818 1 F0 03 beq LA81D
|
|
00A81A 1 20 5E BC jsr LBC5E
|
|
00A81D 1 A9 FF LA81D: lda #$FF
|
|
00A81F 1 60 rts
|
|
00A820 1
|
|
00A820 1 AD E8 D8 LA820: lda $D8E8
|
|
00A823 1 F0 03 beq LA828
|
|
00A825 1 20 C9 BC jsr LBCC9
|
|
00A828 1 A9 FF LA828: lda #$FF
|
|
00A82A 1 60 rts
|
|
00A82B 1
|
|
00A82B 1 AD E8 D8 LA82B: lda $D8E8
|
|
00A82E 1 F0 0B beq LA83B
|
|
00A830 1 2C ED D8 bit $D8ED
|
|
00A833 1 10 03 bpl LA838
|
|
00A835 1 4C D7 0C jmp L0CD7
|
|
00A838 1
|
|
00A838 1 20 A4 BB LA838: jsr LBBA4
|
|
00A83B 1 A9 FF LA83B: lda #$FF
|
|
00A83D 1 60 rts
|
|
00A83E 1
|
|
00A83E 1 AD E8 D8 LA83E: lda $D8E8
|
|
00A841 1 F0 0B beq LA84E
|
|
00A843 1 2C ED D8 bit $D8ED
|
|
00A846 1 10 03 bpl LA84B
|
|
00A848 1 4C B8 0C jmp L0CB8
|
|
00A84B 1
|
|
00A84B 1 20 03 BC LA84B: jsr LBC03
|
|
00A84E 1 A9 FF LA84E: lda #$FF
|
|
00A850 1 60 rts
|
|
00A851 1
|
|
00A851 1 AD 7D D5 LA851: lda $D57D
|
|
00A854 1 20 B9 B7 jsr LB7B9
|
|
00A857 1 20 3B B4 jsr LB43B
|
|
00A85A 1 A0 11 ldy #$11
|
|
00A85C 1 A9 20 lda #$20
|
|
00A85E 1 A2 AE ldx #$AE
|
|
00A860 1 20 00 D0 jsr LD000
|
|
00A863 1 A0 11 ldy #$11
|
|
00A865 1 A9 20 lda #$20
|
|
00A867 1 A2 AE ldx #$AE
|
|
00A869 1 20 00 D0 jsr LD000
|
|
00A86C 1 A9 00 lda #$00
|
|
00A86E 1 60 rts
|
|
00A86F 1
|
|
00A86F 1 AD 7D D5 LA86F: lda $D57D
|
|
00A872 1 20 B9 B7 jsr LB7B9
|
|
00A875 1 20 3B B4 jsr LB43B
|
|
00A878 1 A0 11 ldy #$11
|
|
00A87A 1 A9 10 lda #$10
|
|
00A87C 1 A2 AE ldx #$AE
|
|
00A87E 1 20 00 D0 jsr LD000
|
|
00A881 1 A0 11 ldy #$11
|
|
00A883 1 A9 10 lda #$10
|
|
00A885 1 A2 AE ldx #$AE
|
|
00A887 1 20 00 D0 jsr LD000
|
|
00A88A 1 A9 01 lda #$01
|
|
00A88C 1 60 rts
|
|
00A88D 1
|
|
00A88D 1 AD E8 D8 LA88D: lda $D8E8
|
|
00A890 1 F0 03 beq LA895
|
|
00A892 1 20 63 BB jsr LBB63
|
|
00A895 1 A9 FF LA895: lda #$FF
|
|
00A897 1 60 rts
|
|
00A898 1
|
|
00A898 1 60 rts
|
|
00A899 1
|
|
00A899 1 4C LA899: .byte $4C
|
|
00A89A 1 00 LA89A: brk
|
|
00A89B 1 00 LA89B: brk
|
|
00A89C 1 A0 38 ldy #$38
|
|
00A89E 1 A9 2B lda #$2B
|
|
00A8A0 1 A2 D6 ldx #$D6
|
|
00A8A2 1 20 00 D0 jsr LD000
|
|
00A8A5 1 AD 2B D6 lda $D62B
|
|
00A8A8 1 20 B9 B7 jsr LB7B9
|
|
00A8AB 1 20 3B B4 jsr LB43B
|
|
00A8AE 1 A0 12 ldy #$12
|
|
00A8B0 1 A9 DD lda #$DD
|
|
00A8B2 1 A2 AE ldx #$AE
|
|
00A8B4 1 20 00 D0 jsr LD000
|
|
00A8B7 1 A0 12 ldy #$12
|
|
00A8B9 1 A9 E5 lda #$E5
|
|
00A8BB 1 A2 AE ldx #$AE
|
|
00A8BD 1 20 00 D0 jsr LD000
|
|
00A8C0 1 A9 ED lda #$ED
|
|
00A8C2 1 A2 AE ldx #$AE
|
|
00A8C4 1 20 23 B7 jsr LB723
|
|
00A8C7 1 A9 FE lda #$FE
|
|
00A8C9 1 A2 AE ldx #$AE
|
|
00A8CB 1 A0 81 ldy #$81
|
|
00A8CD 1 20 90 B5 jsr LB590
|
|
00A8D0 1 A9 22 lda #$22
|
|
00A8D2 1 A2 AF ldx #$AF
|
|
00A8D4 1 A0 82 ldy #$82
|
|
00A8D6 1 20 90 B5 jsr LB590
|
|
00A8D9 1 A9 46 lda #$46
|
|
00A8DB 1 A2 AF ldx #$AF
|
|
00A8DD 1 A0 83 ldy #$83
|
|
00A8DF 1 20 90 B5 jsr LB590
|
|
00A8E2 1 A9 5A lda #$5A
|
|
00A8E4 1 A2 AF ldx #$AF
|
|
00A8E6 1 A0 05 ldy #$05
|
|
00A8E8 1 20 90 B5 jsr LB590
|
|
00A8EB 1 A9 93 lda #$93
|
|
00A8ED 1 A2 AF ldx #$AF
|
|
00A8EF 1 A0 86 ldy #$86
|
|
00A8F1 1 20 90 B5 jsr LB590
|
|
00A8F4 1 A9 B4 lda #$B4
|
|
00A8F6 1 A2 AF ldx #$AF
|
|
00A8F8 1 A0 07 ldy #$07
|
|
00A8FA 1 20 90 B5 jsr LB590
|
|
00A8FD 1 A9 EE lda #$EE
|
|
00A8FF 1 A2 AF ldx #$AF
|
|
00A901 1 A0 09 ldy #$09
|
|
00A903 1 20 90 B5 jsr LB590
|
|
00A906 1 A9 36 lda #$36
|
|
00A908 1 8D C3 D6 sta $D6C3
|
|
00A90B 1 A9 01 lda #$01
|
|
00A90D 1 8D C4 D6 sta $D6C4
|
|
00A910 1 A9 00 lda #$00
|
|
00A912 1 A2 B0 ldx #$B0
|
|
00A914 1 A0 09 ldy #$09
|
|
00A916 1 20 90 B5 jsr LB590
|
|
00A919 1 A9 28 lda #$28
|
|
00A91B 1 8D C3 D6 sta $D6C3
|
|
00A91E 1 A9 00 lda #$00
|
|
00A920 1 8D C4 D6 sta $D6C4
|
|
00A923 1 A0 2A LA923: ldy #$2A
|
|
00A925 1 A9 08 lda #$08
|
|
00A927 1 A2 D2 ldx #$D2
|
|
00A929 1 20 00 D0 jsr LD000
|
|
00A92C 1 AD 08 D2 lda $D208
|
|
00A92F 1 C9 01 cmp #$01
|
|
00A931 1 F0 14 beq LA947
|
|
00A933 1 C9 03 cmp #$03
|
|
00A935 1 D0 EC bne LA923
|
|
00A937 1 AD 09 D2 lda $D209
|
|
00A93A 1 29 7F and #$7F
|
|
00A93C 1 C9 1B cmp #$1B
|
|
00A93E 1 F0 07 beq LA947
|
|
00A940 1 C9 0D cmp #$0D
|
|
00A942 1 D0 DF bne LA923
|
|
00A944 1 4C 47 A9 jmp LA947
|
|
00A947 1
|
|
00A947 1 A0 39 LA947: ldy #$39
|
|
00A949 1 A9 2B lda #$2B
|
|
00A94B 1 A2 D6 ldx #$D6
|
|
00A94D 1 20 00 D0 jsr LD000
|
|
00A950 1 20 B1 BE jsr LBEB1
|
|
00A953 1 20 CA B3 jsr LB3CA
|
|
00A956 1 60 rts
|
|
00A957 1
|
|
00A957 1 20 BF B3 jsr LB3BF
|
|
00A95A 1 A0 00 ldy #$00
|
|
00A95C 1 B1 06 lda (L0006),y
|
|
00A95E 1 C9 01 cmp #$01
|
|
00A960 1 D0 03 bne LA965
|
|
00A962 1 4C B5 A9 jmp LA9B5
|
|
00A965 1
|
|
00A965 1 C9 02 LA965: cmp #$02
|
|
00A967 1 D0 03 bne LA96C
|
|
00A969 1 4C E6 A9 jmp LA9E6
|
|
00A96C 1
|
|
00A96C 1 C9 03 LA96C: cmp #$03
|
|
00A96E 1 D0 03 bne LA973
|
|
00A970 1 4C 6A AA jmp LAA6A
|
|
00A973 1
|
|
00A973 1 C9 04 LA973: cmp #$04
|
|
00A975 1 D0 03 bne LA97A
|
|
00A977 1 4C 9C AA jmp LAA9C
|
|
00A97A 1
|
|
00A97A 1 C9 05 LA97A: cmp #$05
|
|
00A97C 1 D0 03 bne LA981
|
|
00A97E 1 4C 5A AA jmp LAA5A
|
|
00A981 1
|
|
00A981 1 A9 00 LA981: lda #$00
|
|
00A983 1 8D E8 D8 sta $D8E8
|
|
00A986 1 20 3A B5 jsr LB53A
|
|
00A989 1 A9 0C lda #$0C
|
|
00A98B 1 A2 B0 ldx #$B0
|
|
00A98D 1 20 23 B7 jsr LB723
|
|
00A990 1 A9 15 lda #$15
|
|
00A992 1 A2 B0 ldx #$B0
|
|
00A994 1 A0 01 ldy #$01
|
|
00A996 1 20 90 B5 jsr LB590
|
|
00A999 1 A9 22 lda #$22
|
|
00A99B 1 A2 B0 ldx #$B0
|
|
00A99D 1 A0 02 ldy #$02
|
|
00A99F 1 20 90 B5 jsr LB590
|
|
00A9A2 1 A9 28 lda #$28
|
|
00A9A4 1 A2 B0 ldx #$B0
|
|
00A9A6 1 A0 03 ldy #$03
|
|
00A9A8 1 20 90 B5 jsr LB590
|
|
00A9AB 1 A9 2D lda #$2D
|
|
00A9AD 1 A2 B0 ldx #$B0
|
|
00A9AF 1 A0 04 ldy #$04
|
|
00A9B1 1 20 90 B5 jsr LB590
|
|
00A9B4 1 60 rts
|
|
00A9B5 1
|
|
00A9B5 1 A0 01 LA9B5: ldy #$01
|
|
00A9B7 1 B1 06 lda (L0006),y
|
|
00A9B9 1 8D 09 D9 sta $D909
|
|
00A9BC 1 C8 iny
|
|
00A9BD 1 B1 06 lda (L0006),y
|
|
00A9BF 1 8D 0A D9 sta $D90A
|
|
00A9C2 1 20 C4 BD jsr LBDC4
|
|
00A9C5 1 20 DF BD jsr LBDDF
|
|
00A9C8 1 AD 7D D5 lda $D57D
|
|
00A9CB 1 20 B9 B7 jsr LB7B9
|
|
00A9CE 1 A0 0E ldy #$0E
|
|
00A9D0 1 A9 B6 lda #$B6
|
|
00A9D2 1 A2 B0 ldx #$B0
|
|
00A9D4 1 20 00 D0 jsr LD000
|
|
00A9D7 1 A9 01 lda #$01
|
|
00A9D9 1 A2 D9 ldx #$D9
|
|
00A9DB 1 20 08 B7 jsr LB708
|
|
00A9DE 1 A9 FB lda #$FB
|
|
00A9E0 1 A2 D8 ldx #$D8
|
|
00A9E2 1 20 08 B7 jsr LB708
|
|
00A9E5 1 60 rts
|
|
00A9E6 1
|
|
00A9E6 1 A0 01 LA9E6: ldy #$01
|
|
00A9E8 1 B1 06 lda (L0006),y
|
|
00A9EA 1 8D 09 D9 sta $D909
|
|
00A9ED 1 C8 iny
|
|
00A9EE 1 B1 06 lda (L0006),y
|
|
00A9F0 1 8D 0A D9 sta $D90A
|
|
00A9F3 1 20 C4 BD jsr LBDC4
|
|
00A9F6 1 20 DF BD jsr LBDDF
|
|
00A9F9 1 AD 7D D5 lda $D57D
|
|
00A9FC 1 20 B9 B7 jsr LB7B9
|
|
00A9FF 1 20 8D BE jsr LBE8D
|
|
00AA02 1 20 9A BE jsr LBE9A
|
|
00AA05 1 20 BF B3 jsr LB3BF
|
|
00AA08 1 A0 03 ldy #$03
|
|
00AA0A 1 B1 06 lda (L0006),y
|
|
00AA0C 1 AA tax
|
|
00AA0D 1 C8 iny
|
|
00AA0E 1 B1 06 lda (L0006),y
|
|
00AA10 1 85 07 sta $07
|
|
00AA12 1 86 06 stx L0006
|
|
00AA14 1 20 63 BE jsr LBE63
|
|
00AA17 1 A0 0E ldy #$0E
|
|
00AA19 1 A9 7E lda #$7E
|
|
00AA1B 1 A2 AE ldx #$AE
|
|
00AA1D 1 20 00 D0 jsr LD000
|
|
00AA20 1 A9 02 lda #$02
|
|
00AA22 1 A2 D4 ldx #$D4
|
|
00AA24 1 20 08 B7 jsr LB708
|
|
00AA27 1 20 BF B3 jsr LB3BF
|
|
00AA2A 1 A0 05 ldy #$05
|
|
00AA2C 1 B1 06 lda (L0006),y
|
|
00AA2E 1 AA tax
|
|
00AA2F 1 C8 iny
|
|
00AA30 1 B1 06 lda (L0006),y
|
|
00AA32 1 85 07 sta $07
|
|
00AA34 1 86 06 stx L0006
|
|
00AA36 1 20 78 BE jsr LBE78
|
|
00AA39 1 A0 0E ldy #$0E
|
|
00AA3B 1 A9 82 lda #$82
|
|
00AA3D 1 A2 AE ldx #$AE
|
|
00AA3F 1 20 00 D0 jsr LD000
|
|
00AA42 1 A9 43 lda #$43
|
|
00AA44 1 A2 D4 ldx #$D4
|
|
00AA46 1 20 .byte $20
|
|
00AA47 1 08 php
|
|
00AA48 1 B7 A0 LAA48: smb3 $A0
|
|
00AA4A 1 0E A9 BA asl LBAA9
|
|
00AA4D 1 A2 B0 ldx #$B0
|
|
00AA4F 1 20 00 D0 jsr LD000
|
|
00AA52 1 A9 01 lda #$01
|
|
00AA54 1 A2 D9 ldx #$D9
|
|
00AA56 1 20 08 B7 jsr LB708
|
|
00AA59 1 60 rts
|
|
00AA5A 1
|
|
00AA5A 1 20 B1 BE LAA5A: jsr LBEB1
|
|
00AA5D 1 A0 39 ldy #$39
|
|
00AA5F 1 A9 7D lda #$7D
|
|
00AA61 1 A2 D5 ldx #$D5
|
|
00AA63 1 20 00 D0 jsr LD000
|
|
00AA66 1 20 03 B4 jsr LB403
|
|
00AA69 1 60 rts
|
|
00AA6A 1
|
|
00AA6A 1 20 CE AA LAA6A: jsr LAACE
|
|
00AA6D 1 AD 7D D5 lda $D57D
|
|
00AA70 1 20 B9 B7 jsr LB7B9
|
|
00AA73 1 A9 47 lda #$47
|
|
00AA75 1 A2 B0 ldx #$B0
|
|
00AA77 1 A0 06 ldy #$06
|
|
00AA79 1 20 90 B5 jsr LB590
|
|
00AA7C 1 20 4E B6 jsr LB64E
|
|
00AA7F 1 20 67 A5 LAA7F: jsr LA567
|
|
00AA82 1 30 FB bmi LAA7F
|
|
00AA84 1 48 pha
|
|
00AA85 1 20 87 B6 jsr LB687
|
|
00AA88 1 A0 07 ldy #$07
|
|
00AA8A 1 A9 00 lda #$00
|
|
00AA8C 1 A2 D2 ldx #$D2
|
|
00AA8E 1 20 00 D0 jsr LD000
|
|
00AA91 1 A0 11 ldy #$11
|
|
00AA93 1 A9 76 lda #$76
|
|
00AA95 1 A2 AE ldx #$AE
|
|
00AA97 1 20 00 D0 jsr LD000
|
|
00AA9A 1 68 pla
|
|
00AA9B 1 60 rts
|
|
00AA9C 1
|
|
00AA9C 1 20 CE AA LAA9C: jsr LAACE
|
|
00AA9F 1 AD 7D D5 lda $D57D
|
|
00AAA2 1 20 B9 B7 jsr LB7B9
|
|
00AAA5 1 A9 80 lda #$80
|
|
00AAA7 1 A2 B0 ldx #$B0
|
|
00AAA9 1 A0 06 ldy #$06
|
|
00AAAB 1 20 90 B5 jsr LB590
|
|
00AAAE 1 20 AF B6 jsr LB6AF
|
|
00AAB1 1 20 67 A5 LAAB1: jsr LA567
|
|
00AAB4 1 30 FB bmi LAAB1
|
|
00AAB6 1 48 pha
|
|
00AAB7 1 20 D0 B6 jsr LB6D0
|
|
00AABA 1 A0 07 ldy #$07
|
|
00AABC 1 A9 00 lda #$00
|
|
00AABE 1 A2 D2 ldx #$D2
|
|
00AAC0 1 20 00 D0 jsr LD000
|
|
00AAC3 1 A0 11 ldy #$11
|
|
00AAC5 1 A9 76 lda #$76
|
|
00AAC7 1 A2 AE ldx #$AE
|
|
00AAC9 1 20 00 D0 jsr LD000
|
|
00AACC 1 68 pla
|
|
00AACD 1 60 rts
|
|
00AACE 1
|
|
00AACE 1 8D 08 C0 LAACE: sta ALTZPOFF
|
|
00AAD1 1 8D 82 C0 sta $C082
|
|
00AAD4 1 20 DD FB jsr LFBDD
|
|
00AAD7 1 8D 09 C0 sta ALTZPON
|
|
00AADA 1 AD 8B C0 lda LCBANK1
|
|
00AADD 1 AD 8B C0 lda LCBANK1
|
|
00AAE0 1 60 rts
|
|
00AAE1 1
|
|
00AAE1 1 20 BF B3 jsr LB3BF
|
|
00AAE4 1 A0 00 ldy #$00
|
|
00AAE6 1 B1 06 lda (L0006),y
|
|
00AAE8 1 C9 01 cmp #$01
|
|
00AAEA 1 D0 03 bne LAAEF
|
|
00AAEC 1 4C 38 AB jmp LAB38
|
|
00AAEF 1
|
|
00AAEF 1 C9 02 LAAEF: cmp #$02
|
|
00AAF1 1 D0 03 bne LAAF6
|
|
00AAF3 1 4C 69 AB jmp LAB69
|
|
00AAF6 1
|
|
00AAF6 1 C9 03 LAAF6: cmp #$03
|
|
00AAF8 1 D0 03 bne LAAFD
|
|
00AAFA 1 4C B8 AB jmp LABB8
|
|
00AAFD 1
|
|
00AAFD 1 C9 04 LAAFD: cmp #$04
|
|
00AAFF 1 D0 03 bne LAB04
|
|
00AB01 1 4C C8 AB jmp LABC8
|
|
00AB04 1
|
|
00AB04 1 A9 00 LAB04: lda #$00
|
|
00AB06 1 8D E8 D8 sta $D8E8
|
|
00AB09 1 20 3A B5 jsr LB53A
|
|
00AB0C 1 A9 73 lda #$73
|
|
00AB0E 1 A2 B4 ldx #$B4
|
|
00AB10 1 20 23 B7 jsr LB723
|
|
00AB13 1 A9 15 lda #$15
|
|
00AB15 1 A2 B0 ldx #$B0
|
|
00AB17 1 A0 01 ldy #$01
|
|
00AB19 1 20 90 B5 jsr LB590
|
|
00AB1C 1 A9 22 lda #$22
|
|
00AB1E 1 A2 B0 ldx #$B0
|
|
00AB20 1 A0 02 ldy #$02
|
|
00AB22 1 20 90 B5 jsr LB590
|
|
00AB25 1 A9 28 lda #$28
|
|
00AB27 1 A2 B0 ldx #$B0
|
|
00AB29 1 A0 03 ldy #$03
|
|
00AB2B 1 20 90 B5 jsr LB590
|
|
00AB2E 1 A9 2D lda #$2D
|
|
00AB30 1 A2 B0 ldx #$B0
|
|
00AB32 1 A0 04 ldy #$04
|
|
00AB34 1 20 90 B5 jsr LB590
|
|
00AB37 1 60 rts
|
|
00AB38 1
|
|
00AB38 1 A0 01 LAB38: ldy #$01
|
|
00AB3A 1 B1 06 lda (L0006),y
|
|
00AB3C 1 8D 09 D9 sta $D909
|
|
00AB3F 1 C8 iny
|
|
00AB40 1 B1 06 lda (L0006),y
|
|
00AB42 1 8D 0A D9 sta $D90A
|
|
00AB45 1 20 C4 BD jsr LBDC4
|
|
00AB48 1 20 DF BD jsr LBDDF
|
|
00AB4B 1 AD 7D D5 lda $D57D
|
|
00AB4E 1 20 B9 B7 jsr LB7B9
|
|
00AB51 1 A0 0E ldy #$0E
|
|
00AB53 1 A9 B6 lda #$B6
|
|
00AB55 1 A2 B0 ldx #$B0
|
|
00AB57 1 20 00 D0 jsr LD000
|
|
00AB5A 1 A9 01 lda #$01
|
|
00AB5C 1 A2 D9 ldx #$D9
|
|
00AB5E 1 20 08 B7 jsr LB708
|
|
00AB61 1 A9 FB lda #$FB
|
|
00AB63 1 A2 D8 ldx #$D8
|
|
00AB65 1 20 08 B7 jsr LB708
|
|
00AB68 1 60 rts
|
|
00AB69 1
|
|
00AB69 1 A0 01 LAB69: ldy #$01
|
|
00AB6B 1 B1 06 lda (L0006),y
|
|
00AB6D 1 8D 09 D9 sta $D909
|
|
00AB70 1 C8 iny
|
|
00AB71 1 B1 06 lda (L0006),y
|
|
00AB73 1 8D 0A D9 sta $D90A
|
|
00AB76 1 20 C4 BD jsr LBDC4
|
|
00AB79 1 20 DF BD jsr LBDDF
|
|
00AB7C 1 AD 7D D5 lda $D57D
|
|
00AB7F 1 20 B9 B7 jsr LB7B9
|
|
00AB82 1 20 8D BE jsr LBE8D
|
|
00AB85 1 20 BF B3 jsr LB3BF
|
|
00AB88 1 A0 03 ldy #$03
|
|
00AB8A 1 B1 06 lda (L0006),y
|
|
00AB8C 1 AA tax
|
|
00AB8D 1 C8 iny
|
|
00AB8E 1 B1 06 lda (L0006),y
|
|
00AB90 1 85 07 sta $07
|
|
00AB92 1 86 06 stx L0006
|
|
00AB94 1 20 63 BE jsr LBE63
|
|
00AB97 1 A0 0E ldy #$0E
|
|
00AB99 1 A9 7E lda #$7E
|
|
00AB9B 1 A2 AE ldx #$AE
|
|
00AB9D 1 20 00 D0 jsr LD000
|
|
00ABA0 1 A9 02 lda #$02
|
|
00ABA2 1 A2 D4 ldx #$D4
|
|
00ABA4 1 20 08 B7 jsr LB708
|
|
00ABA7 1 A0 0E ldy #$0E
|
|
00ABA9 1 A9 BA lda #$BA
|
|
00ABAB 1 A2 B0 ldx #$B0
|
|
00ABAD 1 20 00 D0 jsr LD000
|
|
00ABB0 1 A9 01 lda #$01
|
|
00ABB2 1 A2 D9 ldx #$D9
|
|
00ABB4 1 20 08 B7 jsr LB708
|
|
00ABB7 1 60 rts
|
|
00ABB8 1
|
|
00ABB8 1 20 B1 BE LABB8: jsr LBEB1
|
|
00ABBB 1 A0 39 ldy #$39
|
|
00ABBD 1 A9 7D lda #$7D
|
|
00ABBF 1 A2 D5 ldx #$D5
|
|
00ABC1 1 20 00 D0 jsr LD000
|
|
00ABC4 1 20 03 B4 jsr LB403
|
|
00ABC7 1 60 rts
|
|
00ABC8 1
|
|
00ABC8 1 20 CE AA LABC8: jsr LAACE
|
|
00ABCB 1 AD 7D D5 lda $D57D
|
|
00ABCE 1 20 B9 B7 jsr LB7B9
|
|
00ABD1 1 A9 80 lda #$80
|
|
00ABD3 1 A2 B4 ldx #$B4
|
|
00ABD5 1 A0 06 ldy #$06
|
|
00ABD7 1 20 90 B5 jsr LB590
|
|
00ABDA 1 20 E6 B6 jsr LB6E6
|
|
00ABDD 1 20 67 A5 LABDD: jsr LA567
|
|
00ABE0 1 30 FB bmi LABDD
|
|
00ABE2 1 48 pha
|
|
00ABE3 1 20 FB B6 jsr LB6FB
|
|
00ABE6 1 A0 07 ldy #$07
|
|
00ABE8 1 A9 00 lda #$00
|
|
00ABEA 1 A2 D2 ldx #$D2
|
|
00ABEC 1 20 00 D0 jsr LD000
|
|
00ABEF 1 A0 11 ldy #$11
|
|
00ABF1 1 A9 76 lda #$76
|
|
00ABF3 1 A2 AE ldx #$AE
|
|
00ABF5 1 20 00 D0 jsr LD000
|
|
00ABF8 1 68 pla
|
|
00ABF9 1 60 rts
|
|
00ABFA 1
|
|
00ABFA 1 20 BF B3 jsr LB3BF
|
|
00ABFD 1 A0 00 ldy #$00
|
|
00ABFF 1 B1 06 lda (L0006),y
|
|
00AC01 1 C9 01 cmp #$01
|
|
00AC03 1 D0 03 bne LAC08
|
|
00AC05 1 4C 3D AC jmp LAC3D
|
|
00AC08 1
|
|
00AC08 1 C9 02 LAC08: cmp #$02
|
|
00AC0A 1 D0 03 bne LAC0F
|
|
00AC0C 1 4C AE AC jmp LACAE
|
|
00AC0F 1
|
|
00AC0F 1 C9 03 LAC0F: cmp #$03
|
|
00AC11 1 D0 03 bne LAC16
|
|
00AC13 1 4C 9E AC jmp LAC9E
|
|
00AC16 1
|
|
00AC16 1 20 3A B5 LAC16: jsr LB53A
|
|
00AC19 1 A9 3A lda #$3A
|
|
00AC1B 1 A2 B4 ldx #$B4
|
|
00AC1D 1 20 23 B7 jsr LB723
|
|
00AC20 1 A9 47 lda #$47
|
|
00AC22 1 A2 B4 ldx #$B4
|
|
00AC24 1 A0 01 ldy #$01
|
|
00AC26 1 20 90 B5 jsr LB590
|
|
00AC29 1 A0 01 ldy #$01
|
|
00AC2B 1 20 1F B0 jsr LB01F
|
|
00AC2E 1 A9 57 lda #$57
|
|
00AC30 1 A2 B4 ldx #$B4
|
|
00AC32 1 A0 02 ldy #$02
|
|
00AC34 1 20 90 B5 jsr LB590
|
|
00AC37 1 A0 02 ldy #$02
|
|
00AC39 1 20 1F B0 jsr LB01F
|
|
00AC3C 1 60 rts
|
|
00AC3D 1
|
|
00AC3D 1 A0 01 LAC3D: ldy #$01
|
|
00AC3F 1 B1 06 lda (L0006),y
|
|
00AC41 1 8D 09 D9 sta $D909
|
|
00AC44 1 AA tax
|
|
00AC45 1 C8 iny
|
|
00AC46 1 B1 06 lda (L0006),y
|
|
00AC48 1 85 07 sta $07
|
|
00AC4A 1 86 06 stx L0006
|
|
00AC4C 1 A0 00 ldy #$00
|
|
00AC4E 1 B1 06 lda (L0006),y
|
|
00AC50 1 8D 09 D9 sta $D909
|
|
00AC53 1 C8 iny
|
|
00AC54 1 B1 06 lda (L0006),y
|
|
00AC56 1 8D 0A D9 sta $D90A
|
|
00AC59 1 20 DF BD jsr LBDDF
|
|
00AC5C 1 AD 7D D5 lda $D57D
|
|
00AC5F 1 20 B9 B7 jsr LB7B9
|
|
00AC62 1 A9 A5 lda #$A5
|
|
00AC64 1 8D C3 D6 sta $D6C3
|
|
00AC67 1 A0 01 ldy #$01
|
|
00AC69 1 A9 01 lda #$01
|
|
00AC6B 1 A2 D9 ldx #$D9
|
|
00AC6D 1 20 90 B5 jsr LB590
|
|
00AC70 1 20 BF B3 jsr LB3BF
|
|
00AC73 1 A0 03 ldy #$03
|
|
00AC75 1 B1 06 lda (L0006),y
|
|
00AC77 1 AA tax
|
|
00AC78 1 C8 iny
|
|
00AC79 1 B1 06 lda (L0006),y
|
|
00AC7B 1 85 07 sta $07
|
|
00AC7D 1 86 06 stx L0006
|
|
00AC7F 1 A0 00 ldy #$00
|
|
00AC81 1 B1 06 lda (L0006),y
|
|
00AC83 1 8D 09 D9 sta $D909
|
|
00AC86 1 C8 iny
|
|
00AC87 1 B1 06 lda (L0006),y
|
|
00AC89 1 8D 0A D9 sta $D90A
|
|
00AC8C 1 20 DF BD jsr LBDDF
|
|
00AC8F 1 A9 A5 lda #$A5
|
|
00AC91 1 8D C3 D6 sta $D6C3
|
|
00AC94 1 A0 02 ldy #$02
|
|
00AC96 1 A9 01 lda #$01
|
|
00AC98 1 A2 D9 ldx #$D9
|
|
00AC9A 1 20 90 B5 jsr LB590
|
|
00AC9D 1 60 rts
|
|
00AC9E 1
|
|
00AC9E 1 20 B1 BE LAC9E: jsr LBEB1
|
|
00ACA1 1 A0 39 ldy #$39
|
|
00ACA3 1 A9 7D lda #$7D
|
|
00ACA5 1 A2 D5 ldx #$D5
|
|
00ACA7 1 20 00 D0 jsr LD000
|
|
00ACAA 1 20 03 B4 jsr LB403
|
|
00ACAD 1 60 rts
|
|
00ACAE 1
|
|
00ACAE 1 AD 7D D5 LACAE: lda $D57D
|
|
00ACB1 1 20 B9 B7 jsr LB7B9
|
|
00ACB4 1 20 E6 B6 jsr LB6E6
|
|
00ACB7 1 20 67 A5 LACB7: jsr LA567
|
|
00ACBA 1 30 FB bmi LACB7
|
|
00ACBC 1 A0 07 ldy #$07
|
|
00ACBE 1 A9 00 lda #$00
|
|
00ACC0 1 A2 D2 ldx #$D2
|
|
00ACC2 1 20 00 D0 jsr LD000
|
|
00ACC5 1 A0 11 ldy #$11
|
|
00ACC7 1 A9 6E lda #$6E
|
|
00ACC9 1 A2 AE ldx #$AE
|
|
00ACCB 1 20 00 D0 jsr LD000
|
|
00ACCE 1 20 FB B6 jsr LB6FB
|
|
00ACD1 1 A9 00 lda #$00
|
|
00ACD3 1 60 rts
|
|
00ACD4 1
|
|
00ACD4 1 20 BF B3 jsr LB3BF
|
|
00ACD7 1 A0 00 ldy #$00
|
|
00ACD9 1 B1 06 lda (L0006),y
|
|
00ACDB 1 C9 01 cmp #$01
|
|
00ACDD 1 D0 03 bne LACE2
|
|
00ACDF 1 4C 2A AD jmp LAD2A
|
|
00ACE2 1
|
|
00ACE2 1 C9 02 LACE2: cmp #$02
|
|
00ACE4 1 D0 03 bne LACE9
|
|
00ACE6 1 4C BB AD jmp LADBB
|
|
00ACE9 1
|
|
00ACE9 1 C9 03 LACE9: cmp #$03
|
|
00ACEB 1 D0 03 bne LACF0
|
|
00ACED 1 4C 6C AD jmp LAD6C
|
|
00ACF0 1
|
|
00ACF0 1 C9 04 LACF0: cmp #$04
|
|
00ACF2 1 D0 03 bne LACF7
|
|
00ACF4 1 4C 05 AE jmp LAE05
|
|
00ACF7 1
|
|
00ACF7 1 C9 05 LACF7: cmp #$05
|
|
00ACF9 1 D0 03 bne LACFE
|
|
00ACFB 1 4C F5 AD jmp LADF5
|
|
00ACFE 1
|
|
00ACFE 1 8D 1F AD LACFE: sta LAD1F
|
|
00AD01 1 A9 00 lda #$00
|
|
00AD03 1 8D E8 D8 sta $D8E8
|
|
00AD06 1 20 3A B5 jsr LB53A
|
|
00AD09 1 A9 BE lda #$BE
|
|
00AD0B 1 A2 B0 ldx #$B0
|
|
00AD0D 1 20 23 B7 jsr LB723
|
|
00AD10 1 AD 1F AD lda LAD1F
|
|
00AD13 1 F0 0B beq LAD20
|
|
00AD15 1 A9 DD lda #$DD
|
|
00AD17 1 A2 B0 ldx #$B0
|
|
00AD19 1 A0 04 ldy #$04
|
|
00AD1B 1 20 90 B5 jsr LB590
|
|
00AD1E 1 60 rts
|
|
00AD1F 1
|
|
00AD1F 1 00 LAD1F: brk
|
|
00AD20 1 A9 C9 LAD20: lda #$C9
|
|
00AD22 1 A2 B0 ldx #$B0
|
|
00AD24 1 A0 04 ldy #$04
|
|
00AD26 1 20 90 B5 jsr LB590
|
|
00AD29 1 60 rts
|
|
00AD2A 1
|
|
00AD2A 1 A0 01 LAD2A: ldy #$01
|
|
00AD2C 1 B1 06 lda (L0006),y
|
|
00AD2E 1 8D 09 D9 sta $D909
|
|
00AD31 1 C8 iny
|
|
00AD32 1 B1 06 lda (L0006),y
|
|
00AD34 1 8D 0A D9 sta $D90A
|
|
00AD37 1 20 C4 BD jsr LBDC4
|
|
00AD3A 1 20 DF BD jsr LBDDF
|
|
00AD3D 1 AD 7D D5 lda $D57D
|
|
00AD40 1 20 B9 B7 jsr LB7B9
|
|
00AD43 1 AD 1F AD lda LAD1F
|
|
00AD46 1 D0 0C LAD46: bne LAD54
|
|
00AD48 1 A0 0E ldy #$0E
|
|
00AD4A 1 A9 6A lda #$6A
|
|
00AD4C 1 A2 B1 ldx #$B1
|
|
00AD4E 1 20 00 D0 jsr LD000
|
|
00AD51 1 4C 5D AD jmp LAD5D
|
|
00AD54 1
|
|
00AD54 1 A0 0E LAD54: ldy #$0E
|
|
00AD56 1 A9 72 lda #$72
|
|
00AD58 1 A2 B1 ldx #$B1
|
|
00AD5A 1 20 00 D0 jsr LD000
|
|
00AD5D 1 A9 01 LAD5D: lda #$01
|
|
00AD5F 1 A2 D9 ldx #$D9
|
|
00AD61 1 20 08 B7 jsr LB708
|
|
00AD64 1 A9 FB lda #$FB
|
|
00AD66 1 A2 D8 ldx #$D8
|
|
00AD68 1 20 08 B7 jsr LB708
|
|
00AD6B 1 60 rts
|
|
00AD6C 1
|
|
00AD6C 1 A0 01 LAD6C: ldy #$01
|
|
00AD6E 1 B1 06 lda (L0006),y
|
|
00AD70 1 8D 09 D9 sta $D909
|
|
00AD73 1 C8 iny
|
|
00AD74 1 B1 06 lda (L0006),y
|
|
00AD76 1 8D 0A D9 sta $D90A
|
|
00AD79 1 20 C4 BD jsr LBDC4
|
|
00AD7C 1 20 DF BD jsr LBDDF
|
|
00AD7F 1 AD 7D D5 lda $D57D
|
|
00AD82 1 20 B9 B7 jsr LB7B9
|
|
00AD85 1 20 8D BE LAD85: jsr LBE8D
|
|
00AD88 1 20 BF B3 jsr LB3BF
|
|
00AD8B 1 A0 03 ldy #$03
|
|
00AD8D 1 B1 06 lda (L0006),y
|
|
00AD8F 1 AA tax
|
|
00AD90 1 C8 iny
|
|
00AD91 1 B1 06 lda (L0006),y
|
|
00AD93 1 85 07 sta $07
|
|
00AD95 1 86 06 stx L0006
|
|
00AD97 1 20 63 BE jsr LBE63
|
|
00AD9A 1 A0 0E ldy #$0E
|
|
00AD9C 1 A9 7E lda #$7E
|
|
00AD9E 1 A2 AE ldx #$AE
|
|
00ADA0 1 20 00 D0 jsr LD000
|
|
00ADA3 1 A9 02 lda #$02
|
|
00ADA5 1 A2 D4 ldx #$D4
|
|
00ADA7 1 20 08 B7 jsr LB708
|
|
00ADAA 1 A0 0E ldy #$0E
|
|
00ADAC 1 A9 6E lda #$6E
|
|
00ADAE 1 A2 B1 ldx #$B1
|
|
00ADB0 1 20 00 D0 jsr LD000
|
|
00ADB3 1 A9 01 lda #$01
|
|
00ADB5 1 A2 D9 ldx #$D9
|
|
00ADB7 1 20 08 B7 jsr LB708
|
|
00ADBA 1 60 rts
|
|
00ADBB 1
|
|
00ADBB 1 AD 7D D5 LADBB: lda $D57D
|
|
00ADBE 1 20 B9 B7 jsr LB7B9
|
|
00ADC1 1 20 AF B6 jsr LB6AF
|
|
00ADC4 1 20 67 A5 LADC4: jsr LA567
|
|
00ADC7 1 30 FB bmi LADC4
|
|
00ADC9 1 D0 29 bne LADF4
|
|
00ADCB 1 A0 07 ldy #$07
|
|
00ADCD 1 A9 00 lda #$00
|
|
00ADCF 1 A2 D2 ldx #$D2
|
|
00ADD1 1 20 00 D0 jsr LD000
|
|
00ADD4 1 A0 11 ldy #$11
|
|
00ADD6 1 A9 6E lda #$6E
|
|
00ADD8 1 A2 AE ldx #$AE
|
|
00ADDA 1 20 00 D0 jsr LD000
|
|
00ADDD 1 20 D0 B6 jsr LB6D0
|
|
00ADE0 1 A0 02 ldy #$02
|
|
00ADE2 1 A9 0E lda #$0E
|
|
00ADE4 1 A2 B1 ldx #$B1
|
|
00ADE6 1 20 90 B5 jsr LB590
|
|
00ADE9 1 A0 04 ldy #$04
|
|
00ADEB 1 A9 14 lda #$14
|
|
00ADED 1 A2 B1 ldx #$B1
|
|
00ADEF 1 20 90 B5 jsr LB590
|
|
00ADF2 1 A9 00 lda #$00
|
|
00ADF4 1 60 LADF4: rts
|
|
00ADF5 1
|
|
00ADF5 1 20 B1 BE LADF5: jsr LBEB1
|
|
00ADF8 1 A0 39 ldy #$39
|
|
00ADFA 1 A9 7D lda #$7D
|
|
00ADFC 1 A2 D5 ldx #$D5
|
|
00ADFE 1 20 00 D0 jsr LD000
|
|
00AE01 1 20 03 B4 jsr LB403
|
|
00AE04 1 60 rts
|
|
00AE05 1
|
|
00AE05 1 AD 7D D5 LAE05: lda $D57D
|
|
00AE08 1 20 B9 B7 jsr LB7B9
|
|
00AE0B 1 A9 33 lda #$33
|
|
00AE0D 1 A2 B1 ldx #$B1
|
|
00AE0F 1 A0 06 ldy #$06
|
|
00AE11 1 20 90 B5 jsr LB590
|
|
00AE14 1 20 4E B6 jsr LB64E
|
|
00AE17 1 20 67 A5 LAE17: jsr LA567
|
|
00AE1A 1 30 FB bmi LAE17
|
|
00AE1C 1 48 pha
|
|
00AE1D 1 20 87 B6 jsr LB687
|
|
00AE20 1 A0 07 ldy #$07
|
|
00AE22 1 A9 00 lda #$00
|
|
00AE24 1 A2 D2 ldx #$D2
|
|
00AE26 1 20 00 D0 jsr LD000
|
|
00AE29 1 A0 11 ldy #$11
|
|
00AE2B 1 A9 76 lda #$76
|
|
00AE2D 1 A2 AE ldx #$AE
|
|
00AE2F 1 20 00 D0 jsr LD000
|
|
00AE32 1 68 pla
|
|
00AE33 1 60 rts
|
|
00AE34 1
|
|
00AE34 1 20 BF B3 LAE34: jsr LB3BF
|
|
00AE37 1 A0 00 ldy #$00
|
|
00AE39 1 B1 06 lda (L0006),y
|
|
00AE3B 1 C9 80 cmp #$80
|
|
00AE3D 1 D0 03 bne LAE42
|
|
00AE3F 1 4C 70 AE jmp LAE70
|
|
00AE42 1
|
|
00AE42 1 C9 40 LAE42: cmp #$40
|
|
00AE44 1 D0 03 bne LAE49
|
|
00AE46 1 4C 16 AF jmp LAF16
|
|
00AE49 1
|
|
00AE49 1 A9 80 LAE49: lda #$80
|
|
00AE4B 1 8D E8 D8 sta $D8E8
|
|
00AE4E 1 20 69 BD jsr LBD69
|
|
00AE51 1 A9 00 lda #$00
|
|
00AE53 1 20 09 B5 jsr LB509
|
|
00AE56 1 AD 7D D5 lda $D57D
|
|
00AE59 1 20 B9 B7 jsr LB7B9
|
|
00AE5C 1 A9 76 lda #$76
|
|
00AE5E 1 A2 B1 ldx #$B1
|
|
00AE60 1 20 23 B7 jsr LB723
|
|
00AE63 1 20 3B B4 jsr LB43B
|
|
00AE66 1 A0 12 ldy #$12
|
|
00AE68 1 A9 AB lda #$AB
|
|
00AE6A 1 A2 D6 ldx #$D6
|
|
00AE6C 1 20 00 D0 jsr LD000
|
|
00AE6F 1 60 rts
|
|
00AE70 1
|
|
00AE70 1 A9 80 LAE70: lda #$80
|
|
00AE72 1 8D E8 D8 sta $D8E8
|
|
00AE75 1 A9 00 lda #$00
|
|
00AE77 1 8D E7 D8 sta $D8E7
|
|
00AE7A 1 20 75 BD jsr LBD75
|
|
00AE7D 1 20 BF B3 jsr LB3BF
|
|
00AE80 1 A0 01 ldy #$01
|
|
00AE82 1 B1 06 lda (L0006),y
|
|
00AE84 1 85 08 sta $08
|
|
00AE86 1 C8 iny
|
|
00AE87 1 B1 06 lda (L0006),y
|
|
00AE89 1 85 09 sta $09
|
|
00AE8B 1 A0 00 ldy #$00
|
|
00AE8D 1 B1 08 lda ($08),y
|
|
00AE8F 1 A8 tay
|
|
00AE90 1 B1 08 LAE90: lda ($08),y
|
|
00AE92 1 99 02 D4 sta $D402,y
|
|
00AE95 1 88 dey
|
|
00AE96 1 10 F8 bpl LAE90
|
|
00AE98 1 AD 7D D5 lda $D57D
|
|
00AE9B 1 20 B9 B7 jsr LB7B9
|
|
00AE9E 1 A0 02 ldy #$02
|
|
00AEA0 1 A9 85 lda #$85
|
|
00AEA2 1 A2 B1 ldx #$B1
|
|
00AEA4 1 20 90 B5 jsr LB590
|
|
00AEA7 1 A9 37 lda #$37
|
|
00AEA9 1 8D C3 D6 sta $D6C3
|
|
00AEAC 1 A0 02 ldy #$02
|
|
00AEAE 1 A9 02 lda #$02
|
|
00AEB0 1 A2 D4 ldx #$D4
|
|
00AEB2 1 20 90 B5 jsr LB590
|
|
00AEB5 1 A9 28 lda #$28
|
|
00AEB7 1 8D C3 D6 sta $D6C3
|
|
00AEBA 1 A0 04 ldy #$04
|
|
00AEBC 1 A9 89 lda #$89
|
|
00AEBE 1 A2 B1 ldx #$B1
|
|
00AEC0 1 20 90 B5 jsr LB590
|
|
00AEC3 1 20 61 B9 jsr LB961
|
|
00AEC6 1 20 67 A5 LAEC6: jsr LA567
|
|
00AEC9 1 30 FB bmi LAEC6
|
|
00AECB 1 D0 49 bne LAF16
|
|
00AECD 1 AD 43 D4 lda $D443
|
|
00AED0 1 F0 F4 beq LAEC6
|
|
00AED2 1 C9 10 cmp #$10
|
|
00AED4 1 90 0B bcc LAEE1
|
|
00AED6 1 A9 FB LAED6: lda #$FB
|
|
00AED8 1 20 30 40 jsr L4030
|
|
00AEDB 1 20 61 B9 jsr LB961
|
|
00AEDE 1 4C C6 AE jmp LAEC6
|
|
00AEE1 1
|
|
00AEE1 1 AD 02 D4 LAEE1: lda $D402
|
|
00AEE4 1 18 clc
|
|
00AEE5 1 6D 43 D4 adc $D443
|
|
00AEE8 1 18 clc
|
|
00AEE9 1 69 01 adc #$01
|
|
00AEEB 1 C9 41 cmp #$41
|
|
00AEED 1 B0 E7 bcs LAED6
|
|
00AEEF 1 EE 02 D4 inc $D402
|
|
00AEF2 1 AE 02 D4 ldx $D402
|
|
00AEF5 1 A9 2F lda #$2F
|
|
00AEF7 1 9D 02 D4 sta $D402,x
|
|
00AEFA 1 AE 02 D4 ldx $D402
|
|
00AEFD 1 A0 00 ldy #$00
|
|
00AEFF 1 E8 LAEFF: inx
|
|
00AF00 1 C8 iny
|
|
00AF01 1 B9 43 D4 lda $D443,y
|
|
00AF04 1 9D 02 D4 sta $D402,x
|
|
00AF07 1 CC 43 D4 cpy $D443
|
|
00AF0A 1 D0 F3 bne LAEFF
|
|
00AF0C 1 8E 02 D4 stx $D402
|
|
00AF0F 1 A0 02 ldy #$02
|
|
00AF11 1 A2 D4 ldx #$D4
|
|
00AF13 1 A9 00 lda #$00
|
|
00AF15 1 60 rts
|
|
00AF16 1
|
|
00AF16 1 20 B1 BE LAF16: jsr LBEB1
|
|
00AF19 1 A0 39 ldy #$39
|
|
00AF1B 1 A9 7D lda #$7D
|
|
00AF1D 1 A2 D5 ldx #$D5
|
|
00AF1F 1 20 00 D0 jsr LD000
|
|
00AF22 1 20 03 B4 jsr LB403
|
|
00AF25 1 A9 01 lda #$01
|
|
00AF27 1 60 rts
|
|
00AF28 1
|
|
00AF28 1 20 BF B3 jsr LB3BF
|
|
00AF2B 1 A0 00 ldy #$00
|
|
00AF2D 1 B1 06 lda (L0006),y
|
|
00AF2F 1 30 03 bmi LAF34
|
|
00AF31 1 4C B9 AF jmp LAFB9
|
|
00AF34 1
|
|
00AF34 1 A9 00 LAF34: lda #$00
|
|
00AF36 1 8D E8 D8 sta $D8E8
|
|
00AF39 1 B1 06 lda (L0006),y
|
|
00AF3B 1 4A lsr a
|
|
00AF3C 1 4A lsr a
|
|
00AF3D 1 6A ror a
|
|
00AF3E 1 49 80 eor #$80
|
|
00AF40 1 20 09 B5 jsr LB509
|
|
00AF43 1 AD 7D D5 lda $D57D
|
|
00AF46 1 20 B9 B7 jsr LB7B9
|
|
00AF49 1 A9 C6 lda #$C6
|
|
00AF4B 1 A2 B1 ldx #$B1
|
|
00AF4D 1 20 23 B7 jsr LB723
|
|
00AF50 1 20 BF B3 jsr LB3BF
|
|
00AF53 1 A0 00 ldy #$00
|
|
00AF55 1 B1 06 lda (L0006),y
|
|
00AF57 1 29 7F and #$7F
|
|
00AF59 1 4A lsr a
|
|
00AF5A 1 6A ror a
|
|
00AF5B 1 8D 1D B0 sta LB01D
|
|
00AF5E 1 A0 01 ldy #$01
|
|
00AF60 1 A9 D3 lda #$D3
|
|
00AF62 1 A2 B1 ldx #$B1
|
|
00AF64 1 20 90 B5 jsr LB590
|
|
00AF67 1 2C 1D B0 bit LB01D
|
|
00AF6A 1 30 0C bmi LAF78
|
|
00AF6C 1 A0 02 ldy #$02
|
|
00AF6E 1 A9 D8 lda #$D8
|
|
00AF70 1 A2 B1 ldx #$B1
|
|
00AF72 1 20 90 B5 jsr LB590
|
|
00AF75 1 4C 81 AF jmp LAF81
|
|
00AF78 1
|
|
00AF78 1 A0 02 LAF78: ldy #$02
|
|
00AF7A 1 A9 09 lda #$09
|
|
00AF7C 1 A2 B2 ldx #$B2
|
|
00AF7E 1 20 90 B5 jsr LB590
|
|
00AF81 1 2C 1D B0 LAF81: bit LB01D
|
|
00AF84 1 10 0C bpl LAF92
|
|
00AF86 1 A0 03 ldy #$03
|
|
00AF88 1 A9 19 lda #$19
|
|
00AF8A 1 A2 B2 ldx #$B2
|
|
00AF8C 1 20 90 B5 jsr LB590
|
|
00AF8F 1 4C 9B AF jmp LAF9B
|
|
00AF92 1
|
|
00AF92 1 A0 03 LAF92: ldy #$03
|
|
00AF94 1 A9 DF lda #$DF
|
|
00AF96 1 A2 B1 ldx #$B1
|
|
00AF98 1 20 90 B5 jsr LB590
|
|
00AF9B 1 A0 04 LAF9B: ldy #$04
|
|
00AF9D 1 A9 E4 lda #$E4
|
|
00AF9F 1 A2 B1 ldx #$B1
|
|
00AFA1 1 20 90 B5 jsr LB590
|
|
00AFA4 1 A0 05 ldy #$05
|
|
00AFA6 1 A9 F2 lda #$F2
|
|
00AFA8 1 A2 B1 ldx #$B1
|
|
00AFAA 1 20 90 B5 jsr LB590
|
|
00AFAD 1 A0 06 ldy #$06
|
|
00AFAF 1 A9 04 lda #$04
|
|
00AFB1 1 A2 B2 ldx #$B2
|
|
00AFB3 1 20 90 B5 jsr LB590
|
|
00AFB6 1 4C B1 BE jmp LBEB1
|
|
00AFB9 1
|
|
00AFB9 1 AD 7D D5 LAFB9: lda $D57D
|
|
00AFBC 1 20 B9 B7 jsr LB7B9
|
|
00AFBF 1 20 BF B3 jsr LB3BF
|
|
00AFC2 1 A0 00 ldy #$00
|
|
00AFC4 1 B1 06 lda (L0006),y
|
|
00AFC6 1 8D 1E B0 sta LB01E
|
|
00AFC9 1 A8 tay
|
|
00AFCA 1 20 1F B0 jsr LB01F
|
|
00AFCD 1 A9 A5 lda #$A5
|
|
00AFCF 1 8D C3 D6 sta $D6C3
|
|
00AFD2 1 20 BF B3 jsr LB3BF
|
|
00AFD5 1 AD 1E B0 lda LB01E
|
|
00AFD8 1 C9 02 cmp #$02
|
|
00AFDA 1 D0 14 bne LAFF0
|
|
00AFDC 1 A0 01 ldy #$01
|
|
00AFDE 1 B1 06 lda (L0006),y
|
|
00AFE0 1 F0 07 beq LAFE9
|
|
00AFE2 1 A9 A8 lda #$A8
|
|
00AFE4 1 A2 AE ldx #$AE
|
|
00AFE6 1 4C F8 AF jmp LAFF8
|
|
00AFE9 1
|
|
00AFE9 1 A9 AD LAFE9: lda #$AD
|
|
00AFEB 1 A2 AE ldx #$AE
|
|
00AFED 1 4C F8 AF jmp LAFF8
|
|
00AFF0 1
|
|
00AFF0 1 A0 02 LAFF0: ldy #$02
|
|
00AFF2 1 B1 06 lda (L0006),y
|
|
00AFF4 1 AA tax
|
|
00AFF5 1 88 dey
|
|
00AFF6 1 B1 06 lda (L0006),y
|
|
00AFF8 1 AC 1E B0 LAFF8: ldy LB01E
|
|
00AFFB 1 20 90 B5 jsr LB590
|
|
00AFFE 1 AD 1E B0 lda LB01E
|
|
00B001 1 C9 06 cmp #$06
|
|
00B003 1 F0 01 beq LB006
|
|
00B005 1 60 rts
|
|
00B006 1
|
|
00B006 1 20 67 A5 LB006: jsr LA567
|
|
00B009 1 30 FB bmi LB006
|
|
00B00B 1 48 pha
|
|
00B00C 1 20 B1 BE jsr LBEB1
|
|
00B00F 1 A0 39 ldy #$39
|
|
00B011 1 A9 7D lda #$7D
|
|
00B013 1 A2 D5 ldx #$D5
|
|
00B015 1 20 00 D0 jsr LD000
|
|
00B018 1 20 CA B3 jsr LB3CA
|
|
00B01B 1 68 pla
|
|
00B01C 1 60 rts
|
|
00B01D 1
|
|
00B01D 1 00 LB01D: brk
|
|
00B01E 1 00 LB01E: brk
|
|
00B01F 1 A9 A0 LB01F: lda #$A0
|
|
00B021 1 8D C3 D6 sta $D6C3
|
|
00B024 1 A9 2A lda #$2A
|
|
00B026 1 A2 B2 ldx #$B2
|
|
00B028 1 20 90 B5 jsr LB590
|
|
00B02B 1 60 rts
|
|
00B02C 1
|
|
00B02C 1 20 BF B3 jsr LB3BF
|
|
00B02F 1 A0 00 ldy #$00
|
|
00B031 1 B1 06 lda (L0006),y
|
|
00B033 1 C9 01 cmp #$01
|
|
00B035 1 D0 03 bne LB03A
|
|
00B037 1 4C 68 B0 jmp LB068
|
|
00B03A 1
|
|
00B03A 1 C9 02 LB03A: cmp #$02
|
|
00B03C 1 D0 03 bne LB041
|
|
00B03E 1 4C F1 B0 jmp LB0F1
|
|
00B041 1
|
|
00B041 1 C9 03 LB041: cmp #$03
|
|
00B043 1 D0 03 bne LB048
|
|
00B045 1 4C A2 B0 jmp LB0A2
|
|
00B048 1
|
|
00B048 1 C9 04 LB048: cmp #$04
|
|
00B04A 1 D0 03 bne LB04F
|
|
00B04C 1 4C 3A B1 jmp LB13A
|
|
00B04F 1
|
|
00B04F 1 A9 00 LB04F: lda #$00
|
|
00B051 1 8D E8 D8 sta $D8E8
|
|
00B054 1 20 3A B5 jsr LB53A
|
|
00B057 1 A9 00 lda #$00
|
|
00B059 1 A2 B4 ldx #$B4
|
|
00B05B 1 20 23 B7 jsr LB723
|
|
00B05E 1 A0 04 ldy #$04
|
|
00B060 1 A9 09 lda #$09
|
|
00B062 1 A2 B4 ldx #$B4
|
|
00B064 1 20 90 B5 jsr LB590
|
|
00B067 1 60 rts
|
|
00B068 1
|
|
00B068 1 A0 01 LB068: ldy #$01
|
|
00B06A 1 B1 06 lda (L0006),y
|
|
00B06C 1 8D 09 D9 sta $D909
|
|
00B06F 1 C8 iny
|
|
00B070 1 B1 06 lda (L0006),y
|
|
00B072 1 8D 0A D9 sta $D90A
|
|
00B075 1 20 C4 BD jsr LBDC4
|
|
00B078 1 20 DF BD jsr LBDDF
|
|
00B07B 1 AD 7D D5 lda $D57D
|
|
00B07E 1 20 B9 B7 jsr LB7B9
|
|
00B081 1 A0 0E ldy #$0E
|
|
00B083 1 A9 31 lda #$31
|
|
00B085 1 A2 B2 ldx #$B2
|
|
00B087 1 20 00 D0 jsr LD000
|
|
00B08A 1 A9 01 lda #$01
|
|
00B08C 1 A2 D9 ldx #$D9
|
|
00B08E 1 20 08 B7 jsr LB708
|
|
00B091 1 A0 0E ldy #$0E
|
|
00B093 1 A9 39 lda #$39
|
|
00B095 1 A2 B2 ldx #$B2
|
|
00B097 1 20 00 D0 jsr LD000
|
|
00B09A 1 A9 FB lda #$FB
|
|
00B09C 1 A2 D8 ldx #$D8
|
|
00B09E 1 20 08 B7 jsr LB708
|
|
00B0A1 1 60 rts
|
|
00B0A2 1
|
|
00B0A2 1 A0 01 LB0A2: ldy #$01
|
|
00B0A4 1 B1 06 lda (L0006),y
|
|
00B0A6 1 8D 09 D9 sta $D909
|
|
00B0A9 1 C8 iny
|
|
00B0AA 1 B1 06 lda (L0006),y
|
|
00B0AC 1 8D 0A D9 sta $D90A
|
|
00B0AF 1 20 C4 BD jsr LBDC4
|
|
00B0B2 1 20 DF BD jsr LBDDF
|
|
00B0B5 1 AD 7D D5 lda $D57D
|
|
00B0B8 1 20 B9 B7 jsr LB7B9
|
|
00B0BB 1 20 8D BE jsr LBE8D
|
|
00B0BE 1 20 BF B3 jsr LB3BF
|
|
00B0C1 1 A0 03 ldy #$03
|
|
00B0C3 1 B1 06 lda (L0006),y
|
|
00B0C5 1 AA tax
|
|
00B0C6 1 C8 iny
|
|
00B0C7 1 B1 06 lda (L0006),y
|
|
00B0C9 1 85 07 sta $07
|
|
00B0CB 1 86 06 stx L0006
|
|
00B0CD 1 20 63 BE jsr LBE63
|
|
00B0D0 1 A0 0E ldy #$0E
|
|
00B0D2 1 A9 7E lda #$7E
|
|
00B0D4 1 A2 AE ldx #$AE
|
|
00B0D6 1 20 00 D0 jsr LD000
|
|
00B0D9 1 A9 02 lda #$02
|
|
00B0DB 1 A2 D4 ldx #$D4
|
|
00B0DD 1 20 08 B7 jsr LB708
|
|
00B0E0 1 A0 0E ldy #$0E
|
|
00B0E2 1 A9 41 lda #$41
|
|
00B0E4 1 A2 B2 ldx #$B2
|
|
00B0E6 1 20 00 D0 jsr LD000
|
|
00B0E9 1 A9 01 lda #$01
|
|
00B0EB 1 A2 D9 ldx #$D9
|
|
00B0ED 1 20 08 B7 jsr LB708
|
|
00B0F0 1 60 rts
|
|
00B0F1 1
|
|
00B0F1 1 AD 7D D5 LB0F1: lda $D57D
|
|
00B0F4 1 20 B9 B7 jsr LB7B9
|
|
00B0F7 1 20 AF B6 jsr LB6AF
|
|
00B0FA 1 20 67 A5 LB0FA: jsr LA567
|
|
00B0FD 1 30 FB bmi LB0FA
|
|
00B0FF 1 D0 38 bne LB139
|
|
00B101 1 A0 07 ldy #$07
|
|
00B103 1 A9 00 lda #$00
|
|
00B105 1 A2 D2 ldx #$D2
|
|
00B107 1 20 00 D0 jsr LD000
|
|
00B10A 1 A0 11 ldy #$11
|
|
00B10C 1 A9 6E lda #$6E
|
|
00B10E 1 A2 AE ldx #$AE
|
|
00B110 1 20 00 D0 jsr LD000
|
|
00B113 1 A0 11 ldy #$11
|
|
00B115 1 A9 20 lda #$20
|
|
00B117 1 A2 AE ldx #$AE
|
|
00B119 1 20 00 D0 jsr LD000
|
|
00B11C 1 A0 11 ldy #$11
|
|
00B11E 1 A9 10 lda #$10
|
|
00B120 1 A2 AE ldx #$AE
|
|
00B122 1 20 00 D0 jsr LD000
|
|
00B125 1 A0 02 ldy #$02
|
|
00B127 1 A9 0E lda #$0E
|
|
00B129 1 A2 B1 ldx #$B1
|
|
00B12B 1 20 90 B5 jsr LB590
|
|
00B12E 1 A0 04 ldy #$04
|
|
00B130 1 A9 1B lda #$1B
|
|
00B132 1 A2 B4 ldx #$B4
|
|
00B134 1 20 90 B5 jsr LB590
|
|
00B137 1 A9 00 lda #$00
|
|
00B139 1 60 LB139: rts
|
|
00B13A 1
|
|
00B13A 1 20 B1 BE LB13A: jsr LBEB1
|
|
00B13D 1 A0 39 ldy #$39
|
|
00B13F 1 A9 7D lda #$7D
|
|
00B141 1 A2 D5 ldx #$D5
|
|
00B143 1 20 00 D0 jsr LD000
|
|
00B146 1 20 03 B4 jsr LB403
|
|
00B149 1 60 rts
|
|
00B14A 1
|
|
00B14A 1 20 BF B3 jsr LB3BF
|
|
00B14D 1 A0 00 ldy #$00
|
|
00B14F 1 B1 06 lda (L0006),y
|
|
00B151 1 C9 01 cmp #$01
|
|
00B153 1 D0 03 bne LB158
|
|
00B155 1 4C 86 B1 jmp LB186
|
|
00B158 1
|
|
00B158 1 C9 02 LB158: cmp #$02
|
|
00B15A 1 D0 03 bne LB15F
|
|
00B15C 1 4C 0F B2 jmp LB20F
|
|
00B15F 1
|
|
00B15F 1 C9 03 LB15F: cmp #$03
|
|
00B161 1 D0 03 bne LB166
|
|
00B163 1 4C C0 B1 jmp LB1C0
|
|
00B166 1
|
|
00B166 1 C9 04 LB166: cmp #$04
|
|
00B168 1 D0 03 bne LB16D
|
|
00B16A 1 4C 58 B2 jmp LB258
|
|
00B16D 1
|
|
00B16D 1 A9 00 LB16D: lda #$00
|
|
00B16F 1 8D E8 D8 sta $D8E8
|
|
00B172 1 20 3A B5 jsr LB53A
|
|
00B175 1 A9 C0 lda #$C0
|
|
00B177 1 A2 B3 ldx #$B3
|
|
00B179 1 20 23 B7 jsr LB723
|
|
00B17C 1 A0 04 ldy #$04
|
|
00B17E 1 A9 CB lda #$CB
|
|
00B180 1 A2 B3 ldx #$B3
|
|
00B182 1 20 90 B5 jsr LB590
|
|
00B185 1 60 rts
|
|
00B186 1
|
|
00B186 1 A0 01 LB186: ldy #$01
|
|
00B188 1 B1 06 lda (L0006),y
|
|
00B18A 1 8D 09 D9 sta $D909
|
|
00B18D 1 C8 iny
|
|
00B18E 1 B1 06 lda (L0006),y
|
|
00B190 1 8D 0A D9 sta $D90A
|
|
00B193 1 20 C4 BD jsr LBDC4
|
|
00B196 1 20 DF BD jsr LBDDF
|
|
00B199 1 AD 7D D5 lda $D57D
|
|
00B19C 1 20 B9 B7 jsr LB7B9
|
|
00B19F 1 A0 0E ldy #$0E
|
|
00B1A1 1 A9 2D lda #$2D
|
|
00B1A3 1 A2 B2 ldx #$B2
|
|
00B1A5 1 20 00 D0 jsr LD000
|
|
00B1A8 1 A9 01 lda #$01
|
|
00B1AA 1 A2 D9 ldx #$D9
|
|
00B1AC 1 20 08 B7 jsr LB708
|
|
00B1AF 1 A0 0E ldy #$0E
|
|
00B1B1 1 A9 35 lda #$35
|
|
00B1B3 1 A2 B2 ldx #$B2
|
|
00B1B5 1 20 00 D0 jsr LD000
|
|
00B1B8 1 A9 FB lda #$FB
|
|
00B1BA 1 A2 D8 ldx #$D8
|
|
00B1BC 1 20 08 B7 jsr LB708
|
|
00B1BF 1 60 rts
|
|
00B1C0 1
|
|
00B1C0 1 A0 01 LB1C0: ldy #$01
|
|
00B1C2 1 B1 06 lda (L0006),y
|
|
00B1C4 1 8D 09 D9 sta $D909
|
|
00B1C7 1 C8 iny
|
|
00B1C8 1 B1 06 lda (L0006),y
|
|
00B1CA 1 8D 0A D9 sta $D90A
|
|
00B1CD 1 20 C4 BD jsr LBDC4
|
|
00B1D0 1 20 DF BD jsr LBDDF
|
|
00B1D3 1 AD 7D D5 lda $D57D
|
|
00B1D6 1 20 B9 B7 jsr LB7B9
|
|
00B1D9 1 20 8D BE jsr LBE8D
|
|
00B1DC 1 20 BF B3 jsr LB3BF
|
|
00B1DF 1 A0 03 ldy #$03
|
|
00B1E1 1 B1 06 lda (L0006),y
|
|
00B1E3 1 AA tax
|
|
00B1E4 1 C8 iny
|
|
00B1E5 1 B1 06 lda (L0006),y
|
|
00B1E7 1 85 07 sta $07
|
|
00B1E9 1 86 06 stx L0006
|
|
00B1EB 1 20 63 BE jsr LBE63
|
|
00B1EE 1 A0 0E ldy #$0E
|
|
00B1F0 1 A9 7E lda #$7E
|
|
00B1F2 1 A2 AE ldx #$AE
|
|
00B1F4 1 20 00 D0 jsr LD000
|
|
00B1F7 1 A9 02 lda #$02
|
|
00B1F9 1 A2 D4 ldx #$D4
|
|
00B1FB 1 20 08 B7 jsr LB708
|
|
00B1FE 1 A0 0E ldy #$0E
|
|
00B200 1 A9 3D lda #$3D
|
|
00B202 1 A2 B2 ldx #$B2
|
|
00B204 1 20 00 D0 jsr LD000
|
|
00B207 1 A9 01 lda #$01
|
|
00B209 1 A2 D9 ldx #$D9
|
|
00B20B 1 20 08 B7 jsr LB708
|
|
00B20E 1 60 rts
|
|
00B20F 1
|
|
00B20F 1 AD 7D D5 LB20F: lda $D57D
|
|
00B212 1 20 B9 B7 jsr LB7B9
|
|
00B215 1 20 AF B6 jsr LB6AF
|
|
00B218 1 20 67 A5 LB218: jsr LA567
|
|
00B21B 1 30 FB bmi LB218
|
|
00B21D 1 D0 38 bne LB257
|
|
00B21F 1 A0 07 ldy #$07
|
|
00B221 1 A9 00 lda #$00
|
|
00B223 1 A2 D2 ldx #$D2
|
|
00B225 1 20 00 D0 jsr LD000
|
|
00B228 1 A0 11 ldy #$11
|
|
00B22A 1 A9 6E lda #$6E
|
|
00B22C 1 A2 AE ldx #$AE
|
|
00B22E 1 20 00 D0 jsr LD000
|
|
00B231 1 A0 11 ldy #$11
|
|
00B233 1 A9 20 lda #$20
|
|
00B235 1 A2 AE ldx #$AE
|
|
00B237 1 20 00 D0 jsr LD000
|
|
00B23A 1 A0 11 ldy #$11
|
|
00B23C 1 A9 10 lda #$10
|
|
00B23E 1 A2 AE ldx #$AE
|
|
00B240 1 20 00 D0 jsr LD000
|
|
00B243 1 A0 02 ldy #$02
|
|
00B245 1 A9 0E lda #$0E
|
|
00B247 1 A2 B1 ldx #$B1
|
|
00B249 1 20 90 B5 jsr LB590
|
|
00B24C 1 A0 04 ldy #$04
|
|
00B24E 1 A9 DF lda #$DF
|
|
00B250 1 A2 B3 ldx #$B3
|
|
00B252 1 20 90 B5 jsr LB590
|
|
00B255 1 A9 00 lda #$00
|
|
00B257 1 60 LB257: rts
|
|
00B258 1
|
|
00B258 1 20 B1 BE LB258: jsr LBEB1
|
|
00B25B 1 A0 39 ldy #$39
|
|
00B25D 1 A9 7D lda #$7D
|
|
00B25F 1 A2 D5 ldx #$D5
|
|
00B261 1 20 00 D0 jsr LD000
|
|
00B264 1 20 03 B4 jsr LB403
|
|
00B267 1 60 rts
|
|
00B268 1
|
|
00B268 1 20 BF B3 jsr LB3BF
|
|
00B26B 1 A0 00 ldy #$00
|
|
00B26D 1 B1 06 lda (L0006),y
|
|
00B26F 1 C9 80 cmp #$80
|
|
00B271 1 D0 03 bne LB276
|
|
00B273 1 4C ED B2 jmp LB2ED
|
|
00B276 1
|
|
00B276 1 C9 40 LB276: cmp #$40
|
|
00B278 1 D0 03 bne LB27D
|
|
00B27A 1 4C 13 B3 jmp LB313
|
|
00B27D 1
|
|
00B27D 1 20 75 BD LB27D: jsr LBD75
|
|
00B280 1 20 BF B3 jsr LB3BF
|
|
00B283 1 A9 80 lda #$80
|
|
00B285 1 8D E8 D8 sta $D8E8
|
|
00B288 1 20 69 BD jsr LBD69
|
|
00B28B 1 A9 00 lda #$00
|
|
00B28D 1 20 09 B5 jsr LB509
|
|
00B290 1 AD 7D D5 lda $D57D
|
|
00B293 1 20 B9 B7 jsr LB7B9
|
|
00B296 1 A9 A0 lda #$A0
|
|
00B298 1 A2 B1 ldx #$B1
|
|
00B29A 1 20 23 B7 jsr LB723
|
|
00B29D 1 20 3B B4 jsr LB43B
|
|
00B2A0 1 A0 12 ldy #$12
|
|
00B2A2 1 A9 AB lda #$AB
|
|
00B2A4 1 A2 D6 ldx #$D6
|
|
00B2A6 1 20 00 D0 jsr LD000
|
|
00B2A9 1 A0 02 ldy #$02
|
|
00B2AB 1 A9 B3 lda #$B3
|
|
00B2AD 1 A2 B1 ldx #$B1
|
|
00B2AF 1 20 90 B5 jsr LB590
|
|
00B2B2 1 A9 55 lda #$55
|
|
00B2B4 1 8D C3 D6 sta $D6C3
|
|
00B2B7 1 20 BF B3 jsr LB3BF
|
|
00B2BA 1 A0 01 ldy #$01
|
|
00B2BC 1 B1 06 lda (L0006),y
|
|
00B2BE 1 85 08 sta $08
|
|
00B2C0 1 C8 iny
|
|
00B2C1 1 B1 06 lda (L0006),y
|
|
00B2C3 1 85 09 sta $09
|
|
00B2C5 1 A0 00 ldy #$00
|
|
00B2C7 1 B1 08 lda ($08),y
|
|
00B2C9 1 A8 tay
|
|
00B2CA 1 B1 08 LB2CA: lda ($08),y
|
|
00B2CC 1 99 D7 D8 sta $D8D7,y
|
|
00B2CF 1 88 dey
|
|
00B2D0 1 10 F8 bpl LB2CA
|
|
00B2D2 1 A0 02 ldy #$02
|
|
00B2D4 1 A9 D7 lda #$D7
|
|
00B2D6 1 A2 D8 ldx #$D8
|
|
00B2D8 1 20 90 B5 jsr LB590
|
|
00B2DB 1 A0 04 ldy #$04
|
|
00B2DD 1 A9 BC lda #$BC
|
|
00B2DF 1 A2 B1 ldx #$B1
|
|
00B2E1 1 20 90 B5 jsr LB590
|
|
00B2E4 1 A9 00 lda #$00
|
|
00B2E6 1 8D 43 D4 sta $D443
|
|
00B2E9 1 20 61 B9 jsr LB961
|
|
00B2EC 1 60 rts
|
|
00B2ED 1
|
|
00B2ED 1 A9 00 LB2ED: lda #$00
|
|
00B2EF 1 8D E7 D8 sta $D8E7
|
|
00B2F2 1 A9 80 lda #$80
|
|
00B2F4 1 8D E8 D8 sta $D8E8
|
|
00B2F7 1 AD 7D D5 lda $D57D
|
|
00B2FA 1 20 B9 B7 jsr LB7B9
|
|
00B2FD 1 20 67 A5 LB2FD: jsr LA567
|
|
00B300 1 30 FB bmi LB2FD
|
|
00B302 1 D0 0F bne LB313
|
|
00B304 1 AD 43 D4 lda $D443
|
|
00B307 1 F0 F4 beq LB2FD
|
|
00B309 1 20 C9 BC jsr LBCC9
|
|
00B30C 1 A0 43 ldy #$43
|
|
00B30E 1 A2 D4 ldx #$D4
|
|
00B310 1 A9 00 lda #$00
|
|
00B312 1 60 rts
|
|
00B313 1
|
|
00B313 1 20 B1 BE LB313: jsr LBEB1
|
|
00B316 1 A0 39 ldy #$39
|
|
00B318 1 A9 7D lda #$7D
|
|
00B31A 1 A2 D5 ldx #$D5
|
|
00B31C 1 20 00 D0 jsr LD000
|
|
00B31F 1 20 03 B4 jsr LB403
|
|
00B322 1 A9 01 lda #$01
|
|
00B324 1 60 rts
|
|
00B325 1
|
|
00B325 1 A0 26 ldy #$26
|
|
00B327 1 A9 00 lda #$00
|
|
00B329 1 A2 00 ldx #$00
|
|
00B32B 1 20 00 D0 jsr LD000
|
|
00B32E 1 20 5F B5 jsr LB55F
|
|
00B331 1 AD 7D D5 lda $D57D
|
|
00B334 1 20 B9 B7 jsr LB7B9
|
|
00B337 1 A9 B3 lda #$B3
|
|
00B339 1 A2 B4 ldx #$B4
|
|
00B33B 1 20 23 B7 jsr LB723
|
|
00B33E 1 A0 25 ldy #$25
|
|
00B340 1 A9 00 lda #$00
|
|
00B342 1 A2 00 ldx #$00
|
|
00B344 1 20 00 D0 jsr LD000
|
|
00B347 1 20 BF B3 jsr LB3BF
|
|
00B34A 1 A0 00 ldy #$00
|
|
00B34C 1 B1 06 lda (L0006),y
|
|
00B34E 1 48 pha
|
|
00B34F 1 30 06 bmi LB357
|
|
00B351 1 AA tax
|
|
00B352 1 BD 9C B3 lda LB39C,x
|
|
00B355 1 D0 0A bne LB361
|
|
00B357 1 68 LB357: pla
|
|
00B358 1 29 7F and #$7F
|
|
00B35A 1 48 pha
|
|
00B35B 1 20 E6 B6 jsr LB6E6
|
|
00B35E 1 4C 64 B3 jmp LB364
|
|
00B361 1
|
|
00B361 1 20 AF B6 LB361: jsr LB6AF
|
|
00B364 1 68 LB364: pla
|
|
00B365 1 48 pha
|
|
00B366 1 0A asl a
|
|
00B367 1 0A asl a
|
|
00B368 1 A8 tay
|
|
00B369 1 B9 A4 B3 lda LB3A4,y
|
|
00B36C 1 AA tax
|
|
00B36D 1 B9 A3 B3 lda LB3A3,y
|
|
00B370 1 A0 03 ldy #$03
|
|
00B372 1 20 90 B5 jsr LB590
|
|
00B375 1 68 pla
|
|
00B376 1 0A asl a
|
|
00B377 1 0A asl a
|
|
00B378 1 A8 tay
|
|
00B379 1 B9 A6 B3 lda LB3A6,y
|
|
00B37C 1 AA tax
|
|
00B37D 1 B9 A5 B3 lda LB3A5,y
|
|
00B380 1 A0 04 ldy #$04
|
|
00B382 1 20 90 B5 jsr LB590
|
|
00B385 1 20 67 A5 LB385: jsr LA567
|
|
00B388 1 30 FB bmi LB385
|
|
00B38A 1 48 pha
|
|
00B38B 1 20 B1 BE jsr LBEB1
|
|
00B38E 1 A0 39 ldy #$39
|
|
00B390 1 A9 7D lda #$7D
|
|
00B392 1 A2 D5 ldx #$D5
|
|
00B394 1 20 00 D0 jsr LD000
|
|
00B397 1 20 03 B4 jsr LB403
|
|
00B39A 1 68 pla
|
|
00B39B 1 60 rts
|
|
00B39C 1
|
|
00B39C 1 80 00 LB39C: bra LB39E
|
|
00B39E 1 00 LB39E: brk
|
|
00B39F 1 80 00 bra LB3A1
|
|
00B3A1 1 00 LB3A1: brk
|
|
00B3A2 1 80 .byte $80
|
|
00B3A3 1 BD LB3A3: .byte $BD
|
|
00B3A4 1 B4 LB3A4: .byte $B4
|
|
00B3A5 1 B1 LB3A5: .byte $B1
|
|
00B3A6 1 B4 DC LB3A6: ldy $DC,x
|
|
00B3A8 1 B4 10 ldy $10,x
|
|
00B3AA 1 B5 DC lda $DC,x
|
|
00B3AC 1 B4 10 ldy $10,x
|
|
00B3AE 1 B5 30 lda $30,x
|
|
00B3B0 1 B5 B1 lda $B1,x
|
|
00B3B2 1 B4 30 ldy $30,x
|
|
00B3B4 1 B5 B1 lda $B1,x
|
|
00B3B6 1 B4 69 ldy $69,x
|
|
00B3B8 1 B5 B1 lda $B1,x
|
|
00B3BA 1 B4 9A ldy $9A,x
|
|
00B3BC 1 B5 C4 lda $C4,x
|
|
00B3BE 1 B5 .byte $B5
|
|
00B3BF 1 AD 1D A5 LB3BF: lda LA51D
|
|
00B3C2 1 85 06 sta L0006
|
|
00B3C4 1 AD 1E A5 lda LA51E
|
|
00B3C7 1 85 07 sta $07
|
|
00B3C9 1 60 rts
|
|
00B3CA 1
|
|
00B3CA 1 2C E6 B3 LB3CA: bit LB3E6
|
|
00B3CD 1 10 08 bpl LB3D7
|
|
00B3CF 1 20 03 B4 jsr LB403
|
|
00B3D2 1 A9 00 lda #$00
|
|
00B3D4 1 8D E6 B3 sta LB3E6
|
|
00B3D7 1 60 LB3D7: rts
|
|
00B3D8 1
|
|
00B3D8 1 2C E6 B3 LB3D8: bit LB3E6
|
|
00B3DB 1 30 08 bmi LB3E5
|
|
00B3DD 1 20 1F B4 jsr LB41F
|
|
00B3E0 1 A9 80 lda #$80
|
|
00B3E2 1 8D E6 B3 sta LB3E6
|
|
00B3E5 1 60 LB3E5: rts
|
|
00B3E6 1
|
|
00B3E6 1 00 LB3E6: brk
|
|
00B3E7 1 A0 26 ldy #$26
|
|
00B3E9 1 A9 00 lda #$00
|
|
00B3EB 1 A2 00 ldx #$00
|
|
00B3ED 1 20 00 D0 jsr LD000
|
|
00B3F0 1 A0 24 ldy #$24
|
|
00B3F2 1 A9 11 lda #$11
|
|
00B3F4 1 A2 D3 ldx #$D3
|
|
00B3F6 1 20 00 D0 jsr LD000
|
|
00B3F9 1 A0 25 ldy #$25
|
|
00B3FB 1 A9 00 lda #$00
|
|
00B3FD 1 A2 00 ldx #$00
|
|
00B3FF 1 20 00 D0 jsr LD000
|
|
00B402 1 60 rts
|
|
00B403 1
|
|
00B403 1 A0 26 LB403: ldy #$26
|
|
00B405 1 A9 00 lda #$00
|
|
00B407 1 A2 00 ldx #$00
|
|
00B409 1 20 00 D0 jsr LD000
|
|
00B40C 1 A0 24 ldy #$24
|
|
00B40E 1 A9 AD lda #$AD
|
|
00B410 1 A2 D2 ldx #$D2
|
|
00B412 1 20 00 D0 jsr LD000
|
|
00B415 1 A0 25 ldy #$25
|
|
00B417 1 A9 00 lda #$00
|
|
00B419 1 A2 00 ldx #$00
|
|
00B41B 1 20 00 D0 jsr LD000
|
|
00B41E 1 60 rts
|
|
00B41F 1
|
|
00B41F 1 A0 26 LB41F: ldy #$26
|
|
00B421 1 A9 00 lda #$00
|
|
00B423 1 A2 00 ldx #$00
|
|
00B425 1 20 00 D0 jsr LD000
|
|
00B428 1 A0 24 ldy #$24
|
|
00B42A 1 A9 DF lda #$DF
|
|
00B42C 1 A2 D2 ldx #$D2
|
|
00B42E 1 20 00 D0 jsr LD000
|
|
00B431 1 A0 25 ldy #$25
|
|
00B433 1 A9 00 lda #$00
|
|
00B435 1 A2 00 ldx #$00
|
|
00B437 1 20 00 D0 jsr LD000
|
|
00B43A 1 60 rts
|
|
00B43B 1
|
|
00B43B 1 A0 07 LB43B: ldy #$07
|
|
00B43D 1 A9 02 lda #$02
|
|
00B43F 1 A2 D2 ldx #$D2
|
|
00B441 1 20 00 D0 jsr LD000
|
|
00B444 1 60 rts
|
|
00B445 1
|
|
00B445 1 A2 03 ldx #$03
|
|
00B447 1 BD 09 D2 LB447: lda $D209,x
|
|
00B44A 1 9D 02 B5 sta LB502,x
|
|
00B44D 1 CA dex
|
|
00B44E 1 10 F7 bpl LB447
|
|
00B450 1 A9 00 lda #$00
|
|
00B452 1 8D 01 B5 sta LB501
|
|
00B455 1 AD AB D2 lda $D2AB
|
|
00B458 1 0A asl a
|
|
00B459 1 8D 00 B5 sta LB500
|
|
00B45C 1 2E 01 B5 rol LB501
|
|
00B45F 1 CE 00 B5 LB45F: dec LB500
|
|
00B462 1 AD 00 B5 lda LB500
|
|
00B465 1 C9 FF cmp #$FF
|
|
00B467 1 D0 03 bne LB46C
|
|
00B469 1 CE 01 B5 dec LB501
|
|
00B46C 1 AD 01 B5 LB46C: lda LB501
|
|
00B46F 1 D0 05 bne LB476
|
|
00B471 1 AD 00 B5 lda LB500
|
|
00B474 1 F0 41 beq LB4B7
|
|
00B476 1 A0 2C LB476: ldy #$2C
|
|
00B478 1 A9 08 lda #$08
|
|
00B47A 1 A2 D2 ldx #$D2
|
|
00B47C 1 20 00 D0 jsr LD000
|
|
00B47F 1 20 BA B4 jsr LB4BA
|
|
00B482 1 30 33 bmi LB4B7
|
|
00B484 1 A9 FF lda #$FF
|
|
00B486 1 8D 08 B5 sta LB508
|
|
00B489 1 AD 08 D2 lda $D208
|
|
00B48C 1 8D 07 B5 sta LB507
|
|
00B48F 1 C9 00 cmp #$00
|
|
00B491 1 F0 CC beq LB45F
|
|
00B493 1 C9 04 cmp #$04
|
|
00B495 1 F0 C8 beq LB45F
|
|
00B497 1 C9 02 cmp #$02
|
|
00B499 1 D0 0C bne LB4A7
|
|
00B49B 1 A0 2A ldy #$2A
|
|
00B49D 1 A9 08 lda #$08
|
|
00B49F 1 A2 D2 ldx #$D2
|
|
00B4A1 1 20 00 D0 jsr LD000
|
|
00B4A4 1 4C 5F B4 jmp LB45F
|
|
00B4A7 1
|
|
00B4A7 1 C9 01 LB4A7: cmp #$01
|
|
00B4A9 1 D0 0C bne LB4B7
|
|
00B4AB 1 A0 2A ldy #$2A
|
|
00B4AD 1 A9 08 lda #$08
|
|
00B4AF 1 A2 D2 ldx #$D2
|
|
00B4B1 1 20 00 D0 jsr LD000
|
|
00B4B4 1 A9 00 lda #$00
|
|
00B4B6 1 60 rts
|
|
00B4B7 1
|
|
00B4B7 1 A9 FF LB4B7: lda #$FF
|
|
00B4B9 1 60 rts
|
|
00B4BA 1
|
|
00B4BA 1 AD 09 D2 LB4BA: lda $D209
|
|
00B4BD 1 38 sec
|
|
00B4BE 1 ED 02 B5 sbc LB502
|
|
00B4C1 1 8D 06 B5 sta LB506
|
|
00B4C4 1 AD 0A D2 lda $D20A
|
|
00B4C7 1 ED 03 B5 sbc LB503
|
|
00B4CA 1 10 0A bpl LB4D6
|
|
00B4CC 1 AD 06 B5 lda LB506
|
|
00B4CF 1 C9 FB cmp #$FB
|
|
00B4D1 1 B0 0A bcs LB4DD
|
|
00B4D3 1 A9 FF LB4D3: lda #$FF
|
|
00B4D5 1 60 rts
|
|
00B4D6 1
|
|
00B4D6 1 AD 06 B5 LB4D6: lda LB506
|
|
00B4D9 1 C9 05 cmp #$05
|
|
00B4DB 1 B0 F6 bcs LB4D3
|
|
00B4DD 1 AD 0B D2 LB4DD: lda $D20B
|
|
00B4E0 1 38 sec
|
|
00B4E1 1 ED 04 B5 sbc LB504
|
|
00B4E4 1 8D 06 B5 sta LB506
|
|
00B4E7 1 AD 0C D2 lda $D20C
|
|
00B4EA 1 ED 05 B5 sbc LB505
|
|
00B4ED 1 10 07 bpl LB4F6
|
|
00B4EF 1 AD 06 B5 lda LB506
|
|
00B4F2 1 C9 FC cmp #$FC
|
|
00B4F4 1 B0 07 bcs LB4FD
|
|
00B4F6 1 AD 06 B5 LB4F6: lda LB506
|
|
00B4F9 1 C9 04 cmp #$04
|
|
00B4FB 1 B0 D6 bcs LB4D3
|
|
00B4FD 1 A9 00 LB4FD: lda #$00
|
|
00B4FF 1 60 rts
|
|
00B500 1
|
|
00B500 1 00 LB500: brk
|
|
00B501 1 00 LB501: brk
|
|
00B502 1 00 LB502: brk
|
|
00B503 1 00 LB503: brk
|
|
00B504 1 00 LB504: brk
|
|
00B505 1 00 LB505: brk
|
|
00B506 1 00 LB506: brk
|
|
00B507 1 00 LB507: brk
|
|
00B508 1 00 LB508: brk
|
|
00B509 1 8D E7 D8 LB509: sta $D8E7
|
|
00B50C 1 20 3A B5 jsr LB53A
|
|
00B50F 1 2C E7 D8 bit $D8E7
|
|
00B512 1 50 06 bvc LB51A
|
|
00B514 1 20 4E B6 jsr LB64E
|
|
00B517 1 4C 26 B5 jmp LB526
|
|
00B51A 1
|
|
00B51A 1 A0 12 LB51A: ldy #$12
|
|
00B51C 1 A9 20 lda #$20
|
|
00B51E 1 A2 AE ldx #$AE
|
|
00B520 1 20 00 D0 jsr LD000
|
|
00B523 1 20 F9 B5 jsr LB5F9
|
|
00B526 1 2C E7 D8 LB526: bit $D8E7
|
|
00B529 1 30 0C bmi LB537
|
|
00B52B 1 A0 12 ldy #$12
|
|
00B52D 1 A9 10 lda #$10
|
|
00B52F 1 A2 AE ldx #$AE
|
|
00B531 1 20 00 D0 jsr LD000
|
|
00B534 1 20 0A B6 jsr LB60A
|
|
00B537 1 4C B1 BE LB537: jmp LBEB1
|
|
00B53A 1
|
|
00B53A 1 A0 38 LB53A: ldy #$38
|
|
00B53C 1 A9 7D lda #$7D
|
|
00B53E 1 A2 D5 ldx #$D5
|
|
00B540 1 20 00 D0 jsr LD000
|
|
00B543 1 AD 7D D5 lda $D57D
|
|
00B546 1 20 B9 B7 jsr LB7B9
|
|
00B549 1 20 3B B4 jsr LB43B
|
|
00B54C 1 A0 12 ldy #$12
|
|
00B54E 1 A9 00 lda #$00
|
|
00B550 1 A2 AE ldx #$AE
|
|
00B552 1 20 00 D0 jsr LD000
|
|
00B555 1 A0 12 ldy #$12
|
|
00B557 1 A9 08 lda #$08
|
|
00B559 1 A2 AE ldx #$AE
|
|
00B55B 1 20 00 D0 jsr LD000
|
|
00B55E 1 60 rts
|
|
00B55F 1
|
|
00B55F 1 A0 38 LB55F: ldy #$38
|
|
00B561 1 A9 7D lda #$7D
|
|
00B563 1 A2 D5 ldx #$D5
|
|
00B565 1 20 00 D0 jsr LD000
|
|
00B568 1 AD 7D D5 lda $D57D
|
|
00B56B 1 20 B9 B7 jsr LB7B9
|
|
00B56E 1 20 A7 BE jsr LBEA7
|
|
00B571 1 A0 14 ldy #$14
|
|
00B573 1 A9 6D lda #$6D
|
|
00B575 1 A2 D5 ldx #$D5
|
|
00B577 1 20 00 D0 jsr LD000
|
|
00B57A 1 20 3B B4 jsr LB43B
|
|
00B57D 1 A0 12 ldy #$12
|
|
00B57F 1 A9 00 lda #$00
|
|
00B581 1 A2 AE ldx #$AE
|
|
00B583 1 20 00 D0 jsr LD000
|
|
00B586 1 A0 12 ldy #$12
|
|
00B588 1 A9 08 lda #$08
|
|
00B58A 1 A2 AE ldx #$AE
|
|
00B58C 1 20 00 D0 jsr LD000
|
|
00B58F 1 60 rts
|
|
00B590 1
|
|
00B590 1 86 07 LB590: stx $07
|
|
00B592 1 85 06 sta L0006
|
|
00B594 1 98 tya
|
|
00B595 1 30 03 bmi LB59A
|
|
00B597 1 4C CC B5 jmp LB5CC
|
|
00B59A 1
|
|
00B59A 1 98 LB59A: tya
|
|
00B59B 1 48 pha
|
|
00B59C 1 A5 06 lda L0006
|
|
00B59E 1 18 clc
|
|
00B59F 1 69 01 adc #$01
|
|
00B5A1 1 85 08 sta $08
|
|
00B5A3 1 A5 07 lda $07
|
|
00B5A5 1 69 00 adc #$00
|
|
00B5A7 1 85 09 sta $09
|
|
00B5A9 1 20 7B BD jsr LBD7B
|
|
00B5AC 1 85 0A sta $0A
|
|
00B5AE 1 A0 18 ldy #$18
|
|
00B5B0 1 A9 08 lda #$08
|
|
00B5B2 1 A2 00 ldx #$00
|
|
00B5B4 1 20 00 D0 jsr LD000
|
|
00B5B7 1 46 0C lsr $0C
|
|
00B5B9 1 66 0B ror $0B
|
|
00B5BB 1 A9 C8 lda #$C8
|
|
00B5BD 1 38 sec
|
|
00B5BE 1 E5 0B sbc $0B
|
|
00B5C0 1 8D C3 D6 sta $D6C3
|
|
00B5C3 1 A9 00 lda #$00
|
|
00B5C5 1 E5 0C sbc $0C
|
|
00B5C7 1 8D C4 D6 sta $D6C4
|
|
00B5CA 1 68 pla
|
|
00B5CB 1 A8 tay
|
|
00B5CC 1 88 LB5CC: dey
|
|
00B5CD 1 98 tya
|
|
00B5CE 1 0A asl a
|
|
00B5CF 1 0A asl a
|
|
00B5D0 1 0A asl a
|
|
00B5D1 1 18 clc
|
|
00B5D2 1 6D C1 D6 adc $D6C1
|
|
00B5D5 1 8D C5 D6 sta $D6C5
|
|
00B5D8 1 AD C2 D6 lda $D6C2
|
|
00B5DB 1 69 00 adc #$00
|
|
00B5DD 1 8D C6 D6 sta $D6C6
|
|
00B5E0 1 A0 0E ldy #$0E
|
|
00B5E2 1 A9 C3 lda #$C3
|
|
00B5E4 1 A2 D6 ldx #$D6
|
|
00B5E6 1 20 00 D0 jsr LD000
|
|
00B5E9 1 A5 06 lda L0006
|
|
00B5EB 1 A6 07 ldx $07
|
|
00B5ED 1 20 08 B7 jsr LB708
|
|
00B5F0 1 AE C3 D6 ldx $D6C3
|
|
00B5F3 1 A9 28 lda #$28
|
|
00B5F5 1 8D C3 D6 sta $D6C3
|
|
00B5F8 1 60 rts
|
|
00B5F9 1
|
|
00B5F9 1 A0 0E LB5F9: ldy #$0E
|
|
00B5FB 1 A9 50 lda #$50
|
|
00B5FD 1 A2 AE ldx #$AE
|
|
00B5FF 1 20 00 D0 jsr LD000
|
|
00B602 1 A9 40 lda #$40
|
|
00B604 1 A2 AE ldx #$AE
|
|
00B606 1 20 08 B7 jsr LB708
|
|
00B609 1 60 rts
|
|
00B60A 1
|
|
00B60A 1 A0 0E LB60A: ldy #$0E
|
|
00B60C 1 A9 54 lda #$54
|
|
00B60E 1 A2 AE ldx #$AE
|
|
00B610 1 20 00 D0 jsr LD000
|
|
00B613 1 A9 96 lda #$96
|
|
00B615 1 A2 AE ldx #$AE
|
|
00B617 1 20 08 B7 jsr LB708
|
|
00B61A 1 60 rts
|
|
00B61B 1
|
|
00B61B 1 A0 0E LB61B: ldy #$0E
|
|
00B61D 1 A9 58 lda #$58
|
|
00B61F 1 A2 AE ldx #$AE
|
|
00B621 1 20 00 D0 jsr LD000
|
|
00B624 1 A9 A8 lda #$A8
|
|
00B626 1 A2 AE ldx #$AE
|
|
00B628 1 20 08 B7 jsr LB708
|
|
00B62B 1 60 rts
|
|
00B62C 1
|
|
00B62C 1 A0 0E LB62C: ldy #$0E
|
|
00B62E 1 A9 5C lda #$5C
|
|
00B630 1 A2 AE ldx #$AE
|
|
00B632 1 20 00 D0 jsr LD000
|
|
00B635 1 A9 AD lda #$AD
|
|
00B637 1 A2 AE ldx #$AE
|
|
00B639 1 20 08 B7 jsr LB708
|
|
00B63C 1 60 rts
|
|
00B63D 1
|
|
00B63D 1 A0 0E LB63D: ldy #$0E
|
|
00B63F 1 A9 60 lda #$60
|
|
00B641 1 A2 AE ldx #$AE
|
|
00B643 1 20 00 D0 jsr LD000
|
|
00B646 1 A9 B1 lda #$B1
|
|
00B648 1 A2 AE ldx #$AE
|
|
00B64A 1 20 08 B7 jsr LB708
|
|
00B64D 1 60 rts
|
|
00B64E 1
|
|
00B64E 1 20 3B B4 LB64E: jsr LB43B
|
|
00B651 1 A0 12 ldy #$12
|
|
00B653 1 A9 28 lda #$28
|
|
00B655 1 A2 AE ldx #$AE
|
|
00B657 1 20 00 D0 jsr LD000
|
|
00B65A 1 A0 12 ldy #$12
|
|
00B65C 1 A9 30 lda #$30
|
|
00B65E 1 A2 AE ldx #$AE
|
|
00B660 1 20 00 D0 jsr LD000
|
|
00B663 1 A0 12 ldy #$12
|
|
00B665 1 A9 38 lda #$38
|
|
00B667 1 A2 AE ldx #$AE
|
|
00B669 1 20 00 D0 jsr LD000
|
|
00B66C 1 A0 12 ldy #$12
|
|
00B66E 1 A9 10 lda #$10
|
|
00B670 1 A2 AE ldx #$AE
|
|
00B672 1 20 00 D0 jsr LD000
|
|
00B675 1 20 1B B6 jsr LB61B
|
|
00B678 1 20 2C B6 jsr LB62C
|
|
00B67B 1 20 3D B6 jsr LB63D
|
|
00B67E 1 20 0A B6 jsr LB60A
|
|
00B681 1 A9 40 lda #$40
|
|
00B683 1 8D E7 D8 sta $D8E7
|
|
00B686 1 60 rts
|
|
00B687 1
|
|
00B687 1 20 A7 BE LB687: jsr LBEA7
|
|
00B68A 1 A0 11 ldy #$11
|
|
00B68C 1 A9 28 lda #$28
|
|
00B68E 1 A2 AE ldx #$AE
|
|
00B690 1 20 00 D0 jsr LD000
|
|
00B693 1 A0 11 ldy #$11
|
|
00B695 1 A9 30 lda #$30
|
|
00B697 1 A2 AE ldx #$AE
|
|
00B699 1 20 00 D0 jsr LD000
|
|
00B69C 1 A0 11 ldy #$11
|
|
00B69E 1 A9 38 lda #$38
|
|
00B6A0 1 A2 AE ldx #$AE
|
|
00B6A2 1 20 00 D0 jsr LD000
|
|
00B6A5 1 A0 11 ldy #$11
|
|
00B6A7 1 A9 10 lda #$10
|
|
00B6A9 1 A2 AE ldx #$AE
|
|
00B6AB 1 20 00 D0 jsr LD000
|
|
00B6AE 1 60 rts
|
|
00B6AF 1
|
|
00B6AF 1 20 3B B4 LB6AF: jsr LB43B
|
|
00B6B2 1 A0 12 ldy #$12
|
|
00B6B4 1 A9 20 lda #$20
|
|
00B6B6 1 A2 AE ldx #$AE
|
|
00B6B8 1 20 00 D0 jsr LD000
|
|
00B6BB 1 A0 12 ldy #$12
|
|
00B6BD 1 A9 10 lda #$10
|
|
00B6BF 1 A2 AE ldx #$AE
|
|
00B6C1 1 20 00 D0 jsr LD000
|
|
00B6C4 1 20 F9 B5 jsr LB5F9
|
|
00B6C7 1 20 0A B6 jsr LB60A
|
|
00B6CA 1 A9 00 lda #$00
|
|
00B6CC 1 8D E7 D8 sta $D8E7
|
|
00B6CF 1 60 rts
|
|
00B6D0 1
|
|
00B6D0 1 20 A7 BE LB6D0: jsr LBEA7
|
|
00B6D3 1 A0 11 ldy #$11
|
|
00B6D5 1 A9 20 lda #$20
|
|
00B6D7 1 A2 AE ldx #$AE
|
|
00B6D9 1 20 00 D0 jsr LD000
|
|
00B6DC 1 A0 11 ldy #$11
|
|
00B6DE 1 A9 10 lda #$10
|
|
00B6E0 1 A2 AE ldx #$AE
|
|
00B6E2 1 20 00 D0 jsr LD000
|
|
00B6E5 1 60 rts
|
|
00B6E6 1
|
|
00B6E6 1 20 3B B4 LB6E6: jsr LB43B
|
|
00B6E9 1 A0 12 ldy #$12
|
|
00B6EB 1 A9 20 lda #$20
|
|
00B6ED 1 A2 AE ldx #$AE
|
|
00B6EF 1 20 00 D0 jsr LD000
|
|
00B6F2 1 20 F9 B5 jsr LB5F9
|
|
00B6F5 1 A9 80 lda #$80
|
|
00B6F7 1 8D E7 D8 sta $D8E7
|
|
00B6FA 1 60 rts
|
|
00B6FB 1
|
|
00B6FB 1 20 A7 BE LB6FB: jsr LBEA7
|
|
00B6FE 1 A0 11 ldy #$11
|
|
00B700 1 A9 20 lda #$20
|
|
00B702 1 A2 AE ldx #$AE
|
|
00B704 1 20 00 D0 jsr LD000
|
|
00B707 1 60 rts
|
|
00B708 1
|
|
00B708 1 85 06 LB708: sta L0006
|
|
00B70A 1 86 07 stx $07
|
|
00B70C 1 20 7B BD jsr LBD7B
|
|
00B70F 1 F0 11 beq LB722
|
|
00B711 1 85 08 sta $08
|
|
00B713 1 E6 06 inc L0006
|
|
00B715 1 D0 02 bne LB719
|
|
00B717 1 E6 07 inc $07
|
|
00B719 1 A0 19 LB719: ldy #$19
|
|
00B71B 1 A9 06 lda #$06
|
|
00B71D 1 A2 00 ldx #$00
|
|
00B71F 1 20 00 D0 jsr LD000
|
|
00B722 1 60 LB722: rts
|
|
00B723 1
|
|
00B723 1 85 06 LB723: sta L0006
|
|
00B725 1 86 07 stx $07
|
|
00B727 1 20 7B BD jsr LBD7B
|
|
00B72A 1 85 08 sta $08
|
|
00B72C 1 E6 06 inc L0006
|
|
00B72E 1 D0 02 bne LB732
|
|
00B730 1 E6 07 inc $07
|
|
00B732 1 A0 18 LB732: ldy #$18
|
|
00B734 1 A9 06 lda #$06
|
|
00B736 1 A2 00 ldx #$00
|
|
00B738 1 20 00 D0 jsr LD000
|
|
00B73B 1 46 0A lsr $0A
|
|
00B73D 1 66 09 ror $09
|
|
00B73F 1 A9 01 lda #$01
|
|
00B741 1 8D 6B B7 sta LB76B
|
|
00B744 1 A9 90 lda #$90
|
|
00B746 1 4E 6B B7 lsr LB76B
|
|
00B749 1 6A ror a
|
|
00B74A 1 38 sec
|
|
00B74B 1 E5 09 sbc $09
|
|
00B74D 1 8D B7 D6 sta $D6B7
|
|
00B750 1 AD 6B B7 lda LB76B
|
|
00B753 1 E5 0A sbc $0A
|
|
00B755 1 8D B8 D6 sta $D6B8
|
|
00B758 1 A0 0E ldy #$0E
|
|
00B75A 1 A9 B7 lda #$B7
|
|
00B75C 1 A2 D6 ldx #$D6
|
|
00B75E 1 20 00 D0 jsr LD000
|
|
00B761 1 A0 19 ldy #$19
|
|
00B763 1 A9 06 lda #$06
|
|
00B765 1 A2 00 ldx #$00
|
|
00B767 1 20 00 D0 jsr LD000
|
|
00B76A 1 60 rts
|
|
00B76B 1
|
|
00B76B 1 00 LB76B: brk
|
|
00B76C 1 85 06 sta L0006
|
|
00B76E 1 86 07 stx $07
|
|
00B770 1 A0 0E ldy #$0E
|
|
00B772 1 A9 BB lda #$BB
|
|
00B774 1 A2 D6 ldx #$D6
|
|
00B776 1 20 00 D0 jsr LD000
|
|
00B779 1 A5 06 lda L0006
|
|
00B77B 1 A6 07 ldx $07
|
|
00B77D 1 20 08 B7 jsr LB708
|
|
00B780 1 60 rts
|
|
00B781 1
|
|
00B781 1 86 0B LB781: stx $0B
|
|
00B783 1 85 0A sta $0A
|
|
00B785 1 A0 00 ldy #$00
|
|
00B787 1 B1 0A lda ($0A),y
|
|
00B789 1 A8 tay
|
|
00B78A 1 D0 01 bne LB78D
|
|
00B78C 1 60 rts
|
|
00B78D 1
|
|
00B78D 1 88 LB78D: dey
|
|
00B78E 1 F0 02 beq LB792
|
|
00B790 1 10 01 bpl LB793
|
|
00B792 1 60 LB792: rts
|
|
00B793 1
|
|
00B793 1 B1 0A LB793: lda ($0A),y
|
|
00B795 1 29 7F and #$7F
|
|
00B797 1 C9 2F cmp #$2F
|
|
00B799 1 F0 04 beq LB79F
|
|
00B79B 1 C9 2E cmp #$2E
|
|
00B79D 1 D0 04 bne LB7A3
|
|
00B79F 1 88 LB79F: dey
|
|
00B7A0 1 4C 8D B7 jmp LB78D
|
|
00B7A3 1
|
|
00B7A3 1 C8 LB7A3: iny
|
|
00B7A4 1 B1 0A lda ($0A),y
|
|
00B7A6 1 29 7F and #$7F
|
|
00B7A8 1 C9 41 cmp #$41
|
|
00B7AA 1 90 09 bcc LB7B5
|
|
00B7AC 1 C9 5B cmp #$5B
|
|
00B7AE 1 B0 05 bcs LB7B5
|
|
00B7B0 1 18 clc
|
|
00B7B1 1 69 20 adc #$20
|
|
00B7B3 1 91 0A sta ($0A),y
|
|
00B7B5 1 88 LB7B5: dey
|
|
00B7B6 1 4C 8D B7 jmp LB78D
|
|
00B7B9 1
|
|
00B7B9 1 8D 12 D2 LB7B9: sta $D212
|
|
00B7BC 1 A0 3C ldy #$3C
|
|
00B7BE 1 A9 12 lda #$12
|
|
00B7C0 1 A2 D2 ldx #$D2
|
|
00B7C2 1 20 00 D0 jsr LD000
|
|
00B7C5 1 A0 04 ldy #$04
|
|
00B7C7 1 A9 15 lda #$15
|
|
00B7C9 1 A2 .byte $A2
|
|
00B7CA 1 D2 20 LB7CA: cmp (L0020)
|
|
00B7CC 1 00 brk
|
|
00B7CD 1 D0 60 bne $B82F
|
|
00B7CF 1 A9 00 LB7CF: lda #$00
|
|
00B7D1 1 4C E8 B7 jmp LB7E8
|
|
00B7D4 1
|
|
00B7D4 1 A9 01 LB7D4: lda #$01
|
|
00B7D6 1 4C E8 B7 jmp LB7E8
|
|
00B7D9 1
|
|
00B7D9 1 A9 02 LB7D9: lda #$02
|
|
00B7DB 1 4C E8 B7 jmp LB7E8
|
|
00B7DE 1
|
|
00B7DE 1 A9 03 LB7DE: lda #$03
|
|
00B7E0 1 4C E8 B7 jmp LB7E8
|
|
00B7E3 1
|
|
00B7E3 1 A9 04 LB7E3: lda #$04
|
|
00B7E5 1 4C E8 B7 jmp LB7E8
|
|
00B7E8 1
|
|
00B7E8 1 48 LB7E8: pha
|
|
00B7E9 1 0A asl a
|
|
00B7EA 1 0A asl a
|
|
00B7EB 1 AA tax
|
|
00B7EC 1 BD 08 B8 lda LB808,x
|
|
00B7EF 1 8D 86 B8 sta LB886
|
|
00B7F2 1 BD 09 B8 lda LB809,x
|
|
00B7F5 1 8D 87 B8 sta LB887
|
|
00B7F8 1 BD 0A B8 lda LB80A,x
|
|
00B7FB 1 8D 88 B8 sta LB888
|
|
00B7FE 1 BD 0B B8 lda LB80B,x
|
|
00B801 1 8D 89 B8 sta LB889
|
|
00B804 1 68 pla
|
|
00B805 1 4C 8A B8 jmp LB88A
|
|
00B808 1
|
|
00B808 1 1C LB808: .byte $1C
|
|
00B809 1 B8 LB809: clv
|
|
00B80A 1 4E LB80A: .byte $4E
|
|
00B80B 1 B8 LB80B: clv
|
|
00B80C 1 26 B8 rol $B8
|
|
00B80E 1 58 cli
|
|
00B80F 1 B8 clv
|
|
00B810 1 30 B8 bmi LB7CA
|
|
00B812 1 62 .byte $62
|
|
00B813 1 B8 clv
|
|
00B814 1 3A dec a
|
|
00B815 1 B8 clv
|
|
00B816 1 6C B8 44 jmp (L44B8)
|
|
00B819 1
|
|
00B819 1 B8 clv
|
|
00B81A 1 76 B8 ror $B8,x
|
|
00B81C 1 A0 13 ldy #$13
|
|
00B81E 1 A9 20 lda #$20
|
|
00B820 1 A2 AE ldx #$AE
|
|
00B822 1 20 00 D0 jsr LD000
|
|
00B825 1 60 rts
|
|
00B826 1
|
|
00B826 1 A0 13 ldy #$13
|
|
00B828 1 A9 10 lda #$10
|
|
00B82A 1 A2 AE ldx #$AE
|
|
00B82C 1 20 00 D0 jsr LD000
|
|
00B82F 1 60 rts
|
|
00B830 1
|
|
00B830 1 A0 13 ldy #$13
|
|
00B832 1 A9 28 lda #$28
|
|
00B834 1 A2 AE ldx #$AE
|
|
00B836 1 20 00 D0 jsr LD000
|
|
00B839 1 60 rts
|
|
00B83A 1
|
|
00B83A 1 A0 13 ldy #$13
|
|
00B83C 1 A9 30 lda #$30
|
|
00B83E 1 A2 AE ldx #$AE
|
|
00B840 1 20 00 D0 jsr LD000
|
|
00B843 1 60 rts
|
|
00B844 1
|
|
00B844 1 A0 13 ldy #$13
|
|
00B846 1 A9 38 lda #$38
|
|
00B848 1 A2 AE ldx #$AE
|
|
00B84A 1 20 00 D0 jsr LD000
|
|
00B84D 1 60 rts
|
|
00B84E 1
|
|
00B84E 1 A0 11 ldy #$11
|
|
00B850 1 A9 20 lda #$20
|
|
00B852 1 A2 AE ldx #$AE
|
|
00B854 1 20 00 D0 jsr LD000
|
|
00B857 1 60 rts
|
|
00B858 1
|
|
00B858 1 A0 11 ldy #$11
|
|
00B85A 1 A9 10 lda #$10
|
|
00B85C 1 A2 AE ldx #$AE
|
|
00B85E 1 20 00 D0 jsr LD000
|
|
00B861 1 60 rts
|
|
00B862 1
|
|
00B862 1 A0 11 ldy #$11
|
|
00B864 1 A9 28 lda #$28
|
|
00B866 1 A2 AE ldx #$AE
|
|
00B868 1 20 00 D0 jsr LD000
|
|
00B86B 1 60 rts
|
|
00B86C 1
|
|
00B86C 1 A0 11 ldy #$11
|
|
00B86E 1 A9 30 lda #$30
|
|
00B870 1 A2 AE ldx #$AE
|
|
00B872 1 20 00 D0 jsr LD000
|
|
00B875 1 60 rts
|
|
00B876 1
|
|
00B876 1 A0 11 ldy #$11
|
|
00B878 1 A9 38 lda #$38
|
|
00B87A 1 A2 AE ldx #$AE
|
|
00B87C 1 20 00 D0 jsr LD000
|
|
00B87F 1 60 rts
|
|
00B880 1
|
|
00B880 1 6C 86 B8 LB880: jmp (LB886)
|
|
00B883 1
|
|
00B883 1 6C 88 B8 LB883: jmp (LB888)
|
|
00B886 1
|
|
00B886 1 00 LB886: brk
|
|
00B887 1 00 LB887: brk
|
|
00B888 1 00 LB888: brk
|
|
00B889 1 00 LB889: brk
|
|
00B88A 1 8D F3 B8 LB88A: sta LB8F3
|
|
00B88D 1 A9 00 lda #$00
|
|
00B88F 1 8D F2 B8 sta LB8F2
|
|
00B892 1 A0 2A LB892: ldy #$2A
|
|
00B894 1 A9 08 lda #$08
|
|
00B896 1 A2 D2 ldx #$D2
|
|
00B898 1 20 00 D0 jsr LD000
|
|
00B89B 1 AD 08 D2 lda $D208
|
|
00B89E 1 C9 02 cmp #$02
|
|
00B8A0 1 F0 41 beq LB8E3
|
|
00B8A2 1 AD 7D D5 lda $D57D
|
|
00B8A5 1 8D 08 D2 sta $D208
|
|
00B8A8 1 A0 46 ldy #$46
|
|
00B8AA 1 A9 08 lda #$08
|
|
00B8AC 1 A2 D2 ldx #$D2
|
|
00B8AE 1 20 00 D0 jsr LD000
|
|
00B8B1 1 A0 0E ldy #$0E
|
|
00B8B3 1 A9 0D lda #$0D
|
|
00B8B5 1 A2 D2 ldx #$D2
|
|
00B8B7 1 20 00 D0 jsr LD000
|
|
00B8BA 1 20 80 B8 jsr LB880
|
|
00B8BD 1 C9 80 cmp #$80
|
|
00B8BF 1 F0 08 beq LB8C9
|
|
00B8C1 1 AD F2 B8 lda LB8F2
|
|
00B8C4 1 F0 0B beq LB8D1
|
|
00B8C6 1 4C 92 B8 jmp LB892
|
|
00B8C9 1
|
|
00B8C9 1 AD F2 B8 LB8C9: lda LB8F2
|
|
00B8CC 1 D0 03 bne LB8D1
|
|
00B8CE 1 4C 92 B8 jmp LB892
|
|
00B8D1 1
|
|
00B8D1 1 20 3B B4 LB8D1: jsr LB43B
|
|
00B8D4 1 20 83 B8 jsr LB883
|
|
00B8D7 1 AD F2 B8 lda LB8F2
|
|
00B8DA 1 18 clc
|
|
00B8DB 1 69 80 adc #$80
|
|
00B8DD 1 8D F2 B8 sta LB8F2
|
|
00B8E0 1 4C 92 B8 jmp LB892
|
|
00B8E3 1
|
|
00B8E3 1 AD F2 B8 LB8E3: lda LB8F2
|
|
00B8E6 1 F0 03 beq LB8EB
|
|
00B8E8 1 A9 FF lda #$FF
|
|
00B8EA 1 60 rts
|
|
00B8EB 1
|
|
00B8EB 1 20 83 B8 LB8EB: jsr LB883
|
|
00B8EE 1 AD F3 B8 lda LB8F3
|
|
00B8F1 1 60 rts
|
|
00B8F2 1
|
|
00B8F2 1 00 LB8F2: brk
|
|
00B8F3 1 00 LB8F3: brk
|
|
00B8F4 1 60 rts
|
|
00B8F5 1
|
|
00B8F5 1 20 3B BD LB8F5: jsr LBD3B
|
|
00B8F8 1 85 06 sta L0006
|
|
00B8FA 1 86 07 stx $07
|
|
00B8FC 1 AD B5 D6 lda $D6B5
|
|
00B8FF 1 85 08 sta $08
|
|
00B901 1 AD B6 D6 lda $D6B6
|
|
00B904 1 85 09 sta $09
|
|
00B906 1 A0 0E ldy #$0E
|
|
00B908 1 A9 06 lda #$06
|
|
00B90A 1 A2 00 ldx #$00
|
|
00B90C 1 20 00 D0 jsr LD000
|
|
00B90F 1 A0 06 ldy #$06
|
|
00B911 1 A9 C7 lda #$C7
|
|
00B913 1 A2 D6 ldx #$D6
|
|
00B915 1 20 00 D0 jsr LD000
|
|
00B918 1 2C EB D8 bit $D8EB
|
|
00B91B 1 10 10 bpl LB92D
|
|
00B91D 1 A0 0C ldy #$0C
|
|
00B91F 1 A9 6C lda #$6C
|
|
00B921 1 A2 AE ldx #$AE
|
|
00B923 1 20 00 D0 jsr LD000
|
|
00B926 1 A9 00 lda #$00
|
|
00B928 1 8D EB D8 sta $D8EB
|
|
00B92B 1 F0 0E beq LB93B
|
|
00B92D 1 A0 0C LB92D: ldy #$0C
|
|
00B92F 1 A9 6D lda #$6D
|
|
00B931 1 A2 AE ldx #$AE
|
|
00B933 1 20 00 D0 jsr LD000
|
|
00B936 1 A9 FF lda #$FF
|
|
00B938 1 8D EB D8 sta $D8EB
|
|
00B93B 1 A9 EF LB93B: lda #$EF
|
|
00B93D 1 85 06 sta L0006
|
|
00B93F 1 A9 D8 lda #$D8
|
|
00B941 1 85 07 sta $07
|
|
00B943 1 AD EE D8 lda $D8EE
|
|
00B946 1 85 08 sta $08
|
|
00B948 1 A0 19 ldy #$19
|
|
00B94A 1 A9 06 lda #$06
|
|
00B94C 1 A2 00 ldx #$00
|
|
00B94E 1 20 00 D0 jsr LD000
|
|
00B951 1 A0 0C ldy #$0C
|
|
00B953 1 A9 6D lda #$6D
|
|
00B955 1 A2 AE ldx #$AE
|
|
00B957 1 20 00 D0 jsr LD000
|
|
00B95A 1 AD 7D D5 lda $D57D
|
|
00B95D 1 20 B9 B7 jsr LB7B9
|
|
00B960 1 60 rts
|
|
00B961 1
|
|
00B961 1 AD 43 D4 LB961: lda $D443
|
|
00B964 1 F0 51 beq LB9B7
|
|
00B966 1 AD 7D D5 lda $D57D
|
|
00B969 1 20 B9 B7 jsr LB7B9
|
|
00B96C 1 20 A7 BE jsr LBEA7
|
|
00B96F 1 A0 11 ldy #$11
|
|
00B971 1 A9 AB lda #$AB
|
|
00B973 1 A2 D6 ldx #$D6
|
|
00B975 1 20 00 D0 jsr LD000
|
|
00B978 1 A0 07 ldy #$07
|
|
00B97A 1 A9 02 lda #$02
|
|
00B97C 1 A2 D2 ldx #$D2
|
|
00B97E 1 20 00 D0 jsr LD000
|
|
00B981 1 A0 12 ldy #$12
|
|
00B983 1 A9 AB lda #$AB
|
|
00B985 1 A2 D6 ldx #$D6
|
|
00B987 1 20 00 D0 jsr LD000
|
|
00B98A 1 A0 0E ldy #$0E
|
|
00B98C 1 A9 B3 lda #$B3
|
|
00B98E 1 A2 D6 ldx #$D6
|
|
00B990 1 20 00 D0 jsr LD000
|
|
00B993 1 A0 06 ldy #$06
|
|
00B995 1 A9 C7 lda #$C7
|
|
00B997 1 A2 D6 ldx #$D6
|
|
00B999 1 20 00 D0 jsr LD000
|
|
00B99C 1 A9 43 lda #$43
|
|
00B99E 1 A2 D4 ldx #$D4
|
|
00B9A0 1 20 08 B7 jsr LB708
|
|
00B9A3 1 A9 84 lda #$84
|
|
00B9A5 1 A2 D4 ldx #$D4
|
|
00B9A7 1 20 08 B7 jsr LB708
|
|
00B9AA 1 A9 F8 lda #$F8
|
|
00B9AC 1 A2 D8 ldx #$D8
|
|
00B9AE 1 20 08 B7 jsr LB708
|
|
00B9B1 1 AD 7D D5 lda $D57D
|
|
00B9B4 1 20 B9 B7 jsr LB7B9
|
|
00B9B7 1 60 LB9B7: rts
|
|
00B9B8 1
|
|
00B9B8 1 A0 46 LB9B8: ldy #$46
|
|
00B9BA 1 A9 08 lda #$08
|
|
00B9BC 1 A2 D2 ldx #$D2
|
|
00B9BE 1 20 00 D0 jsr LD000
|
|
00B9C1 1 A0 0E ldy #$0E
|
|
00B9C3 1 A9 0D lda #$0D
|
|
00B9C5 1 A2 D2 ldx #$D2
|
|
00B9C7 1 20 00 D0 jsr LD000
|
|
00B9CA 1 A0 13 ldy #$13
|
|
00B9CC 1 A9 AB lda #$AB
|
|
00B9CE 1 A2 D6 ldx #$D6
|
|
00B9D0 1 20 00 D0 jsr LD000
|
|
00B9D3 1 C9 80 cmp #$80
|
|
00B9D5 1 F0 01 beq LB9D8
|
|
00B9D7 1 60 rts
|
|
00B9D8 1
|
|
00B9D8 1 20 3B BD LB9D8: jsr LBD3B
|
|
00B9DB 1 85 06 sta L0006
|
|
00B9DD 1 86 07 stx $07
|
|
00B9DF 1 AD 0D D2 lda $D20D
|
|
00B9E2 1 C5 06 cmp L0006
|
|
00B9E4 1 AD 0E D2 lda $D20E
|
|
00B9E7 1 E5 07 sbc $07
|
|
00B9E9 1 B0 03 bcs LB9EE
|
|
00B9EB 1 4C 83 BA jmp LBA83
|
|
00B9EE 1
|
|
00B9EE 1 20 3B BD LB9EE: jsr LBD3B
|
|
00B9F1 1 8D 09 BB sta LBB09
|
|
00B9F4 1 8E 0A BB stx LBB0A
|
|
00B9F7 1 AE 84 D4 ldx $D484
|
|
00B9FA 1 E8 inx
|
|
00B9FB 1 A9 20 lda #$20
|
|
00B9FD 1 9D 84 D4 sta $D484,x
|
|
00BA00 1 EE 84 D4 inc $D484
|
|
00BA03 1 A9 84 lda #$84
|
|
00BA05 1 85 06 sta L0006
|
|
00BA07 1 A9 D4 lda #$D4
|
|
00BA09 1 85 07 sta $07
|
|
00BA0B 1 AD 84 D4 lda $D484
|
|
00BA0E 1 85 08 sta $08
|
|
00BA10 1 A0 18 LBA10: ldy #$18
|
|
00BA12 1 A9 06 lda #$06
|
|
00BA14 1 A2 00 ldx #$00
|
|
00BA16 1 20 00 D0 jsr LD000
|
|
00BA19 1 A5 09 lda $09
|
|
00BA1B 1 18 clc
|
|
00BA1C 1 6D 09 BB adc LBB09
|
|
00BA1F 1 85 09 sta $09
|
|
00BA21 1 A5 0A lda $0A
|
|
00BA23 1 6D 0A BB adc LBB0A
|
|
00BA26 1 85 0A sta $0A
|
|
00BA28 1 A5 09 lda $09
|
|
00BA2A 1 CD 0D D2 cmp $D20D
|
|
00BA2D 1 A5 0A lda $0A
|
|
00BA2F 1 ED 0E D2 sbc $D20E
|
|
00BA32 1 90 0E bcc LBA42
|
|
00BA34 1 C6 08 dec $08
|
|
00BA36 1 A5 08 lda $08
|
|
00BA38 1 C9 01 cmp #$01
|
|
00BA3A 1 D0 D4 bne LBA10
|
|
00BA3C 1 CE 84 D4 dec $D484
|
|
00BA3F 1 4C 05 BB jmp LBB05
|
|
00BA42 1
|
|
00BA42 1 A5 08 LBA42: lda $08
|
|
00BA44 1 CD 84 D4 cmp $D484
|
|
00BA47 1 90 06 bcc LBA4F
|
|
00BA49 1 CE 84 D4 dec $D484
|
|
00BA4C 1 4C C9 BC jmp LBCC9
|
|
00BA4F 1
|
|
00BA4F 1 A2 02 LBA4F: ldx #$02
|
|
00BA51 1 AC 43 D4 ldy $D443
|
|
00BA54 1 C8 iny
|
|
00BA55 1 BD 84 D4 LBA55: lda $D484,x
|
|
00BA58 1 99 43 D4 sta $D443,y
|
|
00BA5B 1 E4 08 cpx $08
|
|
00BA5D 1 F0 05 beq LBA64
|
|
00BA5F 1 C8 iny
|
|
00BA60 1 E8 inx
|
|
00BA61 1 4C 55 BA jmp LBA55
|
|
00BA64 1
|
|
00BA64 1 8C 43 D4 LBA64: sty $D443
|
|
00BA67 1 A0 02 ldy #$02
|
|
00BA69 1 A6 08 ldx $08
|
|
00BA6B 1 E8 inx
|
|
00BA6C 1 BD 84 D4 LBA6C: lda $D484,x
|
|
00BA6F 1 99 84 D4 sta $D484,y
|
|
00BA72 1 EC 84 D4 cpx $D484
|
|
00BA75 1 F0 05 beq LBA7C
|
|
00BA77 1 C8 iny
|
|
00BA78 1 E8 inx
|
|
00BA79 1 4C 6C BA jmp LBA6C
|
|
00BA7C 1
|
|
00BA7C 1 88 LBA7C: dey
|
|
00BA7D 1 8C 84 D4 sty $D484
|
|
00BA80 1 4C 05 BB jmp LBB05
|
|
00BA83 1
|
|
00BA83 1 A9 43 LBA83: lda #$43
|
|
00BA85 1 85 06 sta L0006
|
|
00BA87 1 A9 D4 lda #$D4
|
|
00BA89 1 85 07 sta $07
|
|
00BA8B 1 AD 43 D4 lda $D443
|
|
00BA8E 1 85 08 sta $08
|
|
00BA90 1 A0 18 LBA90: ldy #$18
|
|
00BA92 1 A9 06 lda #$06
|
|
00BA94 1 A2 00 ldx #$00
|
|
00BA96 1 20 00 D0 jsr LD000
|
|
00BA99 1 A5 09 lda $09
|
|
00BA9B 1 18 clc
|
|
00BA9C 1 6D B3 D6 adc $D6B3
|
|
00BA9F 1 85 09 sta $09
|
|
00BAA1 1 A5 0A lda $0A
|
|
00BAA3 1 6D B4 D6 adc $D6B4
|
|
00BAA6 1 85 0A sta $0A
|
|
00BAA8 1 A5 .byte $A5
|
|
00BAA9 1 09 CD LBAA9: ora #$CD
|
|
00BAAB 1 0D D2 A5 ora LA5D2
|
|
00BAAE 1 0A asl a
|
|
00BAAF 1 ED 0E D2 sbc $D20E
|
|
00BAB2 1 90 0B bcc LBABF
|
|
00BAB4 1 C6 08 dec $08
|
|
00BAB6 1 A5 08 lda $08
|
|
00BAB8 1 C9 01 cmp #$01
|
|
00BABA 1 B0 D4 bcs LBA90
|
|
00BABC 1 4C 5E BC jmp LBC5E
|
|
00BABF 1
|
|
00BABF 1 E6 08 LBABF: inc $08
|
|
00BAC1 1 A0 00 ldy #$00
|
|
00BAC3 1 A6 08 ldx $08
|
|
00BAC5 1 EC 43 D4 LBAC5: cpx $D443
|
|
00BAC8 1 F0 0B beq LBAD5
|
|
00BACA 1 E8 inx
|
|
00BACB 1 C8 iny
|
|
00BACC 1 BD 43 D4 lda $D443,x
|
|
00BACF 1 99 C2 D3 sta $D3C2,y
|
|
00BAD2 1 4C C5 BA jmp LBAC5
|
|
00BAD5 1
|
|
00BAD5 1 C8 LBAD5: iny
|
|
00BAD6 1 8C C1 D3 sty $D3C1
|
|
00BAD9 1 A2 01 ldx #$01
|
|
00BADB 1 AC C1 D3 ldy $D3C1
|
|
00BADE 1 EC 84 D4 LBADE: cpx $D484
|
|
00BAE1 1 F0 0B beq LBAEE
|
|
00BAE3 1 E8 inx
|
|
00BAE4 1 C8 iny
|
|
00BAE5 1 BD 84 D4 lda $D484,x
|
|
00BAE8 1 99 C1 D3 sta $D3C1,y
|
|
00BAEB 1 4C DE BA jmp LBADE
|
|
00BAEE 1
|
|
00BAEE 1 8C C1 D3 LBAEE: sty $D3C1
|
|
00BAF1 1 AD EF D8 lda $D8EF
|
|
00BAF4 1 8D C2 D3 sta $D3C2
|
|
00BAF7 1 B9 C1 D3 LBAF7: lda $D3C1,y
|
|
00BAFA 1 99 84 D4 sta $D484,y
|
|
00BAFD 1 88 dey
|
|
00BAFE 1 10 F7 bpl LBAF7
|
|
00BB00 1 A5 08 lda $08
|
|
00BB02 1 8D 43 D4 sta $D443
|
|
00BB05 1 20 61 B9 LBB05: jsr LB961
|
|
00BB08 1 60 rts
|
|
00BB09 1
|
|
00BB09 1 00 LBB09: brk
|
|
00BB0A 1 00 LBB0A: brk
|
|
00BB0B 1 8D 62 BB LBB0B: sta LBB62
|
|
00BB0E 1 AD 43 D4 lda $D443
|
|
00BB11 1 18 clc
|
|
00BB12 1 6D 84 D4 adc $D484
|
|
00BB15 1 C9 10 cmp #$10
|
|
00BB17 1 90 01 bcc LBB1A
|
|
00BB19 1 60 rts
|
|
00BB1A 1
|
|
00BB1A 1 AD 62 BB LBB1A: lda LBB62
|
|
00BB1D 1 AE 43 D4 ldx $D443
|
|
00BB20 1 E8 inx
|
|
00BB21 1 9D 43 D4 sta $D443,x
|
|
00BB24 1 8D F7 D8 sta $D8F7
|
|
00BB27 1 20 3B BD jsr LBD3B
|
|
00BB2A 1 EE 43 D4 inc $D443
|
|
00BB2D 1 85 06 sta L0006
|
|
00BB2F 1 86 07 stx $07
|
|
00BB31 1 AD B5 D6 lda $D6B5
|
|
00BB34 1 85 08 sta $08
|
|
00BB36 1 AD B6 D6 lda $D6B6
|
|
00BB39 1 85 09 sta $09
|
|
00BB3B 1 A0 0E ldy #$0E
|
|
00BB3D 1 A9 06 lda #$06
|
|
00BB3F 1 A2 00 ldx #$00
|
|
00BB41 1 20 00 D0 jsr LD000
|
|
00BB44 1 A0 06 ldy #$06
|
|
00BB46 1 A9 C7 lda #$C7
|
|
00BB48 1 A2 D6 ldx #$D6
|
|
00BB4A 1 20 00 D0 jsr LD000
|
|
00BB4D 1 A9 F6 lda #$F6
|
|
00BB4F 1 A2 D8 ldx #$D8
|
|
00BB51 1 20 08 B7 jsr LB708
|
|
00BB54 1 A9 84 lda #$84
|
|
00BB56 1 A2 D4 ldx #$D4
|
|
00BB58 1 20 08 B7 jsr LB708
|
|
00BB5B 1 AD 7D D5 lda $D57D
|
|
00BB5E 1 20 B9 B7 jsr LB7B9
|
|
00BB61 1 60 rts
|
|
00BB62 1
|
|
00BB62 1 00 LBB62: brk
|
|
00BB63 1 AD 43 D4 LBB63: lda $D443
|
|
00BB66 1 D0 01 bne LBB69
|
|
00BB68 1 60 rts
|
|
00BB69 1
|
|
00BB69 1 CE 43 D4 LBB69: dec $D443
|
|
00BB6C 1 20 3B BD jsr LBD3B
|
|
00BB6F 1 85 06 sta L0006
|
|
00BB71 1 86 07 stx $07
|
|
00BB73 1 AD B5 D6 lda $D6B5
|
|
00BB76 1 85 08 sta $08
|
|
00BB78 1 AD B6 D6 lda $D6B6
|
|
00BB7B 1 85 09 sta $09
|
|
00BB7D 1 A0 0E ldy #$0E
|
|
00BB7F 1 A9 06 lda #$06
|
|
00BB81 1 A2 00 ldx #$00
|
|
00BB83 1 20 00 D0 jsr LD000
|
|
00BB86 1 A0 06 ldy #$06
|
|
00BB88 1 A9 C7 lda #$C7
|
|
00BB8A 1 A2 D6 ldx #$D6
|
|
00BB8C 1 20 00 D0 jsr LD000
|
|
00BB8F 1 A9 84 lda #$84
|
|
00BB91 1 A2 D4 ldx #$D4
|
|
00BB93 1 20 08 B7 jsr LB708
|
|
00BB96 1 A9 F8 lda #$F8
|
|
00BB98 1 A2 D8 ldx #$D8
|
|
00BB9A 1 20 08 B7 jsr LB708
|
|
00BB9D 1 AD 7D D5 lda $D57D
|
|
00BBA0 1 20 B9 B7 jsr LB7B9
|
|
00BBA3 1 60 rts
|
|
00BBA4 1
|
|
00BBA4 1 AD 43 D4 LBBA4: lda $D443
|
|
00BBA7 1 D0 01 bne LBBAA
|
|
00BBA9 1 60 rts
|
|
00BBAA 1
|
|
00BBAA 1 AE 84 D4 LBBAA: ldx $D484
|
|
00BBAD 1 E0 01 cpx #$01
|
|
00BBAF 1 F0 0B beq LBBBC
|
|
00BBB1 1 BD 84 D4 LBBB1: lda $D484,x
|
|
00BBB4 1 9D 85 D4 sta $D485,x
|
|
00BBB7 1 CA dex
|
|
00BBB8 1 E0 01 cpx #$01
|
|
00BBBA 1 D0 F5 bne LBBB1
|
|
00BBBC 1 AE 43 D4 LBBBC: ldx $D443
|
|
00BBBF 1 BD 43 D4 lda $D443,x
|
|
00BBC2 1 8D 86 D4 sta $D486
|
|
00BBC5 1 CE 43 D4 dec $D443
|
|
00BBC8 1 EE 84 D4 inc $D484
|
|
00BBCB 1 20 3B BD jsr LBD3B
|
|
00BBCE 1 85 06 sta L0006
|
|
00BBD0 1 86 07 stx $07
|
|
00BBD2 1 AD B5 D6 lda $D6B5
|
|
00BBD5 1 85 08 sta $08
|
|
00BBD7 1 AD B6 D6 lda $D6B6
|
|
00BBDA 1 85 09 sta $09
|
|
00BBDC 1 A0 0E ldy #$0E
|
|
00BBDE 1 A9 06 lda #$06
|
|
00BBE0 1 A2 00 ldx #$00
|
|
00BBE2 1 20 00 D0 jsr LD000
|
|
00BBE5 1 A0 06 ldy #$06
|
|
00BBE7 1 A9 C7 lda #$C7
|
|
00BBE9 1 A2 D6 ldx #$D6
|
|
00BBEB 1 20 00 D0 jsr LD000
|
|
00BBEE 1 A9 84 lda #$84
|
|
00BBF0 1 A2 D4 ldx #$D4
|
|
00BBF2 1 20 08 B7 jsr LB708
|
|
00BBF5 1 A9 F8 lda #$F8
|
|
00BBF7 1 A2 D8 ldx #$D8
|
|
00BBF9 1 20 08 B7 jsr LB708
|
|
00BBFC 1 AD 7D D5 lda $D57D
|
|
00BBFF 1 20 B9 B7 jsr LB7B9
|
|
00BC02 1 60 rts
|
|
00BC03 1
|
|
00BC03 1 AD 84 D4 LBC03: lda $D484
|
|
00BC06 1 C9 02 cmp #$02
|
|
00BC08 1 B0 01 bcs LBC0B
|
|
00BC0A 1 60 rts
|
|
00BC0B 1
|
|
00BC0B 1 AE 43 D4 LBC0B: ldx $D443
|
|
00BC0E 1 E8 inx
|
|
00BC0F 1 AD 86 D4 lda $D486
|
|
00BC12 1 9D 43 D4 sta $D443,x
|
|
00BC15 1 EE 43 D4 inc $D443
|
|
00BC18 1 AE 84 D4 ldx $D484
|
|
00BC1B 1 E0 03 cpx #$03
|
|
00BC1D 1 90 0E bcc LBC2D
|
|
00BC1F 1 A2 02 ldx #$02
|
|
00BC21 1 BD 85 D4 LBC21: lda $D485,x
|
|
00BC24 1 9D 84 D4 sta $D484,x
|
|
00BC27 1 E8 inx
|
|
00BC28 1 EC 84 D4 cpx $D484
|
|
00BC2B 1 D0 F4 bne LBC21
|
|
00BC2D 1 CE 84 D4 LBC2D: dec $D484
|
|
00BC30 1 A0 0E ldy #$0E
|
|
00BC32 1 A9 B3 lda #$B3
|
|
00BC34 1 A2 D6 ldx #$D6
|
|
00BC36 1 20 00 D0 jsr LD000
|
|
00BC39 1 A0 06 ldy #$06
|
|
00BC3B 1 A9 C7 lda #$C7
|
|
00BC3D 1 A2 D6 ldx #$D6
|
|
00BC3F 1 20 00 D0 jsr LD000
|
|
00BC42 1 A9 43 lda #$43
|
|
00BC44 1 A2 D4 ldx #$D4
|
|
00BC46 1 20 08 B7 jsr LB708
|
|
00BC49 1 A9 84 lda #$84
|
|
00BC4B 1 A2 D4 ldx #$D4
|
|
00BC4D 1 20 08 B7 jsr LB708
|
|
00BC50 1 A9 F8 lda #$F8
|
|
00BC52 1 A2 D8 ldx #$D8
|
|
00BC54 1 20 08 B7 jsr LB708
|
|
00BC57 1 AD 7D D5 lda $D57D
|
|
00BC5A 1 20 B9 B7 jsr LB7B9
|
|
00BC5D 1 60 rts
|
|
00BC5E 1
|
|
00BC5E 1 AD 43 D4 LBC5E: lda $D443
|
|
00BC61 1 D0 01 bne LBC64
|
|
00BC63 1 60 rts
|
|
00BC64 1
|
|
00BC64 1 AE 84 D4 LBC64: ldx $D484
|
|
00BC67 1 E0 01 cpx #$01
|
|
00BC69 1 F0 0E beq LBC79
|
|
00BC6B 1 BD 84 D4 LBC6B: lda $D484,x
|
|
00BC6E 1 9D C0 D3 sta $D3C0,x
|
|
00BC71 1 CA dex
|
|
00BC72 1 E0 01 cpx #$01
|
|
00BC74 1 D0 F5 bne LBC6B
|
|
00BC76 1 AE 84 D4 ldx $D484
|
|
00BC79 1 CA LBC79: dex
|
|
00BC7A 1 8E C1 D3 stx $D3C1
|
|
00BC7D 1 AE 43 D4 ldx $D443
|
|
00BC80 1 BD 43 D4 LBC80: lda $D443,x
|
|
00BC83 1 9D 85 D4 sta $D485,x
|
|
00BC86 1 CA dex
|
|
00BC87 1 D0 F7 bne LBC80
|
|
00BC89 1 AD EF D8 lda $D8EF
|
|
00BC8C 1 8D 85 D4 sta $D485
|
|
00BC8F 1 EE 43 D4 inc $D443
|
|
00BC92 1 AD 43 D4 lda $D443
|
|
00BC95 1 8D 84 D4 sta $D484
|
|
00BC98 1 AD 43 D4 lda $D443
|
|
00BC9B 1 18 clc
|
|
00BC9C 1 6D C1 D3 adc $D3C1
|
|
00BC9F 1 A8 tay
|
|
00BCA0 1 48 pha
|
|
00BCA1 1 AE C1 D3 ldx $D3C1
|
|
00BCA4 1 F0 0D beq LBCB3
|
|
00BCA6 1 BD C1 D3 LBCA6: lda $D3C1,x
|
|
00BCA9 1 99 84 D4 sta $D484,y
|
|
00BCAC 1 CA dex
|
|
00BCAD 1 88 dey
|
|
00BCAE 1 CC 84 D4 cpy $D484
|
|
00BCB1 1 D0 F3 bne LBCA6
|
|
00BCB3 1 68 LBCB3: pla
|
|
00BCB4 1 8D 84 D4 sta $D484
|
|
00BCB7 1 A9 00 lda #$00
|
|
00BCB9 1 8D 43 D4 sta $D443
|
|
00BCBC 1 A0 0E ldy #$0E
|
|
00BCBE 1 A9 B3 lda #$B3
|
|
00BCC0 1 A2 D6 ldx #$D6
|
|
00BCC2 1 20 00 D0 jsr LD000
|
|
00BCC5 1 20 61 B9 jsr LB961
|
|
00BCC8 1 60 rts
|
|
00BCC9 1
|
|
00BCC9 1 AD 84 D4 LBCC9: lda $D484
|
|
00BCCC 1 C9 02 cmp #$02
|
|
00BCCE 1 B0 01 bcs LBCD1
|
|
00BCD0 1 60 rts
|
|
00BCD1 1
|
|
00BCD1 1 AE 84 D4 LBCD1: ldx $D484
|
|
00BCD4 1 CA dex
|
|
00BCD5 1 8A txa
|
|
00BCD6 1 18 clc
|
|
00BCD7 1 6D 43 D4 adc $D443
|
|
00BCDA 1 48 pha
|
|
00BCDB 1 A8 tay
|
|
00BCDC 1 AE 84 D4 ldx $D484
|
|
00BCDF 1 BD 84 D4 LBCDF: lda $D484,x
|
|
00BCE2 1 99 43 D4 sta $D443,y
|
|
00BCE5 1 CA dex
|
|
00BCE6 1 88 dey
|
|
00BCE7 1 CC 43 D4 cpy $D443
|
|
00BCEA 1 D0 F3 bne LBCDF
|
|
00BCEC 1 68 pla
|
|
00BCED 1 8D 43 D4 sta $D443
|
|
00BCF0 1 A9 01 lda #$01
|
|
00BCF2 1 8D 84 D4 sta $D484
|
|
00BCF5 1 A0 0E ldy #$0E
|
|
00BCF7 1 A9 B3 lda #$B3
|
|
00BCF9 1 A2 D6 ldx #$D6
|
|
00BCFB 1 20 00 D0 jsr LD000
|
|
00BCFE 1 20 61 B9 jsr LB961
|
|
00BD01 1 60 rts
|
|
00BD02 1
|
|
00BD02 1 85 06 sta L0006
|
|
00BD04 1 86 07 stx $07
|
|
00BD06 1 A0 00 ldy #$00
|
|
00BD08 1 B1 06 lda (L0006),y
|
|
00BD0A 1 A8 tay
|
|
00BD0B 1 18 clc
|
|
00BD0C 1 6D 43 D4 adc $D443
|
|
00BD0F 1 48 pha
|
|
00BD10 1 AA tax
|
|
00BD11 1 B1 06 LBD11: lda (L0006),y
|
|
00BD13 1 9D 43 D4 sta $D443,x
|
|
00BD16 1 88 dey
|
|
00BD17 1 CA dex
|
|
00BD18 1 EC 43 D4 cpx $D443
|
|
00BD1B 1 D0 F4 bne LBD11
|
|
00BD1D 1 68 pla
|
|
00BD1E 1 8D 43 D4 sta $D443
|
|
00BD21 1 60 rts
|
|
00BD22 1
|
|
00BD22 1 AE 43 D4 LBD22: ldx $D443
|
|
00BD25 1 E0 00 cpx #$00
|
|
00BD27 1 F0 0A beq LBD33
|
|
00BD29 1 CE 43 D4 dec $D443
|
|
00BD2C 1 BD 43 D4 lda $D443,x
|
|
00BD2F 1 C9 2F cmp #$2F
|
|
00BD31 1 D0 EF bne LBD22
|
|
00BD33 1 60 LBD33: rts
|
|
00BD34 1
|
|
00BD34 1 20 22 BD jsr LBD22
|
|
00BD37 1 20 61 B9 jsr LB961
|
|
00BD3A 1 60 rts
|
|
00BD3B 1
|
|
00BD3B 1 A9 44 LBD3B: lda #$44
|
|
00BD3D 1 85 06 sta L0006
|
|
00BD3F 1 A9 D4 lda #$D4
|
|
00BD41 1 85 07 sta $07
|
|
00BD43 1 AD 43 D4 lda $D443
|
|
00BD46 1 85 08 sta $08
|
|
00BD48 1 D0 07 bne LBD51
|
|
00BD4A 1 AD B3 D6 lda $D6B3
|
|
00BD4D 1 AE B4 D6 ldx $D6B4
|
|
00BD50 1 60 rts
|
|
00BD51 1
|
|
00BD51 1 A0 18 LBD51: ldy #$18
|
|
00BD53 1 A9 06 lda #$06
|
|
00BD55 1 A2 00 ldx #$00
|
|
00BD57 1 20 00 D0 jsr LD000
|
|
00BD5A 1 A5 09 lda $09
|
|
00BD5C 1 18 clc
|
|
00BD5D 1 6D B3 D6 adc $D6B3
|
|
00BD60 1 A8 tay
|
|
00BD61 1 A5 0A lda $0A
|
|
00BD63 1 6D B4 D6 adc $D6B4
|
|
00BD66 1 AA tax
|
|
00BD67 1 98 tya
|
|
00BD68 1 60 rts
|
|
00BD69 1
|
|
00BD69 1 A9 01 LBD69: lda #$01
|
|
00BD6B 1 8D 84 D4 sta $D484
|
|
00BD6E 1 AD EF D8 lda $D8EF
|
|
00BD71 1 8D 85 D4 sta $D485
|
|
00BD74 1 60 rts
|
|
00BD75 1
|
|
00BD75 1 A9 00 LBD75: lda #$00
|
|
00BD77 1 8D 43 D4 sta $D443
|
|
00BD7A 1 60 rts
|
|
00BD7B 1
|
|
00BD7B 1 A2 11 LBD7B: ldx #$11
|
|
00BD7D 1 B5 20 LBD7D: lda L0020,x
|
|
00BD7F 1 9D B0 BD sta LBDB0,x
|
|
00BD82 1 CA dex
|
|
00BD83 1 10 F8 bpl LBD7D
|
|
00BD85 1 A2 11 ldx #$11
|
|
00BD87 1 BD 9F BD LBD87: lda LBD9F,x
|
|
00BD8A 1 95 20 sta L0020,x
|
|
00BD8C 1 CA dex
|
|
00BD8D 1 10 F8 bpl LBD87
|
|
00BD8F 1 20 20 00 jsr L0020
|
|
00BD92 1 48 pha
|
|
00BD93 1 A2 11 ldx #$11
|
|
00BD95 1 BD B0 BD LBD95: lda LBDB0,x
|
|
00BD98 1 95 20 sta L0020,x
|
|
00BD9A 1 CA dex
|
|
00BD9B 1 10 F8 bpl LBD95
|
|
00BD9D 1 68 pla
|
|
00BD9E 1 60 rts
|
|
00BD9F 1
|
|
00BD9F 1 8D 03 C0 LBD9F: sta RAMRDON
|
|
00BDA2 1 8D 05 C0 sta RAMWRTON
|
|
00BDA5 1 A0 00 ldy #$00
|
|
00BDA7 1 B1 06 lda (L0006),y
|
|
00BDA9 1 8D 02 C0 sta RAMRDOFF
|
|
00BDAC 1 8D 04 C0 sta RAMWRTOFF
|
|
00BDAF 1 60 rts
|
|
00BDB0 1
|
|
00BDB0 1 00 LBDB0: brk
|
|
00BDB1 1 00 brk
|
|
00BDB2 1 00 brk
|
|
00BDB3 1 00 brk
|
|
00BDB4 1 00 brk
|
|
00BDB5 1 00 brk
|
|
00BDB6 1 00 brk
|
|
00BDB7 1 00 brk
|
|
00BDB8 1 00 brk
|
|
00BDB9 1 00 brk
|
|
00BDBA 1 00 brk
|
|
00BDBB 1 00 brk
|
|
00BDBC 1 00 brk
|
|
00BDBD 1 00 brk
|
|
00BDBE 1 00 brk
|
|
00BDBF 1 00 brk
|
|
00BDC0 1 00 brk
|
|
00BDC1 1 00 brk
|
|
00BDC2 1 00 brk
|
|
00BDC3 1 00 brk
|
|
00BDC4 1 AE FB D8 LBDC4: ldx $D8FB
|
|
00BDC7 1 AD 0A D9 lda $D90A
|
|
00BDCA 1 D0 0D bne LBDD9
|
|
00BDCC 1 AD 09 D9 lda $D909
|
|
00BDCF 1 C9 02 cmp #$02
|
|
00BDD1 1 B0 06 bcs LBDD9
|
|
00BDD3 1 A9 20 lda #$20
|
|
00BDD5 1 9D FB D8 sta $D8FB,x
|
|
00BDD8 1 60 rts
|
|
00BDD9 1
|
|
00BDD9 1 A9 73 LBDD9: lda #$73
|
|
00BDDB 1 9D FB D8 sta $D8FB,x
|
|
00BDDE 1 60 rts
|
|
00BDDF 1
|
|
00BDDF 1 AD 09 D9 LBDDF: lda $D909
|
|
00BDE2 1 8D 5F BE sta LBE5F
|
|
00BDE5 1 AD 0A D9 lda $D90A
|
|
00BDE8 1 8D 60 BE sta LBE60
|
|
00BDEB 1 A2 07 ldx #$07
|
|
00BDED 1 A9 20 lda #$20
|
|
00BDEF 1 9D 01 D9 LBDEF: sta $D901,x
|
|
00BDF2 1 CA dex
|
|
00BDF3 1 D0 FA bne LBDEF
|
|
00BDF5 1 A9 00 lda #$00
|
|
00BDF7 1 8D 62 BE sta LBE62
|
|
00BDFA 1 A0 00 ldy #$00
|
|
00BDFC 1 A2 00 ldx #$00
|
|
00BDFE 1 A9 00 LBDFE: lda #$00
|
|
00BE00 1 8D 61 BE sta LBE61
|
|
00BE03 1 AD 5F BE LBE03: lda LBE5F
|
|
00BE06 1 DD 57 BE cmp LBE57,x
|
|
00BE09 1 AD 60 BE lda LBE60
|
|
00BE0C 1 FD 58 BE sbc LBE58,x
|
|
00BE0F 1 10 24 bpl LBE35
|
|
00BE11 1 AD 61 BE lda LBE61
|
|
00BE14 1 D0 09 bne LBE1F
|
|
00BE16 1 2C 62 BE bit LBE62
|
|
00BE19 1 30 04 bmi LBE1F
|
|
00BE1B 1 A9 20 lda #$20
|
|
00BE1D 1 D0 09 bne LBE28
|
|
00BE1F 1 09 30 LBE1F: ora #$30
|
|
00BE21 1 48 pha
|
|
00BE22 1 A9 80 lda #$80
|
|
00BE24 1 8D 62 BE sta LBE62
|
|
00BE27 1 68 pla
|
|
00BE28 1 99 03 D9 LBE28: sta $D903,y
|
|
00BE2B 1 C8 iny
|
|
00BE2C 1 E8 inx
|
|
00BE2D 1 E8 inx
|
|
00BE2E 1 E0 08 cpx #$08
|
|
00BE30 1 F0 1C beq LBE4E
|
|
00BE32 1 4C FE BD jmp LBDFE
|
|
00BE35 1
|
|
00BE35 1 EE 61 BE LBE35: inc LBE61
|
|
00BE38 1 AD 5F BE lda LBE5F
|
|
00BE3B 1 38 sec
|
|
00BE3C 1 FD 57 BE sbc LBE57,x
|
|
00BE3F 1 8D 5F BE sta LBE5F
|
|
00BE42 1 AD 60 BE lda LBE60
|
|
00BE45 1 FD 58 BE sbc LBE58,x
|
|
00BE48 1 8D 60 BE sta LBE60
|
|
00BE4B 1 4C 03 BE jmp LBE03
|
|
00BE4E 1
|
|
00BE4E 1 AD 5F BE LBE4E: lda LBE5F
|
|
00BE51 1 09 30 ora #$30
|
|
00BE53 1 99 03 D9 sta $D903,y
|
|
00BE56 1 60 rts
|
|
00BE57 1
|
|
00BE57 1 10 LBE57: .byte $10
|
|
00BE58 1 27 E8 LBE58: rmb2 $E8
|
|
00BE5A 1 03 .byte $03
|
|
00BE5B 1 64 00 stz L0000
|
|
00BE5D 1 0A asl a
|
|
00BE5E 1 00 brk
|
|
00BE5F 1 00 LBE5F: brk
|
|
00BE60 1 00 LBE60: brk
|
|
00BE61 1 00 LBE61: brk
|
|
00BE62 1 00 LBE62: brk
|
|
00BE63 1 A0 00 LBE63: ldy #$00
|
|
00BE65 1 B1 06 lda (L0006),y
|
|
00BE67 1 A8 tay
|
|
00BE68 1 B1 06 LBE68: lda (L0006),y
|
|
00BE6A 1 99 02 D4 sta $D402,y
|
|
00BE6D 1 88 dey
|
|
00BE6E 1 10 F8 bpl LBE68
|
|
00BE70 1 A9 02 lda #$02
|
|
00BE72 1 A2 D4 ldx #$D4
|
|
00BE74 1 20 81 B7 jsr LB781
|
|
00BE77 1 60 rts
|
|
00BE78 1
|
|
00BE78 1 A0 00 LBE78: ldy #$00
|
|
00BE7A 1 B1 06 lda (L0006),y
|
|
00BE7C 1 A8 tay
|
|
00BE7D 1 B1 06 LBE7D: lda (L0006),y
|
|
00BE7F 1 99 43 D4 sta $D443,y
|
|
00BE82 1 88 dey
|
|
00BE83 1 10 F8 bpl LBE7D
|
|
00BE85 1 A9 43 lda #$43
|
|
00BE87 1 A2 D4 ldx #$D4
|
|
00BE89 1 20 81 B7 jsr LB781
|
|
00BE8C 1 60 rts
|
|
00BE8D 1
|
|
00BE8D 1 20 A7 BE LBE8D: jsr LBEA7
|
|
00BE90 1 A0 11 ldy #$11
|
|
00BE92 1 A9 86 lda #$86
|
|
00BE94 1 A2 AE ldx #$AE
|
|
00BE96 1 20 00 D0 jsr LD000
|
|
00BE99 1 60 rts
|
|
00BE9A 1
|
|
00BE9A 1 20 A7 BE LBE9A: jsr LBEA7
|
|
00BE9D 1 A0 11 ldy #$11
|
|
00BE9F 1 A9 8E lda #$8E
|
|
00BEA1 1 A2 AE ldx #$AE
|
|
00BEA3 1 20 00 D0 jsr LD000
|
|
00BEA6 1 60 rts
|
|
00BEA7 1
|
|
00BEA7 1 A0 07 LBEA7: ldy #$07
|
|
00BEA9 1 A9 00 lda #$00
|
|
00BEAB 1 A2 D2 ldx #$D2
|
|
00BEAD 1 20 00 D0 jsr LD000
|
|
00BEB0 1 60 rts
|
|
00BEB1 1
|
|
00BEB1 1 A0 03 LBEB1: ldy #$03
|
|
00BEB3 1 A9 39 lda #$39
|
|
00BEB5 1 A2 D2 ldx #$D2
|
|
00BEB7 1 20 00 D0 jsr LD000
|
|
00BEBA 1 A0 04 ldy #$04
|
|
00BEBC 1 A9 39 lda #$39
|
|
00BEBE 1 A2 D2 ldx #$D2
|
|
00BEC0 1 20 00 D0 jsr LD000
|
|
00BEC3 1 60 rts
|
|
00BEC4 1
|
|
00BEC4 1 00 brk
|
|
00BEC5 1 00 brk
|
|
00BEC6 1 00 brk
|
|
00BEC7 1 00 brk
|
|
00BEC8 1 00 brk
|
|
00BEC9 1 00 brk
|
|
00BECA 1 00 brk
|
|
00BECB 1 00 brk
|
|
00BECC 1 00 brk
|
|
00BECD 1 00 brk
|
|
00BECE 1 00 brk
|
|
00BECF 1 00 brk
|
|
00BED0 1 00 brk
|
|
00BED1 1 00 brk
|
|
00BED2 1 00 brk
|
|
00BED3 1 00 brk
|
|
00BED4 1 00 brk
|
|
00BED5 1 00 brk
|
|
00BED6 1 00 brk
|
|
00BED7 1 00 brk
|
|
00BED8 1 00 brk
|
|
00BED9 1 00 brk
|
|
00BEDA 1 00 brk
|
|
00BEDB 1 00 brk
|
|
00BEDC 1 00 brk
|
|
00BEDD 1 00 brk
|
|
00BEDE 1 00 brk
|
|
00BEDF 1 00 brk
|
|
00BEE0 1 00 brk
|
|
00BEE1 1 00 brk
|
|
00BEE2 1 00 brk
|
|
00BEE3 1 00 brk
|
|
00BEE4 1 00 brk
|
|
00BEE5 1 00 brk
|
|
00BEE6 1 00 brk
|
|
00BEE7 1 00 brk
|
|
00BEE8 1 00 brk
|
|
00BEE9 1 00 brk
|
|
00BEEA 1 00 brk
|
|
00BEEB 1 00 brk
|
|
00BEEC 1 00 brk
|
|
00BEED 1 00 brk
|
|
00BEEE 1 00 brk
|
|
00BEEF 1 00 brk
|
|
00BEF0 1 00 brk
|
|
00BEF1 1 00 brk
|
|
00BEF2 1 00 brk
|
|
00BEF3 1 00 brk
|
|
00BEF4 1 00 brk
|
|
00BEF5 1 00 brk
|
|
00BEF6 1 00 brk
|
|
00BEF7 1 00 brk
|
|
00BEF8 1 00 brk
|
|
00BEF9 1 00 brk
|
|
00BEFA 1 00 brk
|
|
00BEFB 1 00 brk
|
|
00BEFC 1 00 brk
|
|
00BEFD 1 00 brk
|
|
00BEFE 1 00 brk
|
|
00BEFF 1 00 brk
|
|
00BEFF 1
|