_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SEND DRIVE C.SRC

FILE INFORMATION

FILENAME(S): SEND DRIVE C.SRC

FILE TYPE(S): PRG

FILE SIZE: 1.9K

FIRST SEEN: 2025-11-30 16:45:39

APPEARS ON: 1 disk(s)

FILE HASH

dd24bdef90fe5d2f16461504d682640ffe2fa9ecf2d7f4f77a9ef116c93e3d6b

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TALENTED RULERZ SEND DRIVE C.SRC PRG High Voltage Complete C64 Collection 19 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0A 08 01 00 9E 39  39 39 00 13 08 0A 00 2E  |.......999......|
00000010: 4D 45 4D 00 1F 08 14 00  AC B2 24 43 30 30 30 00  |MEM.......$C000.|
00000020: 54 08 1E 00 53 54 41 52  54 20 20 4A 53 52 20 9F  |T...START  JSR .|
00000030: 3A 4C 44 41 20 23 B3 44  52 56 3A 53 54 41 20 24  |:LDA #.DRV:STA $|
00000040: 39 45 3A 4C 44 41 20 23  B1 44 52 56 3A 53 54 41  |9E:LDA #.DRV:STA|
00000050: 20 24 39 46 00 95 08 28  00 4D 31 20 4C 44 41 20  | $9F...(.M1 LDA |
00000060: 24 39 45 3A 53 45 43 3A  53 42 43 20 23 B3 44 52  |$9E:SEC:SBC #.DR|
00000070: 56 31 3A 53 54 41 20 9D  AA 33 3A 4C 44 41 20 24  |V1:STA ..3:LDA $|
00000080: 39 46 3A 53 42 43 20 23  B1 44 52 56 31 3A 53 54  |9F:SBC #.DRV1:ST|
00000090: 41 20 9D AA 34 00 A8 08  32 00 4C 44 58 20 23 30  |A ..4...2.LDX #0|
000000A0: 3A 4A 53 52 20 43 4F 4D  00 D7 08 3C 00 AB 20 4C  |:JSR COM...<.. L|
000000B0: 44 41 20 28 24 39 45 29  2C 59 3A 4A 53 52 20 24  |DA ($9E),Y:JSR $|
000000C0: 46 46 44 32 3A 49 4E 59  3A 43 50 59 20 23 24 31  |FFD2:INY:CPY #$1|
000000D0: 30 3A 42 4E 45 20 AB 00  12 09 46 00 4A 53 52 20  |0:BNE ....F.JSR |
000000E0: A0 3A 4A 53 52 20 9F 3A  4C 44 41 20 24 39 45 3A  |.:JSR .:LDA $9E:|
000000F0: 43 4C 43 3A 41 44 43 20  23 24 31 30 3A 53 54 41  |CLC:ADC #$10:STA|
00000100: 20 24 39 45 3A 42 43 43  20 AA 3A 49 4E 43 20 24  | $9E:BCC .:INC $|
00000110: 39 46 00 37 09 50 00 AA  20 43 4D 50 20 23 B3 80  |9F.7.P.. CMP #..|
00000120: 3A 4C 44 41 20 24 39 46  3A 53 42 43 20 23 B1 80  |:LDA $9F:SBC #..|
00000130: 3A 42 43 43 20 4D 31 00  50 09 5A 00 4C 44 58 20  |:BCC M1.P.Z.LDX |
00000140: 23 36 3A 4A 53 52 20 43  4F 4D 3A 4A 53 52 20 A0  |#6:JSR COM:JSR .|
00000150: 00 84 09 64 00 4C 44 41  20 23 24 43 37 3A 53 54  |...d.LDA #$C7:ST|
00000160: 41 20 24 44 44 30 30 3A  4C 44 58 20 23 30 3A AB  |A $DD00:LDX #0:.|
00000170: 20 44 45 59 3A 42 4E 45  20 AB 3A 44 45 58 3A 42  | DEY:BNE .:DEX:B|
00000180: 4E 45 20 AB 00 8C 09 6E  00 52 54 53 00 CA 09 E8  |NE ....n.RTS....|
00000190: 03 9F 20 4C 44 58 20 23  38 3A 4C 44 41 20 23 24  |.. LDX #8:LDA #$|
000001A0: 46 3A 54 41 59 3A 4A 53  52 20 24 46 46 42 41 3A  |F:TAY:JSR $FFBA:|
000001B0: 4C 44 41 20 23 30 3A 4A  53 52 20 24 46 46 42 44  |LDA #0:JSR $FFBD|
000001C0: 3A 4A 53 52 20 24 46 46  43 30 00 E0 09 F2 03 4C  |:JSR $FFC0.....L|
000001D0: 44 58 20 23 24 46 3A 4A  4D 50 20 24 46 46 43 39  |DX #$F:JMP $FFC9|
000001E0: 00 15 0A FC 03 43 4F 4D  20 4C 44 59 20 23 36 3A  |.....COM LDY #6:|
000001F0: AB 20 4C 44 41 20 9D 2C  58 3A 4A 53 52 20 24 46  |. LDA .,X:JSR $F|
00000200: 46 44 32 3A 49 4E 58 3A  44 45 59 3A 42 4E 45 20  |FD2:INX:DEY:BNE |
00000210: AB 3A 52 54 53 00 34 0A  06 04 9D 20 2E 42 59 54  |.:RTS.4.... .BYT|
00000220: 20 22 4D 22 2C 22 2D 22  2C 22 57 22 2C 30 2C 30  | "M","-","W",0,0|
00000230: 2C 24 31 30 00 50 0A 10  04 2E 42 59 54 20 22 4D  |,$10.P....BYT "M|
00000240: 22 2C 22 2D 22 2C 22 45  22 2C 30 2C 35 2C 24 44  |","-","E",0,5,$D|
00000250: 00 72 0A 1A 04 A0 20 4A  53 52 20 24 46 46 43 43  |.r.... JSR $FFCC|
00000260: 3A 4C 44 41 20 23 24 46  3A 4A 4D 50 20 24 46 46  |:LDA #$F:JMP $FF|
00000270: 43 33 00 81 0A 24 04 44  52 56 20 2E 42 55 46 20  |C3...$.DRV .BUF |
00000280: 30 00 A0 0A 2E 04 44 52  56 31 20 B2 20 44 52 56  |0.....DRV1 . DRV|
00000290: AB 24 35 30 30 3A 20 2E  4F 46 46 20 24 35 30 30  |.$500: .OFF $500|
000002A0: 00 DF 0A D0 07 44 52 56  32 20 53 45 49 3A 43 4C  |.....DRV2 SEI:CL|
000002B0: 44 3A 4C 44 41 20 23 24  31 30 3A 54 41 59 3A 44  |D:LDA #$10:TAY:D|
000002C0: 31 20 53 54 41 20 24 31  38 30 30 3A AB 20 44 45  |1 STA $1800:. DE|
000002D0: 58 3A 42 4E 45 20 AB 3A  45 B0 20 23 24 31 30 00  |X:BNE .:E. #$10.|
000002E0: EE 0A DA 07 44 45 59 3A  42 4E 45 20 44 31 00 25  |....DEY:BNE D1.%|
000002F0: 0B E4 07 44 32 20 4C 44  41 20 23 38 3A 53 54 41  |...D2 LDA #8:STA|
00000300: 20 24 31 38 30 30 3A 4C  44 41 20 24 31 43 30 30  | $1800:LDA $1C00|
00000310: 3A AF 20 23 24 46 37 3A  53 54 41 20 24 31 43 30  |:. #$F7:STA $1C0|
00000320: 30 3A 43 4C 49 00 66 0B  EE 07 4C 44 41 20 23 31  |0:CLI.f...LDA #1|
00000330: 3A AB 20 42 49 54 20 24  31 38 30 30 3A 42 45 51  |:. BIT $1800:BEQ|
00000340: 20 AB 3A 53 45 49 3A 4C  44 41 20 23 30 3A 53 54  | .:SEI:LDA #0:ST|
00000350: 41 20 24 31 38 30 30 3A  4A 53 52 20 52 44 3A 53  |A $1800:JSR RD:S|
00000360: 54 41 20 24 31 30 00 A4  0B F8 07 4A 53 52 20 52  |TA $10.....JSR R|
00000370: 44 3A 53 54 41 20 24 31  31 3A 4C 44 41 20 23 38  |D:STA $11:LDA #8|
00000380: 3A 53 54 41 20 24 31 38  30 30 3A 4C 44 41 20 24  |:STA $1800:LDA $|
00000390: 31 43 30 30 3A B0 41 20  23 38 3A 53 54 41 20 24  |1C00:.A #8:STA $|
000003A0: 31 43 30 30 00 D3 0B 02  08 4C 44 59 20 23 31 3A  |1C00.....LDY #1:|
000003B0: 44 33 20 4C 44 58 20 23  24 31 32 3A 53 54 58 20  |D3 LDX #$12:STX |
000003C0: 24 45 3A 53 54 59 20 24  46 3A 4A 53 52 20 52 44  |$E:STY $F:JSR RD|
000003D0: 53 45 43 00 1A 0C 0C 08  4C 44 59 20 23 32 3A AB  |SEC.....LDY #2:.|
000003E0: 20 4C 44 41 20 24 37 30  30 2C 59 3A AF 20 23 24  | LDA $700,Y:. #$|
000003F0: 38 33 3A 43 4D 50 20 23  24 38 32 3A 42 4E 45 20  |83:CMP #$82:BNE |
00000400: AA 3A 4C 44 41 20 24 37  30 33 2C 59 3A 43 4D 50  |.:LDA $703,Y:CMP|
00000410: 20 24 31 30 3A 42 4E 45  20 AA 00 38 0C 16 08 4C  | $10:BNE ..8...L|
00000420: 44 41 20 24 37 30 34 2C  59 3A 43 4D 50 20 24 31  |DA $704,Y:CMP $1|
00000430: 31 3A 42 45 51 20 44 34  00 69 0C 20 08 AA 20 54  |1:BEQ D4.i. .. T|
00000440: 59 41 3A 43 4C 43 3A 41  44 43 20 23 24 32 30 3A  |YA:CLC:ADC #$20:|
00000450: 54 41 59 3A 42 43 43 20  AB 3A 4C 44 59 20 24 37  |TAY:BCC .:LDY $7|
00000460: 30 31 3A 42 50 4C 20 44  33 00 A5 0C 2A 08 44 35  |01:BPL D3...*.D5|
00000470: 20 4C 44 41 20 23 30 3A  53 54 41 20 24 31 38 30  | LDA #0:STA $180|
00000480: 30 3A 4A 53 52 20 53 4E  44 31 3A 4C 44 58 20 23  |0:JSR SND1:LDX #|
00000490: 24 46 37 3A 44 36 20 4A  53 52 20 53 4E 44 3A 4A  |$F7:D6 JSR SND:J|
000004A0: 4D 50 20 44 32 00 D0 0C  34 08 44 34 20 4C 44 41  |MP D2...4.D4 LDA|
000004B0: 20 24 37 30 31 2C 59 3A  53 54 41 20 24 45 3A 4C  | $701,Y:STA $E:L|
000004C0: 44 41 20 24 37 30 32 2C  59 3A 53 54 41 20 24 46  |DA $702,Y:STA $F|
000004D0: 00 0B 0D 3E 08 44 37 20  4A 53 52 20 52 44 53 45  |...>.D7 JSR RDSE|
000004E0: 43 3A 4C 44 59 20 23 30  3A 4C 44 41 20 24 37 30  |C:LDY #0:LDA $70|
000004F0: 30 3A 53 54 41 20 24 45  3A 42 4E 45 20 AA 3A 4C  |0:STA $E:BNE .:L|
00000500: 44 59 20 24 37 30 31 3A  49 4E 59 00 41 0D 48 08  |DY $701:INY.A.H.|
00000510: AA 20 53 54 59 20 24 31  30 3A 4C 44 41 20 24 37  |. STY $10:LDA $7|
00000520: 30 31 3A 53 54 41 20 24  46 3A 4C 44 59 20 23 32  |01:STA $F:LDY #2|
00000530: 3A 4C 44 41 20 23 30 3A  53 54 41 20 24 31 38 30  |:LDA #0:STA $180|
00000540: 30 00 7C 0D 52 08 AB 20  4C 44 58 20 24 37 30 30  |0.|.R.. LDX $700|
00000550: 2C 59 3A 43 50 58 20 23  24 41 43 3A 42 4E 45 20  |,Y:CPX #$AC:BNE |
00000560: AA 3A 4A 53 52 20 53 4E  44 3A 4C 44 58 20 23 24  |.:JSR SND:LDX #$|
00000570: 41 43 3A AA 20 4A 53 52  20 53 4E 44 00 92 0D 5C  |AC:. JSR SND...\|
00000580: 08 49 4E 59 3A 43 50 59  20 24 31 30 3A 42 4E 45  |.INY:CPY $10:BNE|
00000590: 20 AB 00 D5 0D 66 08 4C  44 41 20 24 45 3A 42 45  | ....f.LDA $E:BE|
000005A0: 51 20 AA 3A 4A 53 52 20  53 4E 44 31 3A 4C 44 58  |Q .:JSR SND1:LDX|
000005B0: 20 23 24 43 33 3A 4A 53  52 20 53 4E 44 3A 4C 44  | #$C3:JSR SND:LD|
000005C0: 41 20 23 38 3A 53 54 41  20 24 31 38 30 30 3A 42  |A #8:STA $1800:B|
000005D0: 4E 45 20 44 37 00 F4 0D  70 08 AA 20 4A 53 52 20  |NE D7...p.. JSR |
000005E0: 53 4E 44 31 3A 4C 44 58  20 23 24 46 46 3A 42 4E  |SND1:LDX #$FF:BN|
000005F0: 45 20 44 36 00 1F 0E 84  08 52 44 53 45 43 20 43  |E D6.....RDSEC C|
00000600: 4C 49 3A 4C 44 41 20 23  24 38 30 3A 53 54 41 20  |LI:LDA #$80:STA |
00000610: 34 3A AB 20 4C 44 41 20  34 3A 42 4D 49 20 AB 00  |4:. LDA 4:BMI ..|
00000620: 3C 0E 8E 08 43 4D 50 20  23 31 3A 42 4E 45 20 52  |<...CMP #1:BNE R|
00000630: 44 53 45 43 3A 53 45 49  3A 52 54 53 00 4E 0E B6  |DSEC:SEI:RTS.N..|
00000640: 08 53 4E 44 31 20 4C 44  58 20 23 24 41 43 00 7A  |.SND1 LDX #$AC.z|
00000650: 0E C0 08 53 4E 44 20 53  54 58 20 24 31 34 3A 4C  |...SND STX $14:L|
00000660: 44 41 20 23 34 3A 4A 53  52 20 53 31 3A 4A 53 52  |DA #4:JSR S1:JSR|
00000670: 20 53 31 3A 4A 53 52 20  53 31 00 C4 0E CA 08 53  | S1:JSR S1.....S|
00000680: 31 20 4C 53 52 20 24 31  34 3A 4C 44 58 20 23 32  |1 LSR $14:LDX #2|
00000690: 3A 42 43 43 20 53 32 3A  4C 44 58 20 23 30 3A 53  |:BCC S2:LDX #0:S|
000006A0: 32 20 42 49 54 20 24 31  38 30 30 3A 42 4E 45 20  |2 BIT $1800:BNE |
000006B0: 53 32 3A 53 54 58 20 24  31 38 30 30 3A 4C 53 52  |S2:STX $1800:LSR|
000006C0: 20 24 31 34 00 FF 0E D4  08 4C 44 58 20 23 32 3A  | $14.....LDX #2:|
000006D0: 42 43 43 20 53 33 3A 4C  44 58 20 23 30 3A 53 33  |BCC S3:LDX #0:S3|
000006E0: 20 42 49 54 20 24 31 38  30 30 3A 42 45 51 20 53  | BIT $1800:BEQ S|
000006F0: 33 3A 53 54 58 20 24 31  38 30 30 3A 52 54 53 00  |3:STX $1800:RTS.|
00000700: 0D 0F DE 08 52 44 20 4C  44 59 20 23 34 00 4A 0F  |....RD LDY #4.J.|
00000710: E8 08 52 44 31 20 4C 44  41 20 23 34 3A AB 20 42  |..RD1 LDA #4:. B|
00000720: 49 54 20 24 31 38 30 30  3A 42 45 51 20 AB 3A 4C  |IT $1800:BEQ .:L|
00000730: 44 41 20 24 31 38 30 30  3A 4C 53 52 3A 52 B0 20  |DA $1800:LSR:R. |
00000740: 24 31 34 3A 4C 44 41 20  23 34 00 8D 0F F2 08 AB  |$14:LDA #4......|
00000750: 20 42 49 54 20 24 31 38  30 30 3A 42 4E 45 20 AB  | BIT $1800:BNE .|
00000760: 3A 4C 44 41 20 24 31 38  30 30 3A 4C 53 52 3A 52  |:LDA $1800:LSR:R|
00000770: B0 20 24 31 34 3A 44 45  59 3A 42 4E 45 20 52 44  |. $14:DEY:BNE RD|
00000780: 31 3A 4C 44 41 20 24 31  34 3A 52 54 53 00 AA 0F  |1:LDA $14:RTS...|
00000790: 0F 27 80 31 20 2E 42 55  46 20 30 3A 80 20 B2 80  |.'.1 .BUF 0:. ..|
000007A0: 31 AB 44 52 56 32 AA 44  52 56 00 00 00           |1.DRV2.DRV...   |
.......999......MEM.......$C000.T...STAR
T  JSR .:LDA #.DRV:STA $9E:LDA #.DRV:STA
 $9F...(.M1 LDA $9E:SEC:SBC #.DRV1:STA .
.3:LDA $9F:SBC #.DRV1:STA ..4...2.LDX #0
:JSR COM.W.<.. LDA ($9E),Y:JSR $FFD2:INY
:CPY #$10:BNE ....F.JSR  :JSR .:LDA $9E:
CLC:ADC #$10:STA $9E:BCC .:INC $9F.7.P..
 CMP #..:LDA $9F:SBC #..:BCC M1.P.Z.LDX 
#6:JSR COM:JSR  ...D.LDA #$C7:STA $DD00:
LDX #0:. DEY:BNE .:DEX:BNE ....N.RTS.J..
.. LDX #8:LDA #$F:TAY:JSR $FFBA:LDA #0:J
SR $FFBD:JSR $FFC0.....LDX #$F:JMP $FFC9
.....COM LDY #6:. LDA .,X:JSR $FFD2:INX:
DEY:BNE .:RTS.4.... .BYT "M","-","W",0,0
,$10.P....BYT "M","-","E",0,5,$D.R...  J
SR $FFCC:LDA #$F:JMP $FFC3...$.DRV .BUF 
0. ...DRV1 . DRV.$500: .OFF $500...P.DRV
2 SEI:CLD:LDA #$10:TAY:D1 STA $1800:. DE
X:BNE .:E. #$10...Z.DEY:BNE D1.%...D2 LD
A #8:STA $1800:LDA $1C00:. #$F7:STA $1C0
0:CLI.F...LDA #1:. BIT $1800:BEQ .:SEI:L
DA #0:STA $1800:JSR RD:STA $10.....JSR R
D:STA $11:LDA #8:STA $1800:LDA $1C00:.A 
#8:STA $1C00.S...LDY #1:D3 LDX #$12:STX 
$E:STY $F:JSR RDSEC.....LDY #2:. LDA $70
0,Y:. #$83:CMP #$82:BNE .:LDA $703,Y:CMP
 $10:BNE ..8...LDA $704,Y:CMP $11:BEQ D4
.I. .. TYA:CLC:ADC #$20:TAY:BCC .:LDY $7
01:BPL D3...*.D5 LDA #0:STA $1800:JSR SN
D1:LDX #$F7:D6 JSR SND:JMP D2.P.4.D4 LDA
 $701,Y:STA $E:LDA $702,Y:STA $F...>.D7 
JSR RDSEC:LDY #0:LDA $700:STA $E:BNE .:L
DY $701:INY.A.H.. STY $10:LDA $701:STA $
F:LDY #2:LDA #0:STA $1800.|.R.. LDX $700
,Y:CPX #$AC:BNE .:JSR SND:LDX #$AC:. JSR
 SND...\.INY:CPY $10:BNE ..U.F.LDA $E:BE
Q .:JSR SND1:LDX #$C3:JSR SND:LDA #8:STA
 $1800:BNE D7...P.. JSR SND1:LDX #$FF:BN
E D6.....RDSEC CLI:LDA #$80:STA 4:. LDA 
4:BMI ..<...CMP #1:BNE RDSEC:SEI:RTS.N..
.SND1 LDX #$AC.Z...SND STX $14:LDA #4:JS
R S1:JSR S1:JSR S1.D.J.S1 LSR $14:LDX #2
:BCC S2:LDX #0:S2 BIT $1800:BNE S2:STX $
1800:LSR $14...T.LDX #2:BCC S3:LDX #0:S3
 BIT $1800:BEQ S3:STX $1800:RTS.....RD L
DY #4.J...RD1 LDA #4:. BIT $1800:BEQ .:L
DA $1800:LSR:R. $14:LDA #4...... BIT $18
00:BNE .:LDA $1800:LSR:R. $14:DEY:BNE RD
1:LDA $14:RTS....'.1 .BUF 0:. ..1.DRV2.D
RV...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL