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

DIRECTORYSORT V2

FILE INFORMATION

FILENAME(S): DIRECTORYSORT V2

FILE TYPE(S): PRG

FILE SIZE: 2.5K

FIRST SEEN: 2025-12-01 02:21:05

APPEARS ON: 1 disk(s)

FILE HASH

c83af651c34c949dbac7cf6694227fdbcffc784d60b8ade317f67eb11a540c0d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
EKONOMI DIRECTORYSORT V2 PRG hedning, scooby 13 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 12 08 FA CF 9E 32  30 36 36 20 43 2E 43 2E  |.......2066 C.C.|
00000010: 53 2E 00 A0 00 78 E6 01  B9 23 08 99 FD 00 C8 D0  |S....x...#......|
00000020: F7 4C FF 00 3B 11 A0 9D  B9 3B 11 99 FF 07 88 D0  |.L..;....;......|
00000030: F7 A9 01 85 52 85 51 85  50 20 5F 01 D0 1B 20 5F  |....R.Q.P _... _|
00000040: 01 D0 04 C6 52 F0 F7 85  62 20 5F 01 85 50 A5 52  |....R...b _..P.R|
00000050: D0 05 20 5F 01 85 51 A5  62 20 6C 01 A6 50 D0 02  |.. _..Q.b l..P..|
00000060: C6 51 C6 50 D0 F3 A6 51  E0 01 D0 ED A5 3A C9 07  |.Q.P...Q.....:..|
00000070: D0 BF A9 FB 85 2D 85 AE  A9 CF 85 2E 85 AF C6 01  |.....-..........|
00000080: 20 59 A6 4C AE A7 B1 FD  A6 FD D0 02 C6 FE C6 FD  | Y.L............|
00000090: C9 3D 60 91 39 A6 39 D0  02 C6 3A C6 39 60 5A 55  |.=`.9.9...:.9`ZU|
000000A0: 28 4E 4F AA 45 4E AB 31  29 29 3B 3A 8E 00 B9 08  |(NO.EN.1));:....|
000000B0: 06 00 8B 4E 4F B2 30 A7  8E 00 FE 08 07 00 9E 35  |...NO.0........5|
000000C0: 33 30 35 36 2C 31 2C 32  2C 32 2C 32 33 2C 31 38  |3056,1,2,2,23,18|
000000D0: 3A 4E 4F B2 4E 4F AB 31  3A 97 32 31 34 2C 32 3A  |:NO.NO.1:.214,2:|
000000E0: 97 32 31 31 2C 32 3A 9E  35 38 37 33 32 3A 99 4E  |.211,2:.58732:.N|
000000F0: 41 24 28 5A 55 28 4E 4F  AA 31 29 29 3A 8E 00 61  |A$(ZU(NO.1)):..a|
00000100: 09 08 00 99 22 93 9E 12  22 A3 31 32 29 22 44 49  |...."...".12)"DI|
00000110: 52 45 43 54 4F 52 59 53  4F 52 54 20 56 32 22 3A  |RECTORYSORT V2":|
00000120: 99 A3 31 32 29 22 10 2D  3D 22 3A 99 22 9F 11 20  |..12)".-=":.".. |
00000130: 44 49 53 4B 45 54 54 45  20 45 49 4E 4C 45 47 45  |DISKETTE EINLEGE|
00000140: 4E 20 55 4E 44 20 54 41  53 54 45 20 44 52 55 45  |N UND TASTE DRUE|
00000150: 43 4B 45 4E 00 72 09 09  00 A1 54 24 3A 8B 54 24  |CKEN.r....T$:.T$|
00000160: B2 22 22 A7 39 00 A5 09  0A 00 99 22 13 11 11 11  |."".9......"....|
00000170: 25 20 3D 22 3A 8E 00 06  0A 0B 00 97 35 33 32 38  |% =":.......5328|
00000180: 30 2C 32 3A 97 35 33 32  38 31 2C 32 3A 8D 38 3A  |0,2:.53281,2:.8:|
00000190: 9F 31 2C 38 2C 31 35 2C  22 49 22 3A 86 41 4E 24  |.1,8,15,"I":.AN$|
000001A0: 28 31 34 35 29 2C 4E 41  24 28 31 34 35 29 2C 52  |(145),NA$(145),R|
000001B0: 45 24 28 31 34 35 29 2C  5A 55 28 31 34 36 29 2C  |E$(145),ZU(146),|
000001C0: 53 4E 28 31 39 29 3A 81  49 B2 31 A4 31 38 3A 87  |SN(19):.I.1.18:.|
000001D0: 53 4E 28 49 29 3A 82 00  6B 0A 0C 00 8D 31 3A 9F  |SN(I):..k....1:.|
000001E0: 32 2C 38 2C 32 2C 22 23  22 3A 8D 31 3A 53 B2 31  |2,8,2,"#":.1:S.1|
000001F0: 3A 43 B2 31 3A 4E 24 B2  C7 28 30 29 3A 4E 4E 24  |:C.1:N$..(0):NN$|
00000200: B2 4E 24 AA 4E 24 AA 4E  24 AA 4E 24 AA 4E 24 AA  |.N$.N$.N$.N$.N$.|
00000210: 4E 24 AA 4E 24 AA 4E 24  AA 4E 24 AA 4E 24 3A 4E  |N$.N$.N$.N$.N$:N|
00000220: 55 24 B2 4E 4E 24 AA 4E  4E 24 AA 4E 4E 24 3A 52  |U$.NN$.NN$.NN$:R|
00000230: 45 24 28 30 29 B2 4E 4E  24 AA 4E 24 00 E8 0A 0D  |E$(0).NN$.N$....|
00000240: 00 98 31 2C 22 55 31 20  32 20 30 20 31 38 22 53  |..1,"U1 2 0 18"S|
00000250: 3A 99 22 13 96 22 53 22  9D 20 22 3A A1 23 32 2C  |:.".."S". ":.#2,|
00000260: 54 24 3A A1 23 32 2C 53  24 3A 53 B2 C6 28 53 24  |T$:.#2,S$:S..(S$|
00000270: AA 4E 24 29 3A 81 42 50  B2 30 A4 37 3A 98 31 2C  |.N$):.BP.0.7:.1,|
00000280: 22 42 2D 50 20 32 22 3B  42 50 AC 33 32 AA 32 3A  |"B-P 2";BP.32.2:|
00000290: 9E 35 32 39 39 32 2C 32  2C 33 2C 58 24 3A 41 4E  |.52992,2,3,X$:AN|
000002A0: 24 28 43 29 B2 58 24 3A  8B C8 28 58 24 2C 31 29  |$(C).X$:..(X$,1)|
000002B0: B2 4E 24 A7 82 3A 89 31  35 00 3C 0B 0E 00 9E 35  |.N$..:.15.<....5|
000002C0: 32 39 39 32 2C 32 2C 31  36 2C 58 24 3A 4E 41 24  |2992,2,16,X$:NA$|
000002D0: 28 43 29 B2 58 24 3A 9E  35 32 39 39 32 2C 32 2C  |(C).X$:.52992,2,|
000002E0: 31 31 2C 58 24 3A 52 45  24 28 43 29 B2 58 24 3A  |11,X$:RE$(C).X$:|
000002F0: 5A 55 28 43 29 B2 43 3A  99 22 13 04 1D 3D 22 43  |ZU(C).C:."...="C|
00000300: 22 9D 20 22 3A 43 B2 43  AA 31 3A 82 00 4B 0B 0F  |". ":C.C.1:..K..|
00000310: 00 8B 54 24 B3 B1 22 22  A7 31 33 00 88 0B 10 00  |..T$.."".13.....|
00000320: A0 32 3A 97 36 35 30 2C  31 32 38 3A 99 22 13 11  |.2:.650,128:."..|
00000330: 11 90 3E 9F 91 22 3B 3A  43 50 B2 32 3A 4E 4F B2  |..>..";:CP.2:NO.|
00000340: 30 3A 4E 55 B2 30 3A 45  4E B2 43 3A 8B 45 4E B1  |0:NU.0:EN.C:.EN.|
00000350: 32 33 A7 45 4E B2 32 33  00 B4 0B 11 00 99 C7 28  |23.EN.23.......(|
00000360: 31 33 29 A3 32 29 4E 41  24 28 4E 55 AA 31 29 3B  |13).2)NA$(NU.1);|
00000370: 3A 4E 55 B2 4E 55 AA 31  3A 8B 4E 55 B3 45 4E AB  |:NU.NU.1:.NU.EN.|
00000380: 31 A7 31 37 00 C8 0B 12  00 A1 54 41 24 3A 8B 54  |1.17......TA$:.T|
00000390: 41 24 B2 22 22 A7 31 38  00 F4 0B 13 00 8B 54 41  |A$."".18......TA|
000003A0: 24 B2 22 86 22 AF 43 50  B1 32 A7 43 50 B2 43 50  |$.".".CP.2.CP.CP|
000003B0: AB 31 3A 9E 35 33 30 35  36 2C 30 2C 32 2C 30 2C  |.1:.53056,0,2,0,|
000003C0: 32 33 2C 30 00 09 0C 14  00 8B 54 41 24 B2 22 86  |23,0......TA$.".|
000003D0: 22 AF 43 50 B2 32 A7 8D  36 00 3E 0C 15 00 8B 54  |".CP.2..6.>....T|
000003E0: 41 24 B2 22 87 22 AF 43  50 B3 45 4E AF 4E 4F AA  |A$.".".CP.EN.NO.|
000003F0: 43 50 B3 43 A7 43 50 B2  43 50 AA 31 3A 9E 35 33  |CP.C.CP.CP.1:.53|
00000400: 30 35 36 2C 31 2C 32 2C  30 2C 32 33 2C 30 00 55  |056,1,2,0,23,0.U|
00000410: 0C 16 00 8B 54 41 24 B2  22 87 22 AF 43 50 B1 B2  |....TA$.".".CP..|
00000420: 32 33 A7 8D 33 00 65 0C  17 00 8B 54 41 24 B2 22  |23..3.e....TA$."|
00000430: 85 22 A7 32 39 00 A9 0C  18 00 8B 54 41 24 B2 22  |.".29......TA$."|
00000440: 89 22 AF 43 B3 31 34 35  A7 46 B2 31 3A 43 B2 43  |.".C.145.F.1:C.C|
00000450: AA 31 3A 99 22 96 13 04  1D 3D 22 43 AB 31 22 9D  |.1:."....="C.1".|
00000460: 20 9F 22 3A 45 4E B2 45  4E AA 31 3A 8B 45 4E B1  | .":EN.EN.1:.EN.|
00000470: 32 33 A7 45 4E B2 32 33  00 DD 0C 19 00 8B 54 41  |23.EN.23......TA|
00000480: 24 B2 22 89 22 AF 46 B2  31 A7 46 B2 30 3A 54 45  |$.".".F.1.F.0:TE|
00000490: B2 5A 55 28 4E 4F AA 43  50 AB 31 29 3A 54 45 24  |.ZU(NO.CP.1):TE$|
000004A0: B2 4E 41 24 28 54 45 29  3A 89 33 31 00 ED 0C 1A  |.NA$(TE):.31....|
000004B0: 00 8B 54 41 24 B2 22 8C  22 A7 34 33 00 FD 0C 1B  |..TA$.".".43....|
000004C0: 00 8B 54 41 24 B2 22 8B  22 A7 34 37 00 05 0D 1C  |..TA$.".".47....|
000004D0: 00 89 31 38 00 51 0D 1D  00 54 45 B2 5A 55 28 4E  |..18.Q...TE.ZU(N|
000004E0: 4F AA 43 50 AB 31 29 3A  54 45 24 B2 4E 41 24 28  |O.CP.1):TE$.NA$(|
000004F0: 54 45 29 3A 9E 35 33 30  35 36 2C 30 2C 43 50 2C  |TE):.53056,0,CP,|
00000500: 32 2C 32 33 2C 31 38 3A  8B 43 B1 32 33 A7 45 4E  |2,23,18:.C.23.EN|
00000510: B2 45 4E AA 31 3A 8D 35  3A 45 4E B2 45 4E AB 31  |.EN.1:.5:EN.EN.1|
00000520: 00 76 0D 1E 00 81 49 B2  4E 4F AA 43 50 AB 32 A4  |.v....I.NO.CP.2.|
00000530: 43 AB 31 3A 5A 55 28 49  AA 31 29 B2 5A 55 28 49  |C.1:ZU(I.1).ZU(I|
00000540: AA 32 29 3A 82 00 9A 0D  1F 00 97 32 31 34 2C 43  |.2):.......214,C|
00000550: 50 3A 97 32 31 31 2C 31  39 3A 9E 35 38 37 33 32  |P:.211,19:.58732|
00000560: 3A 99 22 A3 A3 22 54 45  24 00 AE 0D 20 00 A1 54  |:.".."TE$... ..T|
00000570: 41 24 3A 8B 54 41 24 B2  22 22 A7 33 32 00 EE 0D  |A$:.TA$."".32...|
00000580: 21 00 8B 54 41 24 B2 22  86 22 AF 43 50 B1 32 A7  |!..TA$.".".CP.2.|
00000590: 43 50 B2 43 50 AB 31 3A  9E 35 33 30 35 36 2C 30  |CP.CP.1:.53056,0|
000005A0: 2C 32 2C 31 39 2C 32 34  2C 33 37 3A 9E 35 33 30  |,2,19,24,37:.530|
000005B0: 35 36 2C 30 2C 32 2C 30  2C 32 33 2C 30 00 03 0E  |56,0,2,0,23,0...|
000005C0: 22 00 8B 54 41 24 B2 22  86 22 AF 43 50 B2 32 A7  |"..TA$.".".CP.2.|
000005D0: 8D 36 00 44 0E 23 00 8B  54 41 24 B2 22 87 22 AF  |.6.D.#..TA$.".".|
000005E0: 43 50 B3 45 4E A7 43 50  B2 43 50 AA 31 3A 9E 35  |CP.EN.CP.CP.1:.5|
000005F0: 33 30 35 36 2C 31 2C 32  2C 31 39 2C 32 34 2C 33  |3056,1,2,19,24,3|
00000600: 37 3A 9E 35 33 30 35 36  2C 31 2C 32 2C 30 2C 32  |7:.53056,1,2,0,2|
00000610: 33 2C 30 00 5A 0E 24 00  8B 54 41 24 B2 22 87 22  |3,0.Z.$..TA$."."|
00000620: AF 43 50 B2 32 33 A7 8D  33 00 6A 0E 25 00 8B 54  |.CP.23..3.j.%..T|
00000630: 41 24 B2 22 85 22 A7 34  31 00 A6 0E 26 00 8B 54  |A$.".".41...&..T|
00000640: 41 24 B2 22 8A 22 A7 54  45 24 B2 22 10 1D 3D 22  |A$.".".TE$."..="|
00000650: 3A 43 B2 43 AB 31 3A 45  4E B2 43 3A 8B 45 4E B1  |:C.C.1:EN.C:.EN.|
00000660: 32 33 A7 45 4E B2 32 33  00 C9 0E 27 00 8B 54 41  |23.EN.23...'..TA|
00000670: 24 B2 22 8A 22 A7 99 22  13 96 04 1D 3D 22 43 AB  |$.".".."....="C.|
00000680: 31 22 9D 20 9F 22 3A 89  34 32 00 D1 0E 28 00 89  |1". .":.42...(..|
00000690: 33 32 00 1A 0F 29 00 9E  35 33 30 35 36 2C 31 2C  |32...)..53056,1,|
000006A0: 43 50 2C 32 2C 32 33 2C  31 38 3A 81 49 B2 43 AB  |CP,2,23,18:.I.C.|
000006B0: 31 A4 4E 4F AA 43 50 AB  31 A9 AB 31 3A 5A 55 28  |1.NO.CP.1..1:ZU(|
000006C0: 49 AA 31 29 B2 5A 55 28  49 29 3A 82 3A 5A 55 28  |I.1).ZU(I):.:ZU(|
000006D0: 4E 4F AA 43 50 AB 31 29  B2 54 45 00 52 0F 2A 00  |NO.CP.1).TE.R.*.|
000006E0: 97 32 31 34 2C 43 50 3A  97 32 31 31 2C 32 3A 9E  |.214,CP:.211,2:.|
000006F0: 35 38 37 33 32 3A 99 54  45 24 22 13 20 3D 22 3A  |58732:.TE$". =":|
00000700: 89 31 38 00 86 0F 2B 00  9F 32 2C 38 2C 32 2C 22  |.18...+..2,8,2,"|
00000710: 23 22 3A 54 B2 31 38 3A  81 49 B2 30 A4 B5 28 28  |#":T.18:.I.0..((|
00000720: 43 AB 32 29 AD 38 29 3A  8B 38 AC 49 AA 38 B1 B2  |C.2).8):.8.I.8..|
00000730: 43 AB 31 A7 54 B2 30 00  DF 0F 2C 00 98 31 2C 22  |C.1.T.0...,..1,"|
00000740: 42 2D 50 20 32 20 30 22  3A 98 32 2C C7 28 54 29  |B-P 2 0":.2,.(T)|
00000750: C7 28 53 4E 28 49 AA 32  29 29 3A 81 42 50 B2 30  |.(SN(I.2)):.BP.0|
00000760: A4 37 3A 98 31 2C 22 42  2D 50 20 32 22 3B 42 50  |.7:.1,"B-P 2";BP|
00000770: AC 33 32 AA 32 3A 8B 42  50 AA 38 AC 49 AA 31 B1  |.32.2:.BP.8.I.1.|
00000780: B2 43 A7 98 32 2C 4E 55  24 3B 3A 82 3A 89 34 36  |.C..2,NU$;:.:.46|
00000790: 00 1D 10 2D 00 98 32 2C  41 4E 24 28 5A 55 28 42  |...-..2,AN$(ZU(B|
000007A0: 50 AA 38 AC 49 AA 31 29  29 4E 41 24 28 5A 55 28  |P.8.I.1))NA$(ZU(|
000007B0: 42 50 AA 38 AC 49 AA 31  29 29 52 45 24 28 5A 55  |BP.8.I.1))RE$(ZU|
000007C0: 28 42 50 AA 38 AC 49 AA  31 29 29 3B 3A 82 00 52  |(BP.8.I.1));:..R|
000007D0: 10 2E 00 98 31 2C 22 55  32 20 32 20 30 20 31 38  |....1,"U2 2 0 18|
000007E0: 22 53 4E 28 49 AA 31 29  3A 99 22 96 13 22 A3 33  |"SN(I.1):."..".3|
000007F0: 36 29 53 4E 28 49 AA 31  29 22 9D 20 9F 22 3A 8D  |6)SN(I.1)". .":.|
00000800: 31 3A 82 00 8E 10 2F 00  A0 32 3A 8D 38 3A 89 31  |1:..../..2:.8:.1|
00000810: 32 3A 83 31 2C 34 2C 37  2C 31 30 2C 31 33 2C 31  |2:.1,4,7,10,13,1|
00000820: 36 2C 32 2C 35 2C 38 2C  31 31 2C 31 34 2C 31 37  |6,2,5,8,11,14,17|
00000830: 2C 33 2C 36 2C 39 2C 31  32 2C 31 35 2C 31 38 BF  |,3,6,9,12,15,18.|
00000840: 73 00 3D 3D 20 FD AE 20  9E B7 20 1E E1 20 FD AE  |s.== .. .. .. ..|
00000850: 20 9E B7 8A 48 20 FD AE  20 8B B0 85 49 84 4A 20  | ...H .. ...I.J |
00000860: A3 B6 68 20 75 B4 A0 02  B9 61 00 91 49 88 10 F8  |..h u....a..I...|
00000870: C8 20 12 E1 91 62 C8 C4  61 D0 F6 20 CC FF 60 05  |. ...b..a.. ..`.|
00000880: 00 3D 20 F5 CF 8A 48 20  F5 CF E0 00 B0 03 4C 48  |.= ...H ......LH|
00000890: B2 E0 18 B0 F9 86 FB 20  F5 CF E0 00 90 F0 E0 27  |....... .......'|
000008A0: B0 EC 86 FD 20 F5 CF E0  19 B0 E3 86 FC E8 8A 38  |.... ..........8|
000008B0: E5 FB 90 DA F0 D8 85 FA  20 F5 CF E0 28 B0 CF E4  |........ ...(...|
000008C0: FD 90 CB 86 FE 68 AA A5  AC 48 A5 AD 48 A5 AE 48  |.....h...H..H..H|
000008D0: A5 AF 48 E0 00 D0 16 A6  FB C6 FA F0 2C 20 F0 E9  |..H........., ..|
000008E0: E8 BD F0 EC 85 AC B5 D9  20 DB CF 30 EC CA F0 03  |........ ..0....|
000008F0: 4C 48 B2 A6 FC C6 FA F0  10 20 F0 E9 CA BD F0 EC  |LH....... ......|
00000900: 85 AC B5 D9 20 DB CF 30  EC A4 FE 20 F0 E9 20 24  |.... ..0... .. $|
00000910: EA A9 20 91 D1 88 C4 FD  10 F9 4C 58 E9 29 03 0D  |.. .......LX.)..|
00000920: 88 02 85 AD 20 E0 E9 A4  FE B1 AC 91 D1 B1 AE 91  |.... ...........|
00000930: F3 88 C4 FD 10 F3 60 20  FD AE 4C 9E B7 00 1A 08  |......` ..L.....|
00000940: 00 00 97 34 35 2C 31 34  34 3A 97 34 36 2C 31 36  |...45,144:.46,16|
00000950: 3A 9C 3A 89 31 31 00 35  08 01 00 84 31 2C 46 31  |:.:.11.5....1,F1|
00000960: 2C 46 24 2C 46 32 2C 46  33 3A 8B 46 31 B2 30 A7  |,F$,F2,F3:.F1.0.|
00000970: 8E 00 4F 08 02 00 99 22  9F 11 22 46 31 3B 46 24  |..O....".."F1;F$|
00000980: 2C 46 32 3B 46 33 22 90  22 3A 80 00 5F 08 03 00  |,F2;F3".":.._...|
00000990: 8B 4E 4F AA 45 4E B1 B2  43 A7 8E 00 7E 08 04 00  |.NO.EN..C...~...|
000009A0: 9E 35 33 30 35 36 2C 30  2C 32 2C 32 2C 32 33 2C  |.53056,0,2,2,23,|
000009B0: 31 38 3A 4E 4F B2 4E 4F  AA 31 00 AD 08 05 00 97  |18:NO.NO.1......|
000009C0: 32 31 34 2C 32 33 3A 97  32 31 31 2C 32 3A 9E 35  |214,23:.211,2:.5|
000009D0: 38 37 33 32 3A 99 4E 41  24 28                    |8732:.NA$(      |
.....O.2066 C.C.S.. .X...#....HP.L..;. .
.;.....P....R.Q.P _.P. _.P.FR...B _..P.R
P. _..Q.B L..PP.FQFPP..Q..P..:I.P....-..
.O....F. Y.L......P.F.F.I=`.9.9P.F:F9`ZU
(NO.EN.1));:.......NO.0........53056,1,2
,2,23,18:NO.NO.1:.214,2:.211,2:.58732:.N
A$(ZU(NO.1)):..A...."...".12)"DIRECTORYS
ORT V2":..12)".-=":.".. DISKETTE EINLEGE
N UND TASTE DRUECKEN.R....T$:.T$."".9...
..."....% =":.......53280,2:.53281,2:.8:
.1,8,15,"I":.AN$(145),NA$(145),RE$(145),
ZU(146),SN(19):.I.1.18:.SN(I):..K....1:.
2,8,2,"#":.1:S.1:C.1:N$.G(0):NN$.N$.N$.N
$.N$.N$.N$.N$.N$.N$.N$:NU$.NN$.NN$.NN$:R
E$(0).NN$.N$......1,"U1 2 0 18"S:.".."S"
. ":.#2,T$:.#2,S$:S.F(S$.N$):.BP.0.7:.1,
"B-P 2";BP.32.2:.52992,2,3,X$:AN$(C).X$:
.H(X$,1).N$..:.15.<....52992,2,16,X$:NA$
(C).X$:.52992,2,11,X$:RE$(C).X$:ZU(C).C:
."...="C". ":C.C.1:..K....T$.."".13.....
 2:.650,128:."....>..";:CP.2:NO.0:NU.0:E
N.C:.EN.23.EN.23......G(13).2)NA$(NU.1);
:NU.NU.1:.NU.EN.1.17.H....TA$:.TA$."".18
......TA$.".".CP.2.CP.CP.1:.53056,0,2,0,
23,0......TA$.".".CP.2..6.>....TA$.".".C
P.EN.NO.CP.C.CP.CP.1:.53056,1,2,0,23,0.U
....TA$.".".CP..23..3.E....TA$.".".29...
...TA$.".".C.145.F.1:C.C.1:."....="C.1".
 .":EN.EN.1:.EN.23.EN.23......TA$.".".F.
1.F.0:TE.ZU(NO.CP.1):TE$.NA$(TE):.31....
..TA$.".".43......TA$.".".47......18.Q..
.TE.ZU(NO.CP.1):TE$.NA$(TE):.53056,0,CP,
2,23,18:.C.23.EN.EN.1:.5:EN.EN.1.V....I.
NO.CP.2.C.1:ZU(I.1).ZU(I.2):.......214,C
P:.211,19:.58732:.".."TE$... ..TA$:.TA$.
"".32...!..TA$.".".CP.2.CP.CP.1:.53056,0
,2,19,24,37:.53056,0,2,0,23,0..."..TA$."
.".CP.2..6.D.#..TA$.".".CP.EN.CP.CP.1:.5
3056,1,2,19,24,37:.53056,1,2,0,23,0.Z.$.
.TA$.".".CP.23..3.J.%..TA$.".".41...&..T
A$.".".TE$."..=":C.C.1:EN.C:.EN.23.EN.23
.I.'..TA$.".".."....="C.1". .":.42.Q.(..
32...)..53056,1,CP,2,23,18:.I.C.1.NO.CP.
1..1:ZU(I.1).ZU(I):.:ZU(NO.CP.1).TE.R.*.
.214,CP:.211,2:.58732:.TE$". =":.18...+.
.2,8,2,"#":T.18:.I.0..((C.2).8):.8.I.8..
C.1.T.0...,..1,"B-P 2 0":.2,G(T)G(SN(I.2
)):.BP.0.7:.1,"B-P 2";BP.32.2:.BP.8.I.1.
.C..2,NU$;:.:.46...-..2,AN$(ZU(BP.8.I.1)
)NA$(ZU(BP.8.I.1))RE$(ZU(BP.8.I.1));:..R
....1,"U2 2 0 18"SN(I.1):."..".36)SN(I.1
)". .":.1:..../. 2:.8:.12:.1,4,7,10,13,1
6,2,5,8,11,14,17,3,6,9,12,15,18.S.== .. 
.. .. .. ...H .. ...I.J ..H U. ..A..I...
H ...BHDAP. L.`..= .O.H .O....LH....... 
.O.....'.... .O........8...Z.X.. .O.(.O.
..K..H...H..H..H..H..P...F.., .........Y
 .O0.J..LH...F... ..J......Y .O0... .. $
.. .Q.D...LX.)...... .......Q.....D...` 
..L........45,144:.46,16:.:.11.5....1,F1
,F$,F2,F3:.F1.0...O....".."F1;F$,F2;F3".
":.._....NO.EN..C...~....53056,0,2,2,23,
18:NO.NO.1......214,23:.211,2:.58732:.NA
$(
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL