Q/STRAIGHT SEL

FILE INFORMATION

FILENAME(S): Q/STRAIGHT SEL

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-11-02 16:54:36

APPEARS ON: 2 disk(s)

FILE HASH

bf9d068fe8fbf115c85aa4f5ba52ba4e04992ba0d4cee2464a40fdb6d1de20f9

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
64 ER 8 85	Q/STRAIGHT SEL	PRG	Treasure Chest - Reamigation	20	0	DOWNLOAD FILE
64 ER 8 85	Q/STRAIGHT SEL	PRG	BrainSkull, Leopold Zyka, C64er	20	0	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 DE  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 30 20 42 49 53  20 35 30 30 30 30 00 02  |0000 BIS 50000..|
000000E0: 09 5A 00 8F 20 53 49 45  20 42 45 4E 4F 45 54 49  |.Z.. SIE BENOETI|
000000F0: 47 45 4E 20 4A 45 57 45  49 4C 53 20 44 49 45 53  |GEN JEWEILS DIES|
00000100: 45 4E 00 22 09 63 00 8F  20 56 4F 52 53 50 41 4E  |EN.".c.. VORSPAN|
00000110: 4E 20 5A 55 52 20 41 55  53 46 55 45 48 52 55 4E  |N ZUR AUSFUEHRUN|
00000120: 47 2E 00 42 09 64 00 8F  20 48 45 52 53 54 45 4C  |G..B.d.. HERSTEL|
00000130: 4C 55 4E 47 20 45 49 4E  45 53 20 41 52 52 41 59  |LUNG EINES ARRAY|
00000140: 53 3A 00 60 09 6E 00 8F  20 41 52 52 41 59 56 41  |S:.`.n.. ARRAYVA|
00000150: 52 49 41 42 4C 45 20 20  20 20 20 20 2D 20 41 24  |RIABLE      - A$|
00000160: 00 83 09 78 00 8F 20 53  43 48 4C 45 49 46 45 4E  |...x.. SCHLEIFEN|
00000170: 56 41 52 49 41 42 4C 45  4E 20 2D 20 58 2C 20 59  |VARIABLEN - X, Y|
00000180: 2C 20 5A 00 A9 09 82 00  8F 20 48 49 4C 46 53 56  |, Z...... HILFSV|
00000190: 41 52 49 41 42 4C 45 4E  20 20 20 20 20 2D 20 42  |ARIABLEN     - B|
000001A0: 24 2C 20 43 24 2C 20 44  24 00 C7 09 8C 00 8F 20  |$, C$, D$...... |
000001B0: 44 52 45 49 45 43 4B 54  41 55 53 43 48 20 4D 49  |DREIECKTAUSCH MI|
000001C0: 54 20 20 2D 20 53 24 00  D2 09 96 00 99 22 93 22  |T  - S$......"."|
000001D0: 3A 9C 00 05 0A A0 00 99  22 53 4F 4C 4C 20 56 4F  |:......."SOLL VO|
000001E0: 4E 20 12 48 92 41 4E 44  20 4F 44 45 52 20 12 5A  |N .H.AND ODER .Z|
000001F0: 92 55 46 41 45 4C 4C 49  47 20 45 52 53 54 45 4C  |.UFAELLIG ERSTEL|
00000200: 4C 54 22 3A 99 00 17 0A  AA 00 85 22 57 45 52 44  |LT":......."WERD|
00000210: 45 4E 20 22 3B 58 24 00  30 0A B4 00 8B 58 24 B3  |EN ";X$.0....X$.|
00000220: B1 22 48 22 AF 58 24 B3  B1 22 5A 22 A7 31 35 30  |."H".X$.."Z".150|
00000230: 00 4C 0A BE 00 8B 58 24  B2 22 48 22 A7 8D 32 32  |.L....X$."H"..22|
00000240: 30 3A 8D 31 30 30 30 3A  89 32 31 30 00 5B 0A C8  |0:.1000:.210.[..|
00000250: 00 8D 32 32 30 3A 8D 32  30 30 30 00 75 0A D2 00  |..220:.2000.u...|
00000260: 89 34 30 30 30 3A 20 8F  20 57 45 49 54 45 52 4D  |.4000: . WEITERM|
00000270: 41 43 48 45 4E 00 99 0A  DC 00 8F 20 41 4E 5A 41  |ACHEN...... ANZA|
00000280: 48 4C 20 44 45 52 20 45  4C 45 4D 45 4E 54 45 20  |HL DER ELEMENTE |
00000290: 42 45 53 54 49 4D 4D 45  4E 00 B9 0A E6 00 99 3A  |BESTIMMEN......:|
000002A0: 85 22 41 4E 5A 41 48 4C  20 44 45 52 20 45 4C 45  |."ANZAHL DER ELE|
000002B0: 4D 45 4E 54 45 20 22 3B  41 00 E3 0A F0 00 8B 20  |MENTE ";A...... |
000002C0: 41 B1 31 30 30 30 30 A7  99 3A 99 22 5A 55 20 56  |A.10000..:."ZU V|
000002D0: 49 45 4C 45 20 45 4C 45  4D 45 4E 54 45 22 3A 89  |IELE ELEMENTE":.|
000002E0: 32 33 30 00 0A 0B FA 00  8B 41 B3 31 30 A7 99 3A  |230......A.10..:|
000002F0: 99 22 5A 55 20 57 45 4E  49 47 45 20 45 4C 45 4D  |."ZU WENIGE ELEM|
00000300: 45 4E 54 45 22 3A 89 32  33 30 00 16 0B FF 00 86  |ENTE":.230......|
00000310: 20 41 24 28 41 29 00 3F  0B 04 01 85 22 11 11 12  | A$(A).?...."...|
00000320: 44 92 52 55 43 4B 45 52  20 4F 44 45 52 20 12 42  |D.RUCKER ODER .B|
00000330: 92 49 4C 44 53 43 48 49  52 4D 20 22 3B 59 24 00  |.ILDSCHIRM ";Y$.|
00000340: 58 0B 0E 01 8B 59 24 B3  B1 22 44 22 AF 59 24 B3  |X....Y$.."D".Y$.|
00000350: B1 22 42 22 A7 32 36 30  00 6D 0B 18 01 8B 59 24  |."B".260.m....Y$|
00000360: B2 22 44 22 A7 44 B2 34  3A 89 33 30 30 00 75 0B  |."D".D.4:.300.u.|
00000370: 22 01 44 B2 33 00 7B 0B  2C 01 8E 00 92 0B E8 03  |".D.3.{.,.......|
00000380: 8F 20 45 49 4E 47 41 42  45 20 56 4F 4E 20 48 41  |. EINGABE VON HA|
00000390: 4E 44 00 9B 0B F2 03 99  22 93 22 00 D0 0B FC 03  |ND......".".....|
000003A0: 99 3A 99 22 53 49 45 20  4D 55 45 53 53 45 4E 20  |.:."SIE MUESSEN |
000003B0: 4A 45 54 5A 54 22 41 22  20 45 4C 45 4D 45 4E 54  |JETZT"A" ELEMENT|
000003C0: 45 20 45 49 4E 47 45 42  45 4E 21 22 3A 99 3A 99  |E EINGEBEN!":.:.|
000003D0: 00 00 0C 06 04 99 22 4A  45 44 45 53 20 45 4C 45  |......"JEDES ELE|
000003E0: 4D 45 4E 54 20 42 45 53  54 45 48 54 20 41 55 53  |MENT BESTEHT AUS|
000003F0: 20 33 20 5A 45 49 43 48  45 4E 2E 22 3A 99 3A 99  | 3 ZEICHEN.":.:.|
00000400: 00 0B 0C 10 04 81 58 B2  31 A4 41 00 28 0C 1A 04  |......X.1.A.(...|
00000410: 99 58 22 2E 20 22 3B 3A  85 22 45 4C 45 4D 45 4E  |.X". ";:."ELEMEN|
00000420: 54 22 3B 41 24 28 58 29  00 3E 0C 24 04 8B C3 28  |T";A$(X).>.$...(|
00000430: 41 24 28 58 29 29 B3 B1  33 A7 31 30 35 30 00 45  |A$(X))..3.1050.E|
00000440: 0C 2E 04 82 58 00 4B 0C  38 04 8E 00 64 0C D0 07  |....X.K.8...d...|
00000450: 8F 20 5A 55 46 41 45 4C  4C 49 47 45 20 45 49 4E  |. ZUFAELLIGE EIN|
00000460: 47 41 42 45 00 6D 0C DA  07 99 22 93 22 00 AD 0C  |GABE.m...."."...|
00000470: E4 07 99 3A 99 22 45 53  20 57 45 52 44 45 4E 20  |...:."ES WERDEN |
00000480: 4A 45 54 5A 54 22 41 22  20 45 4C 45 4D 45 4E 54  |JETZT"A" ELEMENT|
00000490: 45 20 5A 55 46 41 45 4C  4C 49 47 22 3A 99 3A 99  |E ZUFAELLIG":.:.|
000004A0: 22 41 55 53 47 45 57 41  45 48 4C 54 22 00 DF 0C  |"AUSGEWAEHLT"...|
000004B0: EE 07 99 3A 99 22 4A 45  44 45 53 20 45 4C 45 4D  |...:."JEDES ELEM|
000004C0: 45 4E 54 20 42 45 53 54  45 48 54 20 41 55 53 20  |ENT BESTEHT AUS |
000004D0: 33 20 5A 45 49 43 48 45  4E 2E 22 3A 99 3A 99 00  |3 ZEICHEN.":.:..|
000004E0: EA 0C F8 07 81 58 B2 31  A4 41 00 F7 0C 02 08 41  |.....X.1.A.....A|
000004F0: 24 28 58 29 B2 22 22 00  23 0D 0C 08 81 59 B2 31  |$(X)."".#....Y.1|
00000500: A4 33 3A 41 24 28 58 29  B2 41 24 28 58 29 AA C7  |.3:A$(X).A$(X)..|
00000510: 28 B5 28 BB 28 54 49 29  AC 32 35 29 AA 36 35 29  |(.(.(TI).25).65)|
00000520: 3A 82 59 00 2A 0D 16 08  82 58 00 30 0D 20 08 8E  |:.Y.*....X.0. ..|
00000530: 00 53 0D B8 0B 8F 20 5A  57 49 53 43 48 45 4E 41  |.S.... ZWISCHENA|
00000540: 55 53 47 41 42 45 20 44  45 52 20 45 4C 45 4D 45  |USGABE DER ELEME|
00000550: 4E 54 45 00 64 0D C2 0B  81 20 49 B2 31 A4 41 AB  |NTE.d.... I.1.A.|
00000560: 39 A9 31 30 00 82 0D CC  0B 81 20 4A B2 49 A4 49  |9.10...... J.I.I|
00000570: AA 39 3A 98 31 2C 41 24  28 4A 29 22 20 22 3B 3A  |.9:.1,A$(J)" ";:|
00000580: 82 4A 00 8C 0D D6 0B 98  31 3A 82 49 00 92 0D E0  |.J......1:.I....|
00000590: 0B 8E 00 A5 0D A0 0F 8F  20 57 45 49 54 45 52 4D  |........ WEITERM|
000005A0: 41 43 48 45 4E 00 AE 0D  A5 0F 9F 31 2C 44 00 D4  |ACHEN......1,D..|
000005B0: 0D AA 0F 99 22 93 41 55  53 47 41 42 45 20 44 45  |....".AUSGABE DE|
000005C0: 53 20 45 52 53 54 45 4C  4C 54 45 4E 20 46 45 4C  |S ERSTELLTEN FEL|
000005D0: 44 45 53 22 00 DA 0D B4  0F 99 00 E4 0D BE 0F 8D  |DES"............|
000005E0: 33 30 30 30 00 FD 0D C8  0F 8F 20 53 4F 52 54 49  |3000...... SORTI|
000005F0: 45 52 55 4E 47 20 53 54  41 52 54 45 54 00 03 0E  |ERUNG STARTET...|
00000600: D2 0F 8F 00 17 0E 38 27  81 58 B2 41 A4 32 A9 AB  |......8'.X.A.2..|
00000610: 31 3A 58 24 B2 22 22 00  22 0E 42 27 81 59 B2 31  |1:X$."".".B'.Y.1|
00000620: A4 58 00 3D 0E 4C 27 8B  41 24 28 59 29 B1 58 24  |.X.=.L'.A$(Y).X$|
00000630: A7 58 24 B2 41 24 28 59  29 3A 5A B2 59 00 44 0E  |.X$.A$(Y):Z.Y.D.|
00000640: 56 27 82 59 00 66 0E 60  27 53 24 B2 41 24 28 58  |V'.Y.f.`'S$.A$(X|
00000650: 29 3A 41 24 28 58 29 B2  41 24 28 5A 29 3A 41 24  |):A$(X).A$(Z):A$|
00000660: 28 5A 29 B2 53 24 00 6D  0E 6A 27 82 58 00 82 0E  |(Z).S$.m.j'.X...|
00000670: 50 C3 8F 20 45 4E 44 45  42 45 48 41 4E 44 4C 55  |P.. ENDEBEHANDLU|
00000680: 4E 47 00 89 0E 5A C3 98  31 00 94 0E 64 C3 8D 20  |NG...Z..1...d.. |
00000690: 33 30 30 30 00 A9 0E 6E  C3 98 31 2C 41 3B 22 20  |3000...n..1,A;" |
000006A0: 45 4C 45 4D 45 4E 54 45  22 00 B6 0E 78 C3 98 31  |ELEMENTE"...x..1|
000006B0: 3A 98 31 3A A0 31 00 BC  0E 82 C3 80 00 00 00     |:.1:.1......... |

..".... 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 10000 BIS 50000...Z.. SIE BENOETI
GEN JEWEILS DIESEN.".C.. VORSPANN ZUR AU
SFUEHRUNG..B.D.. HERSTELLUNG EINES ARRAY
S:.`.N.. ARRAYVARIABLE      - A$...X.. S
CHLEIFENVARIABLEN - X, Y, Z...... HILFSV
ARIABLEN     - B$, C$, D$.G.... DREIECKT
AUSCH MIT  - S$.R....".":.... .."SOLL VO
N .H.AND ODER .Z.UFAELLIG ERSTELLT":....
..."WERDEN ";X$.0....X$.."H".X$.."Z".150
.L....X$."H"..220:.1000:.210.[.H..220:.2
000.U.R..4000: . WEITERMACHEN...... ANZA
HL DER ELEMENTE BESTIMMEN......:."ANZAHL
 DER ELEMENTE ";A...... A.10000..:."ZU V
IELE ELEMENTE":.230......A.10..:."ZU WEN
IGE ELEMENTE":.230...... A$(A).?...."...
D.RUCKER ODER .B.ILDSCHIRM ";Y$.X....Y$.
."D".Y$.."B".260.M....Y$."D".D.4:.300.U.
".D.3.{.,........ EINGABE VON HAND......
".".P....:."SIE MUESSEN JETZT"A" ELEMENT
E EINGEBEN!":.:......."JEDES ELEMENT BES
TEHT AUS 3 ZEICHEN.":.:.......X.1.A.(...
.X". ";:."ELEMENT";A$(X).>.$..C(A$(X))..
3.1050.E....X.K.8...D.P.. ZUFAELLIGE EIN
GABE.M.Z.."."......:."ES WERDEN JETZT"A"
 ELEMENTE ZUFAELLIG":.:."AUSGEWAEHLT"...
...:."JEDES ELEMENT BESTEHT AUS 3 ZEICHE
N.":.:.......X.1.A.....A$(X)."".#....Y.1
.3:A$(X).A$(X).G(.(.(TI).25).65):.Y.*...
.X.0. ...S.... ZWISCHENAUSGABE DER ELEME
NTE.D.B.. I.1.A.9.10...L.. J.I.I.9:.1,A$
(J)" ";:.J...V..1:.I......... .. WEITERM
ACHEN......1,D.T....".AUSGABE DES ERSTEL
LTEN FELDES".Z..........3000...H.. SORTI
ERUNG STARTET...R.....8'.X.A.2..1:X$."".
".B'.Y.1.X.=.L'.A$(Y).X$.X$.A$(Y):Z.Y.D.
V'.Y.F.`'S$.A$(X):A$(X).A$(Z):A$(Z).S$.M
.J'.X...PC. ENDEBEHANDLUNG...ZC.1...DC. 
3000...NC.1,A;" ELEMENTE"...XC.1:.1: 1..
..C....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL