DISK-ALPHASORT
FILE INFORMATION
FILENAME(S): DISK-ALPHASORT
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-11-30 19:47:30
APPEARS ON: 1 disk(s)
FILE HASH
947ac47f5f97633bc14368c1c90fcb48ab5c18a6a934571d04ab915696c64440
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A5 1 | DISK-ALPHASORT | PRG | Curtcool, Frank | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 4C 04 86 50 4E 24 28 32 32 34 29 2C |....L..PN$(224),|
00000010: 53 50 28 32 39 29 2C 53 45 28 32 39 29 00 49 08 |SP(29),SE(29).I.|
00000020: 74 04 99 C7 28 31 34 32 29 22 93 11 20 12 20 41 |t...(142)".. . A|
00000030: 4C 50 48 41 42 45 54 49 53 43 48 45 53 20 44 49 |LPHABETISCHES DI|
00000040: 52 45 43 54 4F 52 59 20 22 00 55 08 79 04 99 3A |RECTORY ".U.y..:|
00000050: 99 3A 99 3A 99 00 7A 08 7E 04 99 22 20 20 20 20 |.:.:..z.~.." |
00000060: 20 44 49 53 4B 45 54 54 45 20 45 49 4E 47 45 4C | DISKETTE EINGEL|
00000070: 45 47 54 20 28 59 2F 4E 29 22 00 92 08 83 04 A1 |EGT (Y/N)"......|
00000080: 5A 24 3A 8B 20 5A 24 B3 B1 22 59 22 A7 20 31 31 |Z$:. Z$.."Y". 11|
00000090: 35 35 00 9E 08 92 04 45 47 24 B2 22 30 22 00 C2 |55.....EG$."0"..|
000000A0: 08 9C 04 46 31 25 B2 C6 28 45 47 24 29 AB 34 38 |...F1%..(EG$).48|
000000B0: 3A 8B 46 31 25 B3 46 31 25 AC 46 31 25 A7 31 31 |:.F1%.F1%.F1%.11|
000000C0: 37 30 00 CE 08 B0 04 45 47 24 B2 22 30 22 00 F0 |70.....EG$."0"..|
000000D0: 08 BA 04 44 52 25 B2 C6 28 45 47 24 29 AB 34 38 |...DR%..(EG$).48|
000000E0: 3A 8B 44 52 25 B3 44 52 25 AE 32 A7 31 32 30 30 |:.DR%.DR%.2.1200|
000000F0: 00 21 09 C4 04 99 44 52 25 3A 4E 4E B2 30 3A 53 |.!....DR%:NN.0:S|
00000100: 4E B2 30 3A 53 4F B2 31 3A 53 50 25 B2 31 38 3A |N.0:SO.1:SP%.18:|
00000110: 53 45 25 B2 31 3A 8B 46 31 25 A7 53 50 25 B2 33 |SE%.1:.F1%.SP%.3|
00000120: 39 00 48 09 EC 04 9F 31 35 2C 38 2C 31 35 2C 22 |9.H....15,8,15,"|
00000130: 49 22 AA C4 28 44 52 25 29 3A 8B 44 53 A7 99 44 |I"..(DR%):.DS..D|
00000140: 53 24 3A A0 31 35 3A 80 00 69 09 F6 04 9F 32 2C |S$:.15:..i....2,|
00000150: 38 2C 32 2C 22 23 22 3A 8B 44 53 A7 99 44 53 24 |8,2,"#":.DS..DS$|
00000160: 3A A0 31 35 3A A0 32 3A 80 00 92 09 00 05 99 22 |:.15:.2:......."|
00000170: 11 11 20 50 52 4F 47 52 41 4D 4D 2D 2F 44 41 54 |.. PROGRAMM-/DAT|
00000180: 45 49 4E 41 4D 45 4E 20 55 4E 53 4F 52 54 49 45 |EINAMEN UNSORTIE|
00000190: 52 54 00 C3 09 0A 05 98 31 35 2C 22 55 31 22 3B |RT......15,"U1";|
000001A0: 32 3B 44 52 25 3B 53 50 25 3B 53 45 25 3A 53 50 |2;DR%;SP%;SE%:SP|
000001B0: 28 53 4E 29 B2 53 50 25 3A 53 45 28 53 4E 29 B2 |(SN).SP%:SE(SN).|
000001C0: 53 45 25 00 E0 09 14 05 A1 23 32 2C 45 47 24 3A |SE%......#2,EG$:|
000001D0: 8B 45 47 24 B2 22 22 A7 45 47 24 B2 C7 28 30 29 |.EG$."".EG$..(0)|
000001E0: 00 EF 09 1E 05 53 50 25 B2 C6 28 45 47 24 29 00 |.....SP%..(EG$).|
000001F0: 0C 0A 28 05 A1 23 32 2C 45 47 24 3A 8B 45 47 24 |..(..#2,EG$:.EG$|
00000200: B2 22 22 A7 45 47 24 B2 C7 28 30 29 00 20 0A 32 |."".EG$..(0). .2|
00000210: 05 53 45 25 B2 C6 28 45 47 24 29 3A 50 5A B2 32 |.SE%..(EG$):PZ.2|
00000220: 00 3B 0A 3C 05 98 31 35 2C 22 42 2D 50 22 3B 32 |.;.<..15,"B-P";2|
00000230: 3B 50 5A 3A 4E 4E B2 4E 4E AA 31 00 60 0A 46 05 |;PZ:NN.NN.1.`.F.|
00000240: 81 49 B2 31 A4 33 30 3A A1 23 32 2C 45 47 24 3A |.I.1.30:.#2,EG$:|
00000250: 8B 45 47 24 B2 22 22 A7 45 47 24 B2 C7 28 30 29 |.EG$."".EG$..(0)|
00000260: 00 7B 0A 50 05 50 4E 24 28 4E 4E 29 B2 50 4E 24 |.{.P.PN$(NN).PN$|
00000270: 28 4E 4E 29 AA 45 47 24 3A 82 49 00 97 0A 5A 05 |(NN).EG$:.I...Z.|
00000280: 8B C6 28 C8 28 50 4E 24 28 4E 4E 29 2C 31 29 29 |..(.(PN$(NN),1))|
00000290: B2 30 89 31 34 31 30 00 C7 0A 64 05 81 49 B2 31 |.0.1410...d..I.1|
000002A0: 39 A4 35 A9 AB 31 3A 8B CA 28 50 4E 24 28 4E 4E |9.5..1:..(PN$(NN|
000002B0: 29 2C 49 2C 31 29 B3 C7 28 31 36 30 29 A7 49 B2 |),I,1)..(160).I.|
000002C0: 35 3A 89 31 34 30 30 00 F8 0A 6E 05 50 4E 24 28 |5:.1400...n.PN$(|
000002D0: 4E 4E 29 B2 C8 28 50 4E 24 28 4E 4E 29 2C 49 AB |NN)..(PN$(NN),I.|
000002E0: 31 29 AA C7 28 33 32 29 AA C9 28 50 4E 24 28 4E |1)..(32)..(PN$(N|
000002F0: 4E 29 2C 33 30 AB 49 29 00 10 0B 78 05 82 49 3A |N),30.I)...x..I:|
00000300: 99 CA 28 50 4E 24 28 4E 4E 29 2C 34 2C 31 36 29 |..(PN$(NN),4,16)|
00000310: 00 2B 0B 82 05 8B 50 5A AB 32 32 36 A7 50 5A B2 |.+....PZ.226.PZ.|
00000320: 50 5A AA 33 32 3A 89 31 33 34 30 00 47 0B 8C 05 |PZ.32:.1340.G...|
00000330: 8B 53 50 25 A7 50 5A B2 32 3A 53 4E B2 53 4E AA |.SP%.PZ.2:SN.SN.|
00000340: 31 3A 89 31 32 39 30 00 77 0B B4 05 99 22 93 12 |1:.1290.w...."..|
00000350: 20 50 52 4F 47 52 41 4D 4D 2D 2F 44 41 54 45 49 | PROGRAMM-/DATEI|
00000360: 4E 41 4D 45 4E 20 57 45 52 44 45 4E 20 53 4F 52 |NAMEN WERDEN SOR|
00000370: 54 49 45 52 54 20 22 00 B3 0B BE 05 81 4A B2 31 |TIERT "......J.1|
00000380: A4 4E 4E AB 31 3A 81 49 B2 4A AA 31 A4 4E 4E 3A |.NN.1:.I.J.1.NN:|
00000390: 8B CA 28 50 4E 24 28 49 29 2C 34 2C 31 36 29 B1 |..(PN$(I),4,16).|
000003A0: CA 28 50 4E 24 28 4A 29 2C 34 2C 31 36 29 A7 31 |.(PN$(J),4,16).1|
000003B0: 34 39 30 00 F0 0B C8 05 4E 24 B2 50 4E 24 28 49 |490.....N$.PN$(I|
000003C0: 29 3A 50 4E 24 28 49 29 B2 50 4E 24 28 4A 29 3A |):PN$(I).PN$(J):|
000003D0: 50 4E 24 28 4A 29 B2 4E 24 3A 99 C7 28 31 39 29 |PN$(J).N$:..(19)|
000003E0: C7 28 31 37 29 C7 28 31 37 29 4A 3A 53 4F B2 30 |.(17).(17)J:SO.0|
000003F0: 00 1C 0C D2 05 82 49 2C 4A 3A 81 4A B2 31 A4 4E |......I,J:.J.1.N|
00000400: 4E 3A 99 CA 28 50 4E 24 28 4A 29 2C 34 2C 31 36 |N:..(PN$(J),4,16|
00000410: 29 3A 81 49 B2 31 39 A4 35 A9 AB 31 00 3F 0C DC |):.I.19.5..1.?..|
00000420: 05 8B CA 28 50 4E 24 28 4A 29 2C 49 2C 31 29 B1 |...(PN$(J),I,1).|
00000430: C7 28 33 32 29 A7 49 B2 35 3A 89 31 35 32 30 00 |.(32).I.5:.1520.|
00000440: 6E 0C E6 05 50 4E 24 28 4A 29 B2 C8 28 50 4E 24 |n...PN$(J)..(PN$|
00000450: 28 4A 29 2C 49 AB 31 29 AA C7 28 31 36 30 29 AA |(J),I.1)..(160).|
00000460: C9 28 50 4E 24 28 4A 29 2C 33 30 AB 49 29 00 84 |.(PN$(J),30.I)..|
00000470: 0C F0 05 82 49 2C 4A 3A 8B 53 4F A7 A0 32 3A A0 |....I,J:.SO..2:.|
00000480: 31 35 3A 80 00 BD 0C 18 06 50 4E 25 B2 31 3A 81 |15:......PN%.1:.|
00000490: 4A B2 30 A4 53 4E 3A 98 31 35 2C 22 42 2D 50 22 |J.0.SN:.15,"B-P"|
000004A0: 3B 32 3B 30 3A 98 32 2C C7 28 53 50 28 4A AA 31 |;2;0:.2,.(SP(J.1|
000004B0: 29 29 3B C7 28 53 45 28 4A AA 31 29 29 00 FC 0C |));.(SE(J.1))...|
000004C0: 22 06 50 5A B2 32 3A 81 49 B2 31 A4 38 3A 98 31 |".PZ.2:.I.1.8:.1|
000004D0: 35 2C 22 42 2D 50 22 3B 32 3B 50 5A 3A 98 32 2C |5,"B-P";2;PZ:.2,|
000004E0: 50 4E 24 28 50 4E 25 29 3B 3A 50 4E 25 B2 50 4E |PN$(PN%);:PN%.PN|
000004F0: 25 AA 31 3A 50 5A B2 50 5A AA 33 32 00 28 0D 2C |%.1:PZ.PZ.32.(.,|
00000500: 06 82 49 3A 98 31 35 2C 22 55 32 22 3B 32 3B 44 |..I:.15,"U2";2;D|
00000510: 52 25 3B 53 50 28 4A 29 3B 53 45 28 4A 29 3A 82 |R%;SP(J);SE(J):.|
00000520: 4A 3A A0 32 3A A0 31 35 00 4B 0D 36 06 85 22 20 |J:.2:.15.K.6.." |
00000530: 20 20 20 20 20 20 4E 4F 43 48 20 45 49 4E 4D 41 | NOCH EINMA|
00000540: 4C 20 28 59 2F 4E 29 22 3B 5A 24 00 5C 0D 40 06 |L (Y/N)";Z$.\.@.|
00000550: 8B 20 5A 24 B2 22 59 22 20 A7 20 8A 00 65 0D 4A |. Z$."Y" . ..e.J|
00000560: 06 99 22 93 22 00 00 00 41 20 05 00 54 |.."."...A ..T |
....L..PN$(224),SP(29),SE(29).I.T..G(142
)".. . ALPHABETISCHES DIRECTORY ".U.Y..:
.:.:..Z.~.." DISKETTE EINGELEGT (Y/N
)"......Z$:. Z$.."Y". 1155.....EG$."0".B
...F1%.F(EG$).48:.F1%.F1%.F1%.1170.N...E
G$."0".....DR%.F(EG$).48:.DR%.DR%.2.1200
.!.D..DR%:NN.0:SN.0:SO.1:SP%.18:SE%.1:.F
1%.SP%.39.H....15,8,15,"I".D(DR%):.DS..D
S$: 15:..I....2,8,2,"#":.DS..DS$: 15: 2:
.......".. PROGRAMM-/DATEINAMEN UNSORTIE
RT.C....15,"U1";2;DR%;SP%;SE%:SP(SN).SP%
:SE(SN).SE%......#2,EG$:.EG$."".EG$.G(0)
.....SP%.F(EG$)...(..#2,EG$:.EG$."".EG$.
G(0). .2.SE%.F(EG$):PZ.2.;.<..15,"B-P";2
;PZ:NN.NN.1.`.F..I.1.30:.#2,EG$:.EG$."".
EG$.G(0).{.P.PN$(NN).PN$(NN).EG$:.I...Z.
.F(H(PN$(NN),1)).0.1410.G.D..I.19.5..1:.
J(PN$(NN),I,1).G(160).I.5:.1400...N.PN$(
NN).H(PN$(NN),I.1).G(32).I(PN$(NN),30.I)
...X..I:.J(PN$(NN),4,16).+....PZ.226.PZ.
PZ.32:.1340.G....SP%.PZ.2:SN.SN.1:.1290.
W....".. PROGRAMM-/DATEINAMEN WERDEN SOR
TIERT "......J.1.NN.1:.I.J.1.NN:.J(PN$(I
),4,16).J(PN$(J),4,16).1490...H.N$.PN$(I
):PN$(I).PN$(J):PN$(J).N$:.G(19)G(17)G(1
7)J:SO.0...R..I,J:.J.1.NN:.J(PN$(J),4,16
):.I.19.5..1.?....J(PN$(J),I,1).G(32).I.
5:.1520.N...PN$(J).H(PN$(J),I.1).G(160).
I(PN$(J),30.I)......I,J:.SO. 2: 15:.....
.PN%.1:.J.0.SN:.15,"B-P";2;0:.2,G(SP(J.1
));G(SE(J.1))...".PZ.2:.I.1.8:.15,"B-P";
2;PZ:.2,PN$(PN%);:PN%.PN%.1:PZ.PZ.32.(.,
..I:.15,"U2";2;DR%;SP(J);SE(J):.J: 2: 15
.K.6.." NOCH EINMAL (Y/N)";Z$.\.@.
. Z$."Y" . ..E.J.."."...A ..T
> CLICK IMAGE PREVIEW FOR FULL MODAL