QUICK SORT
FILE INFORMATION
FILENAME(S): QUICK SORT
FILE TYPE(S): PRG
FILE SIZE: 700b
FIRST SEEN: 2025-11-30 21:27:13
APPEARS ON: 1 disk(s)
FILE HASH
545d9e95b7298806530763968c941d9044e54d9edd24cba238bac54f75d668d6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MARCO | QUICK SORT | PRG | DuncanTwain | 7 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 0A 00 8D 32 30 30 30 30 00 1D 08 20 |.......20000... |
00000010: 4E 8F 20 51 55 49 43 4B 20 53 4F 52 54 00 40 08 |N. QUICK SORT.@.|
00000020: 2A 4E 8F 20 53 4E 45 4C 4C 45 20 42 41 53 49 43 |*N. SNELLE BASIC|
00000030: 20 53 4F 52 54 45 45 52 20 52 4F 55 54 49 4E 45 | SORTEER ROUTINE|
00000040: 00 56 08 34 4E 8F 20 42 45 47 49 4E 20 50 52 4F |.V.4N. BEGIN PRO|
00000050: 47 52 41 4D 4D 41 00 67 08 3E 4E 99 C7 28 31 34 |GRAMMA.g.>N..(14|
00000060: 37 29 3A 8F 43 4C 53 00 85 08 48 4E 8F 20 4E 3D |7):.CLS...HN. N=|
00000070: 44 45 20 48 4F 45 56 45 45 4C 20 24 20 53 4F 52 |DE HOEVEEL $ SOR|
00000080: 54 45 52 45 4E 00 93 08 52 4E 8F 20 44 49 4D 20 |TEREN...RN. DIM |
00000090: 3D 41 24 00 A8 08 5C 4E 8F 49 4E 49 54 20 51 55 |=A$...\N.INIT QU|
000000A0: 49 43 4B 20 53 4F 52 54 00 BE 08 66 4E 99 22 42 |ICK SORT...fN."B|
000000B0: 45 47 49 4E 20 53 4F 52 54 45 52 45 4E 22 00 E5 |EGIN SORTEREN"..|
000000C0: 08 70 4E 86 53 54 28 28 BC 28 4E 29 AD BC 28 32 |.pN.ST((.(N)..(2|
000000D0: 29 AA 34 29 2C 31 29 3A 8F 20 54 45 4D 50 20 41 |).4),1):. TEMP A|
000000E0: 52 52 41 59 53 00 FD 08 7A 4E 54 49 24 B2 22 30 |RRAYS...zNTI$."0|
000000F0: 30 30 30 30 30 22 3A 8F 20 54 49 4A 44 00 19 09 |00000":. TIJD...|
00000100: 84 4E 54 B2 31 3A 53 54 28 31 2C 30 29 B2 30 3A |.NT.1:ST(1,0).0:|
00000110: 53 54 28 31 2C 31 29 B2 4E 00 40 09 8E 4E 4C B2 |ST(1,1).N.@..NL.|
00000120: 53 54 28 54 2C 30 29 3A 52 B2 53 54 28 54 2C 31 |ST(T,0):R.ST(T,1|
00000130: 29 3A 8F 20 53 54 41 43 4B 57 41 41 52 44 45 4E |):. STACKWAARDEN|
00000140: 00 4A 09 98 4E 54 B2 54 AB 31 00 60 09 A2 4E 58 |.J..NT.T.1.`..NX|
00000150: B2 4C 3A 59 B2 52 3A 8F 20 54 45 4C 4C 45 52 53 |.L:Y.R:. TELLERS|
00000160: 00 7B 09 AC 4E 58 24 B2 41 24 28 28 4C AA 52 29 |.{..NX$.A$((L.R)|
00000170: AD 32 29 3A 8F 20 48 45 4C 46 54 00 96 09 B6 4E |.2):. HELFT....N|
00000180: 8B 41 24 28 58 29 B3 58 24 A7 58 B2 58 AA 31 3A |.A$(X).X$.X.X.1:|
00000190: 89 32 30 31 35 30 00 A5 09 C0 4E 81 56 B2 31 A4 |.20150....N.V.1.|
000001A0: 31 30 30 30 30 00 BC 09 CA 4E 8B 41 24 28 59 29 |10000....N.A$(Y)|
000001B0: B1 58 24 A7 59 B2 59 AB 31 3A 82 56 00 C8 09 D4 |.X$.Y.Y.1:.V....|
000001C0: 4E 56 B2 31 30 30 30 30 00 E4 09 DE 4E 8B 58 B2 |NV.10000....N.X.|
000001D0: 59 A7 58 B2 58 AA 31 3A 59 B2 59 AB 31 3A 89 32 |Y.X.X.1:Y.Y.1:.2|
000001E0: 30 31 35 30 00 04 0A E8 4E 8B 58 B3 59 A7 8D 32 |0150....N.X.Y..2|
000001F0: 30 32 38 30 3A 89 32 30 31 35 30 3A 8F 20 57 49 |0280:.20150:. WI|
00000200: 53 53 45 4C 00 27 0A F2 4E 8B 58 B3 52 A7 54 B2 |SSEL.'..N.X.R.T.|
00000210: 54 AA 31 3A 53 54 28 31 2C 30 29 B2 58 3A 53 54 |T.1:ST(1,0).X:ST|
00000220: 28 54 2C 31 29 B2 52 00 2F 0A FC 4E 52 B2 59 00 |(T,1).R./..NR.Y.|
00000230: 3E 0A 06 4F 8B 4C B3 52 A7 32 30 31 33 30 00 4D |>..O.L.R.20130.M|
00000240: 0A 10 4F 8B 54 B1 30 A7 32 30 31 31 30 00 5E 0A |..O.T.0.20110.^.|
00000250: 1A 4F 8F 20 4B 4C 41 41 52 20 53 4F 52 54 00 76 |.O. KLAAR SORT.v|
00000260: 0A 24 4F 8E 3A 8F 20 54 45 52 55 47 20 4E 41 41 |.$O.:. TERUG NAA|
00000270: 52 20 4D 45 4E 55 00 83 0A 2E 4F 8F 20 57 49 53 |R MENU....O. WIS|
00000280: 53 45 4C 00 A7 0A 38 4F 54 54 24 B2 41 24 28 58 |SEL...8OTT$.A$(X|
00000290: 29 3A 41 24 28 58 29 B2 41 24 28 59 29 3A 41 24 |):A$(X).A$(Y):A$|
000002A0: 28 59 29 B2 54 54 24 00 B9 0A 42 4F 58 B2 58 AA |(Y).TT$...BOX.X.|
000002B0: 31 3A 59 B2 59 AB 31 3A 8E 00 00 00 |1:Y.Y.1:.... |
.......20000... N. QUICK SORT.@.*N. SNEL
LE BASIC SORTEER ROUTINE.V.4N. BEGIN PRO
GRAMMA.G.>N.G(147):.CLS...HN. N=DE HOEVE
EL $ SORTEREN...RN. DIM =A$...\N.INIT QU
ICK SORT...FN."BEGIN SORTEREN"...PN.ST((
.(N)..(2).4),1):. TEMP ARRAYS...ZNTI$."0
00000":. TIJD....NT.1:ST(1,0).0:ST(1,1).
N.@..NL.ST(T,0):R.ST(T,1):. STACKWAARDEN
.J..NT.T.1.`..NX.L:Y.R:. TELLERS.{..NX$.
A$((L.R).2):. HELFT....N.A$(X).X$.X.X.1:
.20150....N.V.1.10000...JN.A$(Y).X$.Y.Y.
1:.V.H.TNV.10000....N.X.Y.X.X.1:Y.Y.1:.2
0150....N.X.Y..20280:.20150:. WISSEL.'..
N.X.R.T.T.1:ST(1,0).X:ST(T,1).R./..NR.Y.
>..O.L.R.20130.M..O.T.0.20110.^..O. KLAA
R SORT.V.$O.:. TERUG NAAR MENU....O. WIS
SEL...8OTT$.A$(X):A$(X).A$(Y):A$(Y).TT$.
..BOX.X.1:Y.Y.1:....
> CLICK IMAGE PREVIEW FOR FULL MODAL