DUP
FILE INFORMATION
FILENAME(S): DUP
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-12-01 13:47:47
APPEARS ON: 1 disk(s)
FILE HASH
3ff5aa9e8d50441ba8b9c53e8d1faf0e0a421ffccd5edab51b0b7e053fe88014
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK NR15 | DUP | PRG | hedning, Zeta | 26 | 14 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 BD 08 01 00 9C 3A 97 36 35 30 2C 30 30 33 |.......:.650,003|
00000010: 3A 97 35 33 32 38 30 2C 31 3A 97 35 33 32 38 31 |:.53280,1:.53281|
00000020: 2C 31 3A 99 22 1C 22 3A 99 22 93 11 11 44 49 53 |,1:.".":."...DIS|
00000030: 4B 20 55 53 45 52 20 50 52 4F 47 52 41 4D 20 42 |K USER PROGRAM B|
00000040: 59 20 44 41 4E 49 45 4C 20 4A 4F 48 4E 53 53 4F |Y DANIEL JOHNSSO|
00000050: 4E 22 3A 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |N":."...........|
00000060: 1D 31 20 39 20 38 20 34 22 3A 99 22 11 11 1D 1D |.1 9 8 4":."....|
00000070: 1D 1D 43 4F 50 59 52 49 47 48 54 20 4A 4F 53 4F |..COPYRIGHT JOSO|
00000080: 2D 53 4F 46 54 57 41 52 45 22 3A 99 22 11 11 11 |-SOFTWARE":."...|
00000090: 1D 1D 31 20 53 4F 52 54 45 52 41 20 44 49 52 45 |..1 SORTERA DIRE|
000000A0: 43 54 4F 52 59 22 3A 99 22 11 1D 1D 32 20 56 49 |CTORY":."...2 VI|
000000B0: 53 41 20 44 49 52 45 43 54 4F 52 59 22 00 25 09 |SA DIRECTORY".%.|
000000C0: 09 00 99 22 11 1D 1D 33 20 53 43 52 41 54 43 48 |..."...3 SCRATCH|
000000D0: 41 20 46 49 4C 45 52 22 3A 99 22 11 1D 1D 34 20 |A FILER":."...4 |
000000E0: 5B 4E 44 52 41 20 44 49 53 4B 45 54 54 45 4E 53 |[NDRA DISKETTENS|
000000F0: 20 4E 41 4D 4E 22 3A 99 22 11 1D 1D 35 20 5B 4E | NAMN":."...5 [N|
00000100: 44 52 41 20 44 49 53 4B 45 54 54 45 4E 53 20 49 |DRA DISKETTENS I|
00000110: 44 4B 4F 44 22 3A 99 22 11 1D 1D 36 20 41 56 53 |DKOD":."...6 AVS|
00000120: 4C 55 54 41 22 00 5E 09 0D 00 99 22 11 11 56 41 |LUTA".^...."..VA|
00000130: 44 20 56 5B 4C 4A 45 52 20 44 55 20 28 31 2D 36 |D V[LJER DU (1-6|
00000140: 29 3F 22 3A A1 45 57 3A 8B 45 57 B3 31 B0 45 57 |)?":.EW:.EW.1.EW|
00000150: B1 36 A7 99 22 91 91 91 91 22 3A 89 31 33 00 6F |.6.."....":.13.o|
00000160: 09 10 00 8B 45 57 B2 36 A7 9E 36 34 37 33 38 00 |....EW.6..64738.|
00000170: 89 09 11 00 91 45 57 89 31 38 2C 38 30 2C 31 30 |.....EW.18,80,10|
00000180: 35 2C 31 33 39 2C 31 37 34 00 20 0A 12 00 97 35 |5,139,174. ....5|
00000190: 33 32 38 30 2C 31 3A 97 35 33 32 38 31 2C 31 3A |3280,1:.53281,1:|
000001A0: 99 22 1C 22 3A 9C 3A 99 22 93 11 11 11 1D 1D 1D |.".":.:.".......|
000001B0: 1D 1D 53 4F 52 54 45 52 49 4E 47 20 41 56 20 50 |..SORTERING AV P|
000001C0: 52 4F 47 52 41 4D 4E 41 4D 4E 22 3A 99 22 11 11 |ROGRAMNAMN":."..|
000001D0: 1D 1D 1D 20 20 20 20 20 20 50 5D 20 20 44 49 53 |... P] DIS|
000001E0: 4B 45 54 54 45 52 2E 22 3A 99 22 11 11 50 52 4F |KETTER.":."..PRO|
000001F0: 47 52 41 4D 4D 45 44 20 42 59 20 1F 44 41 4E 49 |GRAMMED BY .DANI|
00000200: 45 4C 20 4A 4F 48 4E 53 53 4F 4E 20 1C 38 34 30 |EL JOHNSSON .840|
00000210: 31 32 30 22 3A 81 54 B2 31 A4 34 39 39 39 3A 82 |120":.T.1.4999:.|
00000220: 00 E5 0A 17 00 99 22 93 11 11 11 11 11 11 11 1D |......".........|
00000230: 1D 1D 1D 1D 1D 1D 1D 1D 53 5B 54 54 20 49 20 45 |........S[TT I E|
00000240: 4E 20 44 49 53 4B 45 54 54 22 3A 99 22 11 11 1D |N DISKETT":."...|
00000250: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 5D 20 53 4B |...........S] SK|
00000260: 41 4C 4C 20 4A 41 47 22 3A 99 22 11 11 1D 1D 1D |ALL JAG":.".....|
00000270: 1D 1D 1D 1D 53 4F 52 54 45 52 41 20 20 44 45 53 |....SORTERA DES|
00000280: 53 20 44 49 52 45 43 54 4F 52 59 22 3A 99 22 11 |S DIRECTORY":.".|
00000290: 11 11 11 11 81 50 2E 53 20 47 4C 5C 4D 20 49 4E |.....P.S GL\M IN|
000002A0: 54 45 20 41 54 54 20 54 41 20 42 4F 52 54 20 53 |TE ATT TA BORT S|
000002B0: 4B 52 49 56 53 4B 59 44 44 45 54 22 3A 99 22 11 |KRIVSKYDDET":.".|
000002C0: 11 1D 1D 1D 1D 1D 1D 1D 99 50 52 45 53 53 20 12 |.........PRESS .|
000002D0: 90 53 50 41 43 45 92 99 20 57 48 45 4E 20 52 45 |.SPACE.. WHEN RE|
000002E0: 41 44 59 2E 22 00 FC 0A 1C 00 A1 44 4A 24 3A 8B |ADY."......DJ$:.|
000002F0: 44 4A 24 B3 B1 22 20 22 A7 20 32 38 00 35 0B 1D |DJ$.." ". 28.5..|
00000300: 00 86 50 4E 24 28 32 32 34 29 2C 53 50 28 32 39 |..PN$(224),SP(29|
00000310: 29 2C 53 45 28 32 39 29 3A 4E 24 B2 C7 28 30 29 |),SE(29):N$..(0)|
00000320: 3A 81 49 B2 31 A4 33 30 3A 42 4C 24 B2 42 4C 24 |:.I.1.30:BL$.BL$|
00000330: AA 4E 24 3A 82 00 63 0B 22 00 46 4C 25 B2 30 3A |.N$:..c.".FL%.0:|
00000340: 44 52 25 B2 30 3A 53 4F B2 31 3A 53 50 25 B2 31 |DR%.0:SO.1:SP%.1|
00000350: 38 3A 53 45 25 B2 31 3A 8B 46 4C 25 A7 53 50 25 |8:SE%.1:.FL%.SP%|
00000360: B2 33 39 00 DB 0B 27 00 9F 31 35 2C 38 2C 31 35 |.39...'..15,8,15|
00000370: 2C 22 49 22 AA C4 28 44 52 25 29 3A 8D 37 37 3A |,"I"..(DR%):.77:|
00000380: 9F 32 2C 38 2C 32 2C 22 23 22 3A 8D 37 37 3A 99 |.2,8,2,"#":.77:.|
00000390: 22 93 12 20 50 52 4F 47 52 41 4D 4E 41 4D 4E 20 |".. PROGRAMNAMN |
000003A0: 20 4F 53 4F 52 54 45 52 41 44 45 20 20 20 20 20 | OSORTERADE |
000003B0: 20 20 20 11 22 3A 99 22 1F 43 4F 50 59 52 49 47 | .":.".COPYRIG|
000003C0: 48 54 20 44 2E 4A 4F 48 4E 53 53 4F 4E 20 38 34 |HT D.JOHNSSON 84|
000003D0: 30 31 32 30 22 3A 99 22 11 1C 22 00 2E 0C 2B 00 |0120":.".."...+.|
000003E0: 98 31 35 2C 22 55 31 20 22 3B 32 3B 44 52 25 3B |.15,"U1 ";2;DR%;|
000003F0: 53 50 25 3B 53 45 25 3A 53 50 28 53 4E 29 B2 53 |SP%;SE%:SP(SN).S|
00000400: 50 25 3A 53 45 28 53 4E 29 B2 53 45 25 3A 8D 37 |P%:SE(SN).SE%:.7|
00000410: 36 3A 53 50 25 B2 C6 28 45 24 29 3A 8D 37 36 3A |6:SP%..(E$):.76:|
00000420: 53 45 25 B2 C6 28 45 24 29 3A 50 5A B2 32 00 55 |SE%..(E$):PZ.2.U|
00000430: 0C 30 00 98 31 35 2C 22 42 2D 50 22 3B 32 3B 50 |.0..15,"B-P";2;P|
00000440: 5A 3A 4E 4E B2 4E 4E AA 31 3A 81 49 B2 31 A4 33 |Z:NN.NN.1:.I.1.3|
00000450: 30 3A 8D 37 36 00 A0 0C 32 00 50 4E 24 28 4E 4E |0:.76...2.PN$(NN|
00000460: 29 B2 50 4E 24 28 4E 4E 29 AA 45 24 3A 82 3A 8B |).PN$(NN).E$:.:.|
00000470: C6 28 C8 28 50 4E 24 28 4E 4E 29 2C 31 29 29 B2 |.(.(PN$(NN),1)).|
00000480: 30 A7 50 4E 24 28 4E 4E 29 B2 22 22 3A 4E 4E B2 |0.PN$(NN)."":NN.|
00000490: 4E 4E AB 31 3A 44 45 B2 44 45 AA 31 3A 89 35 35 |NN.1:DE.DE.1:.55|
000004A0: 00 CF 0C 34 00 81 49 B2 31 39 A4 35 A9 AB 31 3A |...4..I.19.5..1:|
000004B0: 8B CA 28 50 4E 24 28 4E 4E 29 2C 49 2C 31 29 B3 |..(PN$(NN),I,1).|
000004C0: B1 C7 28 31 36 30 29 A7 49 B2 35 3A 89 35 34 00 |..(160).I.5:.54.|
000004D0: FE 0C 35 00 50 4E 24 28 4E 4E 29 B2 C8 28 50 4E |..5.PN$(NN)..(PN|
000004E0: 24 28 4E 4E 29 2C 49 AB 31 29 AA 22 20 22 AA C9 |$(NN),I.1)." "..|
000004F0: 28 50 4E 24 28 4E 4E 29 2C 33 30 AB 49 29 00 15 |(PN$(NN),30.I)..|
00000500: 0D 36 00 82 3A 99 CA 28 50 4E 24 28 4E 4E 29 2C |.6..:..(PN$(NN),|
00000510: 34 2C 31 36 29 00 2E 0D 37 00 8B 50 5A AB 32 32 |4,16)...7..PZ.22|
00000520: 36 A7 50 5A B2 50 5A AA 33 32 3A 89 34 38 00 48 |6.PZ.PZ.32:.48.H|
00000530: 0D 38 00 8B 53 50 25 A7 50 5A B2 32 3A 53 4E B2 |.8..SP%.PZ.2:SN.|
00000540: 53 4E AA 31 3A 89 34 33 00 55 0D 39 00 8B 44 45 |SN.1:.43.U.9..DE|
00000550: B2 30 A7 36 32 00 79 0D 3A 00 53 4F B2 30 3A 81 |.0.62.y.:.SO.0:.|
00000560: 49 B2 4E 4E AA 31 A4 4E 4E AA 44 45 3A 50 4E 24 |I.NN.1.NN.DE:PN$|
00000570: 28 49 29 B2 42 4C 24 3A 82 00 F7 0D 3E 00 99 22 |(I).BL$:....>.."|
00000580: 93 12 20 46 49 4C 4E 41 4D 4E 45 4E 20 42 4C 49 |.. FILNAMNEN BLI|
00000590: 52 20 4E 55 20 53 4F 52 54 45 52 41 44 45 11 22 |R NU SORTERADE."|
000005A0: 3A 99 22 1F 43 4F 50 59 52 49 47 48 54 20 44 2E |:.".COPYRIGHT D.|
000005B0: 4A 4F 48 4E 53 53 4F 4E 20 38 34 30 31 32 30 11 |JOHNSSON 840120.|
000005C0: 22 3A 81 4A B2 31 A4 4E 4E AB 31 3A 81 49 B2 4A |":.J.1.NN.1:.I.J|
000005D0: AA 31 A4 4E 4E 3A 8B CA 28 50 4E 24 28 49 29 2C |.1.NN:..(PN$(I),|
000005E0: 34 2C 31 36 29 B1 CA 28 50 4E 24 28 4A 29 2C 34 |4,16)..(PN$(J),4|
000005F0: 2C 31 36 29 A7 36 35 00 2C 0E 40 00 4E 24 B2 50 |,16).65.,.@.N$.P|
00000600: 4E 24 28 49 29 3A 50 4E 24 28 49 29 B2 50 4E 24 |N$(I):PN$(I).PN$|
00000610: 28 4A 29 3A 50 4E 24 28 4A 29 B2 4E 24 3A 99 4A |(J):PN$(J).N$:.J|
00000620: 3B 22 13 11 11 11 22 3A 53 4F B2 30 00 58 0E 41 |;"....":SO.0.X.A|
00000630: 00 82 49 2C 4A 3A 81 4A B2 31 A4 4E 4E 3A 99 CA |..I,J:.J.1.NN:..|
00000640: 28 50 4E 24 28 4A 29 2C 34 2C 31 36 29 3A 81 49 |(PN$(J),4,16):.I|
00000650: B2 31 39 A4 35 A9 AB 31 00 78 0E 42 00 8B CA 28 |.19.5..1.x.B...(|
00000660: 50 4E 24 28 4A 29 2C 49 2C 31 29 B3 B1 22 20 22 |PN$(J),I,1).." "|
00000670: A7 49 B2 35 3A 89 36 38 00 A7 0E 43 00 50 4E 24 |.I.5:.68...C.PN$|
00000680: 28 4A 29 B2 C8 28 50 4E 24 28 4A 29 2C 49 AB 31 |(J)..(PN$(J),I.1|
00000690: 29 AA C7 28 31 36 30 29 AA C9 28 50 4E 24 28 4A |)..(160)..(PN$(J|
000006A0: 29 2C 33 30 AB 49 29 00 E8 0E 44 00 82 49 2C 4A |),30.I)...D..I,J|
000006B0: 3A 8B 53 4F A7 82 3A 99 22 12 53 4E 41 52 54 20 |:.SO..:.".SNART |
000006C0: 20 46 5B 52 44 49 47 54 21 07 07 07 22 3A 99 22 | F[RDIGT!...":."|
000006D0: 1F 43 4F 50 59 52 49 47 48 54 20 44 2E 4A 4F 48 |.COPYRIGHT D.JOH|
000006E0: 4E 53 53 4F 4E 22 3A 80 00 21 0F 48 00 50 4E 25 |NSSON":..!.H.PN%|
000006F0: B2 31 3A 81 4A B2 30 A4 53 4E 3A 98 31 35 2C 22 |.1:.J.0.SN:.15,"|
00000700: 42 2D 50 20 22 3B 32 3B 30 3A 98 32 2C C7 28 53 |B-P ";2;0:.2,.(S|
00000710: 50 28 4A AA 31 29 29 C7 28 53 45 28 4A AA 31 29 |P(J.1)).(SE(J.1)|
00000720: 29 00 61 0F 49 00 50 5A B2 32 3A 81 49 B2 31 A4 |).a.I.PZ.2:.I.1.|
00000730: 38 3A 98 31 35 2C 22 42 2D 50 20 22 3B 32 3B 50 |8:.15,"B-P ";2;P|
00000740: 5A 3A 98 32 2C 50 4E 24 28 50 4E 25 29 3B 3A 50 |Z:.2,PN$(PN%);:P|
00000750: 4E 25 B2 50 4E 25 AA 31 3A 50 5A B2 50 5A AA 33 |N%.PN%.1:PZ.PZ.3|
00000760: 32 00 9B 0F 4A 00 82 3A 98 31 35 2C 22 55 32 20 |2...J..:.15,"U2 |
00000770: 22 3B 32 3B 44 52 25 3B 53 50 28 4A 29 3B 53 45 |";2;DR%;SP(J);SE|
00000780: 28 4A 29 3A 82 3A A0 31 35 3A 99 22 12 46 5B 52 |(J):.:.15:.".F[R|
00000790: 44 49 47 07 07 07 22 3A 89 37 39 00 A3 0F 4B 00 |DIG...":.79...K.|
000007A0: 89 37 39 00 BF 0F 4C 00 A1 23 32 2C 45 24 3A 45 |.79...L..#2,E$:E|
000007B0: 24 B2 C7 28 C6 28 45 24 AA 4E 24 29 29 3A 8E 00 |$..(.(E$.N$)):..|
000007C0: CB 0F 4D 00 8B 44 53 B2 30 A7 8E 00 DA 0F 4E 00 |..M..DS.0.....N.|
000007D0: 99 44 53 24 3A 82 3A 89 37 39 00 02 10 4F 00 81 |.DS$:.:.79...O..|
000007E0: 54 B2 30 A4 32 35 35 3A 97 35 33 32 38 30 2C 54 |T.0.255:.53280,T|
000007F0: 3A 97 35 33 32 38 31 2C 32 35 35 AB 54 3A 82 3A |:.53281,255.T:.:|
00000800: 89 31 00 63 10 50 00 3A 3A 97 35 33 32 38 30 2C |.1.c.P.::.53280,|
00000810: 30 3A 97 35 33 32 38 31 2C 30 3A 99 22 9F 22 3A |0:.53281,0:.".":|
00000820: 99 22 93 11 11 11 53 5D 20 48 5B 52 20 53 45 52 |."....S] H[R SER|
00000830: 20 44 49 4E 20 4E 59 41 20 44 49 52 45 43 54 4F | DIN NYA DIRECTO|
00000840: 52 59 20 55 54 22 3A 99 22 11 11 11 22 3A 9F 31 |RY UT":."...":.1|
00000850: 2C 38 2C 30 2C 22 24 30 22 3A A1 23 31 2C 41 24 |,8,0,"$0":.#1,A$|
00000860: 2C 42 24 00 90 10 56 00 A1 23 31 2C 41 24 2C 42 |,B$...V..#1,A$,B|
00000870: 24 3A A1 23 31 2C 41 24 2C 42 24 3A 43 B2 30 3A |$:.#1,A$,B$:C.0:|
00000880: 8B 57 51 B2 30 A7 57 51 B2 31 3A 99 22 12 22 3B |.WQ.0.WQ.1:.".";|
00000890: 00 A7 10 5A 00 8B 20 41 24 B3 B1 22 22 20 A7 20 |...Z.. A$.."" . |
000008A0: 43 B2 C6 28 41 24 29 00 C4 10 5B 00 8B 20 42 24 |C..(A$)...[.. B$|
000008B0: B3 B1 22 22 20 A7 20 43 B2 43 AA C6 28 42 24 29 |.."" . C.C..(B$)|
000008C0: AC 32 35 36 00 DC 10 5C 00 99 CA 28 C4 28 43 29 |.256...\...(.(C)|
000008D0: 2C 32 29 3B A3 33 29 3B 22 20 22 3B 00 F5 10 5D |,2);.3);" ";...]|
000008E0: 00 A1 23 31 2C 42 24 3A 8B 20 53 54 B3 B1 30 20 |..#1,B$:. ST..0 |
000008F0: A7 20 31 30 31 00 0A 11 5E 00 8B 20 42 24 B3 B1 |. 101...^.. B$..|
00000900: C7 28 33 34 29 20 A7 20 39 33 00 30 11 5F 00 A1 |.(34) . 93.0._..|
00000910: 23 31 2C 42 24 3A 8B 20 42 24 B3 B1 C7 28 33 34 |#1,B$:. B$...(34|
00000920: 29 A7 20 99 42 24 3B 3A 89 39 35 3A 99 22 92 22 |). .B$;:.95:."."|
00000930: 00 4B 11 60 00 A1 23 31 2C 42 24 3A 8B 20 42 24 |.K.`..#1,B$:. B$|
00000940: B2 C7 28 33 32 29 20 A7 20 39 36 00 5D 11 61 00 |..(32) . 96.].a.|
00000950: 99 20 A3 31 38 29 3B 3A 43 24 B2 22 22 00 80 11 |. .18);:C$.""...|
00000960: 62 00 43 24 B2 43 24 AA 42 24 3A A1 23 31 2C 42 |b.C$.C$.B$:.#1,B|
00000970: 24 3A 8B 20 42 24 B3 B1 22 22 20 20 A7 20 39 38 |$:. B$.."" . 98|
00000980: 00 9E 11 63 00 99 A3 32 31 29 3B C8 28 43 24 2C |...c...21);.(C$,|
00000990: 33 29 3A 8B 20 53 54 B2 30 20 A7 20 38 36 00 BA |3):. ST.0 . 86..|
000009A0: 11 65 00 99 22 20 42 4C 4F 43 4B 53 20 46 52 45 |.e.." BLOCKS FRE|
000009B0: 45 22 3A A0 31 3A 89 20 37 39 00 75 12 69 00 97 |E":.1:. 79.u.i..|
000009C0: 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 |53281,0:.53280,0|
000009D0: 3A 99 22 93 22 3A 99 C7 28 35 29 3A 99 A3 38 29 |:.".":..(5):..8)|
000009E0: 22 12 20 20 20 54 41 52 20 42 4F 52 54 20 46 49 |". TAR BORT FI|
000009F0: 4C 45 52 20 20 20 92 22 3A 99 3A 99 A3 33 29 22 |LER .":.:..3)"|
00000A00: 47 4C 5C 4D 20 49 4E 54 45 20 54 41 20 42 4F 52 |GL\M INTE TA BOR|
00000A10: 54 20 53 4B 52 49 56 53 4B 59 44 44 45 54 22 3A |T SKRIVSKYDDET":|
00000A20: 99 3A 99 A3 38 29 22 20 20 54 52 59 43 4B 20 30 |.:..8)" TRYCK 0|
00000A30: 20 56 49 44 20 53 4C 55 54 20 22 3A 99 3A 86 41 | VID SLUT ":.:.A|
00000A40: 24 28 34 35 29 3A 9F 31 35 2C 38 2C 31 35 2C 22 |$(45):.15,8,15,"|
00000A50: 49 22 3A A0 20 31 35 3A 9F 31 2C 38 2C 30 2C 22 |I":. 15:.1,8,0,"|
00000A60: 24 30 22 3A 99 A3 31 29 22 44 49 53 4B 20 49 44 |$0":..1)"DISK ID|
00000A70: 3A 12 20 22 3B 00 8E 12 73 00 A1 23 31 2C 42 24 |:. ";...s..#1,B$|
00000A80: 3A 8B 20 53 54 B3 B1 30 20 A7 20 31 32 32 00 A4 |:. ST..0 . 122..|
00000A90: 12 74 00 8B 20 42 24 B3 B1 C7 28 33 34 29 20 A7 |.t.. B$...(34) .|
00000AA0: 20 31 31 35 00 BD 12 75 00 8B 44 B1 30 A7 99 A3 | 115...u..D.0...|
00000AB0: 39 29 44 22 91 22 3A 99 A3 31 33 29 3B 00 EE 12 |9)D".":..13);...|
00000AC0: 76 00 A1 23 31 2C 42 24 3A 8B 20 42 24 B3 B1 C7 |v..#1,B$:. B$...|
00000AD0: 28 33 34 29 A7 20 99 42 24 3B 3A 41 24 28 44 29 |(34). .B$;:A$(D)|
00000AE0: B2 41 24 28 44 29 AA 42 24 3A 89 31 31 38 00 FA |.A$(D).B$:.118..|
00000AF0: 12 77 00 44 B2 44 AA 31 3A 99 00 16 13 78 00 A1 |.w.D.D.1:....x..|
00000B00: 23 31 2C 42 24 3A 8B 20 42 24 B2 C7 28 33 32 29 |#1,B$:. B$..(32)|
00000B10: 20 A7 20 31 32 30 00 27 13 79 00 8B 20 53 54 B2 | . 120.'.y.. ST.|
00000B20: 30 20 A7 20 31 31 35 00 2E 13 7A 00 A0 31 00 36 |0 . 115...z..1.6|
00000B30: 13 7B 00 85 20 53 00 5B 13 7C 00 8B 53 B2 B1 44 |.{.. S.[.|..S..D|
00000B40: A7 99 22 91 91 22 3A 99 22 20 20 20 20 20 20 20 |.."..":." |
00000B50: 91 22 3A 53 B2 30 3A 89 31 32 34 00 66 13 7D 00 |.":S.0:.124.f.}.|
00000B60: 8B 53 B2 30 A7 31 00 A8 13 7E 00 8B 41 24 28 53 |.S.0.1...~..A$(S|
00000B70: 29 B2 22 53 43 52 41 54 43 48 45 44 22 A7 99 22 |)."SCRATCHED".."|
00000B80: 49 53 20 53 43 52 41 54 43 48 45 44 20 20 20 91 |IS SCRATCHED .|
00000B90: 91 22 3A 99 22 20 20 20 20 20 20 20 20 91 22 3A |.":." .":|
00000BA0: 53 B2 30 3A 89 31 32 33 00 0B 14 7F 00 9F 20 31 |S.0:.123...... 1|
00000BB0: 35 2C 38 2C 31 35 2C 22 49 22 3A 98 31 35 2C 22 |5,8,15,"I":.15,"|
00000BC0: 53 3A 22 41 24 28 53 29 3A A0 20 31 35 3A 99 22 |S:"A$(S):. 15:."|
00000BD0: 53 43 52 41 54 43 48 20 22 41 24 28 53 29 22 91 |SCRATCH "A$(S)".|
00000BE0: 91 22 3A 99 22 20 20 20 20 20 20 20 20 20 91 22 |.":." ."|
00000BF0: 3A 41 24 28 53 29 B2 22 53 43 52 41 54 43 48 45 |:A$(S)."SCRATCHE|
00000C00: 44 22 3A 81 58 B2 31 A4 44 AB 53 00 55 14 84 00 |D":.X.1.D.S.U...|
00000C10: 99 22 91 22 3B 3A 82 3A 99 22 20 20 20 20 20 20 |.".";:.:." |
00000C20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C30: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 8B 44 | ":.D|
00000C40: AB 53 B1 31 A7 81 58 B2 32 A4 44 AB 53 3A 99 22 |.S.1..X.2.D.S:."|
00000C50: 11 22 3B 3A 82 00 62 14 87 00 53 B2 30 3A 89 31 |.";:..b...S.0:.1|
00000C60: 32 33 00 31 15 8B 00 97 35 33 32 38 30 2C 31 3A |23.1....53280,1:|
00000C70: 97 35 33 32 38 31 2C 31 3A 99 22 1C 22 3A 99 22 |.53281,1:.".":."|
00000C80: 93 22 3A 99 22 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |.":."...........|
00000C90: 4E 41 4D 4E 5B 4E 44 52 49 4E 47 20 50 5D 20 44 |NAMN[NDRING P] D|
00000CA0: 49 53 4B 45 54 54 22 3A 99 22 11 11 1D 1D 1D 1D |ISKETT":."......|
00000CB0: 1D 1D 1D 20 20 41 56 20 44 41 4E 49 45 4C 20 4A |... AV DANIEL J|
00000CC0: 4F 48 4E 53 53 4F 4E 22 3A 99 22 11 11 1D 1D 1D |OHNSSON":.".....|
00000CD0: 1D 1D 1D 1D 1D 1D 1D 43 4F 50 59 52 49 47 48 54 |.......COPYRIGHT|
00000CE0: 20 38 34 30 31 32 30 22 3A 99 22 11 11 11 11 53 | 840120":."....S|
00000CF0: 5B 54 54 20 49 4E 20 44 49 53 4B 45 54 54 45 4E |[TT IN DISKETTEN|
00000D00: 20 28 55 54 41 4E 20 53 4B 52 49 56 53 4B 59 44 | (UTAN SKRIVSKYD|
00000D10: 44 29 22 3A 99 A3 38 29 3B 22 11 11 1D 4F 43 48 |D)":..8);"...OCH|
00000D20: 20 54 52 59 43 4B 20 50 5D 20 52 45 54 55 52 4E | TRYCK P] RETURN|
00000D30: 22 00 44 15 91 00 A1 41 24 3A 8B 41 24 B2 22 22 |".D....A$:.A$.""|
00000D40: A7 31 34 35 00 57 15 92 00 8B 41 24 B3 B1 C7 28 |.145.W....A$...(|
00000D50: 31 33 29 A7 31 34 35 00 7D 15 93 00 8D 31 35 35 |13).145.}....155|
00000D60: 3A 99 22 11 20 20 47 41 4D 4C 41 20 44 49 53 4B |:.". GAMLA DISK|
00000D70: 20 4E 41 4D 4E 45 54 3A 20 22 3B 4E 24 00 C6 15 | NAMNET: ";N$...|
00000D80: 95 00 99 22 11 20 20 20 20 4E 59 41 20 44 49 53 |...". NYA DIS|
00000D90: 4B 20 4E 41 4D 4E 45 54 22 3B 3A 85 46 24 3A 8B |K NAMNET";:.F$:.|
00000DA0: C3 28 46 24 29 B1 31 36 A7 99 22 11 20 20 20 20 |.(F$).16..". |
00000DB0: 4D 41 58 20 31 36 20 42 4F 4B 53 54 5B 56 45 52 |MAX 16 BOKST[VER|
00000DC0: 22 3A 89 31 34 39 00 00 16 97 00 8D 31 36 32 3A |":.149......162:|
00000DD0: 99 22 11 20 20 20 1D 1D 1D 1D 1D 4E 41 4D 4E 45 |.". .....NAMNE|
00000DE0: 54 20 5B 52 20 4E 55 20 5B 4E 44 52 41 54 22 3A |T [R NU [NDRAT":|
00000DF0: 81 49 B2 30 A4 32 30 30 30 3A 82 49 3A 89 37 39 |.I.0.2000:.I:.79|
00000E00: 00 1A 16 99 00 9F 31 35 2C 38 2C 31 35 2C 22 49 |......15,8,15,"I|
00000E10: 30 22 3A A0 31 35 3A 89 37 39 00 7C 16 9B 00 9F |0":.15:.79.|....|
00000E20: 31 35 2C 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C |15,8,15,"I0":.2,|
00000E30: 38 2C 32 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A |8,2,"#":.15,"U1:|
00000E40: 22 32 3B 30 3B 31 38 3B 30 3A 98 31 35 2C 22 42 |"2;0;18;0:.15,"B|
00000E50: 2D 50 3A 22 32 3B 31 34 34 3A 4E 24 B2 22 22 3A |-P:"2;144:N$."":|
00000E60: 81 54 B2 31 34 34 A4 31 36 31 3A A1 23 32 2C 41 |.T.144.161:.#2,A|
00000E70: 24 3A 4E 24 B2 4E 24 AA 41 24 3A 82 00 89 16 A1 |$:N$.N$.A$:.....|
00000E80: 00 A0 32 3A A0 31 35 3A 8E 00 E3 16 A2 00 9F 31 |..2:.15:.......1|
00000E90: 35 2C 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 |5,8,15,"I0":.2,8|
00000EA0: 2C 32 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A 22 |,2,"#":.15,"U1:"|
00000EB0: 32 3B 30 3B 31 38 3B 30 3A 98 31 35 2C 22 42 2D |2;0;18;0:.15,"B-|
00000EC0: 50 3A 22 32 3B 31 34 34 3A 81 54 B2 31 A4 C3 28 |P:"2;144:.T.1..(|
00000ED0: 46 24 29 3A 98 32 2C CA 28 46 24 2C 54 2C 31 29 |F$):.2,.(F$,T,1)|
00000EE0: 3B 3A 82 00 07 17 A7 00 8B C3 28 46 24 29 B3 31 |;:........(F$).1|
00000EF0: 38 A7 81 54 B2 C3 28 46 24 29 A4 31 37 3A 98 32 |8..T..(F$).17:.2|
00000F00: 2C 22 A0 22 3B 3A 82 00 2F 17 A8 00 98 31 35 2C |,".";:../....15,|
00000F10: 22 55 32 3A 22 32 3B 30 3B 31 38 3B 30 3A 98 31 |"U2:"2;0;18;0:.1|
00000F20: 35 2C 22 49 30 22 3A A0 32 3A A0 31 35 3A 8E 00 |5,"I0":.2:.15:..|
00000F30: DB 17 AE 00 97 35 33 32 38 31 2C 31 3A 97 35 33 |.....53281,1:.53|
00000F40: 32 38 30 2C 31 3A 99 22 1C 22 3A 99 22 93 11 11 |280,1:.".":."...|
00000F50: 11 11 1D 1D 5B 4E 44 52 49 4E 47 20 41 56 20 44 |....[NDRING AV D|
00000F60: 49 53 4B 45 54 54 45 4E 53 20 49 44 20 4B 4F 44 |ISKETTENS ID KOD|
00000F70: 22 3A 99 22 11 11 43 4F 50 59 52 49 47 48 54 20 |":."..COPYRIGHT |
00000F80: 31 39 38 34 20 44 41 4E 49 45 4C 20 4A 4F 48 4E |1984 DANIEL JOHN|
00000F90: 53 53 4F 4E 22 3A 99 22 11 11 11 11 53 5B 54 54 |SSON":."....S[TT|
00000FA0: 20 49 4E 20 44 49 53 4B 45 54 54 45 4E 20 28 55 | IN DISKETTEN (U|
00000FB0: 54 41 4E 20 53 4B 52 49 56 53 4B 59 44 44 29 22 |TAN SKRIVSKYDD)"|
00000FC0: 3A 99 22 11 1D 1D 1D 4F 43 48 20 54 52 59 43 4B |:."....OCH TRYCK|
00000FD0: 20 50 5D 20 52 45 54 55 52 4E 22 00 EE 17 B2 00 | P] RETURN".....|
00000FE0: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 37 38 00 01 |.A$:.A$."".178..|
00000FF0: 18 B3 00 8B 41 24 B3 B1 C7 28 31 33 29 A7 31 37 |....A$...(13).17|
00001000: 38 00 2A 18 B4 00 8D 31 38 37 3A 99 22 11 1D 1D |8.*....187:."...|
00001010: 1D 1D 1D 1D 47 41 4D 4C 41 20 49 44 20 4B 4F 44 |....GAMLA ID KOD|
00001020: 45 4E 20 3A 20 22 3B 49 44 24 00 71 18 B6 00 99 |EN : ";ID$.q....|
00001030: 22 11 1D 1D 1D 1D 1D 1D 4E 59 41 20 49 44 20 4B |".......NYA ID K|
00001040: 4F 44 45 4E 20 22 3B 3A 85 4E 44 24 3A 8B C3 28 |ODEN ";:.ND$:..(|
00001050: 4E 44 24 29 B1 31 38 A7 99 22 11 20 42 41 52 41 |ND$).18..". BARA|
00001060: 20 54 56 5D 20 54 45 43 4B 45 4E 22 3A 89 31 38 | TV] TECKEN":.18|
00001070: 32 00 A6 18 B8 00 8D 31 39 34 3A 99 22 11 1D 1D |2......194:."...|
00001080: 1D 1D 1D 1D 20 49 44 20 4B 4F 44 45 4E 20 5B 4E |.... ID KODEN [N|
00001090: 44 52 41 44 22 3A 81 49 B2 30 A4 32 30 30 30 3A |DRAD":.I.0.2000:|
000010A0: 82 49 3A 89 37 39 00 AE 18 BA 00 89 37 39 00 13 |.I:.79......79..|
000010B0: 19 BB 00 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 |....15,8,15,"I0"|
000010C0: 3A 9F 32 2C 38 2C 32 2C 22 23 22 3A 98 31 35 2C |:.2,8,2,"#":.15,|
000010D0: 22 55 31 3A 22 32 3B 30 3B 31 38 3B 30 3A 98 31 |"U1:"2;0;18;0:.1|
000010E0: 35 2C 22 42 2D 50 3A 22 32 3B 31 36 32 3A 49 44 |5,"B-P:"2;162:ID|
000010F0: 24 B2 22 22 3A 81 54 B2 31 36 32 A4 31 36 33 3A |$."":.T.162.163:|
00001100: A1 23 32 2C 41 24 3A 49 44 24 B2 49 44 24 AA 41 |.#2,A$:ID$.ID$.A|
00001110: 24 3A 82 00 20 19 C1 00 A0 32 3A A0 31 35 3A 8E |$:.. ....2:.15:.|
00001120: 00 77 19 C2 00 9F 31 35 2C 38 2C 31 35 2C 22 49 |.w....15,8,15,"I|
00001130: 30 22 3A 9F 32 2C 38 2C 32 2C 22 23 22 3A 98 31 |0":.2,8,2,"#":.1|
00001140: 35 2C 22 55 31 3A 22 32 3B 30 3B 31 38 3B 30 3A |5,"U1:"2;0;18;0:|
00001150: 98 31 35 2C 22 42 2D 50 3A 22 32 3B 31 36 32 3A |.15,"B-P:"2;162:|
00001160: 81 54 B2 31 A4 32 3A 98 32 2C CA 28 4E 44 24 2C |.T.1.2:.2,.(ND$,|
00001170: 54 2C 31 29 3B 3A 82 00 9F 19 C7 00 98 31 35 2C |T,1);:.......15,|
00001180: 22 55 32 3A 22 32 3B 30 3B 31 38 3B 30 3A 98 31 |"U2:"2;0;18;0:.1|
00001190: 35 2C 22 49 30 22 3A A0 32 3A A0 31 35 3A 8E 00 |5,"I0":.2:.15:..|
000011A0: 00 00 0C DB F6 |..... |
.......:.650,003:.53280,1:.53281,1:.".":
."...DISK USER PROGRAM BY DANIEL JOHNSSO
N":."............1 9 8 4":."......COPYRI
GHT JOSO-SOFTWARE":.".....1 SORTERA DIRE
CTORY":."...2 VISA DIRECTORY".%...."...3
SCRATCHA FILER":."...4 [NDRA DISKETTENS
NAMN":."...5 [NDRA DISKETTENS IDKOD":."
...6 AVSLUTA".^...."..VAD V[LJER DU (1-6
)?":.EW:.EW.1.EW.6.."....":.13.O....EW.6
..64738......EW.18,80,105,139,174. ....5
3280,1:.53281,1:.".":.:.".........SORTER
ING AV PROGRAMNAMN":."..... P] DIS
KETTER.":."..PROGRAMMED BY .DANIEL JOHNS
SON .840120":.T.1.4999:.......".........
........S[TT I EN DISKETT":."...........
...S] SKALL JAG":.".........SORTERA DES
S DIRECTORY":."......P.S GL\M INTE ATT T
A BORT SKRIVSKYDDET":."..........PRESS .
.SPACE.. WHEN READY."......DJ$:.DJ$.." "
. 28.5....PN$(224),SP(29),SE(29):N$.G(0)
:.I.1.30:BL$.BL$.N$:..C.".FL%.0:DR%.0:SO
.1:SP%.18:SE%.1:.FL%.SP%.39...'..15,8,15
,"I".D(DR%):.77:.2,8,2,"#":.77:.".. PROG
RAMNAMN OSORTERADE .":.".COPYRIG
HT D.JOHNSSON 840120":.".."...+..15,"U1
";2;DR%;SP%;SE%:SP(SN).SP%:SE(SN).SE%:.7
6:SP%.F(E$):.76:SE%.F(E$):PZ.2.U.0..15,"
B-P";2;PZ:NN.NN.1:.I.1.30:.76. .2.PN$(NN
).PN$(NN).E$:.:.F(H(PN$(NN),1)).0.PN$(NN
)."":NN.NN.1:DE.DE.1:.55.O.4..I.19.5..1:
.J(PN$(NN),I,1)..G(160).I.5:.54...5.PN$(
NN).H(PN$(NN),I.1)." ".I(PN$(NN),30.I)..
.6..:.J(PN$(NN),4,16)...7..PZ.226.PZ.PZ.
32:.48.H.8..SP%.PZ.2:SN.SN.1:.43.U.9..DE
.0.62.Y.:.SO.0:.I.NN.1.NN.DE:PN$(I).BL$:
....>..".. FILNAMNEN BLIR NU SORTERADE."
:.".COPYRIGHT D.JOHNSSON 840120.":.J.1.N
N.1:.I.J.1.NN:.J(PN$(I),4,16).J(PN$(J),4
,16).65.,.@.N$.PN$(I):PN$(I).PN$(J):PN$(
J).N$:.J;"....":SO.0.X.A..I,J:.J.1.NN:.J
(PN$(J),4,16):.I.19.5..1.X.B..J(PN$(J),I
,1).." ".I.5:.68...C.PN$(J).H(PN$(J),I.1
).G(160).I(PN$(J),30.I)...D..I,J:.SO..:.
".SNART F[RDIGT!...":.".COPYRIGHT D.JOH
NSSON":..!.H.PN%.1:.J.0.SN:.15,"B-P ";2;
0:.2,G(SP(J.1))G(SE(J.1)).A.I.PZ.2:.I.1.
8:.15,"B-P ";2;PZ:.2,PN$(PN%);:PN%.PN%.1
:PZ.PZ.32...J..:.15,"U2 ";2;DR%;SP(J);SE
(J):.: 15:.".F[RDIG...":.79...K..79...L.
.#2,E$:E$.G(F(E$.N$)):..K.M..DS.0...Z.N.
.DS$:.:.79...O..T.0.255:.53280,T:.53281,
255.T:.:.1.C.P.::.53280,0:.53281,0:.".":
."....S] H[R SER DIN NYA DIRECTORY UT":.
"...":.1,8,0,"$0":.#1,A$,B$...V..#1,A$,B
$:.#1,A$,B$:C.0:.WQ.0.WQ.1:.".";...Z.. A
$.."" . C.F(A$).D.[.. B$.."" . C.C.F(B$)
.256...\..J(D(C),2);.3);" ";...]..#1,B$:
. ST..0 . 101...^.. B$..G(34) . 93.0._..
#1,B$:. B$..G(34). .B$;:.95:.".".K.`..#1
,B$:. B$.G(32) . 96.].A.. .18);:C$.""...
B.C$.C$.B$:.#1,B$:. B$.."" . 98...C...2
1);H(C$,3):. ST.0 . 86...E.." BLOCKS FRE
E": 1:. 79.U.I..53281,0:.53280,0:.".":.G
(5):..8)". TAR BORT FILER .":.:..3)"
GL\M INTE TA BORT SKRIVSKYDDET":.:..8)"
TRYCK 0 VID SLUT ":.:.A$(45):.15,8,15,"
I": 15:.1,8,0,"$0":..1)"DISK ID:. ";...
S..#1,B$:. ST..0 . 122...T.. B$..G(34) .
115...U..D.0...9)D".":..13);...V..#1,B$
:. B$..G(34). .B$;:A$(D).A$(D).B$:.118..
.W.D.D.1:....X..#1,B$:. B$.G(32) . 120.'
.Y.. ST.0 . 115...Z. 1.6.{.. S.[.|..S..D
.."..":." .":S.0:.124.F.}..S.0.1..
.~..A$(S)."SCRATCHED".."IS SCRATCHED .
.":." .":S.0:.123..... 15,8,15,"
I":.15,"S:"A$(S): 15:."SCRATCH "A$(S)".
.":." .":A$(S)."SCRATCHED":.X.1.
D.S.U....".";:.:."
":.D.S.1..X.2.D.S:.".";:..B.
..S.0:.123.1....53280,1:.53281,1:.".":."
.":."...........NAMN[NDRING P] DISKETT":
."......... AV DANIEL JOHNSSON":.".....
.......COPYRIGHT 840120":."....S[TT IN D
ISKETTEN (UTAN SKRIVSKYDD)":..8);"...OCH
TRYCK P] RETURN".D....A$:.A$."".145.W..
..A$..G(13).145.}....155:.". GAMLA DISK
NAMNET: ";N$.F....". NYA DISK NAMNET
";:.F$:.C(F$).16..". MAX 16 BOKST[VER
":.149......162:.". .....NAMNET [R NU
[NDRAT":.I.0.2000:.I:.79......15,8,15,"I
0": 15:.79.|....15,8,15,"I0":.2,8,2,"#":
.15,"U1:"2;0;18;0:.15,"B-P:"2;144:N$."":
.T.144.161:.#2,A$:N$.N$.A$:...... 2: 15:
.......15,8,15,"I0":.2,8,2,"#":.15,"U1:"
2;0;18;0:.15,"B-P:"2;144:.T.1.C(F$):.2,J
(F$,T,1);:.......C(F$).18..T.C(F$).17:.2
," ";:../....15,"U2:"2;0;18;0:.15,"I0":
2: 15:.......53281,1:.53280,1:.".":."...
....[NDRING AV DISKETTENS ID KOD":."..CO
PYRIGHT 1984 DANIEL JOHNSSON":."....S[TT
IN DISKETTEN (UTAN SKRIVSKYDD)":."....O
CH TRYCK P] RETURN"......A$:.A$."".178..
....A$..G(13).178.*....187:.".......GAML
A ID KODEN : ";ID$.Q....".......NYA ID K
ODEN ";:.ND$:.C(ND$).18..". BARA TV] TEC
KEN":.182......194:."....... ID KODEN [N
DRAD":.I.0.2000:.I:.79......79......15,8
,15,"I0":.2,8,2,"#":.15,"U1:"2;0;18;0:.1
5,"B-P:"2;162:ID$."":.T.162.163:.#2,A$:I
D$.ID$.A$:.. .A. 2: 15:..W.B..15,8,15,"I
0":.2,8,2,"#":.15,"U1:"2;0;18;0:.15,"B-P
:"2;162:.T.1.2:.2,J(ND$,T,1);:....G..15,
"U2:"2;0;18;0:.15,"I0": 2: 15:.......
> CLICK IMAGE PREVIEW FOR FULL MODAL