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

LIST.1

FILE INFORMATION

FILENAME(S): LIST.1

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-11-30 01:12:39

APPEARS ON: 2 disk(s)

FILE HASH

6ba99ba713f8f1646565ab267a6640116a37fddbcdf38e800a19184f46dd15c9

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
15714 SH14 LIST.1 PRG C64er, DuncanTwain 19 10 DOWNLOAD FILE
15714 SH14 LIST.1 PRG DuncanTwain 19 10 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 10 25 10 0A 00 8F 20  48 41 55 50 54 50 52 4F  |..%.... HAUPTPRO|
00000010: 47 52 41 4D 4D 20 5A 55  20 44 45 4E 20 53 4F 52  |GRAMM ZU DEN SOR|
00000020: 54 49 45 52 2D 00 38 10  14 00 8F 20 41 4C 47 4F  |TIER-.8.... ALGO|
00000030: 52 49 54 48 4D 45 4E 2E  00 57 10 1E 00 8F 20 45  |RITHMEN..W.... E|
00000040: 53 20 45 52 53 54 45 4C  4C 54 20 45 49 4E 20 46  |S ERSTELLT EIN F|
00000050: 45 4C 44 20 4D 49 54 00  77 10 28 00 8F 20 45 49  |ELD MIT.w.(.. EI|
00000060: 4E 45 52 20 42 45 53 54  49 4D 4D 42 41 52 45 4E  |NER BESTIMMBAREN|
00000070: 20 41 4E 5A 41 48 4C 00  88 10 32 00 8F 20 45 4C  | ANZAHL...2.. EL|
00000080: 45 4D 45 4E 54 45 4E 2E  00 A8 10 3C 00 8F 20 4A  |EMENTEN....<.. J|
00000090: 45 44 45 53 20 45 4C 45  4D 45 4E 54 20 42 45 53  |EDES ELEMENT BES|
000000A0: 54 45 48 54 20 41 55 53  00 CA 10 46 00 8F 20 44  |TEHT AUS...F.. D|
000000B0: 52 45 49 20 42 45 4C 49  45 42 49 47 45 4E 20 42  |REI BELIEBIGEN B|
000000C0: 55 43 48 53 54 41 42 45  4E 2E 00 EB 10 50 00 8F  |UCHSTABEN....P..|
000000D0: 20 44 41 53 20 45 4E 54  53 50 52 45 43 48 45 4E  | DAS ENTSPRECHEN|
000000E0: 44 45 20 53 4F 52 54 49  45 52 2D 00 07 11 5A 00  |DE SORTIER-...Z.|
000000F0: 8F 20 55 4E 54 45 52 50  52 4F 47 52 41 4D 4D 20  |. UNTERPROGRAMM |
00000100: 4D 55 53 53 20 41 42 00  24 11 5F 00 8F 20 5A 45  |MUSS AB.$._.. ZE|
00000110: 49 4C 45 20 31 30 30 30  30 20 47 45 53 43 48 45  |ILE 10000 GESCHE|
00000120: 48 45 4E 2E 00 2F 11 E8  03 99 22 93 22 3A 9C 00  |HEN../....".":..|
00000130: 44 11 ED 03 E7 20 30 2C  31 3A E7 20 31 2C 36 3A  |D.... 0,1:. 1,6:|
00000140: E7 34 2C 31 00 6F 11 F2  03 99 22 44 49 45 53 45  |.4,1.o...."DIESE|
00000150: 53 20 50 52 4F 47 52 41  4D 4D 20 45 52 53 54 45  |S PROGRAMM ERSTE|
00000160: 4C 4C 54 20 5A 55 46 41  45 4C 4C 49 47 45 22 00  |LLT ZUFAELLIGE".|
00000170: 9F 11 FC 03 99 22 11 45  4C 45 4D 45 4E 54 45 2C  |.....".ELEMENTE,|
00000180: 20 44 49 45 20 56 4F 4E  20 44 45 4E 20 53 4F 52  | DIE VON DEN SOR|
00000190: 54 49 45 52 50 52 4F 47  52 41 4D 4D 45 4E 22 00  |TIERPROGRAMMEN".|
000001A0: CF 11 06 04 99 22 11 53  4F 52 54 49 45 52 54 20  |.....".SORTIERT |
000001B0: 57 45 52 44 45 4E 2E 20  4A 45 44 45 52 20 53 4F  |WERDEN. JEDER SO|
000001C0: 52 54 49 45 52 44 55 52  43 48 47 41 4E 47 22 00  |RTIERDURCHGANG".|
000001D0: E7 11 10 04 99 22 11 57  49 52 44 20 41 4E 47 45  |.....".WIRD ANGE|
000001E0: 5A 45 49 47 54 2E 22 00  05 12 1A 04 85 22 11 11  |ZEIGT."......"..|
000001F0: 57 49 45 56 49 45 4C 45  20 45 4C 45 4D 45 4E 54  |WIEVIELE ELEMENT|
00000200: 45 22 3B 41 4E 00 28 12  24 04 8B 20 41 4E B3 31  |E";AN.(.$.. AN.1|
00000210: 30 20 A7 20 99 22 11 5A  55 20 57 45 4E 49 47 20  |0 . .".ZU WENIG |
00000220: 21 22 3A 89 31 30 35 30  00 4D 12 2E 04 8B 20 41  |!":.1050.M.... A|
00000230: 4E B1 31 30 30 30 30 20  A7 20 99 22 11 5A 55 20  |N.10000 . .".ZU |
00000240: 56 49 45 4C 20 21 22 3A  89 31 30 35 30 00 5A 12  |VIEL !":.1050.Z.|
00000250: 38 04 86 20 41 24 28 41  4E 29 00 86 12 42 04 99  |8.. A$(AN)...B..|
00000260: 22 11 11 44 49 45 20 45  4C 45 4D 45 4E 54 45 20  |"..DIE ELEMENTE |
00000270: 57 45 52 44 45 4E 20 4A  45 54 5A 54 20 45 52 5A  |WERDEN JETZT ERZ|
00000280: 45 55 47 54 2E 22 00 A2  12 47 04 8D 34 30 30 30  |EUGT."...G..4000|
00000290: 3A 8F 20 2A 2A 20 4C 49  4E 49 45 20 5A 49 45 48  |:. ** LINIE ZIEH|
000002A0: 45 4E 00 C2 12 4C 04 8F  20 2A 2A 2A 20 45 4C 45  |EN...L.. *** ELE|
000002B0: 4D 45 4E 54 45 20 45 52  5A 45 55 47 45 4E 20 2A  |MENTE ERZEUGEN *|
000002C0: 2A 2A 00 D1 12 56 04 81  20 41 B2 31 20 A4 20 41  |**...V.. A.1 . A|
000002D0: 4E 00 DF 12 60 04 81 20  42 B2 31 20 A4 20 33 00  |N...`.. B.1 . 3.|
000002E0: 02 13 6A 04 41 24 28 41  29 B2 20 41 24 28 41 29  |..j.A$(A). A$(A)|
000002F0: AA C7 28 B5 28 BB 28 54  49 29 AC 32 35 29 AA 36  |..(.(.(TI).25).6|
00000300: 35 29 00 0E 13 74 04 82  20 42 3A 82 20 41 00 33  |5)...t.. B:. A.3|
00000310: 13 7E 04 8D 20 35 30 30  30 3A 8F 20 2A 2A 20 41  |.~.. 5000:. ** A|
00000320: 55 53 47 41 42 45 20 44  45 52 20 45 4C 45 4D 45  |USGABE DER ELEME|
00000330: 4E 54 45 00 57 13 88 04  99 22 11 44 45 52 20 53  |NTE.W....".DER S|
00000340: 4F 52 54 49 45 52 56 4F  52 47 41 4E 47 20 42 45  |ORTIERVORGANG BE|
00000350: 47 49 4E 4E 54 2E 22 00  5D 13 89 04 99 00 6E 13  |GINNT.".].....n.|
00000360: 8D 04 54 49 24 B2 22 30  30 30 30 30 30 22 00 8E  |..TI$."000000"..|
00000370: 13 92 04 8D 20 31 30 30  30 30 3A 8F 20 2A 2A 20  |.... 10000:. ** |
00000380: 53 4F 52 54 49 45 52 52  4F 55 54 49 4E 45 00 99  |SORTIERROUTINE..|
00000390: 13 97 04 54 24 B2 54 49  24 00 B6 13 9C 04 8D 20  |...T$.TI$...... |
000003A0: 34 30 30 30 3A 8F 20 2A  2A 20 4C 49 4E 49 45 20  |4000:. ** LINIE |
000003B0: 5A 49 45 48 45 4E 00 DB  13 A6 04 8D 20 35 30 30  |ZIEHEN...... 500|
000003C0: 30 3A 8F 20 2A 2A 20 41  55 53 47 41 42 45 20 44  |0:. ** AUSGABE D|
000003D0: 45 52 20 45 4C 45 4D 45  4E 54 45 00 FF 13 AB 04  |ER ELEMENTE.....|
000003E0: 8D 20 33 30 30 30 3A 8F  20 2A 2A 20 53 4F 52 54  |. 3000:. ** SORT|
000003F0: 49 45 52 41 52 54 20 41  55 53 47 45 42 45 4E 00  |IERART AUSGEBEN.|
00000400: 27 14 B0 04 99 22 11 45  53 20 57 55 52 44 45 4E  |'....".ES WURDEN|
00000410: 22 41 4E 22 45 4C 45 4D  45 4E 54 45 20 53 4F 52  |"AN"ELEMENTE SOR|
00000420: 54 49 45 52 54 2E 22 00  4F 14 BA 04 99 22 11 44  |TIERT.".O....".D|
00000430: 49 45 20 42 45 4E 4F 45  54 49 47 54 45 20 5A 45  |IE BENOETIGTE ZE|
00000440: 49 54 20 28 48 48 4D 4D  53 53 29 3A 22 54 24 00  |IT (HHMMSS):"T$.|
00000450: 7B 14 C4 04 99 22 11 11  57 4F 4C 4C 45 4E 20 53  |{...."..WOLLEN S|
00000460: 49 45 20 4E 4F 43 48 20  45 49 4E 4D 41 4C 20 53  |IE NOCH EINMAL S|
00000470: 4F 52 54 49 45 52 45 4E  20 3F 22 00 86 14 CE 04  |ORTIEREN ?".....|
00000480: A1 F9 20 54 41 24 00 9A  14 D8 04 8B 20 54 41 24  |.. TA$...... TA$|
00000490: B2 22 4A 22 A7 20 31 30  30 30 00 A0 14 E2 04 80  |."J". 1000......|
000004A0: 00 C2 14 B8 0B 8F 20 2A  2A 2A 20 41 55 53 47 41  |...... *** AUSGA|
000004B0: 42 45 20 53 4F 52 54 49  45 52 4E 41 4D 45 20 2A  |BE SORTIERNAME *|
000004C0: 2A 2A 00 DA 14 C2 0B 99  22 11 53 4F 52 54 49 45  |**......".SORTIE|
000004D0: 52 41 52 54 3A 20 22 53  41 24 00 E0 14 CC 0B 8E  |RART: "SA$......|
000004E0: 00 FB 14 A0 0F 8F 20 2A  2A 2A 20 4C 49 4E 49 45  |...... *** LINIE|
000004F0: 20 5A 49 45 48 45 4E 20  2A 2A 2A 00 0A 15 AA 0F  | ZIEHEN ***.....|
00000500: 81 20 41 B2 31 20 A4 20  34 30 00 14 15 B4 0F 99  |. A.1 . 40......|
00000510: 22 2D 22 3B 00 1C 15 BE  0F 82 20 41 00 22 15 C8  |"-";...... A."..|
00000520: 0F 8E 00 45 15 88 13 8F  20 2A 2A 2A 20 41 55 53  |...E.... *** AUS|
00000530: 47 41 42 45 20 44 45 52  20 45 4C 45 4D 45 4E 54  |GABE DER ELEMENT|
00000540: 45 20 2A 2A 2A 00 54 15  92 13 81 20 41 B2 31 20  |E ***.T.... A.1 |
00000550: A4 20 41 4E 00 63 15 9C  13 99 41 24 28 41 29 22  |. AN.c....A$(A)"|
00000560: 20 22 3B 00 6D 15 A6 13  82 20 41 3A 99 00 73 15  | ";.m.... A:..s.|
00000570: B0 13 8E 00 97 15 10 27  8F 20 2A 2A 2A 20 41 4E  |.......'. *** AN|
00000580: 20 44 49 45 53 45 52 20  53 54 45 4C 4C 45 20 4D  | DIESER STELLE M|
00000590: 55 53 53 20 44 41 53 00  B8 15 1A 27 8F 20 2A 2A  |USS DAS....'. **|
000005A0: 2A 20 45 4E 54 53 50 52  45 43 48 45 4E 44 45 20  |* ENTSPRECHENDE |
000005B0: 53 4F 52 54 49 45 52 2D  00 DD 15 24 27 8F 20 2A  |SORTIER-...$'. *|
000005C0: 2A 2A 20 50 52 4F 47 52  41 4D 4D 20 41 4E 47 45  |** PROGRAMM ANGE|
000005D0: 48 41 45 4E 47 54 20 57  45 52 44 45 4E 00 00 00  |HAENGT WERDEN...|
..%.... HAUPTPROGRAMM ZU DEN SORTIER-.8.
... ALGORITHMEN..W.... ES ERSTELLT EIN F
ELD MIT.W.(.. EINER BESTIMMBAREN ANZAHL.
..2.. ELEMENTEN....<.. JEDES ELEMENT BES
TEHT AUS.J.F.. DREI BELIEBIGEN BUCHSTABE
N....P.. DAS ENTSPRECHENDE SORTIER-...Z.
. UNTERPROGRAMM MUSS AB.$._.. ZEILE 1000
0 GESCHEHEN../....".":..D.... 0,1:. 1,6:
.4,1.O...."DIESES PROGRAMM ERSTELLT ZUFA
ELLIGE"......".ELEMENTE, DIE VON DEN SOR
TIERPROGRAMMEN".O....".SORTIERT WERDEN. 
JEDER SORTIERDURCHGANG"......".WIRD ANGE
ZEIGT."......"..WIEVIELE ELEMENTE";AN.(.
$.. AN.10 . .".ZU WENIG !":.1050.M.... A
N.10000 . .".ZU VIEL !":.1050.Z.8.. A$(A
N)...B.."..DIE ELEMENTE WERDEN JETZT ERZ
EUGT."...G..4000:. ** LINIE ZIEHEN.B.L..
 *** ELEMENTE ERZEUGEN ***.Q.V.. A.1 . A
N...`.. B.1 . 3...J.A$(A). A$(A).G(.(.(T
I).25).65)...T.. B:. A.3.~.. 5000:. ** A
USGABE DER ELEMENTE.W....".DER SORTIERVO
RGANG BEGINNT.".].....N...TI$."000000"..
.... 10000:. ** SORTIERROUTINE.....T$.TI
$...... 4000:. ** LINIE ZIEHEN...... 500
0:. ** AUSGABE DER ELEMENTE...... 3000:.
 ** SORTIERART AUSGEBEN.'....".ES WURDEN
"AN"ELEMENTE SORTIERT.".O....".DIE BENOE
TIGTE ZEIT (HHMMSS):"T$.{.D.."..WOLLEN S
IE NOCH EINMAL SORTIEREN ?"...N... TA$..
.X.. TA$."J". 1000. .....B.... *** AUSGA
BE SORTIERNAME ***.Z.B..".SORTIERART: "S
A$...L..... .. *** LINIE ZIEHEN ***.....
. A.1 . 40......"-";...... A.".H...E....
 *** AUSGABE DER ELEMENTE ***.T.... A.1 
. AN.C....A$(A)" ";.M.... A:..S........'
. *** AN DIESER STELLE MUSS DAS....'. **
* ENTSPRECHENDE SORTIER-...$'. *** PROGR
AMM ANGEHAENGT WERDEN...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL