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

DISK->TAPE SAVER

FILE INFORMATION

FILENAME(S): DISK->TAPE SAVER

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-11-30 21:23:14

APPEARS ON: 1 disk(s)

FILE HASH

e1e0458c9b8e0ecdb86fd4a06869571ef6ce3af075a1bc973faac06dfc3cceeb

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 19 2 DISK->TAPE SAVER PRG DuncanTwain 1 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 12 08 00 00 97 38  32 37 2C 30 3A 8A 31 30  |.......827,0:.10|
00000010: 30 30 00 26 08 0A 00 8F  20 44 49 53 4B 2D 3E 54  |00.&.... DISK->T|
00000020: 41 50 45 20 36 34 00 36  08 14 00 8F 20 32 39 2D  |APE 64.6.... 29-|
00000030: 36 2D 31 39 38 33 00 48  08 1E 00 97 38 32 37 2C  |6-1983.H....827,|
00000040: C2 28 38 32 37 29 AA 31  00 70 08 28 00 48 B2 C2  |.(827).1.p.(.H..|
00000050: 28 38 32 37 29 3A 81 58  B2 31 A4 48 3A 87 41 24  |(827):.X.1.H:.A$|
00000060: 3A 82 3A 8B 41 24 B2 22  45 4E 44 22 A7 31 33 30  |:.:.A$."END".130|
00000070: 00 8D 08 32 00 99 22 93  11 11 11 4C CF 22 C7 28  |...2.."....L.".(|
00000080: 33 34 29 41 24 C7 28 33  34 29 22 2C 38 00 B5 08  |34)A$.(34)",8...|
00000090: 3C 00 99 22 11 11 11 11  49 46 50 45 45 4B 28 32  |<.."....IFPEEK(2|
000000A0: 31 30 30 29 3D 31 37 30  54 48 45 4E 57 41 49 54  |100)=170THENWAIT|
000000B0: 36 35 33 2C 31 00 CE 08  46 00 99 22 11 11 11 53  |653,1...F.."...S|
000000C0: C1 22 C7 28 33 34 29 41  24 C7 28 33 34 29 00 F5  |.".(34)A$.(34)..|
000000D0: 08 5A 00 99 22 11 11 11  11 4C CF 22 C7 28 33 34  |.Z.."....L.".(34|
000000E0: 29 22 44 49 53 4B 2D 3E  54 41 50 45 22 C7 28 33  |)"DISK->TAPE".(3|
000000F0: 34 29 22 2C 38 00 05 09  64 00 99 22 11 11 11 11  |4)",8...d.."....|
00000100: 11 52 55 4E 13 00 23 09  6E 00 97 31 39 38 2C 39  |.RUN..#.n..198,9|
00000110: 3A 81 58 B2 30 A4 39 3A  97 36 33 31 AA 58 2C 31  |:.X.0.9:.631.X,1|
00000120: 33 3A 82 00 29 09 78 00  80 00 3F 09 82 00 99 22  |3:..).x...?...."|
00000130: 93 11 11 48 45 54 20 49  53 20 4B 4C 41 41 52 00  |...HET IS KLAAR.|
00000140: 51 09 8C 00 97 38 32 37  2C 30 3A 97 31 39 38 2C  |Q....827,0:.198,|
00000150: 30 00 64 09 AA 00 A1 41  24 3A 8B 41 24 B2 22 22  |0.d....A$:.A$.""|
00000160: A7 31 37 30 00 83 09 BE  00 99 22 93 11 11 45 54  |.170......"...ET|
00000170: 49 4B 45 54 54 45 4E 20  4D 41 4B 45 4E 20 4A 2F  |IKETTEN MAKEN J/|
00000180: 4E 20 3F 00 A0 09 C8 00  A1 41 24 3A 8B 41 24 B3  |N ?......A$:.A$.|
00000190: B1 22 4A 22 AF 41 24 B3  B1 22 4E 22 A7 32 30 30  |."J".A$.."N".200|
000001A0: 00 AE 09 D2 00 8B 41 24  B2 22 4E 22 A7 80 00 BE  |......A$."N"....|
000001B0: 09 F4 01 8F 20 45 54 49  4B 45 54 54 45 4E 00 CB  |.... ETIKETTEN..|
000001C0: 09 FE 01 9C 3A 9E 33 35  38 37 39 00 E4 09 08 02  |....:.35879.....|
000001D0: 9F 32 2C 34 3A 86 54 24  28 34 29 2C 52 24 28 34  |.2,4:.T$(4),R$(4|
000001E0: 32 29 3A 8C 00 0D 0A 12  02 81 51 B2 31 A4 34 3A  |2):.......Q.1.4:|
000001F0: 54 24 28 51 29 B2 22 22  3A 82 3A 81 51 B2 31 A4  |T$(Q)."":.:.Q.1.|
00000200: 34 32 3A 52 24 28 51 29  B2 22 22 3A 82 00 52 0A  |42:R$(Q)."":..R.|
00000210: 1C 02 81 51 B2 31 A4 36  31 3A 54 24 28 31 29 B2  |...Q.1.61:T$(1).|
00000220: 54 24 28 31 29 AA 22 3D  22 3A 54 24 28 33 29 B2  |T$(1)."=":T$(3).|
00000230: 54 24 28 33 29 AA 22 2D  2D 22 3A 82 3A 54 24 28  |T$(3)."--":.:T$(|
00000240: 33 29 B2 54 24 28 33 29  AA 22 2D 2D 2D 2D 2D 2D  |3).T$(3)."------|
00000250: 2D 22 00 78 0A 26 02 54  24 28 31 29 B2 22 21 20  |-".x.&.T$(1)."! |
00000260: 22 AA 54 24 28 31 29 AA  22 20 21 20 22 AA 54 24  |".T$(1)." ! ".T$|
00000270: 28 31 29 AA 22 20 21 22  00 97 0A 30 02 99 22 93  |(1)." !"...0..".|
00000280: 11 45 54 49 4B 45 54 54  45 4E 20 56 4F 4F 52 20  |.ETIKETTEN VOOR |
00000290: 42 41 4E 44 4A 45 53 00  C4 0A 3A 02 99 22 11 11  |BANDJES...:.."..|
000002A0: 11 4E 41 41 4D 20 22 3A  85 48 24 3A 48 B2 33 30  |.NAAM ":.H$:H.30|
000002B0: 3A 8D 38 32 30 3A 54 24  28 32 29 B2 C8 28 48 24  |:.820:T$(2)..(H$|
000002C0: 2C 33 30 29 00 F5 0A 44  02 99 22 11 44 41 54 55  |,30)...D..".DATU|
000002D0: 4D 22 3A 85 48 24 3A 48  B2 31 37 3A 8D 38 32 30  |M":.H$:H.17:.820|
000002E0: 3A 54 24 28 32 29 B2 54  24 28 32 29 AA C8 28 48  |:T$(2).T$(2)..(H|
000002F0: 24 2C 31 37 29 00 30 0B  4E 02 99 22 11 50 52 49  |$,17).0.N..".PRI|
00000300: 4A 53 22 3A 85 48 24 3A  48 B2 31 30 3A 8D 38 32  |JS":.H$:H.10:.82|
00000310: 30 3A 54 24 28 32 29 B2  22 21 20 20 22 AA 54 24  |0:T$(2)."!  ".T$|
00000320: 28 32 29 AA C8 28 48 24  2C 31 30 29 AA 22 21 22  |(2)..(H$,10)."!"|
00000330: 00 38 0B 58 02 48 B2 30  00 4D 0B 62 02 81 51 B2  |.8.X.H.0.M.b..Q.|
00000340: 31 A4 34 32 3A 8B 48 B2  31 A7 36 33 30 00 72 0B  |1.42:.H.1.630.r.|
00000350: 6C 02 87 52 24 28 51 29  3A 8B 52 24 28 51 29 B2  |l..R$(Q):.R$(Q).|
00000360: 22 45 4E 44 22 A7 52 24  28 51 29 B2 22 22 3A 48  |"END".R$(Q)."":H|
00000370: B2 31 00 90 0B 76 02 81  4C B2 31 A4 31 38 3A 52  |.1...v..L.1.18:R|
00000380: 24 28 51 29 B2 52 24 28  51 29 AA 22 20 22 3A 82  |$(Q).R$(Q)." ":.|
00000390: 00 AC 0B 80 02 52 24 28  51 29 B2 22 21 20 20 22  |.....R$(Q)."!  "|
000003A0: AA C8 28 52 24 28 51 29  2C 31 37 29 00 B2 0B 8A  |..(R$(Q),17)....|
000003B0: 02 82 00 BE 0B 94 02 81  51 B2 31 A4 31 34 00 E4  |........Q.1.14..|
000003C0: 0B 9E 02 52 24 28 51 29  B2 52 24 28 51 29 AA 52  |...R$(Q).R$(Q).R|
000003D0: 24 28 51 AA 31 34 29 AA  52 24 28 51 AA 32 38 29  |$(Q.14).R$(Q.28)|
000003E0: AA 22 21 22 00 EA 0B A8  02 82 00 10 0C B2 02 54  |."!"...........T|
000003F0: 24 28 32 29 B2 22 21 20  22 AA 54 24 28 32 29 AA  |$(2)."! ".T$(2).|
00000400: 22 20 21 20 22 AA 54 24  28 32 29 AA 22 20 21 22  |" ! ".T$(2)." !"|
00000410: 00 40 0C BC 02 81 51 B2  31 A4 31 34 3A 52 24 28  |.@....Q.1.14:R$(|
00000420: 51 29 B2 22 21 20 22 AA  52 24 28 51 29 AA 22 20  |Q)."! ".R$(Q)." |
00000430: 21 20 22 AA 52 24 28 51  29 AA 22 20 21 22 3A 82  |! ".R$(Q)." !":.|
00000440: 00 74 0C C6 02 99 22 93  50 52 49 4E 54 45 4E 11  |.t....".PRINTEN.|
00000450: 11 11 22 3A 99 22 48 4F  45 56 45 45 4C 20 57 49  |..":."HOEVEEL WI|
00000460: 4C 20 4A 45 20 45 52 22  3A 85 22 48 45 42 42 45  |L JE ER":."HEBBE|
00000470: 4E 22 3B 48 00 8D 0C D0  02 98 32 2C C7 28 32 37  |N";H......2,.(27|
00000480: 29 3B 22 38 22 3A 98 32  2C C7 28 31 29 00 B8 0C  |);"8":.2,.(1)...|
00000490: DA 02 81 4C B2 31 A4 48  AD 32 AA 2E 35 3A 98 32  |...L.1.H.2..5:.2|
000004A0: 2C 54 24 28 33 29 3A 98  32 2C 54 24 28 31 29 3A  |,T$(3):.2,T$(1):|
000004B0: 98 32 2C 54 24 28 32 29  00 C5 0C E4 02 98 32 2C  |.2,T$(2)......2,|
000004C0: 54 24 28 31 29 00 E7 0C  EE 02 81 51 B2 31 A4 31  |T$(1)......Q.1.1|
000004D0: 34 3A 98 32 2C 52 24 28  51 29 3A 82 3A 98 32 2C  |4:.2,R$(Q):.:.2,|
000004E0: 54 24 28 31 29 3A 82 00  02 0D F8 02 99 22 93 4E  |T$(1):.......".N|
000004F0: 4F 47 20 4D 45 45 52 20  45 54 49 4B 45 54 54 45  |OG MEER ETIKETTE|
00000500: 4E 3F 00 1F 0D 02 03 A1  41 24 3A 8B 41 24 B3 B1  |N?......A$:.A$..|
00000510: 22 4A 22 AF 41 24 B3 B1  22 4E 22 A7 37 37 30 00  |"J".A$.."N".770.|
00000520: 36 0D 0C 03 99 22 11 22  41 24 3A 8B 41 24 B2 22  |6...."."A$:.A$."|
00000530: 4A 22 A7 37 31 30 00 43  0D 16 03 98 32 2C 54 24  |J".710.C....2,T$|
00000540: 28 33 29 00 59 0D 20 03  81 51 B2 31 A4 39 3A 98  |(3).Y. ..Q.1.9:.|
00000550: 32 2C C7 28 31 30 29 3A  82 00 65 0D 2A 03 98 32  |2,.(10):..e.*..2|
00000560: 3A A0 32 3A 80 00 81 0D  34 03 8B C3 28 48 24 29  |:.2:....4...(H$)|
00000570: B3 48 A7 48 24 B2 48 24  AA 22 20 22 3A 89 38 32  |.H.H$.H$." ":.82|
00000580: 30 00 87 0D 3E 03 8E 00  AE 0D E8 03 97 35 35 2C  |0...>........55,|
00000590: 30 3A 97 35 36 2C C2 28  35 36 29 AB 31 30 3A 9C  |0:.56,.(56).10:.|
000005A0: 3A 54 B2 C2 28 35 36 29  AC 32 35 36 AB 31 00 E3  |:T..(56).256.1..|
000005B0: 0D F2 03 99 22 93 49 4E  48 4F 55 44 20 56 41 4E  |....".INHOUD VAN|
000005C0: 20 12 44 45 5A 45 92 20  44 49 53 4B 45 54 54 45  | .DEZE. DISKETTE|
000005D0: 20 3F 22 3A A1 41 24 3A  8B 41 24 B2 22 22 A7 31  | ?":.A$:.A$."".1|
000005E0: 30 31 30 00 F1 0D FC 03  8B 41 24 B2 22 4E 22 A7  |010......A$."N".|
000005F0: 80 00 10 0E 06 04 9F 31  2C 38 2C 31 35 2C 22 49  |.......1,8,15,"I|
00000600: 22 3A A0 31 3A 9F 31 2C  38 2C 30 2C 22 24 30 22  |":.1:.1,8,0,"$0"|
00000610: 00 1B 0E 10 04 46 24 B2  22 22 3A 00 3B 0E 1A 04  |.....F$."":.;...|
00000620: A1 23 31 2C 41 24 3A 8B  41 24 B3 B1 C7 28 33 34  |.#1,A$:.A$...(34|
00000630: 29 AF 53 54 B2 30 A7 31  30 35 30 00 5B 0E 24 04  |).ST.0.1050.[.$.|
00000640: A1 23 31 2C 41 24 3A 8B  41 24 B3 B1 C7 28 33 34  |.#1,A$:.A$...(34|
00000650: 29 AF 53 54 B2 30 A7 31  30 36 30 00 7B 0E 2E 04  |).ST.0.1060.{...|
00000660: A1 23 31 2C 41 24 3A 8B  41 24 B3 B1 C7 28 33 34  |.#1,A$:.A$...(34|
00000670: 29 AF 53 54 B2 30 A7 31  30 37 30 00 8F 0E 38 04  |).ST.0.1070...8.|
00000680: 8B 53 54 B3 B1 30 A7 A0  31 3A 89 31 31 34 30 00  |.ST..0..1:.1140.|
00000690: A6 0E 42 04 A1 23 31 2C  41 24 3A 8B 41 24 B2 22  |..B..#1,A$:.A$."|
000006A0: 22 A7 31 30 37 30 00 CA  0E 4C 04 46 24 B2 46 24  |".1070...L.F$.F$|
000006B0: AA 41 24 3A A1 23 31 2C  41 24 3A 8B 41 24 B3 B1  |.A$:.#1,A$:.A$..|
000006C0: C7 28 33 34 29 A7 31 31  30 30 00 F9 0E 56 04 81  |.(34).1100...V..|
000006D0: 49 B2 31 A4 C3 28 46 24  29 3A 97 54 AA 49 2C C6  |I.1..(F$):.T.I,.|
000006E0: 28 CA 28 46 24 2C 49 2C  31 29 29 3A 82 3A 54 B2  |(.(F$,I,1)):.:T.|
000006F0: 54 AA C3 28 46 24 29 AA  31 00 0A 0F 60 04 97 54  |T..(F$).1...`..T|
00000700: 2C 32 35 35 3A 54 B2 54  AA 32 00 21 0F 6A 04 99  |,255:T.T.2.!.j..|
00000710: 22 93 22 46 24 3A 46 24  B2 22 22 3A 89 31 30 37  |"."F$:F$."":.107|
00000720: 30 00 36 0F 74 04 81 49  B2 31 A4 31 30 3A 97 54  |0.6.t..I.1.10:.T|
00000730: AA 49 2C 30 3A 82 00 4D  0F 7E 04 54 B2 C2 28 35  |.I,0:..M.~.T..(5|
00000740: 36 29 AC 32 35 36 3A 58  B2 31 38 30 30 00 6E 0F  |6).256:X.1800.n.|
00000750: 88 04 99 22 93 22 3B 3A  43 24 B2 C7 28 33 34 29  |...".";:C$..(34)|
00000760: 3A 81 49 B2 31 A4 31 30  3A 46 24 B2 22 22 00 85  |:.I.1.10:F$.""..|
00000770: 0F 92 04 46 B2 C2 28 54  29 3A 8B 46 B2 32 35 35  |...F..(T):.F.255|
00000780: A7 31 32 31 30 00 A5 0F  9C 04 8B 46 B2 30 A7 56  |.1210......F.0.V|
00000790: B2 39 39 39 39 3A 56 56  B2 49 3A 49 B2 31 30 3A  |.9999:VV.I:I.10:|
000007A0: 89 31 32 33 30 00 B4 0F  A6 04 46 24 B2 46 24 AA  |.1230.....F$.F$.|
000007B0: C7 28 46 29 00 C4 0F B0  04 54 B2 54 AA 31 3A 89  |.(F).....T.T.1:.|
000007C0: 31 31 37 30 00 EA 0F BA  04 8B 49 AD 32 B3 B1 B5  |1170......I.2...|
000007D0: 28 49 AD 32 29 A7 99 58  22 44 41 54 41 22 43 24  |(I.2)..X"DATA"C$|
000007E0: 3B 46 24 3B 43 24 22 2C  22 3B 00 08 10 C4 04 8B  |;F$;C$",";......|
000007F0: 49 AD 32 B2 B5 28 49 AD  32 29 A7 99 43 24 3B 46  |I.2..(I.2)..C$;F|
00000800: 24 3A 58 B2 58 AA 30 35  00 15 10 CE 04 54 B2 54  |$:X.X.05.....T.T|
00000810: AA 33 3A 82 49 00 26 10  D8 04 8B 56 B2 39 39 39  |.3:.I.&....V.999|
00000820: 39 A7 31 32 38 30 00 3B  10 E2 04 99 22 31 31 35  |9.1280.;...."115|
00000830: 30 54 3D 22 54 22 3A 58  3D 22 58 00 4A 10 EC 04  |0T="T":X="X.J...|
00000840: 99 22 52 55 4E 20 31 31  35 30 00 72 10 F6 04 97  |."RUN 1150.r....|
00000850: 31 39 38 2C 39 3A 97 36  33 31 2C 31 39 3A 81 49  |198,9:.631,19:.I|
00000860: B2 36 33 32 A4 36 34 30  3A 97 49 2C 31 33 3A 82  |.632.640:.I,13:.|
00000870: 3A 80 00 8D 10 00 05 8B  56 56 AD 32 B2 B5 28 56  |:.......VV.2..(V|
00000880: 56 AD 32 29 A7 99 22 9D  9D 20 20 20 22 00 B1 10  |V.2).."..   "...|
00000890: 0A 05 99 58 AA 31 30 22  44 41 54 41 22 43 24 22  |...X.10"DATA"C$"|
000008A0: 45 4E 44 22 43 24 3A 99  22 52 55 4E 20 31 35 30  |END"C$:."RUN 150|
000008B0: 30 00 BB 10 14 05 89 31  32 37 30 00 C6 10 DC 05  |0......1270.....|
000008C0: 49 B2 31 30 30 30 00 0A  11 E6 05 99 22 93 22 49  |I.1000......"."I|
000008D0: 3A 99 22 31 35 30 30 49  3D 22 49 AA 31 30 3A 99  |:."1500I="I.10:.|
000008E0: 22 52 D5 31 35 30 30 22  3A 97 31 39 38 2C 34 3A  |"R.1500":.198,4:|
000008F0: 97 36 33 31 2C 31 39 3A  81 4A B2 30 A4 32 3A 97  |.631,19:.J.0.2:.|
00000900: 36 33 32 AA 4A 2C 31 33  3A 82 00 53 11 F0 05 8B  |632.J,13:..S....|
00000910: 49 B2 31 33 31 30 A7 99  22 93 31 35 30 30 22 3A  |I.1310..".1500":|
00000920: 99 22 31 35 31 30 22 3A  99 22 31 35 32 30 22 3A  |."1510":."1520":|
00000930: 99 22 31 35 33 30 22 3A  99 22 30 22 3A 97 31 39  |."1530":."0":.19|
00000940: 38 2C 36 3A 97 36 33 35  2C 31 33 3A 97 36 33 36  |8,6:.635,13:.636|
00000950: 2C 31 33 00 7E 11 FA 05  99 22 50 CF 35 36 2C 50  |,13.~...."P.56,P|
00000960: C5 28 35 36 29 2B 31 30  3A 43 4C 52 22 3A 97 31  |.(56)+10:CLR":.1|
00000970: 39 38 2C 37 3A 97 36 33  37 2C 31 33 3A 80 00 00  |98,7:.637,13:...|
00000980: 00                                                |.               |
.......827,0:.1000.&.... DISK->TAPE 64.6
.... 29-6-1983.H....827,B(827).1.P.(.H.B
(827):.X.1.H:.A$:.:.A$."END".130...2..".
...LO"G(34)A$G(34)",8...<.."....IFPEEK(2
100)=170THENWAIT653,1.N.F.."...SA"G(34)A
$G(34)...Z.."....LO"G(34)"DISK->TAPE"G(3
4)",8...D..".....RUN..#.N..198,9:.X.0.9:
.631.X,13:..).X...?...."...HET IS KLAAR.
Q....827,0:.198,0.D....A$:.A$."".170....
.."...ETIKETTEN MAKEN J/N ?. .H..A$:.A$.
."J".A$.."N".200...R..A$."N"........ ETI
KETTEN.K....:.35879......2,4:.T$(4),R$(4
2):.......Q.1.4:T$(Q)."":.:.Q.1.42:R$(Q)
."":..R....Q.1.61:T$(1).T$(1)."=":T$(3).
T$(3)."--":.:T$(3).T$(3)."-------".X.&.T
$(1)."! ".T$(1)." ! ".T$(1)." !"...0..".
.ETIKETTEN VOOR BANDJES.D.:.."...NAAM ":
.H$:H.30:.820:T$(2).H(H$,30)...D..".DATU
M":.H$:H.17:.820:T$(2).T$(2).H(H$,17).0.
N..".PRIJS":.H$:H.10:.820:T$(2)."!  ".T$
(2).H(H$,10)."!".8.X.H.0.M.B..Q.1.42:.H.
1.630.R.L..R$(Q):.R$(Q)."END".R$(Q)."":H
.1...V..L.1.18:R$(Q).R$(Q)." ":......R$(
Q)."!  ".H(R$(Q),17)............Q.1.14..
...R$(Q).R$(Q).R$(Q.14).R$(Q.28)."!"....
.......T$(2)."! ".T$(2)." ! ".T$(2)." !"
.@....Q.1.14:R$(Q)."! ".R$(Q)." ! ".R$(Q
)." !":..T.F..".PRINTEN...":."HOEVEEL WI
L JE ER":."HEBBEN";H...P..2,G(27);"8":.2
,G(1)...Z..L.1.H.2..5:.2,T$(3):.2,T$(1):
.2,T$(2).E....2,T$(1)......Q.1.14:.2,R$(
Q):.:.2,T$(1):.......".NOG MEER ETIKETTE
N?......A$:.A$.."J".A$.."N".770.6...."."
A$:.A$."J".710.C....2,T$(3).Y. ..Q.1.9:.
2,G(10):..E.*..2: 2:....4..C(H$).H.H$.H$
." ":.820...>........55,0:.56,B(56).10:.
:T.B(56).256.1......".INHOUD VAN .DEZE. 
DISKETTE ?":.A$:.A$."".1010......A$."N".
.......1,8,15,"I": 1:.1,8,0,"$0".....F$.
"":.;....#1,A$:.A$..G(34).ST.0.1050.[.$.
.#1,A$:.A$..G(34).ST.0.1060.{....#1,A$:.
A$..G(34).ST.0.1070...8..ST..0. 1:.1140.
..B..#1,A$:.A$."".1070.J.L.F$.F$.A$:.#1,
A$:.A$..G(34).1100...V..I.1.C(F$):.T.I,F
(J(F$,I,1)):.:T.T.C(F$).1...`..T,255:T.T
.2.!.J.."."F$:F$."":.1070.6.T..I.1.10:.T
.I,0:..M.~.T.B(56).256:X.1800.N....".";:
C$.G(34):.I.1.10:F$."".....F.B(T):.F.255
.1210......F.0.V.9999:VV.I:I.10:.1230...
..F$.F$.G(F).D...T.T.1:.1170......I.2...
(I.2)..X"DATA"C$;F$;C$",";...D..I.2..(I.
2)..C$;F$:X.X.05...N.T.T.3:.I.&.X..V.999
9.1280.;...."1150T="T":X="X.J...."RUN 11
50.R....198,9:.631,19:.I.632.640:.I,13:.
:.......VV.2..(VV.2).."..   "......X.10"
DATA"C$"END"C$:."RUN 1500......1270.F...
I.1000......"."I:."1500I="I.10:."RU1500"
:.198,4:.631,19:.J.0.2:.632.J,13:..S....
I.1310..".1500":."1510":."1520":."1530":
."0":.198,6:.635,13:.636,13.~...."PO56,P
E(56)+10:CLR":.198,7:.637,13:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL