00000000: 01 09 34 09 0A 00 99 22 93 12 AA 20 20 D3 50 45 |..4...."... .PE|
00000010: 45 44 53 43 52 49 50 54 20 C6 49 4C 45 20 C3 4F |EDSCRIPT .ILE .O|
00000020: 4E 56 45 52 53 49 4F 4E 20 D0 52 4F 47 52 41 4D |NVERSION .ROGRAM|
00000030: 20 20 20 22 00 3D 09 14 00 8D 33 32 30 00 58 09 | ".=....320.X.|
00000040: 1E 00 85 22 11 C9 4E 50 55 54 20 46 49 4C 45 20 |..."..NPUT FILE |
00000050: 4E 41 4D 45 22 3B 49 24 00 66 09 28 00 8B 49 24 |NAME";I$.f.(..I$|
00000060: B2 22 22 A7 33 30 00 82 09 32 00 85 22 11 CF 55 |."".30...2.."..U|
00000070: 54 50 55 54 20 46 49 4C 45 20 4E 41 4D 45 22 3B |TPUT FILE NAME";|
00000080: 4F 24 00 AE 09 3C 00 99 22 11 12 C4 92 49 53 4B |O$...<.."....ISK|
00000090: 2C 20 12 D3 92 43 52 45 45 4E 2C 12 D0 92 52 49 |, ...CREEN,...RI|
000000A0: 4E 54 45 52 2C 20 12 CF 92 54 48 45 52 22 00 C0 |NTER, ...THER"..|
000000B0: 09 46 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 37 30 |.F..A$:.A$."".70|
000000C0: 00 F7 09 50 00 44 56 B2 AB 28 41 24 B2 22 54 22 |...P.DV..(A$."T"|
000000D0: 29 AB 33 AC 28 41 24 B2 22 53 22 29 AB 34 AC 28 |).3.(A$."S").4.(|
000000E0: 41 24 B2 22 50 22 29 AB 38 AC 28 41 24 B2 22 44 |A$."P").8.(A$."D|
000000F0: 22 29 3A 53 41 B2 37 00 2D 0A 5A 00 8B 44 56 B2 |"):SA.7.-.Z..DV.|
00000100: 30 A7 85 22 44 45 56 49 43 45 20 4E 55 4D 42 45 |0.."DEVICE NUMBE|
00000110: 52 22 3B 44 56 3A 85 22 D3 45 43 4F 4E 44 41 52 |R";DV:.".ECONDAR|
00000120: 59 20 41 44 44 52 45 53 53 22 3B 53 41 00 48 0A |Y ADDRESS";SA.H.|
00000130: 64 00 99 22 11 11 D7 48 49 43 48 20 43 4F 4E 56 |d.."...HICH CONV|
00000140: 45 52 53 49 4F 4E 3A 22 00 72 0A 6E 00 99 22 11 |ERSION:".r.n..".|
00000150: 31 29 20 D3 50 45 45 44 53 43 52 49 50 54 20 54 |1) .PEEDSCRIPT T|
00000160: 4F 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C1 D3 C3 C9 |O .OMMODORE ....|
00000170: C9 22 00 97 0A 78 00 99 22 11 32 29 20 D3 50 45 |."...x..".2) .PE|
00000180: 45 44 53 43 52 49 50 54 20 54 4F 20 D4 52 55 45 |EDSCRIPT TO .RUE|
00000190: 20 C1 D3 C3 C9 C9 22 00 C1 0A 82 00 99 22 11 33 | ....."......".3|
000001A0: 29 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C1 D3 C3 C9 |) .OMMODORE ....|
000001B0: C9 20 54 4F 20 D3 50 45 45 44 53 43 52 49 50 54 |. TO .PEEDSCRIPT|
000001C0: 22 00 DC 0A 8C 00 A1 50 24 3A 8B 50 24 B3 22 31 |"......P$:.P$."1|
000001D0: 22 B0 50 24 B1 22 33 22 A7 31 34 30 00 F2 0A 96 |".P$."3".140....|
000001E0: 00 41 44 52 B2 38 32 38 AA C5 28 50 24 29 AC 33 |.ADR.828..(P$).3|
000001F0: AB 33 00 37 0B A0 00 9F 31 35 2C 38 2C 31 35 2C |.3.7....15,8,15,|
00000200: 22 49 30 22 3A 8F 20 52 45 4D 4F 56 45 20 2C 22 |"I0":. REMOVE ,"|
00000210: 49 30 22 20 49 46 20 59 4F 55 27 56 45 20 43 48 |I0" IF YOU'VE CH|
00000220: 41 4E 47 45 44 20 54 48 45 20 44 52 49 56 45 27 |ANGED THE DRIVE'|
00000230: 53 20 53 50 45 45 44 00 61 0B AA 00 9F 31 2C 38 |S SPEED.a....1,8|
00000240: 2C 33 2C 49 24 3A 84 31 35 2C 45 2C 4E 2C 45 4D |,3,I$:.15,E,N,EM|
00000250: 24 3A 46 24 B2 49 24 3A 8B 45 4E B2 30 A7 32 30 |$:F$.I$:.EN.0.20|
00000260: 30 00 81 0B B4 00 99 22 11 C4 49 53 4B 20 45 52 |0......"..ISK ER|
00000270: 52 4F 52 20 46 4F 52 20 22 3B 46 24 3A 99 45 4D |ROR FOR ";F$:.EM|
00000280: 24 00 9E 0B BE 00 99 22 11 11 11 52 55 4E 91 91 |$......"...RUN..|
00000290: 91 22 3A A0 31 3A A0 32 3A A0 31 35 3A 80 00 BA |.":.1:.2:.15:...|
000002A0: 0B C8 00 8B 44 56 B3 B1 38 A7 9F 32 2C 44 56 2C |....DV..8..2,DV,|
000002B0: 53 41 2C 4F 24 3A 89 32 39 30 00 DB 0B D2 00 45 |SA,O$:.290.....E|
000002C0: 58 24 B2 22 2C 53 2C 57 22 3A 8B 50 24 B2 22 33 |X$.",S,W":.P$."3|
000002D0: 22 A7 58 24 B2 22 2C 50 2C 57 22 00 05 0C DC 00 |".X$.",P,W".....|
000002E0: 9F 32 2C 44 56 2C 53 41 2C 22 30 3A 22 AA 4F 24 |.2,DV,SA,"0:".O$|
000002F0: AA 45 58 24 3A 84 31 35 2C 45 4E 2C 45 4D 24 3A |.EX$:.15,EN,EM$:|
00000300: 46 24 B2 4F 24 00 13 0C E6 00 8B 45 4E B2 30 A7 |F$.O$......EN.0.|
00000310: 32 39 30 00 23 0C F0 00 8B 45 4E B3 B1 36 33 A7 |290.#....EN..63.|
00000320: 31 38 30 00 4E 0C FA 00 99 22 11 22 3B 4F 24 3B |180.N....".";O$;|
00000330: 22 20 45 58 49 53 54 53 2E 2E 2E 20 52 45 50 4C |" EXISTS... REPL|
00000340: 41 43 45 3F 20 12 D9 92 2F 12 CE 92 3A 22 00 6B |ACE? .../...:".k|
00000350: 0C 04 01 A1 41 24 3A 8B 41 24 B3 B1 22 59 22 AF |....A$:.A$.."Y".|
00000360: 41 24 B3 B1 22 4E 22 A7 32 36 30 00 7B 0C 0E 01 |A$.."N".260.{...|
00000370: 8B 41 24 B2 22 4E 22 A7 31 39 30 00 94 0C 18 01 |.A$."N".190.....|
00000380: 98 31 35 2C 22 53 30 3A 22 AA 30 24 3A A0 32 3A |.15,"S0:".0$:.2:|
00000390: 89 32 32 30 00 BE 0C 22 01 9E 28 41 44 52 29 3A |.220..."..(ADR):|
000003A0: 8B 28 C2 28 31 34 34 29 AF 31 39 31 29 B2 30 A7 |.(.(144).191).0.|
000003B0: 99 22 11 C4 4F 4E 45 2E 22 3A 89 31 39 30 00 F8 |."..ONE.":.190..|
000003C0: 0C 2C 01 99 22 C9 2F CF 20 C5 52 52 4F 52 20 44 |.,.."./. .RROR D|
000003D0: 55 52 49 4E 47 20 43 4F 4E 56 45 52 53 49 4F 4E |URING CONVERSION|
000003E0: 2E 22 3A 84 31 35 2C 45 4E 2C 45 4D 24 3A 8B 45 |.":.15,EN,EM$:.E|
000003F0: 4E B3 B1 30 A7 31 38 30 00 01 0D 36 01 89 31 39 |N..0.180...6..19|
00000400: 30 00 2F 0D 40 01 81 49 B2 38 32 38 A4 31 30 30 |0./.@..I.828.100|
00000410: 31 3A 87 41 3A 97 49 2C 41 3A 43 4B B2 43 4B AA |1:.A:.I,A:CK.CK.|
00000420: 41 3A 82 3A 8B 43 4B B2 32 31 35 38 34 A7 8E 00 |A:.:.CK.21584...|
00000430: 53 0D 4A 01 99 22 12 45 52 52 4F 52 20 49 4E 20 |S.J..".ERROR IN |
00000440: 44 41 54 41 20 53 54 41 54 45 4D 45 4E 54 53 2E |DATA STATEMENTS.|
00000450: 22 3A 80 00 00 00 |":.... |
..4...."... SPEEDSCRIPT FILE CONVERSION
PROGRAM ".=....320.X....".INPUT FILE
NAME";I$.F.(..I$."".30...2..".OUTPUT FIL
E NAME";O$...<.."..D.ISK, .S.CREEN,.P.RI
NTER, .O.THER"...F..A$:.A$."".70...P.DV.
.(A$."T").3.(A$."S").4.(A$."P").8.(A$."D
"):SA.7.-.Z..DV.0.."DEVICE NUMBER";DV:."
SECONDARY ADDRESS";SA.H.D.."..WHICH CONV
ERSION:".R.N..".1) SPEEDSCRIPT TO COMMOD
ORE ASCII"...X..".2) SPEEDSCRIPT TO TRUE
ASCII".A....".3) COMMODORE ASCII TO SPE
EDSCRIPT"......P$:.P$."1".P$."3".140....
.ADR.828.E(P$).3.3.7. ..15,8,15,"I0":. R
EMOVE ,"I0" IF YOU'VE CHANGED THE DRIVE'
S SPEED.A....1,8,3,I$:.15,E,N,EM$:F$.I$:
.EN.0.200......".DISK ERROR FOR ";F$:.EM
$......"...RUN...": 1: 2: 15:....H..DV..
8..2,DV,SA,O$:.290...R.EX$.",S,W":.P$."3
".X$.",P,W"......2,DV,SA,"0:".O$.EX$:.15
,EN,EM$:F$.O$......EN.0.290.#....EN..63.
180.N....".";O$;" EXISTS... REPLACE? .Y.
/.N.:".K....A$:.A$.."Y".A$.."N".260.{...
.A$."N".190......15,"S0:".0$: 2:.220..."
..(ADR):.(B(144).191).0..".DONE.":.190..
.,.."I/O ERROR DURING CONVERSION.":.15,E
N,EM$:.EN..0.180...6..190./.@..I.828.100
1:.A:.I,A:CK.CK.A:.:.CK.21584...S.J..".E
RROR IN DATA STATEMENTS.":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL