C64 Software  <  SCA: The C64 Software Collection / LAW

  Run
; Load: 52224 ($CC00), len: 916 ($0394) bytes

CC00  A9 06       LDA #$06
CC02  85 31       STA $31
CC04  20 0A F5    JSR $F50A
CC07  50 FE       BVC $CC07
CC09  B8          CLV
CC0A  AD 01 1C    LDA $1C01
CC0D  91 30       STA ($30),Y
CC0F  C8          INY
CC10  D0 F5       BNE $CC07
CC12  A0 BA       LDY #$BA
CC14  50 FE       BVC $CC14
CC16  B8          CLV
CC17  AD 01 1C    LDA $1C01
CC1A  99 00 01    STA $0100,Y
CC1D  C8          INY
CC1E  D0 F4       BNE $CC14
CC20  20 E0 F8    JSR $F8E0
CC23  A5 38       LDA $38
CC25  C5 47       CMP $47
CC27  F0 04       BEQ $CC2D
CC29  A9 04       LDA #$04
CC2B  D0 5F       BNE $CC8C
CC2D  20 E9 F5    JSR $F5E9
CC30  C5 3A       CMP $3A
CC32  F0 04       BEQ $CC38
CC34  A9 05       LDA #$05
CC36  D0 54       BNE $CC8C
CC38  B1 30       LDA ($30),Y
CC3A  D0 03       BNE $CC3F
CC3C  EE 01 06    INC $0601
CC3F  B1 30       LDA ($30),Y
CC41  AA          TAX
CC42  2C 00 18    BIT $1800
CC45  10 FB       BPL $CC42
CC47  A9 10       LDA #$10
CC49  8D 00 18    STA $1800
CC4C  2C 00 18    BIT $1800
CC4F  30 FB       BMI $CC4C
CC51  8A          TXA
CC52  4A          LSR A
CC53  4A          LSR A
CC54  4A          LSR A
CC55  4A          LSR A
CC56  8D 00 18    STA $1800
CC59  0A          ASL A
CC5A  29 0F       AND #$0F
CC5C  8D 00 18    STA $1800
CC5F  8A          TXA
CC60  29 0F       AND #$0F
CC62  8D 00 18    STA $1800
CC65  0A          ASL A
CC66  29 0F       AND #$0F
CC68  8D 00 18    STA $1800
CC6B  A2 0F       LDX #$0F
CC6D  EA          NOP
CC6E  8E 00 18    STX $1800
CC71  AD 00 06    LDA $0600
CC74  F0 1C       BEQ $CC92
CC76  C8          INY
CC77  D0 C6       BNE $CC3F
CC79  A9 05       LDA #$05
CC7B  85 0C       STA $0C
CC7D  AD 01 06    LDA $0601
CC80  85 0F       STA $0F
CC82  B1 30       LDA ($30),Y
CC84  C5 0E       CMP $0E
CC86  85 0E       STA $0E
CC88  F0 05       BEQ $CC8F
CC8A  A9 01       LDA #$01
CC8C  4C 69 F9    JMP $F969
CC8F  4C 04 07    JMP $0704
CC92  C8          INY
CC93  CC 01 06    CPY $0601
CC96  D0 A7       BNE $CC3F
CC98  A9 7F       LDA #$7F
CC9A  D0 F0       BNE $CC8C
CC9C  00          BRK
CC9D  00          BRK
CC9E  00          BRK
CC9F  00          BRK
CCA0  00          BRK
CCA1  00          BRK
CCA2  00          BRK
CCA3  00          BRK
CCA4  00          BRK
CCA5  00          BRK
CCA6  00          BRK
CCA7  00          BRK
CCA8  00          BRK
CCA9  00          BRK
CCAA  00          BRK
CCAB  A9 10       LDA #$10
CCAD  8D 05 1C    STA $1C05
CCB0  A5 18       LDA $18
CCB2  85 0E       STA $0E
CCB4  A5 19       LDA $19
CCB6  85 0F       STA $0F
CCB8  A9 05       LDA #$05
CCBA  85 0C       STA $0C
CCBC  A9 E0       LDA #$E0
CCBE  85 04       STA $04
CCC0  A5 04       LDA $04
CCC2  30 FC       BMI $CCC0
CCC4  C9 7F       CMP #$7F
CCC6  F0 30       BEQ $CCF8
CCC8  C9 02       CMP #$02
CCCA  90 EC       BCC $CCB8
CCCC  C6 0C       DEC $0C
CCCE  10 EC       BPL $CCBC
CCD0  A4 0C       LDY $0C
CCD2  C8          INY
CCD3  D0 07       BNE $CCDC
CCD5  A9 C0       LDA #$C0
CCD7  20 8E D5    JSR $D58E
CCDA  C6 0C       DEC $0C
CCDC  A4 0C       LDY $0C
CCDE  C0 FB       CPY #$FB
CCE0  B0 DA       BCS $CCBC
CCE2  A9 60       LDA #$60
CCE4  8D 71 07    STA $0771
CCE7  A9 FF       LDA #$FF
CCE9  20 41 07    JSR $0741
CCEC  A9 3A       LDA #$3A
CCEE  8D 05 1C    STA $1C05
CCF1  A5 04       LDA $04
CCF3  A2 04       LDX #$04
CCF5  4C 0A E6    JMP $E60A
CCF8  A9 3A       LDA #$3A
CCFA  8D 05 1C    STA $1C05
CCFD  4C 48 D0    JMP $D048
CD00  A0 A0       LDY #$A0
CD02  A0 A0       LDY #$A0
CD04  A0 A0       LDY #$A0
CD06  A0 A0       LDY #$A0
CD08  50 50       BVC $CD5A
CD0A  50 50       BVC $CD5C
CD0C  50 50       BVC $CD5E
CD0E  50 50       BVC $CD60
CD10  0A          ASL A
CD11  0A          ASL A
CD12  0A          ASL A
CD13  0A          ASL A
CD14  0A          ASL A
CD15  0A          ASL A
CD16  0A          ASL A
CD17  0A          ASL A
CD18  05 05       ORA $05
CD1A  05 05       ORA $05
CD1C  05 05       ORA $05
CD1E  05 05       ORA $05
CD20  FF          ??
CD21  FF          ??
CD22  FF          ??
CD23  FF          ??
CD24  FF          ??
CD25  FF          ??
CD26  FF          ??
CD27  FF          ??
CD28  FF          ??
CD29  FF          ??
CD2A  FF          ??
CD2B  FF          ??
CD2C  FF          ??
CD2D  FF          ??
CD2E  FF          ??
CD2F  FF          ??
CD30  FF          ??
CD31  FF          ??
CD32  FF          ??
CD33  FF          ??
CD34  FF          ??
CD35  FF          ??
CD36  FF          ??
CD37  FF          ??
CD38  FF          ??
CD39  FF          ??
CD3A  FF          ??
CD3B  FF          ??
CD3C  FF          ??
CD3D  FF          ??
CD3E  FF          ??
CD3F  FF          ??
CD40  20 20 20    JSR $2020
CD43  20 20 20    JSR $2020
CD46  20 20 10    JSR $1020
CD49  10 10       BPL $CD5B
CD4B  10 10       BPL $CD5D
CD4D  10 10       BPL $CD5F
CD4F  10 02       BPL $CD53
CD51  02          ??
CD52  02          ??
CD53  02          ??
CD54  02          ??
CD55  02          ??
CD56  02          ??
CD57  02          ??
CD58  01 01       ORA ($01,X)
CD5A  01 01       ORA ($01,X)
CD5C  01 01       ORA ($01,X)
CD5E  01 01       ORA ($01,X)
CD60  FF          ??
CD61  FF          ??
CD62  FF          ??
CD63  FF          ??
CD64  FF          ??
CD65  FF          ??
CD66  FF          ??
CD67  FF          ??
CD68  FF          ??
CD69  FF          ??
CD6A  FF          ??
CD6B  FF          ??
CD6C  FF          ??
CD6D  FF          ??
CD6E  FF          ??
CD6F  FF          ??
CD70  FF          ??
CD71  FF          ??
CD72  FF          ??
CD73  FF          ??
CD74  FF          ??
CD75  FF          ??
CD76  FF          ??
CD77  FF          ??
CD78  FF          ??
CD79  FF          ??
CD7A  FF          ??
CD7B  FF          ??
CD7C  FF          ??
CD7D  FF          ??
CD7E  FF          ??
CD7F  FF          ??
CD80  80          ??
CD81  80          ??
CD82  80          ??
CD83  80          ??
CD84  80          ??
CD85  80          ??
CD86  80          ??
CD87  80          ??
CD88  40          RTI
CD89  40          RTI
CD8A  40          RTI
CD8B  40          RTI
CD8C  40          RTI
CD8D  40          RTI
CD8E  40          RTI
CD8F  40          RTI
CD90  08          PHP
CD91  08          PHP
CD92  08          PHP
CD93  08          PHP
CD94  08          PHP
CD95  08          PHP
CD96  08          PHP
CD97  08          PHP
CD98  04          ??
CD99  04          ??
CD9A  04          ??
CD9B  04          ??
CD9C  04          ??
CD9D  04          ??
CD9E  04          ??
CD9F  04          ??
CDA0  FF          ??
CDA1  FF          ??
CDA2  FF          ??
CDA3  FF          ??
CDA4  FF          ??
CDA5  FF          ??
CDA6  FF          ??
CDA7  FF          ??
CDA8  FF          ??
CDA9  FF          ??
CDAA  FF          ??
CDAB  FF          ??
CDAC  FF          ??
CDAD  FF          ??
CDAE  FF          ??
CDAF  FF          ??
CDB0  FF          ??
CDB1  FF          ??
CDB2  FF          ??
CDB3  FF          ??
CDB4  FF          ??
CDB5  FF          ??
CDB6  FF          ??
CDB7  FF          ??
CDB8  FF          ??
CDB9  FF          ??
CDBA  FF          ??
CDBB  FF          ??
CDBC  FF          ??
CDBD  FF          ??
CDBE  FF          ??
CDBF  FF          ??
CDC0  00          BRK
CDC1  00          BRK
CDC2  00          BRK
CDC3  00          BRK
CDC4  00          BRK
CDC5  00          BRK
CDC6  00          BRK
CDC7  00          BRK
CDC8  00          BRK
CDC9  00          BRK
CDCA  00          BRK
CDCB  00          BRK
CDCC  00          BRK
CDCD  00          BRK
CDCE  00          BRK
CDCF  00          BRK
CDD0  00          BRK
CDD1  00          BRK
CDD2  00          BRK
CDD3  00          BRK
CDD4  00          BRK
CDD5  00          BRK
CDD6  00          BRK
CDD7  00          BRK
CDD8  00          BRK
CDD9  00          BRK
CDDA  00          BRK
CDDB  00          BRK
CDDC  A5 A4       LDA $A4
CDDE  8D 00 DD    STA $DD00
CDE1  AD 00 DD    LDA $DD00
CDE4  10 FB       BPL $CDE1
CDE6  AD 12 D0    LDA $D012
CDE9  C9 31       CMP #$31
CDEB  90 06       BCC $CDF3
CDED  29 06       AND #$06
CDEF  C9 02       CMP #$02
CDF1  F0 F3       BEQ $CDE6
CDF3  A5 A5       LDA $A5
CDF5  8D 00 DD    STA $DD00
CDF8  EE 20 D0    INC $D020
CDFB  EA          NOP
CDFC  EA          NOP
CDFD  EA          NOP
CDFE  EA          NOP
CDFF  EA          NOP
CE00  EA          NOP
CE01  EA          NOP
CE02  AC 00 DD    LDY $DD00
CE05  B9 00 CD    LDA $CD00,Y
CE08  AC 00 DD    LDY $DD00
CE0B  19 08 CD    ORA $CD08,Y
CE0E  AC 00 DD    LDY $DD00
CE11  19 10 CD    ORA $CD10,Y
CE14  AC 00 DD    LDY $DD00
CE17  19 18 CD    ORA $CD18,Y
CE1A  60          RTS
CE1B  EA          NOP
CE1C  85 93       STA $93
CE1E  A5 93       LDA $93
CE20  D0 08       BNE $CE2A
CE22  A0 00       LDY #$00
CE24  B1 BB       LDA ($BB),Y
CE26  C9 24       CMP #$24
CE28  D0 03       BNE $CE2D
CE2A  4C A7 F4    JMP $F4A7
CE2D  A5 BA       LDA $BA
CE2F  C9 04       CMP #$04
CE31  90 F7       BCC $CE2A
CE33  A5 B7       LDA $B7
CE35  F0 F3       BEQ $CE2A
CE37  A5 BA       LDA $BA
CE39  85 B8       STA $B8
CE3B  20 33 F3    JSR $F333
CE3E  A6 B9       LDX $B9
CE40  86 02       STX $02
CE42  A9 60       LDA #$60
CE44  85 B9       STA $B9
CE46  20 D5 F3    JSR $F3D5
CE49  A5 BA       LDA $BA
CE4B  20 09 ED    JSR $ED09
CE4E  A5 B9       LDA $B9
CE50  20 C7 ED    JSR $EDC7
CE53  20 13 EE    JSR $EE13
CE56  A5 90       LDA $90
CE58  4A          LSR A
CE59  4A          LSR A
CE5A  90 03       BCC $CE5F
CE5C  4C 04 F7    JMP $F704
CE5F  A9 00       LDA #$00
CE61  85 A4       STA $A4
CE63  20 38 CF    JSR $CF38
CE66  A9 57       LDA #$57
CE68  20 DD ED    JSR $EDDD
CE6B  A5 A4       LDA $A4
CE6D  20 DD ED    JSR $EDDD
CE70  A9 07       LDA #$07
CE72  20 DD ED    JSR $EDDD
CE75  A9 20       LDA #$20
CE77  20 DD ED    JSR $EDDD
CE7A  A4 A4       LDY $A4
CE7C  18          CLC
CE7D  A5 A4       LDA $A4
CE7F  69 20       ADC #$20
CE81  85 A4       STA $A4
CE83  B9 00 CC    LDA $CC00,Y
CE86  20 DD ED    JSR $EDDD
CE89  C8          INY
CE8A  C4 A4       CPY $A4
CE8C  D0 F5       BNE $CE83
CE8E  20 FE ED    JSR $EDFE
CE91  A5 A4       LDA $A4
CE93  D0 CE       BNE $CE63
CE95  20 38 CF    JSR $CF38
CE98  A9 45       LDA #$45
CE9A  20 DD ED    JSR $EDDD
CE9D  A9 AB       LDA #$AB
CE9F  20 DD ED    JSR $EDDD
CEA2  A9 07       LDA #$07
CEA4  20 DD ED    JSR $EDDD
CEA7  20 FE ED    JSR $EDFE
CEAA  EA          NOP
CEAB  AD 00 DD    LDA $DD00
CEAE  85 93       STA $93
CEB0  29 07       AND #$07
CEB2  85 A5       STA $A5
CEB4  09 08       ORA #$08
CEB6  85 A4       STA $A4
CEB8  AD 15 D0    LDA $D015
CEBB  85 97       STA $97
CEBD  A9 00       LDA #$00
CEBF  8D 15 D0    STA $D015
CEC2  78          SEI
CEC3  A2 04       LDX #$04
CEC5  20 DC CD    JSR $CDDC
CEC8  F0 2B       BEQ $CEF5
CECA  C9 FF       CMP #$FF
CECC  D0 06       BNE $CED4
CECE  A9 02       LDA #$02
CED0  85 90       STA $90
CED2  D0 42       BNE $CF16
CED4  20 DC CD    JSR $CDDC
CED7  E0 02       CPX #$02
CED9  F0 03       BEQ $CEDE
CEDB  20 4C CF    JSR $CF4C
CEDE  20 DC CD    JSR $CDDC
CEE1  A0 00       LDY #$00
CEE3  91 AE       STA ($AE),Y
CEE5  E6 AE       INC $AE
CEE7  F0 07       BEQ $CEF0
CEE9  E8          INX
CEEA  D0 F2       BNE $CEDE
CEEC  A2 02       LDX #$02
CEEE  D0 D5       BNE $CEC5
CEF0  E6 AF       INC $AF
CEF2  4C E9 CE    JMP $CEE9
CEF5  20 DC CD    JSR $CDDC
CEF8  E0 02       CPX #$02
CEFA  08          PHP
CEFB  AA          TAX
CEFC  28          PLP
CEFD  F0 05       BEQ $CF04
CEFF  20 4C CF    JSR $CF4C
CF02  CA          DEX
CF03  CA          DEX
CF04  CA          DEX
CF05  CA          DEX
CF06  20 DC CD    JSR $CDDC
CF09  A0 00       LDY #$00
CF0B  91 AE       STA ($AE),Y
CF0D  E6 AE       INC $AE
CF0F  D0 02       BNE $CF13
CF11  E6 AF       INC $AF
CF13  CA          DEX
CF14  D0 F0       BNE $CF06
CF16  20 46 F6    JSR $F646
CF19  A5 97       LDA $97
CF1B  8D 15 D0    STA $D015
CF1E  A5 93       LDA $93
CF20  8D 00 DD    STA $DD00
CF23  A5 00       LDA $00
CF25  85 93       STA $93
CF27  A5 90       LDA $90
CF29  4A          LSR A
CF2A  4A          LSR A
CF2B  A9 40       LDA #$40
CF2D  05 90       ORA $90
CF2F  85 90       STA $90
CF31  A6 AE       LDX $AE
CF33  A4 AF       LDY $AF
CF35  A9 1D       LDA #$1D
CF37  60          RTS
CF38  A5 BA       LDA $BA
CF3A  20 0C ED    JSR $ED0C
CF3D  A9 6F       LDA #$6F
CF3F  20 B9 ED    JSR $EDB9
CF42  A9 4D       LDA #$4D
CF44  20 DD ED    JSR $EDDD
CF47  A9 2D       LDA #$2D
CF49  4C DD ED    JMP $EDDD
CF4C  20 DC CD    JSR $CDDC
CF4F  85 AE       STA $AE
CF51  20 DC CD    JSR $CDDC
CF54  A4 02       LDY $02
CF56  D0 06       BNE $CF5E
CF58  A5 C3       LDA $C3
CF5A  85 AE       STA $AE
CF5C  A5 C4       LDA $C4
CF5E  85 AF       STA $AF
CF60  60          RTS
CF61  A9 1B       LDA #$1B
CF63  8D 30 03    STA $0330
CF66  A9 CE       LDA #$CE
CF68  8D 31 03    STA $0331
CF6B  60          RTS
CF6C  A0 00       LDY #$00
CF6E  A9 00       LDA #$00
CF70  99 00 20    STA $2000,Y
CF73  C8          INY
CF74  D0 FA       BNE $CF70
CF76  EE 72 CF    INC $CF72
CF79  AE 72 CF    LDX $CF72
CF7C  E0 41       CPX #$41
CF7E  D0 F0       BNE $CF70
CF80  A0 00       LDY #$00
CF82  A9 13       LDA #$13
CF84  99 00 04    STA $0400,Y
CF87  99 00 05    STA $0500,Y
CF8A  99 00 06    STA $0600,Y
CF8D  99 00 07    STA $0700,Y
CF90  C8          INY
CF91  D0 F1       BNE $CF84
CF93  60          RTS
READY.