Q/STRAIGHT INS
FILE INFORMATION
FILENAME(S): Q/STRAIGHT INS
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-11-02 16:54:36
APPEARS ON: 2 disk(s)
FILE HASH
c11b8ddf72abeb6fa7eda46a44e28cda63cc1e8efa9b5f0791251173e24f65bf
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 8 85 | Q/STRAIGHT INS | PRG | Treasure Chest - Reamigation | 19 | 9 | DOWNLOAD FILE |
| 64 ER 8 85 | Q/STRAIGHT INS | PRG | BrainSkull, Leopold Zyka, C64er | 19 | 9 | 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 7A 08 28 00 8F 20 4F 44 45 |AELLIG.z.(.. ODE| 00000060: 52 20 47 45 5A 49 45 48 4C 54 20 28 44 55 52 43 |R GEZIEHLT (DURC| 00000070: 48 20 45 49 4E 47 41 42 45 29 00 8A 08 32 00 8F |H EINGABE)...2..| 00000080: 20 45 52 46 4F 4C 47 45 4E 2E 00 90 08 3C 00 8F | ERFOLGEN....<..| 00000090: 00 B6 08 46 00 8F 20 53 4F 52 54 49 45 52 41 4C |...F.. SORTIERAL| 000000A0: 47 4F 52 49 54 48 4D 45 4E 20 45 52 48 41 4C 54 |GORITHMEN ERHALT| 000000B0: 45 4E 20 44 49 45 00 DD 08 50 00 8F 20 5A 45 49 |EN DIE...P.. ZEI| 000000C0: 4C 45 4E 4E 55 4D 4D 45 52 4E 20 56 4F 4E 20 31 |LENNUMMERN VON 1| 000000D0: 30 30 30 20 42 49 53 20 31 30 30 30 30 00 01 09 |000 BIS 10000...| 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 9A 0B F2 03 99 22 93 22 00 CF 0B FC 03 99 |D......"."......| 000003A0: 3A 99 22 53 49 45 20 4D 55 45 53 53 45 4E 20 4A |:."SIE MUESSEN J| 000003B0: 45 54 5A 54 22 41 22 20 45 4C 45 4D 45 4E 54 45 |ETZT"A" ELEMENTE| 000003C0: 20 45 49 4E 47 45 42 45 4E 21 22 3A 99 3A 99 00 | EINGEBEN!":.:..| 000003D0: FF 0B 06 04 99 22 4A 45 44 45 53 20 45 4C 45 4D |....."JEDES ELEM| 000003E0: 45 4E 54 20 42 45 53 54 45 48 54 20 41 55 53 20 |ENT BESTEHT AUS | 000003F0: 33 20 5A 45 49 43 48 45 4E 2E 22 3A 99 3A 99 00 |3 ZEICHEN.":.:..| 00000400: 0A 0C 10 04 81 58 B2 31 A4 41 00 27 0C 1A 04 99 |.....X.1.A.'....| 00000410: 58 22 2E 20 22 3B 3A 85 22 45 4C 45 4D 45 4E 54 |X". ";:."ELEMENT| 00000420: 22 3B 41 24 28 58 29 00 3D 0C 24 04 8B C3 28 41 |";A$(X).=.$...(A| 00000430: 24 28 58 29 29 B3 B1 33 A7 31 30 35 30 00 44 0C |$(X))..3.1050.D.| 00000440: 2E 04 82 58 00 4A 0C 38 04 8E 00 63 0C D0 07 8F |...X.J.8...c....| 00000450: 20 5A 55 46 41 45 4C 4C 49 47 45 20 45 49 4E 47 | ZUFAELLIGE EING| 00000460: 41 42 45 00 6C 0C DA 07 99 22 93 22 00 AC 0C E4 |ABE.l...."."....| 00000470: 07 99 3A 99 22 45 53 20 57 45 52 44 45 4E 20 4A |..:."ES WERDEN J| 00000480: 45 54 5A 54 22 41 22 20 45 4C 45 4D 45 4E 54 45 |ETZT"A" ELEMENTE| 00000490: 20 5A 55 46 41 45 4C 4C 49 47 22 3A 99 3A 99 22 | ZUFAELLIG":.:."| 000004A0: 41 55 53 47 45 57 41 45 48 4C 54 22 00 DE 0C EE |AUSGEWAEHLT"....| 000004B0: 07 99 3A 99 22 4A 45 44 45 53 20 45 4C 45 4D 45 |..:."JEDES ELEME| 000004C0: 4E 54 20 42 45 53 54 45 48 54 20 41 55 53 20 33 |NT BESTEHT AUS 3| 000004D0: 20 5A 45 49 43 48 45 4E 2E 22 3A 99 3A 99 00 E9 | ZEICHEN.":.:...| 000004E0: 0C F8 07 81 58 B2 31 A4 41 00 F6 0C 02 08 41 24 |....X.1.A.....A$| 000004F0: 28 58 29 B2 22 22 00 22 0D 0C 08 81 59 B2 31 A4 |(X).""."....Y.1.| 00000500: 33 3A 41 24 28 58 29 B2 41 24 28 58 29 AA C7 28 |3:A$(X).A$(X)..(| 00000510: B5 28 BB 28 54 49 29 AC 32 35 29 AA 36 35 29 3A |.(.(TI).25).65):| 00000520: 82 59 00 29 0D 16 08 82 58 00 2F 0D 20 08 8E 00 |.Y.)....X./. ...| 00000530: 52 0D B8 0B 8F 20 5A 57 49 53 43 48 45 4E 41 55 |R.... ZWISCHENAU| 00000540: 53 47 41 42 45 20 44 45 52 20 45 4C 45 4D 45 4E |SGABE DER ELEMEN| 00000550: 54 45 00 63 0D C2 0B 81 20 49 B2 31 A4 41 AB 39 |TE.c.... I.1.A.9| 00000560: A9 31 30 00 81 0D CC 0B 81 20 4A B2 49 A4 49 AA |.10...... J.I.I.| 00000570: 39 3A 98 31 2C 41 24 28 4A 29 22 20 22 3B 3A 82 |9:.1,A$(J)" ";:.| 00000580: 4A 00 8F 0D D6 0B 98 31 3A 82 49 3A 20 98 31 00 |J......1:.I: .1.| 00000590: 95 0D E0 0B 8E 00 A8 0D A0 0F 8F 20 57 45 49 54 |........... WEIT| 000005A0: 45 52 4D 41 43 48 45 4E 00 B1 0D A5 0F 9F 31 2C |ERMACHEN......1,| 000005B0: 44 00 D7 0D AA 0F 99 22 93 41 55 53 47 41 42 45 |D......".AUSGABE| 000005C0: 20 44 45 53 20 45 52 53 54 45 4C 4C 54 45 4E 20 | DES ERSTELLTEN | 000005D0: 46 45 4C 44 45 53 22 00 DD 0D B4 0F 99 00 E7 0D |FELDES".........| 000005E0: BE 0F 8D 33 30 30 30 00 00 0E C8 0F 8F 20 53 4F |...3000...... SO| 000005F0: 52 54 49 45 52 55 4E 47 20 53 54 41 52 54 45 54 |RTIERUNG STARTET| 00000600: 00 06 0E D2 0F 8F 00 11 0E 38 27 81 58 B2 32 A4 |.........8'.X.2.| 00000610: 41 00 2C 0E 42 27 8B 41 24 28 58 29 B1 B2 41 24 |A.,.B'.A$(X)..A$| 00000620: 28 58 AB 31 29 A7 20 31 30 31 32 30 00 45 0E 56 |(X.1). 10120.E.V| 00000630: 27 58 24 B2 41 24 28 58 29 3A 81 59 B2 58 AB 31 |'X$.A$(X):.Y.X.1| 00000640: A4 31 A9 AB 31 00 57 0E 60 27 41 24 28 59 AA 31 |.1..1.W.`'A$(Y.1| 00000650: 29 B2 41 24 28 59 29 00 6F 0E 6A 27 8B 58 24 B3 |).A$(Y).o.j'.X$.| 00000660: B2 41 24 28 59 AB 31 29 A7 20 31 30 31 31 30 00 |.A$(Y.1). 10110.| 00000670: 83 0E 74 27 41 24 28 59 29 B2 58 24 3A 89 31 30 |..t'A$(Y).X$:.10| 00000680: 31 32 30 00 8A 0E 7E 27 82 59 00 91 0E 88 27 82 |120...~'.Y....'.| 00000690: 58 00 A6 0E 50 C3 8F 20 45 4E 44 45 42 45 48 41 |X...P.. ENDEBEHA| 000006A0: 4E 44 4C 55 4E 47 00 AD 0E 5A C3 98 31 00 B8 0E |NDLUNG...Z..1...| 000006B0: 64 C3 8D 20 33 30 30 30 00 CD 0E 6E C3 98 31 2C |d.. 3000...n..1,| 000006C0: 41 3B 22 20 45 4C 45 4D 45 4E 54 45 22 00 DA 0E |A;" ELEMENTE"...| 000006D0: 78 C3 98 31 3A 98 31 3A A0 31 00 E0 0E 82 C3 80 |x..1:.1:.1......| 000006E0: 00 00 00 |... |
..".... ERSTELLEN EINES FELDES ZUM.3.... SORTIEREN..V.... DAS ERSTELLEN KANN ZUF AELLIG.Z.(.. ODER GEZIEHLT (DURCH EINGAB E)...2.. ERFOLGEN....<.....F.. SORTIERAL GORITHMEN ERHALTEN DIE...P.. ZEILENNUMME RN VON 1000 BIS 10000...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......" .".O....:."SIE MUESSEN JETZT"A" ELEMENTE EINGEBEN!":.:......."JEDES ELEMENT BEST EHT AUS 3 ZEICHEN.":.:.......X.1.A.'.... X". ";:."ELEMENT";A$(X).=.$..C(A$(X))..3 .1050.D....X.J.8...C.P.. ZUFAELLIGE EING ABE.L.Z.."."......:."ES WERDEN JETZT"A" ELEMENTE ZUFAELLIG":.:."AUSGEWAEHLT".... ..:."JEDES ELEMENT BESTEHT AUS 3 ZEICHEN .":.:.......X.1.A.....A$(X).""."....Y.1. 3:A$(X).A$(X).G(.(.(TI).25).65):.Y.).... X./. ...R.... ZWISCHENAUSGABE DER ELEMEN TE.C.B.. I.1.A.9.10...L.. J.I.I.9:.1,A$( J)" ";:.J...V..1:.I: .1......... .. WEIT ERMACHEN......1,D.W....".AUSGABE DES ERS TELLTEN FELDES"............3000...H.. SO RTIERUNG STARTET...R.....8'.X.2.A.,.B'.A $(X)..A$(X.1). 10120.E.V'X$.A$(X):.Y.X.1 .1..1.W.`'A$(Y.1).A$(Y).O.J'.X$..A$(Y.1) . 10110...T'A$(Y).X$:.10120...~'.Y....'. X...PC. ENDEBEHANDLUNG...ZC.1...DC. 3000 .M.NC.1,A;" ELEMENTE".Z.XC.1:.1: 1....C. ...
> CLICK IMAGE PREVIEW FOR FULL MODAL