DIRECTORY-SORT
FILE INFORMATION
FILENAME(S): DIRECTORY-SORT
FILE TYPE(S): PRG
FILE SIZE: 4.7K
FIRST SEEN: 2025-12-02 22:47:35
APPEARS ON: 1 disk(s)
FILE HASH
ab34925500eb3e7d4ca8eb57dac69580a553dfbd0140ab7a46685a486fc98195
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DEDDY | DIRECTORY-SORT | PRG | swasti, charly | 15 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |.. .d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 00 3F 08 6E 00 8F 20 2A 20 20 20 20 20 20 20 20 |.?.n.. * |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
00000040: 5E 08 78 00 8F 20 2A 20 44 49 52 45 43 54 4F 52 |^.x.. * DIRECTOR|
00000050: 59 2D 53 4F 52 54 20 56 31 2E 30 20 20 2A 00 7D |Y-SORT V1.0 *.}|
00000060: 08 82 00 8F 20 2A 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |.... * ---------|
00000070: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20 2A 00 9C 08 |---------- *...|
00000080: 8C 00 8F 20 2A 20 41 55 54 4F 52 3A 20 20 20 20 |... * AUTOR: |
00000090: 20 20 20 20 20 20 20 20 20 20 20 2A 00 BB 08 96 | *....|
000000A0: 00 8F 20 2A 20 53 45 56 45 52 49 4E 20 57 49 4C |.. * SEVERIN WIL|
000000B0: 4C 45 20 20 20 20 20 20 20 20 2A 00 DA 08 A0 00 |LE *.....|
000000C0: 8F 20 2A 20 50 46 41 52 52 57 49 45 53 45 4E 47 |. * PFARRWIESENG|
000000D0: 2E 38 2D 31 30 2F 34 20 20 2A 00 F9 08 AA 00 8F |.8-10/4 *......|
000000E0: 20 2A 20 31 31 39 30 20 57 49 45 4E 20 20 20 20 | * 1190 WIEN |
000000F0: 20 20 20 20 20 20 20 20 2A 00 18 09 B4 00 8F 20 | *...... |
00000100: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
00000110: 20 20 20 20 20 20 20 2A 00 37 09 BE 00 8F 20 2A | *.7.... *|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 00 41 09 C8 00 89 20 34 33 |*******.A.... 43|
00000140: 30 00 67 09 D2 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |0.g.... ********|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000160: 2A 2A 2A 2A 2A 2A 2A 00 7C 09 DC 00 8F 20 20 55 |*******.|.... U|
00000170: 4E 54 45 52 52 4F 55 54 49 4E 45 4E 00 A2 09 E6 |NTERROUTINEN....|
00000180: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001A0: 2A 2A 00 C0 09 F0 00 84 31 2C 46 31 2C 46 24 2C |**......1,F1,F$,|
000001B0: 46 32 2C 46 33 3A 8B 20 46 31 B2 30 20 A7 20 8E |F2,F3:. F1.0 . .|
000001C0: 00 DA 09 FA 00 99 22 9F 11 22 46 31 3B 46 24 2C |......".."F1;F$,|
000001D0: 46 32 3B 46 33 22 90 22 3A 80 00 00 0A 04 01 8F |F2;F3".":.......|
000001E0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
000001F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000200: 00 13 0A 0E 01 8B 20 4E 4F AA 45 4E B1 B2 43 20 |...... NO.EN..C |
00000210: A7 20 8E 00 33 0A 18 01 9E 20 35 33 30 35 36 2C |. ..3.... 53056,|
00000220: 30 2C 32 2C 32 2C 32 33 2C 31 38 3A 4E 4F B2 4E |0,2,2,23,18:NO.N|
00000230: 4F AA 31 00 66 0A 22 01 97 20 32 31 34 2C 32 33 |O.1.f.".. 214,23|
00000240: 3A 97 20 32 31 31 2C 32 3A 9E 20 35 38 37 33 32 |:. 211,2:. 58732|
00000250: 3A 99 20 4E 41 24 28 5A 55 28 4E 4F AA 45 4E AB |:. NA$(ZU(NO.EN.|
00000260: 31 29 29 3B 3A 8E 00 8C 0A 2C 01 8F 20 2D 2D 2D |1));:....,.. ---|
00000270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000280: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 9B 0A 36 |------------...6|
00000290: 01 8B 20 4E 4F B2 30 20 A7 20 8E 00 BB 0A 40 01 |.. NO.0 . ....@.|
000002A0: 9E 20 35 33 30 35 36 2C 31 2C 32 2C 32 2C 32 33 |. 53056,1,2,2,23|
000002B0: 2C 31 38 3A 4E 4F B2 4E 4F AB 31 00 E9 0A 4A 01 |,18:NO.NO.1...J.|
000002C0: 97 20 32 31 34 2C 32 3A 97 20 32 31 31 2C 32 3A |. 214,2:. 211,2:|
000002D0: 9E 20 35 38 37 33 32 3A 99 20 4E 41 24 28 5A 55 |. 58732:. NA$(ZU|
000002E0: 28 4E 4F AA 31 29 29 3A 8E 00 0F 0B 54 01 8F 20 |(NO.1)):....T.. |
000002F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000300: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00000310: 2E 0B 5E 01 99 22 93 90 12 22 A3 31 33 29 22 44 |..^.."...".13)"D|
00000320: 49 52 45 43 54 4F 52 59 2D 53 4F 52 54 22 00 4B |IRECTORY-SORT".K|
00000330: 0B 68 01 99 20 A3 31 32 29 22 2D 2D 2D 2D 2D 2D |.h.. .12)"------|
00000340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 7A 0B 72 01 |----------".z.r.|
00000350: 99 22 9F 11 20 44 49 53 4B 45 54 54 45 20 45 49 |.".. DISKETTE EI|
00000360: 4E 4C 45 47 45 4E 20 55 4E 44 20 54 41 53 54 45 |NLEGEN UND TASTE|
00000370: 20 44 52 55 45 43 4B 45 4E 22 00 90 0B 7C 01 A1 | DRUECKEN"...|..|
00000380: 20 54 24 3A 8B 20 54 24 B2 22 22 A7 20 33 38 30 | T$:. T$."". 380|
00000390: 00 C4 0B 86 01 99 20 22 13 11 11 11 20 20 20 20 |...... ".... |
000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003C0: 20 22 3A 8E 00 EA 0B 90 01 8F 20 2A 2A 2A 2A 2A | ":....... *****|
000003D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0C 0C 9A 01 8F |**********......|
000003F0: 20 20 42 45 47 49 4E 4E 20 44 45 53 20 48 41 55 | BEGINN DES HAU|
00000400: 50 54 50 52 4F 47 52 41 4D 4D 45 53 00 32 0C A4 |PTPROGRAMMES.2..|
00000410: 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000430: 2A 2A 00 51 0C AE 01 97 20 35 33 32 38 30 2C 30 |**.Q.... 53280,0|
00000440: 3A 97 20 35 33 32 38 31 2C 31 31 3A 8D 20 33 35 |:. 53281,11:. 35|
00000450: 30 00 8D 0C B8 01 9F 31 2C 38 2C 31 35 2C 22 49 |0......1,8,15,"I|
00000460: 22 3A 86 20 41 4E 24 28 31 34 35 29 2C 4E 41 24 |":. AN$(145),NA$|
00000470: 28 31 34 35 29 2C 52 45 24 28 31 34 35 29 2C 5A |(145),RE$(145),Z|
00000480: 55 28 31 34 36 29 2C 53 4E 28 31 39 29 00 A6 0C |U(146),SN(19)...|
00000490: C2 01 81 20 49 B2 31 20 A4 20 31 38 3A 87 20 53 |... I.1 . 18:. S|
000004A0: 4E 28 49 29 3A 82 00 C8 0C CC 01 81 20 49 B2 35 |N(I):....... I.5|
000004B0: 32 39 39 32 20 A4 20 35 33 32 34 32 3A 87 20 53 |2992 . 53242:. S|
000004C0: 3A 97 20 49 2C 53 3A 82 00 E4 0C D6 01 8D 20 32 |:. I,S:....... 2|
000004D0: 34 30 3A 9F 20 32 2C 38 2C 32 2C 22 23 22 3A 8D |40:. 2,8,2,"#":.|
000004E0: 20 32 34 30 00 1A 0D E0 01 53 B2 31 3A 43 B2 31 | 240.....S.1:C.1|
000004F0: 3A 4E 24 B2 C7 28 30 29 3A 4E 4E 24 B2 4E 24 AA |:N$..(0):NN$.N$.|
00000500: 4E 24 AA 4E 24 AA 4E 24 AA 4E 24 AA 4E 24 AA 4E |N$.N$.N$.N$.N$.N|
00000510: 24 AA 4E 24 AA 4E 24 AA 4E 24 00 3C 0D EA 01 4E |$.N$.N$.N$.<...N|
00000520: 55 24 B2 4E 4E 24 AA 4E 4E 24 AA 4E 4E 24 3A 52 |U$.NN$.NN$.NN$:R|
00000530: 45 24 28 30 29 B2 4E 4E 24 AA 4E 24 00 73 0D F4 |E$(0).NN$.N$.s..|
00000540: 01 41 4E 24 28 30 29 B2 C7 28 31 32 38 29 AA C7 |.AN$(0)..(128)..|
00000550: 28 31 38 29 AA C7 28 31 29 3A 4E 41 24 28 30 29 |(18)..(1):NA$(0)|
00000560: B2 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
00000570: 2D 2D 22 00 99 0D FE 01 8F 20 2A 2A 2A 2A 2A 2A |--"...... ******|
00000580: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B8 0D 08 02 8F 20 |*********...... |
000005A0: 20 45 49 4E 4C 45 53 45 4E 20 44 45 53 20 44 49 | EINLESEN DES DI|
000005B0: 52 45 43 54 4F 52 59 53 00 DE 0D 12 02 8F 20 2A |RECTORYS...... *|
000005C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FD |**************..|
000005E0: 0D 1C 02 98 31 2C 22 55 31 20 32 20 30 20 31 38 |....1,"U1 2 0 18|
000005F0: 22 53 3A 99 22 13 96 22 53 22 9D 20 22 00 1A 0E |"S:.".."S". "...|
00000600: 26 02 A1 23 32 2C 54 24 3A A1 23 32 2C 53 24 3A |&..#2,T$:.#2,S$:|
00000610: 53 B2 C6 28 53 24 AA 4E 24 29 00 3C 0E 30 02 81 |S..(S$.N$).<.0..|
00000620: 20 42 50 B2 30 20 A4 20 37 3A 98 31 2C 22 42 2D | BP.0 . 7:.1,"B-|
00000630: 50 20 32 22 3B 42 50 AC 33 32 AA 32 00 6F 0E 3A |P 2";BP.32.2.o.:|
00000640: 02 9E 20 35 32 39 39 32 2C 32 2C 33 2C 58 24 3A |.. 52992,2,3,X$:|
00000650: 41 4E 24 28 43 29 B2 58 24 3A 8B 20 C8 28 58 24 |AN$(C).X$:. .(X$|
00000660: 2C 31 29 B2 4E 24 A7 20 82 3A 89 20 36 30 30 00 |,1).N$. .:. 600.|
00000670: A7 0E 44 02 9E 20 35 32 39 39 32 2C 32 2C 31 36 |..D.. 52992,2,16|
00000680: 2C 58 24 3A 4E 41 24 28 43 29 B2 58 24 3A 9E 20 |,X$:NA$(C).X$:. |
00000690: 35 32 39 39 32 2C 32 2C 31 31 2C 58 24 3A 52 45 |52992,2,11,X$:RE|
000006A0: 24 28 43 29 B2 58 24 00 C9 0E 4E 02 5A 55 28 43 |$(C).X$...N.ZU(C|
000006B0: 29 B2 43 3A 99 22 13 1D 1D 1D 1D 22 43 22 9D 20 |).C:."....."C". |
000006C0: 22 3A 43 B2 43 AA 31 3A 82 00 DB 0E 58 02 8B 20 |":C.C.1:....X.. |
000006D0: 54 24 B3 B1 22 22 A7 20 35 34 30 00 1D 0F 62 02 |T$.."". 540...b.|
000006E0: A0 20 32 3A 97 20 36 35 30 2C 31 32 38 3A 99 22 |. 2:. 650,128:."|
000006F0: 13 11 11 90 3E 9F 91 22 3B 3A 43 50 B2 32 3A 4E |....>..";:CP.2:N|
00000700: 4F B2 30 3A 4E 55 B2 30 3A 45 4E B2 43 3A 8B 20 |O.0:NU.0:EN.C:. |
00000710: 45 4E B1 32 33 20 A7 20 45 4E B2 32 33 00 4E 0F |EN.23 . EN.23.N.|
00000720: 6C 02 99 20 C7 28 31 33 29 A3 32 29 4E 41 24 28 |l.. .(13).2)NA$(|
00000730: 4E 55 AA 31 29 3B 3A 4E 55 B2 4E 55 AA 31 3A 8B |NU.1);:NU.NU.1:.|
00000740: 20 4E 55 B3 45 4E AB 31 20 A7 20 36 32 30 00 74 | NU.EN.1 . 620.t|
00000750: 0F 76 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.v.. ***********|
00000760: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000770: 2A 2A 2A 2A 00 8B 0F 80 02 8F 20 20 54 41 53 54 |****...... TAST|
00000780: 41 54 55 52 41 42 46 52 41 47 45 00 B1 0F B2 02 |ATURABFRAGE.....|
00000790: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000007A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007B0: 2A 00 C9 0F BC 02 A1 20 54 41 24 3A 8B 20 54 41 |*...... TA$:. TA|
000007C0: 24 B2 22 22 A7 20 37 30 30 00 FC 0F C6 02 8B 20 |$."". 700...... |
000007D0: 54 41 24 B2 22 86 22 A7 20 8B 20 43 50 B1 32 20 |TA$.".". . CP.2 |
000007E0: A7 20 43 50 B2 43 50 AB 31 3A 9E 20 35 33 30 35 |. CP.CP.1:. 5305|
000007F0: 36 2C 30 2C 32 2C 30 2C 32 33 2C 30 00 1A 10 D0 |6,0,2,0,23,0....|
00000800: 02 8B 20 54 41 24 B2 22 86 22 A7 20 8B 20 43 50 |.. TA$.".". . CP|
00000810: B2 32 20 A7 20 8D 20 33 31 30 00 5A 10 DA 02 8B |.2 . . 310.Z....|
00000820: 20 54 41 24 B2 22 87 22 A7 20 8B 20 43 50 B3 45 | TA$.".". . CP.E|
00000830: 4E 20 A7 20 8B 20 4E 4F AA 43 50 B3 43 20 A7 20 |N . . NO.CP.C . |
00000840: 43 50 B2 43 50 AA 31 3A 9E 20 35 33 30 35 36 2C |CP.CP.1:. 53056,|
00000850: 31 2C 32 2C 30 2C 32 33 2C 30 00 7A 10 E4 02 8B |1,2,0,23,0.z....|
00000860: 20 54 41 24 B2 22 87 22 A7 20 8B 20 43 50 B1 B2 | TA$.".". . CP..|
00000870: 32 33 20 A7 20 8D 20 32 37 30 00 8D 10 EE 02 8B |23 . . 270......|
00000880: 20 54 41 24 B2 22 85 22 A7 20 38 31 30 00 D9 10 | TA$.".". 810...|
00000890: F8 02 8B 20 54 41 24 B2 22 89 22 A7 20 8B 20 43 |... TA$.".". . C|
000008A0: B3 31 34 35 20 A7 20 46 B2 31 3A 43 B2 43 AA 31 |.145 . F.1:C.C.1|
000008B0: 3A 99 22 96 13 1D 1D 1D 1D 22 43 AB 31 22 96 13 |:."......"C.1"..|
000008C0: 9F 22 3A 45 4E B2 45 4E AA 31 3A 8B 20 45 4E B1 |.":EN.EN.1:. EN.|
000008D0: 32 33 20 A7 45 4E B2 32 33 00 0A 11 02 03 8B 20 |23 .EN.23...... |
000008E0: 54 41 24 B2 22 89 22 A7 20 8B 20 46 B2 31 20 A7 |TA$.".". . F.1 .|
000008F0: 20 46 B2 30 3A 54 45 B2 30 3A 54 45 24 B2 4E 41 | F.0:TE.0:TE$.NA|
00000900: 24 28 30 29 3A 89 20 38 34 30 00 1E 11 0C 03 8B |$(0):. 840......|
00000910: 20 54 41 24 B2 22 8C 22 A7 20 31 30 30 30 00 32 | TA$.".". 1000.2|
00000920: 11 16 03 8B 20 54 41 24 B2 22 8B 22 A7 20 31 30 |.... TA$.".". 10|
00000930: 39 30 00 3C 11 20 03 89 20 37 30 30 00 5B 11 2A |90.<. .. 700.[.*|
00000940: 03 54 45 B2 5A 55 28 4E 4F AA 43 50 AB 31 29 3A |.TE.ZU(NO.CP.1):|
00000950: 54 45 24 B2 4E 41 24 28 54 45 29 00 93 11 34 03 |TE$.NA$(TE)...4.|
00000960: 9E 20 35 33 30 35 36 2C 30 2C 43 50 2C 32 2C 32 |. 53056,0,CP,2,2|
00000970: 33 2C 31 38 3A 8B 20 43 B1 32 33 20 A7 20 45 4E |3,18:. C.23 . EN|
00000980: B2 45 4E AA 31 3A 8D 20 32 39 30 3A 45 4E B2 45 |.EN.1:. 290:EN.E|
00000990: 4E AB 31 00 BB 11 3E 03 81 20 49 B2 4E 4F AA 43 |N.1...>.. I.NO.C|
000009A0: 50 AB 32 20 A4 20 43 AB 31 3A 5A 55 28 49 AA 31 |P.2 . C.1:ZU(I.1|
000009B0: 29 B2 5A 55 28 49 AA 32 29 3A 82 00 D9 11 48 03 |).ZU(I.2):....H.|
000009C0: 97 20 32 31 34 2C 43 50 3A 97 20 32 31 31 2C 31 |. 214,CP:. 211,1|
000009D0: 39 3A 9E 20 35 38 37 33 32 00 FA 11 52 03 99 22 |9:. 58732...R.."|
000009E0: 1D 1D 22 54 45 24 3A 8F 20 22 1D 22 3D 43 4F 4D |.."TE$:. "."=COM|
000009F0: 4D 4F 44 4F 52 45 2B 22 54 22 00 12 12 5C 03 A1 |MODORE+"T"...\..|
00000A00: 20 54 41 24 3A 8B 20 54 41 24 B2 22 22 A7 20 38 | TA$:. TA$."". 8|
00000A10: 36 30 00 58 12 66 03 8B 20 54 41 24 B2 22 86 22 |60.X.f.. TA$."."|
00000A20: A7 20 8B 20 43 50 B1 32 20 A7 20 43 50 B2 43 50 |. . CP.2 . CP.CP|
00000A30: AB 31 3A 9E 35 33 30 35 36 2C 30 2C 32 2C 31 39 |.1:.53056,0,2,19|
00000A40: 2C 32 34 2C 33 37 3A 9E 35 33 30 35 36 2C 30 2C |,24,37:.53056,0,|
00000A50: 32 2C 30 2C 32 33 2C 30 00 75 12 70 03 8B 20 54 |2,0,23,0.u.p.. T|
00000A60: 41 24 B2 22 86 22 A7 20 8B 20 43 50 B2 32 20 A7 |A$.".". . CP.2 .|
00000A70: 20 8D 33 31 30 00 BC 12 7A 03 8B 20 54 41 24 B2 | .310...z.. TA$.|
00000A80: 22 87 22 A7 20 8B 20 43 50 B3 45 4E 20 A7 20 43 |".". . CP.EN . C|
00000A90: 50 B2 43 50 AA 31 3A 9E 35 33 30 35 36 2C 31 2C |P.CP.1:.53056,1,|
00000AA0: 32 2C 31 39 2C 32 34 2C 33 37 3A 9E 35 33 30 35 |2,19,24,37:.5305|
00000AB0: 36 2C 31 2C 32 2C 30 2C 32 33 2C 30 00 DB 12 84 |6,1,2,0,23,0....|
00000AC0: 03 8B 20 54 41 24 B2 22 87 22 A7 20 8B 20 43 50 |.. TA$.".". . CP|
00000AD0: B2 32 33 20 A7 20 8D 20 32 37 30 00 EE 12 8E 03 |.23 . . 270.....|
00000AE0: 8B 20 54 41 24 B2 22 85 22 A7 20 39 35 30 00 2F |. TA$.".". 950./|
00000AF0: 13 98 03 8B 20 54 41 24 B2 22 8A 22 A7 20 54 45 |.... TA$.".". TE|
00000B00: 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |$.".............|
00000B10: 1D 1D 1D 22 3A 43 B2 43 AB 31 3A 45 4E B2 43 3A |...":C.C.1:EN.C:|
00000B20: 8B 20 45 4E B1 32 33 20 A7 20 45 4E B2 32 33 00 |. EN.23 . EN.23.|
00000B30: 56 13 A2 03 8B 20 54 41 24 B2 22 8A 22 A7 20 99 |V.... TA$.".". .|
00000B40: 22 13 96 1D 1D 1D 1D 22 43 AB 31 22 9D 20 9F 22 |"......"C.1". ."|
00000B50: 3A 89 20 39 37 30 00 60 13 AC 03 89 20 38 36 30 |:. 970.`.... 860|
00000B60: 00 78 13 B6 03 9E 35 33 30 35 36 2C 31 2C 43 50 |.x....53056,1,CP|
00000B70: 2C 32 2C 32 33 2C 31 38 00 B1 13 C0 03 81 20 49 |,2,23,18...... I|
00000B80: B2 43 AB 31 20 A4 20 4E 4F AA 43 50 AB 31 20 A9 |.C.1 . NO.CP.1 .|
00000B90: AB 31 3A 5A 55 28 49 AA 31 29 B2 5A 55 28 49 29 |.1:ZU(I.1).ZU(I)|
00000BA0: 3A 82 3A 5A 55 28 4E 4F AA 43 50 AB 31 29 B2 54 |:.:ZU(NO.CP.1).T|
00000BB0: 45 00 CE 13 CA 03 97 20 32 31 34 2C 43 50 3A 97 |E...... 214,CP:.|
00000BC0: 20 32 31 31 2C 32 3A 9E 20 35 38 37 33 32 00 ED | 211,2:. 58732..|
00000BD0: 13 D4 03 99 20 54 45 24 22 20 20 20 20 20 20 20 |.... TE$" |
00000BE0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 F7 13 | "...|
00000BF0: DE 03 89 20 37 30 30 00 1C 14 E8 03 8F 20 2A 2A |... 700...... **|
00000C00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 41 14 F2 |************.A..|
00000C20: 03 8F 20 20 53 43 48 52 45 49 42 45 4E 20 44 45 |.. SCHREIBEN DE|
00000C30: 53 20 53 4F 52 54 49 45 52 54 45 4E 20 44 49 52 |S SORTIERTEN DIR|
00000C40: 2E 00 66 14 FC 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..f.... ********|
00000C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C60: 2A 2A 2A 2A 2A 2A 00 A1 14 06 04 9F 20 32 2C 38 |******...... 2,8|
00000C70: 2C 32 2C 22 23 22 3A 54 B2 31 38 3A 81 20 49 B2 |,2,"#":T.18:. I.|
00000C80: 30 20 A4 20 B5 28 28 43 AB 32 29 AD 38 29 3A 8B |0 . .((C.2).8):.|
00000C90: 20 38 AC 49 AA 38 B1 B2 43 AB 31 20 A7 20 54 B2 | 8.I.8..C.1 . T.|
00000CA0: 30 00 C4 14 10 04 98 31 2C 22 42 2D 50 20 32 20 |0......1,"B-P 2 |
00000CB0: 30 22 3A 98 32 2C C7 28 54 29 C7 28 53 4E 28 49 |0":.2,.(T).(SN(I|
00000CC0: AA 32 29 29 00 E6 14 1A 04 81 20 42 50 B2 30 20 |.2))...... BP.0 |
00000CD0: A4 20 37 3A 98 31 2C 22 42 2D 50 20 32 22 3B 42 |. 7:.1,"B-P 2";B|
00000CE0: 50 AC 33 32 AA 32 00 0B 15 24 04 8B 20 42 50 AA |P.32.2...$.. BP.|
00000CF0: 38 AC 49 AA 31 B1 B2 43 20 A7 20 98 32 2C 4E 55 |8.I.1..C . .2,NU|
00000D00: 24 3B 3A 82 3A 89 20 31 30 38 30 00 49 15 2E 04 |$;:.:. 1080.I...|
00000D10: 98 32 2C 41 4E 24 28 5A 55 28 42 50 AA 38 AC 49 |.2,AN$(ZU(BP.8.I|
00000D20: AA 31 29 29 4E 41 24 28 5A 55 28 42 50 AA 38 AC |.1))NA$(ZU(BP.8.|
00000D30: 49 AA 31 29 29 52 45 24 28 5A 55 28 42 50 AA 38 |I.1))RE$(ZU(BP.8|
00000D40: AC 49 AA 31 29 29 3B 3A 82 00 81 15 38 04 98 31 |.I.1));:....8..1|
00000D50: 2C 22 55 32 20 32 20 30 20 31 38 22 53 4E 28 49 |,"U2 2 0 18"SN(I|
00000D60: AA 31 29 3A 99 22 96 13 22 A3 33 36 29 53 4E 28 |.1):."..".36)SN(|
00000D70: 49 AA 31 29 22 9D 20 9F 22 3A 8D 20 32 34 30 3A |I.1)". .":. 240:|
00000D80: 82 00 95 15 42 04 A0 20 32 3A 8D 20 33 35 30 3A |....B.. 2:. 350:|
00000D90: 89 20 34 37 30 00 BA 15 4C 04 8F 20 2A 2A 2A 2A |. 470...L.. ****|
00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DF 15 56 04 8F |**********...V..|
00000DC0: 20 20 53 45 4B 54 4F 52 45 4E 20 44 45 53 20 44 | SEKTOREN DES D|
00000DD0: 49 52 45 4B 54 4F 52 59 20 54 52 41 43 4B 53 00 |IREKTORY TRACKS.|
00000DE0: 04 16 60 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..`.. **********|
00000DF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E00: 2A 2A 2A 2A 00 37 16 6A 04 83 20 31 2C 34 2C 37 |****.7.j.. 1,4,7|
00000E10: 2C 31 30 2C 31 33 2C 31 36 2C 32 2C 35 2C 38 2C |,10,13,16,2,5,8,|
00000E20: 31 31 2C 31 34 2C 31 37 2C 33 2C 36 2C 39 2C 31 |11,14,17,3,6,9,1|
00000E30: 32 2C 31 35 2C 31 38 00 5C 16 74 04 8F 20 2A 2A |2,15,18.\.t.. **|
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7B 16 7E |************.{.~|
00000E60: 04 8F 20 20 49 4E 50 55 54 20 4D 41 53 43 48 49 |.. INPUT MASCHI|
00000E70: 4E 45 4E 2D 52 4F 55 54 49 4E 45 00 A0 16 88 04 |NEN-ROUTINE.....|
00000E80: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000E90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EA0: 00 EA 16 92 04 83 20 33 32 2C 32 35 33 2C 31 37 |...... 32,253,17|
00000EB0: 34 2C 33 32 2C 31 35 38 2C 31 38 33 2C 33 32 2C |4,32,158,183,32,|
00000EC0: 33 30 2C 32 32 35 2C 33 32 2C 32 35 33 2C 31 37 |30,225,32,253,17|
00000ED0: 34 2C 33 32 2C 31 35 38 2C 31 38 33 2C 31 33 38 |4,32,158,183,138|
00000EE0: 2C 37 32 2C 33 32 2C 32 35 33 00 31 17 9C 04 83 |,72,32,253.1....|
00000EF0: 20 31 37 34 2C 33 32 2C 31 33 39 2C 31 37 36 2C | 174,32,139,176,|
00000F00: 31 33 33 2C 37 33 2C 31 33 32 2C 37 34 2C 33 32 |133,73,132,74,32|
00000F10: 2C 31 36 33 2C 31 38 32 2C 31 30 34 2C 33 32 2C |,163,182,104,32,|
00000F20: 31 31 37 2C 31 38 30 2C 31 36 30 2C 32 2C 31 38 |117,180,160,2,18|
00000F30: 35 00 79 17 A6 04 83 20 39 37 2C 30 2C 31 34 35 |5.y.... 97,0,145|
00000F40: 2C 37 33 2C 31 33 36 2C 31 36 2C 32 34 38 2C 32 |,73,136,16,248,2|
00000F50: 30 30 2C 33 32 2C 31 38 2C 32 32 35 2C 31 34 35 |00,32,18,225,145|
00000F60: 2C 39 38 2C 32 30 30 2C 31 39 36 2C 39 37 2C 32 |,98,200,196,97,2|
00000F70: 30 38 2C 32 34 36 2C 33 32 00 94 17 B0 04 83 20 |08,246,32...... |
00000F80: 32 30 34 2C 32 35 35 2C 39 36 2C 30 2C 30 2C 30 |204,255,96,0,0,0|
00000F90: 2C 30 2C 30 00 B9 17 BA 04 8F 20 2A 2A 2A 2A 2A |,0,0...... *****|
00000FA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D9 17 C4 04 8F 20 |*********...... |
00000FC0: 20 53 43 52 4F 4C 4C 20 4D 41 53 43 48 49 4E 45 | SCROLL MASCHINE|
00000FD0: 4E 2D 52 4F 55 54 49 4E 45 00 FE 17 CE 04 8F 20 |N-ROUTINE...... |
00000FE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 30 |**************.0|
00001000: 18 D8 04 83 20 33 32 2C 32 34 35 2C 32 30 37 2C |.... 32,245,207,|
00001010: 31 33 38 2C 37 32 2C 33 32 2C 32 34 35 2C 32 30 |138,72,32,245,20|
00001020: 37 2C 32 32 34 2C 30 2C 31 37 36 2C 33 2C 37 36 |7,224,0,176,3,76|
00001030: 00 78 18 E2 04 83 20 37 32 2C 31 37 38 2C 32 32 |.x.... 72,178,22|
00001040: 34 2C 32 34 2C 31 37 36 2C 32 34 39 2C 31 33 34 |4,24,176,249,134|
00001050: 2C 32 35 31 2C 33 32 2C 32 34 35 2C 32 30 37 2C |,251,32,245,207,|
00001060: 32 32 34 2C 30 2C 31 34 34 2C 32 34 30 2C 32 32 |224,0,144,240,22|
00001070: 34 2C 33 39 2C 31 37 36 00 BF 18 EC 04 83 20 32 |4,39,176...... 2|
00001080: 33 36 2C 31 33 34 2C 32 35 33 2C 33 32 2C 32 34 |36,134,253,32,24|
00001090: 35 2C 32 30 37 2C 32 32 34 2C 32 35 2C 31 37 36 |5,207,224,25,176|
000010A0: 2C 32 32 37 2C 31 33 34 2C 32 35 32 2C 32 33 32 |,227,134,252,232|
000010B0: 2C 31 33 38 2C 35 36 2C 32 32 39 2C 32 35 31 00 |,138,56,229,251.|
000010C0: 07 19 F6 04 83 20 31 34 34 2C 32 31 38 2C 32 34 |..... 144,218,24|
000010D0: 30 2C 32 31 36 2C 31 33 33 2C 32 35 30 2C 33 32 |0,216,133,250,32|
000010E0: 2C 32 34 35 2C 32 30 37 2C 32 32 34 2C 34 30 2C |,245,207,224,40,|
000010F0: 31 37 36 2C 32 30 37 2C 32 32 38 2C 32 35 33 2C |176,207,228,253,|
00001100: 31 34 34 2C 32 30 33 00 4F 19 00 05 83 20 31 33 |144,203.O.... 13|
00001110: 34 2C 32 35 34 2C 31 30 34 2C 31 37 30 2C 31 36 |4,254,104,170,16|
00001120: 35 2C 31 37 32 2C 37 32 2C 31 36 35 2C 31 37 33 |5,172,72,165,173|
00001130: 2C 37 32 2C 31 36 35 2C 31 37 34 2C 37 32 2C 31 |,72,165,174,72,1|
00001140: 36 35 2C 31 37 35 2C 37 32 2C 32 32 34 2C 30 00 |65,175,72,224,0.|
00001150: 96 19 0A 05 83 20 32 30 38 2C 32 32 2C 31 36 36 |..... 208,22,166|
00001160: 2C 32 35 31 2C 31 39 38 2C 32 35 30 2C 32 34 30 |,251,198,250,240|
00001170: 2C 34 34 2C 33 32 2C 32 34 30 2C 32 33 33 2C 32 |,44,32,240,233,2|
00001180: 33 32 2C 31 38 39 2C 32 34 30 2C 32 33 36 2C 31 |32,189,240,236,1|
00001190: 33 33 2C 31 37 32 00 DE 19 14 05 83 20 31 38 31 |33,172...... 181|
000011A0: 2C 32 31 37 2C 33 32 2C 32 31 39 2C 32 30 37 2C |,217,32,219,207,|
000011B0: 34 38 2C 32 33 36 2C 32 30 32 2C 32 34 30 2C 33 |48,236,202,240,3|
000011C0: 2C 37 36 2C 37 32 2C 31 37 38 2C 31 36 36 2C 32 |,76,72,178,166,2|
000011D0: 35 32 2C 31 39 38 2C 32 35 30 2C 32 34 30 00 28 |52,198,250,240.(|
000011E0: 1A 1E 05 83 20 31 36 2C 33 32 2C 32 34 30 2C 32 |.... 16,32,240,2|
000011F0: 33 33 2C 32 30 32 2C 31 38 39 2C 32 34 30 2C 32 |33,202,189,240,2|
00001200: 33 36 2C 31 33 33 2C 31 37 32 2C 31 38 31 2C 32 |36,133,172,181,2|
00001210: 31 37 2C 33 32 2C 32 31 39 2C 32 30 37 2C 34 38 |17,32,219,207,48|
00001220: 2C 32 33 36 2C 31 36 34 00 6F 1A 28 05 83 20 32 |,236,164.o.(.. 2|
00001230: 35 34 2C 33 32 2C 32 34 30 2C 32 33 33 2C 33 32 |54,32,240,233,32|
00001240: 2C 33 36 2C 32 33 34 2C 31 36 39 2C 33 32 2C 31 |,36,234,169,32,1|
00001250: 34 35 2C 32 30 39 2C 31 33 36 2C 31 39 36 2C 32 |45,209,136,196,2|
00001260: 35 33 2C 31 36 2C 32 34 39 2C 37 36 2C 38 38 00 |53,16,249,76,88.|
00001270: B6 1A 32 05 83 20 32 33 33 2C 34 31 2C 33 2C 31 |..2.. 233,41,3,1|
00001280: 33 2C 31 33 36 2C 32 2C 31 33 33 2C 31 37 33 2C |3,136,2,133,173,|
00001290: 33 32 2C 32 32 34 2C 32 33 33 2C 31 36 34 2C 32 |32,224,233,164,2|
000012A0: 35 34 2C 31 37 37 2C 31 37 32 2C 31 34 35 2C 32 |54,177,172,145,2|
000012B0: 30 39 2C 31 37 37 00 F4 1A 3C 05 83 20 31 37 34 |09,177...<.. 174|
000012C0: 2C 31 34 35 2C 32 34 33 2C 31 33 36 2C 31 39 36 |,145,243,136,196|
000012D0: 2C 32 35 33 2C 31 36 2C 32 34 33 2C 39 36 2C 33 |,253,16,243,96,3|
000012E0: 32 2C 32 35 33 2C 31 37 34 2C 37 36 2C 31 35 38 |2,253,174,76,158|
000012F0: 2C 31 38 33 00 00 00 D7 |,183.... |
.. .D.. ************************.?.N.. *
*.^.X.. * DIRECTOR
Y-SORT V1.0 *.}.... * -----------------
-- *...... * AUTOR: *....
.. * SEVERIN WILLE *.Z. .. * PFAR
RWIESENG.8-10/4 *...... * 1190 WIEN
*...... * *
.7.... ************************.A.H.. 43
0.G.R.. *******************************.
|.... UNTERROUTINEN...... *************
******************......1,F1,F$,F2,F3:.
F1.0 . ..Z....".."F1;F$,F2;F3".":.......
-------------------------------...... N
O.EN..C . ..3.... 53056,0,2,2,23,18:NO.N
O.1.F.".. 214,23:. 211,2:. 58732:. NA$(Z
U(NO.EN.1));:....,.. -------------------
------------...6.. NO.0 . ....@.. 53056,
1,2,2,23,18:NO.NO.1...J.. 214,2:. 211,2:
. 58732:. NA$(ZU(NO.1)):....T.. --------
-----------------------...^.."...".13)"D
IRECTORY-SORT".K.H.. .12)"--------------
--".Z.R..".. DISKETTE EINLEGEN UND TASTE
DRUECKEN"...|.. T$:. T$."". 380.D.... "
....
":....... *****************************
**...... BEGINN DES HAUPTPROGRAMMES.2..
.. *******************************.Q....
53280,0:. 53281,11:. 350......1,8,15,"I
":. AN$(145),NA$(145),RE$(145),ZU(146),S
N(19)...B.. I.1 . 18:. SN(I):..H.L.. I.5
2992 . 53242:. S:. I,S:....V.. 240:. 2,8
,2,"#":. 240.....S.1:C.1:N$.G(0):NN$.N$.
N$.N$.N$.N$.N$.N$.N$.N$.N$.<...NU$.NN$.N
N$.NN$:RE$(0).NN$.N$.S...AN$(0).G(128).G
(18).G(1):NA$(0)."----------------".....
. *******************************......
EINLESEN DES DIRECTORYS...... *********
**********************......1,"U1 2 0 18
"S:.".."S". "...&..#2,T$:.#2,S$:S.F(S$.N
$).<.0.. BP.0 . 7:.1,"B-P 2";BP.32.2.O.:
.. 52992,2,3,X$:AN$(C).X$:. H(X$,1).N$.
.:. 600...D.. 52992,2,16,X$:NA$(C).X$:.
52992,2,11,X$:RE$(C).X$.I.N.ZU(C).C:."..
..."C". ":C.C.1:....X.. T$.."". 540...B.
2:. 650,128:."....>..";:CP.2:NO.0:NU.0
:EN.C:. EN.23 . EN.23.N.L.. G(13).2)NA$(
NU.1);:NU.NU.1:. NU.EN.1 . 620.T.V.. ***
****************************...... TAST
ATURABFRAGE...... **********************
*********.I.... TA$:. TA$."". 700...F..
TA$.".". . CP.2 . CP.CP.1:. 53056,0,2,0,
23,0...P.. TA$.".". . CP.2 . . 310.Z.Z..
TA$.".". . CP.EN . . NO.CP.C . CP.CP.1:
. 53056,1,2,0,23,0.Z.... TA$.".". . CP..
23 . . 270...... TA$.".". 810.Y.... TA$.
".". . C.145 . F.1:C.C.1:."......"C.1"..
.":EN.EN.1:. EN.23 .EN.23...... TA$.".".
. F.1 . F.0:TE.0:TE$.NA$(0):. 840......
TA$.".". 1000.2.... TA$.".". 1090.<. ..
700.[.*.TE.ZU(NO.CP.1):TE$.NA$(TE)...4.
. 53056,0,CP,2,23,18:. C.23 . EN.EN.1:.
290:EN.EN.1...>.. I.NO.CP.2 . C.1:ZU(I.1
).ZU(I.2):..Y.H.. 214,CP:. 211,19:. 5873
2...R..".."TE$:. "."=COMMODORE+"T"...\..
TA$:. TA$."". 860.X.F.. TA$.".". . CP.2
. CP.CP.1:.53056,0,2,19,24,37:.53056,0,
2,0,23,0.U.P.. TA$.".". . CP.2 . .310...
Z.. TA$.".". . CP.EN . CP.CP.1:.53056,1,
2,19,24,37:.53056,1,2,0,23,0...... TA$."
.". . CP.23 . . 270...... TA$.".". 950./
.... TA$.".". TE$."................":C.C
.1:EN.C:. EN.23 . EN.23.V.... TA$.".". .
"......"C.1". .":. 970.`.... 860.X....53
056,1,CP,2,23,18...... I.C.1 . NO.CP.1 .
.1:ZU(I.1).ZU(I):.:ZU(NO.CP.1).TE.N.J..
214,CP:. 211,2:. 58732...T.. TE$"
"...... 700...... **********
********************.A.... SCHREIBEN DE
S SORTIERTEN DIR..F.... ****************
**************...... 2,8,2,"#":T.18:. I.
0 . .((C.2).8):. 8.I.8..C.1 . T.0.D....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$;:.:. 1080.I....2,AN$(ZU(BP.8.I
.1))NA$(ZU(BP.8.I.1))RE$(ZU(BP.8.I.1));:
....8..1,"U2 2 0 18"SN(I.1):."..".36)SN(
I.1)". .":. 240:....B. 2:. 350:. 470...
L.. ******************************...V..
SEKTOREN DES DIREKTORY TRACKS...`.. **
****************************.7.J.. 1,4,7
,10,13,16,2,5,8,11,14,17,3,6,9,12,15,18.
\.T.. ******************************.{.~
.. INPUT MASCHINEN-ROUTINE. .... ******
************************...... 32,253,17
4,32,158,183,32,30,225,32,253,174,32,158
,183,138,72,32,253.1.... 174,32,139,176,
133,73,132,74,32,163,182,104,32,117,180,
160,2,185.Y.... 97,0,145,73,136,16,248,2
00,32,18,225,145,98,200,196,97,208,246,3
2...... 204,255,96,0,0,0,0,0...... *****
*************************.Y.D.. SCROLL
MASCHINEN-ROUTINE...N.. ****************
**************.0.X.. 32,245,207,138,72,3
2,245,207,224,0,176,3,76.X.... 72,178,22
4,24,176,249,134,251,32,245,207,224,0,14
4,240,224,39,176...... 236,134,253,32,24
5,207,224,25,176,227,134,252,232,138,56,
229,251...... 144,218,240,216,133,250,32
,245,207,224,40,176,207,228,253,144,203.
O.... 134,254,104,170,165,172,72,165,173
,72,165,174,72,165,175,72,224,0...... 20
8,22,166,251,198,250,240,44,32,240,233,2
32,189,240,236,133,172...... 181,217,32,
219,207,48,236,202,240,3,76,72,178,166,2
52,198,250,240.(.... 16,32,240,233,202,1
89,240,236,133,172,181,217,32,219,207,48
,236,164.O.(.. 254,32,240,233,32,36,234,
169,32,145,209,136,196,253,16,249,76,88.
..2.. 233,41,3,13,136,2,133,173,32,224,2
33,164,254,177,172,145,209,177...<.. 174
,145,243,136,196,253,16,243,96,32,253,17
4,76,158,183...W
> CLICK IMAGE PREVIEW FOR FULL MODAL