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

BABBELSORT

FILE INFORMATION

FILENAME(S): BABBELSORT

FILE TYPE(S): PRG

FILE SIZE: 746b

FIRST SEEN: 2025-12-01 13:57:56

APPEARS ON: 1 disk(s)

FILE HASH

a129e11de47152209a30b18624d7195c6734a66976785ec408b6bb5f04589d3e

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TEST BABBELSORT PRG HOL2001, Misc 31 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1C 08 84 03 86 20  53 44 24 28 31 30 30 30  |....... SD$(1000|
00000010: 29 3A 86 20 53 42 28 31  30 30 30 29 00 25 08 E8  |):. SB(1000).%..|
00000020: 03 99 22 93 22 00 58 08  4C 04 99 22 4E 52 2E 20  |..".".X.L.."NR. |
00000030: 20 20 20 20 4E 41 4D 45  22 3B 22 20 20 20 20 20  |    NAME";"     |
00000040: 20 20 5A 45 49 54 20 20  20 20 20 20 20 20 47 55  |  ZEIT        GU|
00000050: 45 4C 54 49 47 3F 20 22  00 87 08 B0 04 99 22 2A  |ELTIG? "......"*|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000080: 2A 2A 2A 2A 2A 2A 22 00  8F 08 E2 04 49 B2 30 00  |******".....I.0.|
00000090: 95 08 14 05 3A 00 CA 08  78 05 99 20 49 3B A3 36  |....:...x.. I;.6|
000000A0: 29 3B 3A 85 20 53 44 24  28 49 29 3A 99 22 1D 1D  |);:. SD$(I):."..|
000000B0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 91  |................|
000000C0: 22 3B 3A 85 20 53 42 28  49 29 00 DE 08 7A 05 99  |";:. SB(I)...z..|
000000D0: 20 A3 33 32 29 3B 22 91  28 4A 2F 4E 29 22 00 FD  | .32);".(J/N)"..|
000000E0: 08 7D 05 8F 20 47 45 54  20 41 24 3A 49 46 41 24  |.}.. GET A$:IFA$|
000000F0: 3D 22 4A 22 54 48 45 4E  20 31 34 31 30 00 17 09  |="J"THEN 1410...|
00000100: 7F 05 8F 20 49 46 20 41  24 3D 22 4E 22 20 54 48  |... IF A$="N" TH|
00000110: 45 4E 20 31 33 30 30 00  27 09 81 05 8F 20 47 4F  |EN 1300.'.... GO|
00000120: 54 4F 20 31 34 30 35 00  4B 09 82 05 8B 20 53 44  |TO 1405.K.... SD|
00000130: 24 28 49 29 B2 22 22 20  A7 20 53 44 24 28 49 29  |$(I)."" . SD$(I)|
00000140: B2 22 FF 22 3A 89 20 31  36 30 30 00 55 09 8C 05  |.".":. 1600.U...|
00000150: 49 B2 49 AA 31 00 60 09  AA 05 89 20 31 33 30 30  |I.I.1.`.... 1300|
00000160: 00 6C 09 40 06 8D 20 36  30 30 30 30 00 74 09 C6  |.l.@.. 60000.t..|
00000170: 07 49 B2 30 00 7A 09 D0  07 3A 00 91 09 DA 07 8B  |.I.0.z...:......|
00000180: 20 53 44 24 28 49 29 B2  22 FF 22 A7 20 35 30 30  | SD$(I).".". 500|
00000190: 30 00 AC 09 34 08 99 20  53 44 24 28 49 29 2C 22  |0...4.. SD$(I),"|
000001A0: 20 20 20 20 20 22 3B 53  42 28 49 29 00 B6 09 3E  |     ";SB(I)...>|
000001B0: 08 49 B2 49 AA 31 00 C1  09 98 08 89 20 32 30 30  |.I.I.1...... 200|
000001C0: 30 00 C7 09 88 13 80 00  CD 09 60 EA 8F 00 F1 09  |0.........`.....|
000001D0: 61 EA 8F 2A 2A 2A 2A 2A  2A 2A 2A 42 55 42 42 45  |a..********BUBBE|
000001E0: 4C 53 4F 52 54 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |LSORT***********|
000001F0: 2A 00 F7 09 62 EA 8F 00  07 0A 9C EA 53 4E B2 30  |*...b.......SN.0|
00000200: 3A 4C 31 B2 32 35 35 00  2E 0A B0 EA 8B 20 C6 28  |:L1.255...... .(|
00000210: 53 44 24 28 53 4E 29 29  B3 B1 4C 31 20 A7 20 53  |SD$(SN))..L1 . S|
00000220: 4E B2 53 4E AA 31 3A 89  20 36 30 30 38 30 00 3A  |N.SN.1:. 60080.:|
00000230: 0A C4 EA 53 4E B2 53 4E  AB 31 00 59 0A D8 EA 81  |...SN.SN.1.Y....|
00000240: 20 4C 31 B2 30 20 A4 20  53 4E AB 31 3A 81 20 4C  | L1.0 . SN.1:. L|
00000250: 32 B2 4C 31 20 A4 20 53  4E 00 77 0A EC EA 8B 20  |2.L1 . SN.w.... |
00000260: 53 44 24 28 4C 31 29 B3  53 44 24 28 4C 32 29 20  |SD$(L1).SD$(L2) |
00000270: A7 20 36 30 33 30 30 00  87 0A 14 EB 53 41 24 B2  |. 60300.....SA$.|
00000280: 53 44 24 28 4C 31 29 00  9B 0A 28 EB 53 44 24 28  |SD$(L1)...(.SD$(|
00000290: 4C 31 29 B2 53 44 24 28  4C 32 29 00 AB 0A 3C EB  |L1).SD$(L2)...<.|
000002A0: 53 44 24 28 4C 32 29 B2  53 41 24 00 B9 0A 50 EB  |SD$(L2).SA$...P.|
000002B0: 53 41 B2 53 42 28 4C 31  29 00 CB 0A 64 EB 53 42  |SA.SB(L1)...d.SB|
000002C0: 28 4C 31 29 B2 53 42 28  4C 32 29 00 D9 0A 78 EB  |(L1).SB(L2)...x.|
000002D0: 53 42 28 4C 32 29 B2 53  41 00 E1 0A 8C EB 82 3A  |SB(L2).SA......:|
000002E0: 82 00 E7 0A A0 EB 8E 00  00 00                    |..........      |

....... SD$(1000):. SB(1000).%....".".X.
L.."NR.     NAME";"       ZEIT        GU
ELTIG? "......"*************************
**************".....I.0.....:.J.X.. I;.6
);:. SD$(I):."..................";:. SB(
I)...Z.. .32);".(J/N)"...}.. GET A$:IFA$
="J"THEN 1410..... IF A$="N" THEN 1300.
'.... GOTO 1405.K.... SD$(I)."" . SD$(I)
.".":. 1600.U...I.I.1.`.... 1300.L.@.. 6
0000.T.F.I.0.Z.P.:...Z.. SD$(I).".". 500
0...4.. SD$(I),"     ";SB(I)...>.I.I.1.A
.... 2000.G.....M.`.....A..********BUBBE
LSORT************...B.......SN.0:L1.255.
..... F(SD$(SN))..L1 . SN.SN.1:. 60080.:
.D.SN.SN.1.Y.X.. L1.0 . SN.1:. L2.L1 . S
N.W.... SD$(L1).SD$(L2) . 60300.....SA$.
SD$(L1)...(.SD$(L1).SD$(L2)...<.SD$(L2).
SA$...P.SA.SB(L1).K.D.SB(L1).SB(L2).Y.X.
SB(L2).SA......:.... .....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL