MISCHSORT
FILE INFORMATION
FILENAME(S): MISCHSORT
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-10-20 14:29:58
APPEARS ON: 1 disk(s)
FILE HASH
d952e841f439da93183fdb561b35609df0b4872f640181fae7eac9eb9f09b042
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MT90499 SEITE 1 | MISCHSORT | PRG | Treasure Chest - Klaus Der Suhler | 25 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 0A 00 8F 20 45 52 53 54 45 4C 4C 45 |..".... ERSTELLE| 00000010: 4E 20 45 49 4E 45 53 20 46 45 4C 44 45 53 20 5A |N EINES FELDES Z| 00000020: 55 4D 00 33 08 14 00 8F 20 53 4F 52 54 49 45 52 |UM.3.... SORTIER| 00000030: 45 4E 2E 00 56 08 1E 00 8F 20 44 41 53 20 45 52 |EN..V.... DAS ER| 00000040: 53 54 45 4C 4C 45 4E 20 4B 41 4E 4E 20 5A 55 46 |STELLEN KANN ZUF| 00000050: 41 45 4C 4C 49 47 00 79 08 28 00 8F 20 4F 44 45 |AELLIG.y.(.. ODE| 00000060: 52 20 47 45 5A 49 45 4C 54 20 28 44 55 52 43 48 |R GEZIELT (DURCH| 00000070: 20 45 49 4E 47 41 42 45 29 00 89 08 32 00 8F 20 | EINGABE)...2.. | 00000080: 45 52 46 4F 4C 47 45 4E 2E 00 8F 08 3C 00 8F 00 |ERFOLGEN....<...| 00000090: B5 08 46 00 8F 20 53 4F 52 54 49 45 52 41 4C 47 |..F.. SORTIERALG| 000000A0: 4F 52 49 54 48 4D 45 4E 20 45 52 48 41 4C 54 45 |ORITHMEN ERHALTE| 000000B0: 4E 20 44 49 45 00 DD 08 50 00 8F 20 5A 45 49 4C |N DIE...P.. ZEIL| 000000C0: 45 4E 4E 55 4D 4D 45 52 4E 20 56 4F 4E 20 31 30 |ENNUMMERN VON 10| 000000D0: 30 30 30 20 42 49 53 20 35 30 30 30 30 00 01 09 |000 BIS 50000...| 000000E0: 5A 00 8F 20 53 49 45 20 42 45 4E 4F 45 54 49 47 |Z.. SIE BENOETIG| 000000F0: 45 4E 20 4A 45 57 45 49 4C 53 20 44 49 45 53 45 |EN JEWEILS DIESE| 00000100: 4E 00 21 09 63 00 8F 20 56 4F 52 53 50 41 4E 4E |N.!.c.. VORSPANN| 00000110: 20 5A 55 52 20 41 55 53 46 55 45 48 52 55 4E 47 | ZUR AUSFUEHRUNG| 00000120: 2E 00 41 09 64 00 8F 20 48 45 52 53 54 45 4C 4C |..A.d.. HERSTELL| 00000130: 55 4E 47 20 45 49 4E 45 53 20 41 52 52 41 59 53 |UNG EINES ARRAYS| 00000140: 3A 00 5F 09 6E 00 8F 20 41 52 52 41 59 56 41 52 |:._.n.. ARRAYVAR| 00000150: 49 41 42 4C 45 20 20 20 20 20 20 2D 20 41 24 00 |IABLE - A$.| 00000160: 82 09 78 00 8F 20 53 43 48 4C 45 49 46 45 4E 56 |..x.. SCHLEIFENV| 00000170: 41 52 49 41 42 4C 45 4E 20 2D 20 58 2C 20 59 2C |ARIABLEN - X, Y,| 00000180: 20 5A 00 A8 09 82 00 8F 20 48 49 4C 46 53 56 41 | Z...... HILFSVA| 00000190: 52 49 41 42 4C 45 4E 20 20 20 20 20 2D 20 42 24 |RIABLEN - B$| 000001A0: 2C 20 43 24 2C 20 44 24 00 C6 09 8C 00 8F 20 44 |, C$, D$...... D| 000001B0: 52 45 49 45 43 4B 54 41 55 53 43 48 20 4D 49 54 |REIECKTAUSCH MIT| 000001C0: 20 20 2D 20 53 24 00 D1 09 96 00 99 22 93 22 3A | - S$......".":| 000001D0: 9C 00 04 0A A0 00 99 22 53 4F 4C 4C 20 56 4F 4E |......."SOLL VON| 000001E0: 20 12 48 92 41 4E 44 20 4F 44 45 52 20 12 5A 92 | .H.AND ODER .Z.| 000001F0: 55 46 41 45 4C 4C 49 47 20 45 52 53 54 45 4C 4C |UFAELLIG ERSTELL| 00000200: 54 22 3A 99 00 16 0A AA 00 85 22 57 45 52 44 45 |T":......."WERDE| 00000210: 4E 20 22 3B 58 24 00 2F 0A B4 00 8B 58 24 B3 B1 |N ";X$./....X$..| 00000220: 22 48 22 AF 58 24 B3 B1 22 5A 22 A7 31 35 30 00 |"H".X$.."Z".150.| 00000230: 4B 0A BE 00 8B 58 24 B2 22 48 22 A7 8D 32 32 30 |K....X$."H"..220| 00000240: 3A 8D 31 30 30 30 3A 89 32 31 30 00 5A 0A C8 00 |:.1000:.210.Z...| 00000250: 8D 32 32 30 3A 8D 32 30 30 30 00 74 0A D2 00 89 |.220:.2000.t....| 00000260: 34 30 30 30 3A 20 8F 20 57 45 49 54 45 52 4D 41 |4000: . WEITERMA| 00000270: 43 48 45 4E 00 98 0A DC 00 8F 20 41 4E 5A 41 48 |CHEN...... ANZAH| 00000280: 4C 20 44 45 52 20 45 4C 45 4D 45 4E 54 45 20 42 |L DER ELEMENTE B| 00000290: 45 53 54 49 4D 4D 45 4E 00 B8 0A E6 00 99 3A 85 |ESTIMMEN......:.| 000002A0: 22 41 4E 5A 41 48 4C 20 44 45 52 20 45 4C 45 4D |"ANZAHL DER ELEM| 000002B0: 45 4E 54 45 20 22 3B 41 00 E2 0A F0 00 8B 20 41 |ENTE ";A...... A| 000002C0: B1 31 30 30 30 30 A7 99 3A 99 22 5A 55 20 56 49 |.10000..:."ZU VI| 000002D0: 45 4C 45 20 45 4C 45 4D 45 4E 54 45 22 3A 89 32 |ELE ELEMENTE":.2| 000002E0: 33 30 00 09 0B FA 00 8B 41 B3 31 30 A7 99 3A 99 |30......A.10..:.| 000002F0: 22 5A 55 20 57 45 4E 49 47 45 20 45 4C 45 4D 45 |"ZU WENIGE ELEME| 00000300: 4E 54 45 22 3A 89 32 33 30 00 15 0B FF 00 86 20 |NTE":.230...... | 00000310: 41 24 28 41 29 00 3E 0B 04 01 85 22 11 11 12 44 |A$(A).>...."...D| 00000320: 92 52 55 43 4B 45 52 20 4F 44 45 52 20 12 42 92 |.RUCKER ODER .B.| 00000330: 49 4C 44 53 43 48 49 52 4D 20 22 3B 59 24 00 57 |ILDSCHIRM ";Y$.W| 00000340: 0B 0E 01 8B 59 24 B3 B1 22 44 22 AF 59 24 B3 B1 |....Y$.."D".Y$..| 00000350: 22 42 22 A7 32 36 30 00 6C 0B 18 01 8B 59 24 B2 |"B".260.l....Y$.| 00000360: 22 44 22 A7 44 B2 34 3A 89 33 30 30 00 74 0B 22 |"D".D.4:.300.t."| 00000370: 01 44 B2 33 00 7A 0B 2C 01 8E 00 91 0B E8 03 8F |.D.3.z.,........| 00000380: 20 45 49 4E 47 41 42 45 20 56 4F 4E 20 48 41 4E | EINGABE VON HAN| 00000390: 44 00 B5 0B F2 03 99 22 93 56 4F 52 57 41 45 52 |D......".VORWAER| 000003A0: 54 53 20 4F 44 45 52 20 52 55 45 43 4B 57 41 45 |TS ODER RUECKWAE| 000003B0: 52 54 53 22 3B 00 D3 0B FC 03 85 58 24 3A 8B 58 |RTS";......X$:.X| 000003C0: 24 B3 B1 22 52 22 AF 58 24 B3 B1 22 56 22 A7 31 |$.."R".X$.."V".1| 000003D0: 30 32 30 00 E5 0B 06 04 52 B2 31 3A 58 31 B2 31 |020.....R.1:X1.1| 000003E0: 3A 58 32 B2 41 00 00 0C 10 04 8B 58 24 B2 22 52 |:X2.A......X$."R| 000003F0: 22 A7 52 B2 AB 31 3A 58 31 B2 41 3A 58 32 B2 31 |".R..1:X1.A:X2.1| 00000400: 00 13 0C 1A 04 59 B2 30 3A 81 58 B2 58 31 A4 58 |.....Y.0:.X.X1.X| 00000410: 32 A9 52 00 2B 0C 24 04 59 B2 59 AA 31 3A 41 24 |2.R.+.$.Y.Y.1:A$| 00000420: 28 59 29 B2 C4 28 58 AA 39 39 29 00 32 0C 2E 04 |(Y)..(X.99).2...| 00000430: 82 58 00 38 0C 38 04 8E 00 51 0C D0 07 8F 20 5A |.X.8.8...Q.... Z| 00000440: 55 46 41 45 4C 4C 49 47 45 20 45 49 4E 47 41 42 |UFAELLIGE EINGAB| 00000450: 45 00 5A 0C DA 07 99 22 93 22 00 9A 0C E4 07 99 |E.Z...."."......| 00000460: 3A 99 22 45 53 20 57 45 52 44 45 4E 20 4A 45 54 |:."ES WERDEN JET| 00000470: 5A 54 22 41 22 20 45 4C 45 4D 45 4E 54 45 20 5A |ZT"A" ELEMENTE Z| 00000480: 55 46 41 45 4C 4C 49 47 22 3A 99 3A 99 22 41 55 |UFAELLIG":.:."AU| 00000490: 53 47 45 57 41 45 48 4C 54 22 00 CC 0C EE 07 99 |SGEWAEHLT"......| 000004A0: 3A 99 22 4A 45 44 45 53 20 45 4C 45 4D 45 4E 54 |:."JEDES ELEMENT| 000004B0: 20 42 45 53 54 45 48 54 20 41 55 53 20 33 20 5A | BESTEHT AUS 3 Z| 000004C0: 45 49 43 48 45 4E 2E 22 3A 99 3A 99 00 D7 0C F8 |EICHEN.":.:.....| 000004D0: 07 81 58 B2 31 A4 41 00 E4 0C 02 08 41 24 28 58 |..X.1.A.....A$(X| 000004E0: 29 B2 22 22 00 10 0D 0C 08 81 59 B2 31 A4 33 3A |).""......Y.1.3:| 000004F0: 41 24 28 58 29 B2 41 24 28 58 29 AA C7 28 B5 28 |A$(X).A$(X)..(.(| 00000500: BB 28 54 49 29 AC 32 35 29 AA 36 35 29 3A 82 59 |.(TI).25).65):.Y| 00000510: 00 17 0D 16 08 82 58 00 1D 0D 20 08 8E 00 40 0D |......X... ...@.| 00000520: B8 0B 8F 20 5A 57 49 53 43 48 45 4E 41 55 53 47 |... ZWISCHENAUSG| 00000530: 41 42 45 20 44 45 52 20 45 4C 45 4D 45 4E 54 45 |ABE DER ELEMENTE| 00000540: 00 51 0D C2 0B 81 20 49 B2 31 A4 41 AB 39 A9 31 |.Q.... I.1.A.9.1| 00000550: 30 00 6F 0D CC 0B 81 20 4A B2 49 A4 49 AA 39 3A |0.o.... J.I.I.9:| 00000560: 98 31 2C 41 24 28 4A 29 22 20 22 3B 3A 82 4A 00 |.1,A$(J)" ";:.J.| 00000570: 79 0D D6 0B 98 31 3A 82 49 00 7F 0D E0 0B 8E 00 |y....1:.I.......| 00000580: 92 0D A0 0F 8F 20 57 45 49 54 45 52 4D 41 43 48 |..... WEITERMACH| 00000590: 45 4E 00 9B 0D A5 0F 9F 31 2C 44 00 C1 0D AA 0F |EN......1,D.....| 000005A0: 99 22 93 41 55 53 47 41 42 45 20 44 45 53 20 45 |.".AUSGABE DES E| 000005B0: 52 53 54 45 4C 4C 54 45 4E 20 46 45 4C 44 45 53 |RSTELLTEN FELDES| 000005C0: 22 00 C7 0D B4 0F 99 00 D1 0D BE 0F 8D 33 30 30 |"............300| 000005D0: 30 00 EA 0D C8 0F 8F 20 53 4F 52 54 49 45 52 55 |0...... SORTIERU| 000005E0: 4E 47 20 53 54 41 52 54 45 54 00 F0 0D D2 0F 8F |NG STARTET......| 000005F0: 00 01 0E 38 27 54 49 24 B2 22 30 30 30 30 30 30 |...8'TI$."000000| 00000600: 22 00 1B 0E 42 27 5A 46 B2 B5 28 41 AD 32 AA 2E |"...B'ZF..(A.2..| 00000610: 35 29 3A 86 54 56 24 28 5A 46 29 00 28 0E 4C 27 |5):.TV$(ZF).(.L'| 00000620: 81 58 B2 32 A4 41 A9 32 00 65 0E 56 27 8B 41 24 |.X.2.A.2.e.V'.A$| 00000630: 28 58 AB 31 29 B1 41 24 28 58 29 A7 54 56 24 28 |(X.1).A$(X).TV$(| 00000640: 30 29 B2 41 24 28 58 AB 31 29 3A 41 24 28 58 AB |0).A$(X.1):A$(X.| 00000650: 31 29 B2 41 24 28 58 29 3A 41 24 28 58 29 B2 54 |1).A$(X):A$(X).T| 00000660: 56 24 28 30 29 00 78 0E 60 27 82 58 3A 8B 41 B3 |V$(0).x.`'.X:.A.| 00000670: 33 A7 20 35 30 30 30 30 00 96 0E 6A 27 4C 46 B2 |3. 50000...j'LF.| 00000680: 31 3A 81 4D 5A B2 31 A4 B5 28 BC 28 41 AB 31 29 |1:.MZ.1..(.(A.1)| 00000690: AD BC 28 32 29 29 00 B0 0E 74 27 5A 46 B2 B5 28 |..(2))...t'ZF..(| 000006A0: 5A 46 AD 32 AA 2E 35 29 3A 4C 46 B2 32 AC 4C 46 |ZF.2..5):LF.2.LF| 000006B0: 00 E8 0E 7E 27 81 46 5A B2 31 A4 5A 46 3A 41 31 |...~'.FZ.1.ZF:A1| 000006C0: B2 31 AA 32 AC 4C 46 AC 28 46 5A AB 31 29 3A 41 |.1.2.LF.(FZ.1):A| 000006D0: 32 B2 41 31 AA 4C 46 3A 45 31 B2 41 32 AB 31 3A |2.A1.LF:E1.A2.1:| 000006E0: 45 32 B2 45 31 AA 4C 46 00 00 0F 88 27 8B 45 32 |E2.E1.LF....'.E2| 000006F0: B3 B2 41 A7 45 54 B2 4C 46 3A 89 31 30 31 35 30 |..A.ET.LF:.10150| 00000700: 00 10 0F 92 27 8B 41 B3 41 32 A7 31 30 32 33 30 |....'.A.A2.10230| 00000710: 00 23 0F 9C 27 45 32 B2 41 3A 45 54 B2 41 AA 31 |.#..'E2.A:ET.A.1| 00000720: AB 41 32 00 41 0F A6 27 81 58 B2 31 A4 45 54 3A |.A2.A..'.X.1.ET:| 00000730: 54 56 24 28 58 29 B2 41 24 28 58 AA 45 31 29 3A |TV$(X).A$(X.E1):| 00000740: 82 00 51 0F B0 27 81 58 B2 45 32 A4 41 31 A9 AB |..Q..'.X.E2.A1..| 00000750: 31 00 6B 0F BA 27 8B 41 24 28 45 31 29 B3 54 56 |1.k..'.A$(E1).TV| 00000760: 24 28 45 54 29 A7 31 30 32 30 30 00 92 0F C4 27 |$(ET).10200....'| 00000770: 41 24 28 58 29 B2 41 24 28 45 31 29 3A 45 31 B2 |A$(X).A$(E1):E1.| 00000780: 45 31 AB 31 3A 8B 45 31 B1 B2 41 31 A7 31 30 32 |E1.1:.E1..A1.102| 00000790: 32 30 00 C3 0F CE 27 81 59 B2 58 AB 31 A4 41 31 |20....'.Y.X.1.A1| 000007A0: A9 AB 31 3A 41 24 28 59 29 B2 54 56 24 28 45 54 |..1:A$(Y).TV$(ET| 000007B0: 29 3A 45 54 B2 45 54 AB 31 3A 82 59 3A 89 31 30 |):ET.ET.1:.Y:.10| 000007C0: 32 31 30 00 EA 0F D8 27 41 24 28 58 29 B2 54 56 |210....'A$(X).TV| 000007D0: 24 28 45 54 29 3A 45 54 B2 45 54 AB 31 3A 8B 45 |$(ET):ET.ET.1:.E| 000007E0: 54 B1 B2 31 A7 31 30 32 32 30 00 F3 0F E2 27 58 |T..1.10220....'X| 000007F0: B2 41 31 00 FA 0F EC 27 82 58 00 05 10 F6 27 82 |.A1....'.X....'.| 00000800: 46 5A 2C 4D 5A 00 21 10 50 C3 54 24 B2 54 49 24 |FZ,MZ.!.P.T$.TI$| 00000810: 3A 8F 20 45 4E 44 45 42 45 48 41 4E 44 4C 55 4E |:. ENDEBEHANDLUN| 00000820: 47 00 28 10 5A C3 98 31 00 33 10 64 C3 8D 20 33 |G.(.Z..1.3.d.. 3| 00000830: 30 30 30 00 48 10 6E C3 98 31 2C 41 3B 22 20 45 |000.H.n..1,A;" E| 00000840: 4C 45 4D 45 4E 54 45 22 00 5B 10 78 C3 98 31 3A |LEMENTE".[.x..1:| 00000850: 98 31 3A 98 31 2C 54 24 3A A0 31 00 61 10 82 C3 |.1:.1,T$:.1.a...| 00000860: 80 00 00 00 |.... |
..".... ERSTELLEN EINES FELDES ZUM.3.... SORTIEREN..V.... DAS ERSTELLEN KANN ZUF AELLIG.Y.(.. ODER GEZIELT (DURCH EINGABE )...2.. ERFOLGEN....<.....F.. SORTIERALG ORITHMEN ERHALTEN DIE...P.. ZEILENNUMMER N VON 10000 BIS 50000...Z.. SIE BENOETIG EN JEWEILS DIESEN.!.C.. VORSPANN ZUR AUS FUEHRUNG..A.D.. HERSTELLUNG EINES ARRAYS :._.N.. ARRAYVARIABLE - A$...X.. SC HLEIFENVARIABLEN - X, Y, Z...... HILFSVA RIABLEN - B$, C$, D$.F.... DREIECKTA USCH MIT - S$.Q....".":.... .."SOLL VON .H.AND ODER .Z.UFAELLIG ERSTELLT":..... .."WERDEN ";X$./....X$.."H".X$.."Z".150. K....X$."H"..220:.1000:.210.Z.H..220:.20 00.T.R..4000: . WEITERMACHEN...... ANZAH L DER ELEMENTE BESTIMMEN......:."ANZAHL DER ELEMENTE ";A...... A.10000..:."ZU VI ELE ELEMENTE":.230......A.10..:."ZU WENI GE ELEMENTE":.230...... A$(A).>...."...D .RUCKER ODER .B.ILDSCHIRM ";Y$.W....Y$.. "D".Y$.."B".260.L....Y$."D".D.4:.300.T." .D.3.Z.,........ EINGABE VON HAND......" .VORWAERTS ODER RUECKWAERTS";.S....X$:.X $.."R".X$.."V".1020.....R.1:X1.1:X2.A... ...X$."R".R..1:X1.A:X2.1.....Y.0:.X.X1.X 2.R.+.$.Y.Y.1:A$(Y).D(X.99).2....X.8.8.. .Q.P.. ZUFAELLIGE EINGABE.Z.Z.."."...... :."ES WERDEN JETZT"A" ELEMENTE ZUFAELLIG ":.:."AUSGEWAEHLT".L....:."JEDES ELEMENT BESTEHT AUS 3 ZEICHEN.":.:..W....X.1.A. ....A$(X).""......Y.1.3:A$(X).A$(X).G(.( .(TI).25).65):.Y......X... ...@.... ZWIS CHENAUSGABE DER ELEMENTE.Q.B.. I.1.A.9.1 0.O.L.. J.I.I.9:.1,A$(J)" ";:.J.Y.V..1:. I........ .. WEITERMACHEN......1,D.A... .".AUSGABE DES ERSTELLTEN FELDES".G..... Q....3000...H.. SORTIERUNG STARTET...R.. ...8'TI$."000000"...B'ZF..(A.2..5):.TV$( ZF).(.L'.X.2.A.2.E.V'.A$(X.1).A$(X).TV$( 0).A$(X.1):A$(X.1).A$(X):A$(X).TV$(0).X. `'.X:.A.3. 50000...J'LF.1:.MZ.1..(.(A.1) ..(2))...T'ZF..(ZF.2..5):LF.2.LF...~'.FZ .1.ZF:A1.1.2.LF.(FZ.1):A2.A1.LF:E1.A2.1: E2.E1.LF....'.E2..A.ET.LF:.10150....'.A. A2.10230.#..'E2.A:ET.A.1.A2.A..'.X.1.ET: TV$(X).A$(X.E1):..Q..'.X.E2.A1..1.K..'.A $(E1).TV$(ET).10200...D'A$(X).A$(E1):E1. E1.1:.E1..A1.10220.C.N'.Y.X.1.A1..1:A$(Y ).TV$(ET):ET.ET.1:.Y:.10210...X'A$(X).TV $(ET):ET.ET.1:.ET..1.10220....'X.A1....' .X....'.FZ,MZ.!.PCT$.TI$:. ENDEBEHANDLUN G.(.ZC.1.3.DC. 3000.H.NC.1,A;" ELEMENTE" .[.XC.1:.1:.1,T$: 1.A..C....
> CLICK IMAGE PREVIEW FOR FULL MODAL