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

C64 DT.C

FILE INFORMATION

FILENAME(S): C64 DT.C

FILE TYPE(S): PRG

FILE SIZE: 2.3K

FIRST SEEN: 2025-11-30 21:07:09

APPEARS ON: 7 disk(s)

FILE HASH

b9f84d58d085a6169d597da62221497d7c8714f6a42285dbd2b6a12d71f1583f

FOUND ON DISKS (7 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
MORE MARCH 2 C C64 DT.C PRG DuncanTwain 32 0 DOWNLOAD FILE
KOPIERING 1 C64 DT.C PRG hedning, Mattias H00r 17 5 DOWNLOAD FILE
CCS64 6 KOPIA C64 DT.C PRG hedning, Mattias H00r 21 5 DOWNLOAD FILE
CCS 64 6 C64 DT.C PRG hedning, Mattias H00r 21 5 DOWNLOAD FILE
SPEL 2 C64 DT.C PRG hedning, Mattias H00r 5 0 DOWNLOAD FILE
C64 6 C64 DT.C PRG hedning, Mattias H00r 21 5 DOWNLOAD FILE
SPEL 2 C64 DT.C PRG hedning, Mattias H00r 5 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 20 08 0A 00 99 22  93 20 43 36 34 20 54 41  |.. ....". C64 TA|
00000010: 50 45 20 20 3C 2D 2D 2D  3E 20 44 49 53 4B 20 22  |PE  <---> DISK "|
00000020: 00 3A 08 0B 00 99 22 11  20 20 41 44 41 50 54 45  |.:....".  ADAPTE|
00000030: 44 20 46 4F 52 20 43 36  34 22 00 53 08 0C 00 99  |D FOR C64".S....|
00000040: 22 20 20 42 59 20 44 4F  55 47 20 50 52 49 4E 47  |"  BY DOUG PRING|
00000050: 4C 45 22 00 83 08 0F 00  42 24 B2 22 91 22 3A 81  |LE".....B$.".":.|
00000060: 41 B2 31 A4 33 39 3A 42  24 B2 42 24 AA 22 20 22  |A.1.39:B$.B$." "|
00000070: 3A 82 3A 42 24 B2 42 24  AA 22 91 91 22 AA C7 28  |:.:B$.B$.".."..(|
00000080: 31 33 29 00 A4 08 1E 00  99 22 11 53 41 56 45 20  |13)......".SAVE |
00000090: 54 4F 20 12 44 92 49 53  4B 20 4F 52 20 12 54 92  |TO .D.ISK OR .T.|
000000A0: 41 50 45 22 00 B4 08 28  00 99 22 3F 20 54 91 22  |APE"...(.."? T."|
000000B0: 3A 85 41 24 00 CA 08 2D  00 9F 38 2C 38 2C 31 35  |:.A$...-..8,8,15|
000000C0: 3A 98 38 2C 22 49 22 3A  A0 38 00 DB 08 32 00 8B  |:.8,"I":.8...2..|
000000D0: 41 24 B2 22 54 22 89 32  30 30 30 00 F2 08 3C 00  |A$."T".2000...<.|
000000E0: 8B 41 24 B3 B1 22 44 22  A7 99 22 91 91 22 3A 89  |.A$.."D".."..":.|
000000F0: 34 30 00 05 09 E8 03 8F  20 54 41 50 45 20 54 4F  |40...... TAPE TO|
00000100: 20 44 49 53 4B 00 21 09  FD 03 8F 20 53 41 56 45  | DISK.!.... SAVE|
00000110: 53 20 41 4C 4C 20 50 52  4F 47 52 41 4D 53 20 4F  |S ALL PROGRAMS O|
00000120: 4E 00 34 09 FE 03 8F 20  54 41 50 45 20 54 4F 20  |N.4.... TAPE TO |
00000130: 44 49 53 4B 00 48 09 0A  04 9F 31 2C 38 2C 31 35  |DISK.H....1,8,15|
00000140: 3A 98 31 2C 22 49 30 22  00 63 09 0C 04 99 22 93  |:.1,"I0".c....".|
00000150: 50 52 45 53 53 20 50 4C  41 59 20 4F 4E 20 54 41  |PRESS PLAY ON TA|
00000160: 50 45 22 00 7C 09 0D 04  5A B2 C2 28 31 29 AF 31  |PE".|...Z..(1).1|
00000170: 36 3A 8B 5A B2 31 36 A7  31 30 33 36 00 93 09 10  |6:.Z.16.1036....|
00000180: 04 51 55 24 B2 C7 28 33  34 29 3A 99 22 93 4C 4F  |.QU$..(34):.".LO|
00000190: 41 44 22 00 99 09 12 04  8F 00 AD 09 13 04 9F 35  |AD"............5|
000001A0: 2C 38 2C 31 35 3A 98 35  2C 22 49 30 22 00 C4 09  |,8,15:.5,"I0"...|
000001B0: 1A 04 41 24 B2 22 13 22  AA C7 28 31 33 29 AA 22  |..A$."."..(13)."|
000001C0: 91 91 91 22 00 E7 09 1C  04 41 24 B2 41 24 AA 22  |...".....A$.A$."|
000001D0: 91 53 41 56 45 20 22 AA  51 55 24 AA C7 28 31 33  |.SAVE ".QU$..(13|
000001E0: 29 AA C7 28 31 33 29 00  14 0A 24 04 99 22 11 11  |)..(13)...$.."..|
000001F0: 22 A3 32 32 29 51 55 24  22 2C 38 3A 4C CF 22 51  |".22)QU$",8:L."Q|
00000200: 55 24 22 43 36 34 20 44  54 2E 43 22 51 55 24 22  |U$"C64 DT.C"QU$"|
00000210: 2C 38 22 22 00 26 0A 26  04 99 22 11 11 11 11 52  |,8"".&.&.."....R|
00000220: 55 4E 31 30 34 30 00 30  0A 2E 04 8D 35 30 30 30  |UN1040.0....5000|
00000230: 00 36 0A 38 04 80 00 49  0A D0 07 8F 20 44 49 53  |.6.8...I.... DIS|
00000240: 4B 20 54 4F 20 54 41 50  45 00 5F 0A DA 07 99 22  |K TO TAPE._...."|
00000250: 93 20 44 49 53 4B 20 54  4F 20 54 41 50 45 22 00  |. DISK TO TAPE".|
00000260: 8C 0A 0C 08 99 22 11 12  43 92 4F 50 59 20 41 4C  |....."..C.OPY AL|
00000270: 4C 20 46 49 4C 45 53 20  4F 52 20 20 20 20 20 12  |L FILES OR     .|
00000280: 53 92 45 4C 45 43 54 49  4F 4E 53 22 00 9C 0A 16  |S.ELECTIONS"....|
00000290: 08 99 22 3F 20 53 91 22  3A 85 41 24 00 B6 0A 20  |.."? S.":.A$... |
000002A0: 08 8B 41 24 B3 B1 22 43  22 AF 41 24 B3 B1 22 53  |..A$.."C".A$.."S|
000002B0: 22 89 32 30 37 30 00 D8  0A 2A 08 8B 41 24 B2 22  |".2070...*..A$."|
000002C0: 43 22 A7 97 31 30 32 32  2C 30 3A 97 31 30 32 33  |C"..1022,0:.1023|
000002D0: 2C 31 3A 89 33 32 34 30  00 F7 0A 34 08 9F 35 2C  |,1:.3240...4..5,|
000002E0: 38 2C 31 35 3A 98 35 2C  22 53 30 3A 53 45 4C 45  |8,15:.5,"S0:SELE|
000002F0: 43 54 49 4F 4E 53 22 00  15 0B 3E 08 9F 33 2C 38  |CTIONS"...>..3,8|
00000300: 2C 34 2C 22 30 3A 53 45  4C 45 43 54 49 4F 4E 53  |,4,"0:SELECTIONS|
00000310: 2C 53 2C 57 22 00 2D 0B  B8 0B 52 43 B2 30 3A 43  |,S,W".-...RC.0:C|
00000320: B2 30 3A 9F 31 2C 38 2C  30 2C 22 24 22 00 47 0B  |.0:.1,8,0,"$".G.|
00000330: C2 0B A1 23 31 2C 41 24  2C 41 24 2C 41 24 2C 41  |...#1,A$,A$,A$,A|
00000340: 24 2C 41 24 2C 41 24 00  5F 0B C3 0B A1 23 31 2C  |$,A$,A$._....#1,|
00000350: 41 24 3A 8B 41 24 B3 B1  22 22 89 33 30 31 31 00  |A$:.A$.."".3011.|
00000360: 73 0B CC 0B A1 23 31 2C  41 24 2C 41 24 2C 41 24  |s....#1,A$,A$,A$|
00000370: 2C 41 24 00 89 0B D6 0B  8B 46 4C A7 A0 31 3A 46  |,A$......FL..1:F|
00000380: 4C B2 30 3A 89 33 30 30  30 00 AC 0B D7 0B A1 23  |L.0:.3000......#|
00000390: 31 2C 41 24 3A 8B 41 24  B3 B1 C7 28 33 34 29 AF  |1,A$:.A$...(34).|
000003A0: 41 24 B3 B1 22 42 22 89  33 30 33 31 00 C7 0B D9  |A$.."B".3031....|
000003B0: 0B 8B 41 24 B2 22 42 22  A7 A0 31 3A 46 4C B2 AB  |..A$."B"..1:FL..|
000003C0: 31 3A 89 33 30 39 30 00  E1 0B E0 0B A1 23 31 2C  |1:.3090......#1,|
000003D0: 41 24 3A 8B 41 24 B2 C7  28 33 34 29 89 33 30 36  |A$:.A$..(34).306|
000003E0: 30 00 F4 0B EA 0B 44 24  B2 44 24 AA 41 24 3A 89  |0.....D$.D$.A$:.|
000003F0: 33 30 34 30 00 1D 0C F4  0B A1 23 31 2C 41 24 3A  |3040......#1,A$:|
00000400: 8B 41 24 B3 B1 22 53 22  AF 41 24 B3 B1 22 55 22  |.A$.."S".A$.."U"|
00000410: AF 41 24 B3 B1 22 50 22  89 33 30 36 30 00 36 0C  |.A$.."P".3060.6.|
00000420: FE 0B 8B 41 24 B3 B1 22  50 22 A7 44 24 B2 22 22  |...A$.."P".D$.""|
00000430: 3A 89 33 30 31 31 00 5A  0C 08 0C 41 24 28 43 29  |:.3011.Z...A$(C)|
00000440: B2 44 24 3A 43 B2 43 AA  31 3A 44 24 B2 22 22 3A  |.D$:C.C.1:D$."":|
00000450: 8B 43 B3 31 30 89 33 30  31 31 00 7F 0C 12 0C 99  |.C.10.3011......|
00000460: 22 93 22 3A 81 41 B2 30  A4 39 3A 99 41 3B C7 28  |".":.A.0.9:.A;.(|
00000470: 33 34 29 41 24 28 41 29  C7 28 33 34 29 3A 82 00  |34)A$(A).(34):..|
00000480: 9A 0C 13 0C 99 22 11 11  54 59 50 45 20 27 58 27  |....."..TYPE 'X'|
00000490: 20 54 4F 20 45 53 43 41  50 45 00 B9 0C 14 0C 99  | TO ESCAPE......|
000004A0: 22 54 59 50 45 20 27 2A  27 20 54 4F 20 53 54 41  |"TYPE '*' TO STA|
000004B0: 52 54 20 53 41 56 49 4E  47 00 D9 0C 1C 0C 99 22  |RT SAVING......"|
000004C0: 45 4E 54 45 52 20 43 48  4F 49 43 45 20 3F 20 2D  |ENTER CHOICE ? -|
000004D0: 9D 9D 9D 22 3B 3A 85 41  24 00 E7 0C 1D 0C 8B 41  |...";:.A$......A|
000004E0: 24 B2 22 58 22 A7 8A 00  F8 0C 1E 0C 8B 41 24 B2  |$."X"........A$.|
000004F0: 22 2A 22 A7 33 32 30 30  00 29 0D 26 0C 8B 41 24  |"*".3200.).&..A$|
00000500: B2 22 2D 22 A7 81 41 B2  30 A4 39 3A 41 24 28 41  |."-"..A.0.9:A$(A|
00000510: 29 B2 22 22 3A 82 3A 43  B2 30 3A 52 43 B2 52 43  |)."":.:C.0:RC.RC|
00000520: AA 31 30 3A 89 33 30 33  30 00 48 0D 30 0C 8B 41  |.10:.3030.H.0..A|
00000530: 24 B3 22 30 22 B0 41 24  B1 22 39 22 A7 99 22 91  |$."0".A$."9"..".|
00000540: 91 22 3A 89 33 31 30 30  00 66 0D 31 0C 8B 41 24  |.":.3100.f.1..A$|
00000550: 28 C5 28 41 24 29 29 B2  22 22 A7 99 22 91 91 22  |(.(A$)).""..".."|
00000560: 3A 89 33 31 30 30 00 7D  0D 3A 0C 98 33 2C C5 28  |:.3100.}.:..3,.(|
00000570: 41 24 29 AA 52 43 3B C7  28 31 33 29 3B 00 8D 0D  |A$).RC;.(13);...|
00000580: 44 0C 99 22 91 91 22 3A  89 33 31 30 30 00 A3 0D  |D.."..":.3100...|
00000590: 80 0C 98 33 2C 22 31 35  35 22 C7 28 31 33 29 3B  |...3,"155".(13);|
000005A0: 3A A0 33 00 B7 0D 8A 0C  97 31 30 32 32 2C 31 3A  |:.3......1022,1:|
000005B0: 97 31 30 32 33 2C 31 00  C1 0D 94 0C 89 34 30 30  |.1023,1......400|
000005C0: 30 00 CD 0D A8 0C 97 31  30 32 33 2C 30 00 EC 0D  |0......1023,0...|
000005D0: A0 0F 8B C2 28 31 30 32  32 29 B2 30 A7 46 B2 C2  |....(1022).0.F..|
000005E0: 28 31 30 32 33 29 3A 89  34 30 32 30 00 0A 0E AA  |(1023):.4020....|
000005F0: 0F 9F 33 2C 38 2C 34 2C  22 30 3A 53 45 4C 45 43  |..3,8,4,"0:SELEC|
00000600: 54 49 4F 4E 53 2C 53 2C  52 22 00 22 0E AB 0F 81  |TIONS,S,R"."....|
00000610: 41 B2 31 A4 C2 28 31 30  32 33 29 3A 84 33 2C 46  |A.1..(1023):.3,F|
00000620: 3A 82 00 29 0E AC 0F A0  33 00 39 0E AD 0F 8B 46  |:..)....3.9....F|
00000630: B2 31 35 35 A7 A0 31 3A  8A 00 4D 0E B4 0F 97 31  |.155..1:..M....1|
00000640: 30 32 33 2C C2 28 31 30  32 33 29 AA 31 00 75 0E  |023,.(1023).1.u.|
00000650: BE 0F A0 31 3A 9F 31 2C  38 2C 30 2C 22 24 22 3A  |...1:.1,8,0,"$":|
00000660: A1 23 31 2C 41 24 2C 41  24 2C 41 24 2C 41 24 2C  |.#1,A$,A$,A$,A$,|
00000670: 41 24 2C 41 24 00 8D 0E  BF 0F A1 23 31 2C 41 24  |A$,A$......#1,A$|
00000680: 3A 8B 41 24 B3 B1 22 22  89 34 30 33 31 00 9B 0E  |:.A$.."".4031...|
00000690: C0 0F 8B 46 B2 30 89 34  30 36 30 00 B6 0E C3 0F  |...F.0.4060.....|
000006A0: 81 41 B2 31 A4 46 3A A1  23 31 2C 41 24 2C 41 24  |.A.1.F:.#1,A$,A$|
000006B0: 2C 41 24 2C 41 24 00 CF  0E C4 0F A1 23 31 2C 41  |,A$,A$......#1,A|
000006C0: 24 3A 8B 41 24 B2 22 42  22 A7 20 A0 31 3A 8A 00  |$:.A$."B". .1:..|
000006D0: EA 0E C5 0F A1 23 31 2C  41 24 3A 8B 41 24 B3 B1  |.....#1,A$:.A$..|
000006E0: C7 28 33 34 29 89 34 30  33 37 00 05 0F C8 0F A1  |.(34).4037......|
000006F0: 23 31 2C 41 24 3A 8B 41  24 B3 B1 C7 28 33 34 29  |#1,A$:.A$...(34)|
00000700: 89 34 30 34 30 00 2E 0F  CA 0F A1 23 31 2C 41 24  |.4040......#1,A$|
00000710: 3A 8B 41 24 B3 B1 22 50  22 AF 41 24 B3 B1 22 53  |:.A$.."P".A$.."S|
00000720: 22 AF 41 24 B3 B1 22 55  22 89 34 30 34 32 00 60  |".A$.."U".4042.`|
00000730: 0F CB 0F 8B 41 24 B3 B1  22 50 22 A7 A1 23 31 2C  |....A$.."P"..#1,|
00000740: 41 24 2C 41 24 2C 41 24  2C 41 24 2C 41 24 2C 41  |A$,A$,A$,A$,A$,A|
00000750: 24 2C 41 24 2C 41 24 2C  41 24 3A 89 34 30 33 36  |$,A$,A$,A$:.4036|
00000760: 00 79 0F D2 0F A1 23 31  2C 41 24 2C 41 24 2C 41  |.y....#1,A$,A$,A|
00000770: 24 2C 41 24 2C 41 24 3A  82 00 9C 0F DC 0F A1 23  |$,A$,A$:.......#|
00000780: 31 2C 41 24 3A 8B 41 24  B3 B1 C7 28 33 34 29 AF  |1,A$:.A$...(34).|
00000790: 41 24 B3 B1 22 42 22 89  34 30 36 30 00 AE 0F E1  |A$.."B".4060....|
000007A0: 0F 8B 41 24 B2 22 42 22  A7 20 A0 31 3A 8A 00 C8  |..A$."B". .1:...|
000007B0: 0F E6 0F A1 23 31 2C 41  24 3A 8B 41 24 B2 C7 28  |....#1,A$:.A$..(|
000007C0: 33 34 29 89 34 30 38 30  00 DB 0F EB 0F 46 24 B2  |34).4080.....F$.|
000007D0: 46 24 AA 41 24 3A 89 34  30 37 30 00 04 10 F0 0F  |F$.A$:.4070.....|
000007E0: A1 23 31 2C 41 24 3A 8B  41 24 B3 B1 22 50 22 AF  |.#1,A$:.A$.."P".|
000007F0: 41 24 B3 B1 22 53 22 AF  41 24 B3 B1 22 55 22 89  |A$.."S".A$.."U".|
00000800: 34 30 38 30 00 23 10 FA  0F 8B 41 24 B3 B1 22 50  |4080.#....A$.."P|
00000810: 22 A7 46 B2 46 AA 31 3A  46 24 B2 22 22 3A 89 34  |".F.F.1:F$."":.4|
00000820: 30 39 32 00 2D 10 FB 0F  89 34 31 30 30 00 45 10  |092.-....4100.E.|
00000830: FC 0F A1 23 31 2C 41 24  3A 8B 41 24 B3 B1 22 22  |...#1,A$:.A$..""|
00000840: 89 34 30 39 32 00 5F 10  FD 0F A1 23 31 2C 41 24  |.4092._....#1,A$|
00000850: 2C 41 24 2C 41 24 2C 41  24 3A 89 34 30 36 30 00  |,A$,A$,A$:.4060.|
00000860: 6F 10 04 10 41 24 B2 46  24 3A 46 24 B2 22 22 00  |o...A$.F$:F$."".|
00000870: 8C 10 22 10 99 22 93 4C  4F 41 44 22 C7 28 33 34  |.."..".LOAD".(34|
00000880: 29 41 24 C7 28 33 34 29  22 2C 38 22 00 93 10 23  |)A$.(34)",8"...#|
00000890: 10 A0 31 00 AE 10 2C 10  99 22 11 11 11 11 11 53  |..1...,..".....S|
000008A0: C1 22 C7 28 33 34 29 41  24 C7 28 33 34 29 00 D6  |.".(34)A$.(34)..|
000008B0: 10 36 10 99 22 11 11 11  11 11 11 4C CF 22 C7 28  |.6.."......L.".(|
000008C0: 33 34 29 22 43 36 34 20  44 54 2E 43 22 C7 28 33  |34)"C64 DT.C".(3|
000008D0: 34 29 22 2C 38 22 00 E8  10 40 10 99 22 11 11 11  |4)",8"...@.."...|
000008E0: 11 52 55 4E 34 30 30 30  00 EE 10 41 10 8F 00 F4  |.RUN4000...A....|
000008F0: 10 43 10 8F 00 14 11 4A  10 41 24 B2 22 13 22 3A  |.C.....J.A$.".":|
00000900: 81 41 B2 31 A4 38 3A 41  24 B2 41 24 AA C7 28 31  |.A.1.8:A$.A$..(1|
00000910: 33 29 3A 82 00 1E 11 54  10 8D 35 30 30 30 00 24  |3):....T..5000.$|
00000920: 11 87 13 80 00 33 11 88  13 97 31 39 38 2C C3 28  |.....3....198,.(|
00000930: 41 24 29 00 5C 11 92 13  81 41 B2 30 A4 C3 28 41  |A$).\....A.0..(A|
00000940: 24 29 AB 31 3A 97 36 33  31 AA 41 2C C6 28 CA 28  |$).1:.631.A,.(.(|
00000950: 41 24 2C 41 AA 31 2C 31  29 29 3A 82 00 62 11 9C  |A$,A.1,1)):..b..|
00000960: 13 8E 00 00 00                                    |.....           |
.. ....". C64 TAPE  <---> DISK ".:....".
  ADAPTED FOR C64".S...."  BY DOUG PRING
LE".....B$.".":.A.1.39:B$.B$." ":.:B$.B$
."..".G(13)......".SAVE TO .D.ISK OR .T.
APE"...(.."? T.":.A$.J.-..8,8,15:.8,"I":
 8...2..A$."T".2000...<..A$.."D".."..":.
40...... TAPE TO DISK.!.... SAVES ALL PR
OGRAMS ON.4.... TAPE TO DISK.H....1,8,15
:.1,"I0".C....".PRESS PLAY ON TAPE".|...
Z.B(1).16:.Z.16.1036.....QU$.G(34):.".LO
AD"............5,8,15:.5,"I0".D...A$."."
.G(13)."...".....A$.A$.".SAVE ".QU$.G(13
).G(13)...$.."..".22)QU$",8:LO"QU$"C64 D
T.C"QU$",8"".&.&.."....RUN1040.0....5000
.6.8...I.P.. DISK TO TAPE._.Z..". DISK T
O TAPE"......"..C.OPY ALL FILES OR     .
S.ELECTIONS"......"? S.":.A$... ..A$.."C
".A$.."S".2070.X.*..A$."C"..1022,0:.1023
,1:.3240...4..5,8,15:.5,"S0:SELECTIONS".
..>..3,8,4,"0:SELECTIONS,S,W".-...RC.0:C
.0:.1,8,0,"$".G.B..#1,A$,A$,A$,A$,A$,A$.
_.C..#1,A$:.A$.."".3011.S.L..#1,A$,A$,A$
,A$...V..FL. 1:FL.0:.3000...W..#1,A$:.A$
..G(34).A$.."B".3031.G.Y..A$."B". 1:FL..
1:.3090......#1,A$:.A$.G(34).3060.....D$
.D$.A$:.3040......#1,A$:.A$.."S".A$.."U"
.A$.."P".3060.6....A$.."P".D$."":.3011.Z
...A$(C).D$:C.C.1:D$."":.C.10.3011.....
".":.A.0.9:.A;G(34)A$(A)G(34):......."..
TYPE 'X' TO ESCAPE......"TYPE '*' TO STA
RT SAVING.Y...."ENTER CHOICE ? -...";:.A
$......A$."X"........A$."*".3200.).&..A$
."-"..A.0.9:A$(A)."":.:C.0:RC.RC.10:.303
0.H.0..A$."0".A$."9".."..":.3100.F.1..A$
(E(A$))."".."..":.3100.}.:..3,E(A$).RC;G
(13);...D.."..":.3100......3,"155"G(13);
: 3......1022,1:.1023,1.A....4000.M....1
023,0... ..B(1022).0.F.B(1023):.4020....
..3,8,4,"0:SELECTIONS,S,R"."....A.1.B(10
23):.3,F:..)... 3.9....F.155. 1:..M....1
023,B(1023).1.U... 1:.1,8,0,"$":.#1,A$,A
$,A$,A$,A$,A$......#1,A$:.A$.."".4031...
...F.0.4060...C..A.1.F:.#1,A$,A$,A$,A$.O
.D..#1,A$:.A$."B".  1:....E..#1,A$:.A$..
G(34).4037...H..#1,A$:.A$..G(34).4040...
J..#1,A$:.A$.."P".A$.."S".A$.."U".4042.`
.K..A$.."P"..#1,A$,A$,A$,A$,A$,A$,A$,A$,
A$:.4036.Y.R..#1,A$,A$,A$,A$,A$:.......#
1,A$:.A$..G(34).A$.."B".4060......A$."B"
.  1:..H....#1,A$:.A$.G(34).4080.....F$.
F$.A$:.4070......#1,A$:.A$.."P".A$.."S".
A$.."U".4080.#....A$.."P".F.F.1:F$."":.4
092.-....4100.E....#1,A$:.A$.."".4092._.
...#1,A$,A$,A$,A$:.4060.O...A$.F$:F$."".
.."..".LOAD"G(34)A$G(34)",8"...#. 1...,.
.".....SA"G(34)A$G(34).V.6.."......LO"G(
34)"C64 DT.C"G(34)",8"...@.."....RUN4000
...A.....C.....J.A$.".":.A.1.8:A$.A$.G(1
3):....T..5000.$.....3....198,C(A$).\...
.A.0.C(A$).1:.631.A,F(J(A$,A.1,1)):..B..
.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL