AUSWAHL64AD3AP0P
FILE INFORMATION
FILENAME(S): AUSWAHL64AD3AP0P
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-12-01 02:25:59
APPEARS ON: 1 disk(s)
FILE HASH
9219e0a42efd27d497ab8e3aa0827f972adf3f4faafa0cbda3568f8790a78a6f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TONSOFT | AUSWAHL64AD3AP0P | PRG | Shine | 16 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 00 00 8F 20 22 41 55 53 57 41 48 4C |....... "AUSWAHL|
00000010: 36 34 2E 2E 2E 3F 3F 3F 50 22 00 23 08 0A 00 99 |64...???P".#....|
00000020: 22 93 22 00 4A 08 0F 00 8B C2 28 35 32 32 33 37 |".".J.....(52237|
00000030: 29 B2 30 A7 9F 39 2C C2 28 35 32 32 33 36 29 3A |).0..9,.(52236):|
00000040: 98 39 2C 22 11 22 3B 3A A0 39 00 6E 08 14 00 8F |.9,".";:.9.n....|
00000050: 20 2A 2A 2A 20 50 52 4F 47 52 41 4D 4D 45 4E 44 | *** PROGRAMMEND|
00000060: 45 5A 45 49 47 45 52 20 53 45 54 5A 45 4E 00 8E |EZEIGER SETZEN..|
00000070: 08 1E 00 8B C2 28 34 35 29 B2 C2 28 34 37 29 AF |.....(45)..(47).|
00000080: C2 28 34 36 29 B2 C2 28 34 38 29 89 35 30 00 AA |.(46)..(48).50..|
00000090: 08 28 00 97 34 35 2C C2 28 31 37 34 29 3A 97 34 |.(..45,.(174):.4|
000000A0: 36 2C C2 28 31 37 35 29 3A 9C 00 C6 08 32 00 87 |6,.(175):....2..|
000000B0: 41 3A 86 41 24 28 41 2C 32 29 3A 47 4E B2 C2 28 |A:.A$(A,2):GN..(|
000000C0: 35 32 32 34 33 29 00 E5 08 3C 00 81 49 B2 31 A4 |52243)...<..I.1.|
000000D0: 41 3A 81 4A B2 30 A4 32 3A 87 41 24 28 49 2C 4A |A:.J.0.2:.A$(I,J|
000000E0: 29 3A 82 3A 82 00 09 09 46 00 81 49 B2 31 A4 41 |):.:....F..I.1.A|
000000F0: 3A 99 22 11 22 41 24 28 49 2C 30 29 A3 33 37 29 |:."."A$(I,0).37)|
00000100: 41 24 28 49 2C 31 29 3A 82 00 27 09 50 00 99 22 |A$(I,1):..'.P.."|
00000110: 11 11 C2 49 54 54 45 20 57 41 45 48 4C 45 4E 20 |...ITTE WAEHLEN |
00000120: D3 49 45 3A 20 22 3B 00 3F 09 55 00 97 35 33 32 |.IE: ";.?.U..532|
00000130: 36 35 2C 32 37 3A 97 35 33 32 37 32 2C 33 32 00 |65,27:.53272,32.|
00000140: 51 09 5A 00 9F 31 2C 30 3A 84 31 2C 41 24 3A A0 |Q.Z..1,0:.1,A$:.|
00000150: 31 00 6C 09 64 00 81 49 B2 31 A4 41 3A 8B 41 24 |1.l.d..I.1.A:.A$|
00000160: B2 41 24 28 49 2C 31 29 89 31 32 30 00 72 09 6E |.A$(I,1).120.r.n|
00000170: 00 82 00 83 09 6F 00 8B 41 24 B2 22 D3 54 4F 50 |.....o..A$.".TOP|
00000180: 22 A7 90 00 8B 09 70 00 89 39 30 00 9D 09 78 00 |".....p..90...x.|
00000190: 99 22 93 12 11 22 41 24 28 49 2C 30 29 00 AD 09 |."..."A$(I,0)...|
000001A0: 82 00 8B 41 24 B2 22 43 22 89 31 38 30 00 BD 09 |...A$."C".180...|
000001B0: 8C 00 8B 41 24 B2 22 44 22 89 32 34 30 00 CE 09 |...A$."D".240...|
000001C0: 96 00 8B 41 24 B2 22 44 50 22 89 33 35 30 00 DE |...A$."DP".350..|
000001D0: 09 9B 00 8B 41 24 B2 22 46 22 89 35 30 30 00 F1 |....A$."F".500..|
000001E0: 09 A0 00 8B 41 24 B2 22 45 22 A7 9E 36 34 37 33 |....A$."E"..6473|
000001F0: 38 00 1A 0A AA 00 97 35 33 32 36 35 2C 35 39 3A |8......53265,59:|
00000200: 97 35 33 32 37 32 2C 31 32 30 3A 93 41 24 28 49 |.53272,120:.A$(I|
00000210: 2C 32 29 AA 22 2A 22 2C 47 4E 00 27 0A B4 00 9F |,2)."*",GN.'....|
00000220: 31 2C 47 4E 2C 31 35 00 3D 0A BE 00 98 31 2C 22 |1,GN,15.=....1,"|
00000230: 53 30 3A 27 5A 53 2A 22 3A 8D 33 30 30 00 53 0A |S0:'ZS*":.300.S.|
00000240: C8 00 98 31 2C 22 53 30 3A 27 54 53 2A 22 3A 8D |...1,"S0:'TS*":.|
00000250: 33 30 30 00 7E 0A D2 00 98 31 2C 22 43 30 3A 27 |300.~....1,"C0:'|
00000260: 5A 53 2E 43 42 4D 2E 24 43 30 3D 30 3A 2E 5A 53 |ZS.CBM.$C0=0:.ZS|
00000270: 2E 43 42 4D 2E 24 43 30 22 3A 8D 33 30 30 00 A9 |.CBM.$C0":.300..|
00000280: 0A DC 00 98 31 2C 22 43 30 3A 27 54 53 2E 43 42 |....1,"C0:'TS.CB|
00000290: 4D 2E 24 43 43 3D 30 3A 2E 54 53 2E 43 42 4D 2E |M.$CC=0:.TS.CBM.|
000002A0: 24 43 43 22 3A 8D 33 30 30 00 B2 0A E6 00 89 32 |$CC":.300......2|
000002B0: 39 30 00 BF 0A F0 00 9F 31 2C 47 4E 2C 31 35 00 |90......1,GN,15.|
000002C0: D5 0A FA 00 98 31 2C 22 53 30 3A 27 5A 53 2A 22 |.....1,"S0:'ZS*"|
000002D0: 3A 8D 33 30 30 00 EB 0A 04 01 98 31 2C 22 53 30 |:.300......1,"S0|
000002E0: 3A 27 54 53 2A 22 3A 8D 33 30 30 00 16 0B 0E 01 |:'TS*":.300.....|
000002F0: 98 31 2C 22 43 30 3A 27 5A 53 2E 44 49 4E 2E 24 |.1,"C0:'ZS.DIN.$|
00000300: 43 30 3D 30 3A 2E 5A 53 2E 44 49 4E 2E 24 43 30 |C0=0:.ZS.DIN.$C0|
00000310: 22 3A 8D 33 30 30 00 41 0B 18 01 98 31 2C 22 43 |":.300.A....1,"C|
00000320: 30 3A 27 54 53 2E 44 49 4E 2E 24 43 43 3D 30 3A |0:'TS.DIN.$CC=0:|
00000330: 2E 54 53 2E 44 49 4E 2E 24 43 43 22 3A 8D 33 30 |.TS.DIN.$CC":.30|
00000340: 30 00 5C 0B 22 01 9E 35 32 32 32 37 3A 93 22 41 |0.\."..52227:."A|
00000350: 44 52 45 56 41 20 36 34 22 2C 47 4E 00 72 0B 2C |DREVA 64",GN.r.,|
00000360: 01 84 31 2C 46 31 2C 46 32 24 2C 46 33 24 2C 46 |..1,F1,F2$,F3$,F|
00000370: 34 24 00 7F 0B 36 01 8B 46 31 B3 32 30 A7 8E 00 |4$...6..F1.20...|
00000380: AC 0B 40 01 8B 46 31 B2 32 36 A7 99 22 12 53 43 |..@..F1.26..".SC|
00000390: 48 52 45 49 42 53 43 48 55 54 5A 20 45 4E 54 46 |HREIBSCHUTZ ENTF|
000003A0: 45 52 4E 45 4E 20 21 22 3A 8A 35 30 00 C9 0B 4A |ERNEN !":.50...J|
000003B0: 01 99 22 12 22 46 31 22 2C 22 46 32 24 22 2C 22 |.."."F1","F2$","|
000003C0: 46 33 24 22 2C 22 46 34 24 00 D1 0B 54 01 8A 35 |F3$","F4$...T..5|
000003D0: 30 00 DA 0B 5E 01 9F 31 2C 30 00 08 0C 68 01 41 |0...^..1,0...h.A|
000003E0: B2 C2 28 35 32 32 33 36 29 3A 99 22 11 C4 52 55 |..(52236):."..RU|
000003F0: 43 4B 45 52 41 44 52 45 53 53 45 3A 22 41 3A 99 |CKERADRESSE:"A:.|
00000400: 22 91 22 A3 31 36 29 3B 00 1C 0C 72 01 84 31 2C |".".16);...r..1,|
00000410: 41 24 3A 99 3A 41 B2 C5 28 41 24 29 00 2E 0C 7C |A$:.:A..(A$)...||
00000420: 01 8B 41 B3 34 B0 41 B1 33 31 89 33 36 30 00 4E |..A.4.A.31.360.N|
00000430: 0C 86 01 41 24 B2 22 43 22 3A 8B C2 28 35 32 32 |...A$."C":..(522|
00000440: 33 37 29 AF 31 32 38 A7 41 24 B2 22 41 22 00 84 |37).128.A$."A"..|
00000450: 0C 90 01 99 22 11 12 C3 92 4F 4D 4D 4F 44 4F 52 |...."....OMMODOR|
00000460: 45 20 2F 20 12 C1 92 D3 C3 C9 C9 2D C4 52 55 43 |E / .......-.RUC|
00000470: 4B 45 52 3A 20 22 41 24 22 9D 22 3B 3A 84 31 2C |KER: "A$".";:.1,|
00000480: 41 24 3A 99 00 99 0C 9A 01 8B 41 24 B2 22 43 22 |A$:.......A$."C"|
00000490: A7 42 B2 30 3A 89 34 34 30 00 B0 0C A4 01 8B 41 |.B.0:.440......A|
000004A0: 24 B2 22 41 22 A7 42 B2 31 32 38 3A 89 34 34 30 |$."A".B.128:.440|
000004B0: 00 B9 0C AE 01 89 33 39 30 00 C9 0C B8 01 A0 31 |......390......1|
000004C0: 3A 9F 31 2C 47 4E 2C 31 35 00 DF 0C C2 01 98 31 |:.1,GN,15......1|
000004D0: 2C 22 53 30 3A 27 44 50 2A 22 3A 8D 33 30 30 00 |,"S0:'DP*":.300.|
000004E0: 05 0D CC 01 A0 31 3A 9F 31 2C 47 4E 2C 32 2C 22 |.....1:.1,GN,2,"|
000004F0: 30 3A 27 44 50 22 AA C4 28 41 29 AA 41 24 AA 22 |0:'DP"..(A).A$."|
00000500: 2C 50 2C 57 22 00 24 0D D6 01 98 31 2C C7 28 31 |,P,W".$....1,.(1|
00000510: 32 29 C7 28 32 30 34 29 C7 28 41 29 C7 28 42 29 |2).(204).(A).(B)|
00000520: 3B 3A A0 31 00 2D 0D E0 01 89 32 39 30 00 50 0D |;:.1.-....290.P.|
00000530: F4 01 8F 22 2A 2A 2A 20 46 41 52 42 45 49 4E 53 |..."*** FARBEINS|
00000540: 54 45 4C 4C 55 4E 47 45 4E 20 5B 4E 44 45 52 4E |TELLUNGEN [NDERN|
00000550: 00 7E 0D FE 01 99 22 93 11 11 12 D4 92 45 58 54 |.~...."......EXT|
00000560: 46 41 52 42 45 20 41 45 4E 44 45 52 4E 22 A3 33 |FARBE AENDERN".3|
00000570: 30 29 22 28 22 C2 28 36 34 36 29 22 29 22 00 B6 |0)"(".(646)")"..|
00000580: 0D 08 02 99 22 11 12 C8 92 49 4E 54 45 52 47 52 |...."....INTERGR|
00000590: 55 4E 44 46 41 52 42 45 20 41 45 4E 44 45 52 4E |UNDFARBE AENDERN|
000005A0: 22 A3 33 30 29 22 28 22 C2 28 35 33 32 38 31 29 |".30)"(".(53281)|
000005B0: AF 31 35 22 29 22 00 E9 0D 0D 02 99 22 11 12 D2 |.15")"......"...|
000005C0: 92 41 48 4D 45 4E 46 41 52 42 45 20 41 45 4E 44 |.AHMENFARBE AEND|
000005D0: 45 52 4E 22 A3 33 30 29 22 28 22 C2 28 35 33 32 |ERN".30)"(".(532|
000005E0: 38 30 29 AF 31 35 22 29 22 00 07 0E 12 02 99 22 |80).15")"......"|
000005F0: 11 12 5A 92 55 52 55 45 43 4B 20 5A 55 52 20 C1 |..Z.URUECK ZUR .|
00000600: 55 53 57 41 48 4C 22 00 1A 0E 1C 02 A1 41 24 3A |USWAHL"......A$:|
00000610: 8B 41 24 B2 22 22 89 35 34 30 00 2A 0E 26 02 8B |.A$."".540.*.&..|
00000620: 41 24 B2 22 54 22 89 35 39 30 00 3A 0E 30 02 8B |A$."T".590.:.0..|
00000630: 41 24 B2 22 48 22 89 36 30 30 00 4A 0E 35 02 8B |A$."H".600.J.5..|
00000640: 41 24 B2 22 52 22 89 36 31 30 00 5B 0E 3A 02 8B |A$."R".610.[.:..|
00000650: 41 24 B3 B1 22 5A 22 89 35 34 30 00 61 0E 44 02 |A$.."Z".540.a.D.|
00000660: 8A 00 7B 0E 4E 02 97 36 34 36 2C C2 28 36 34 36 |..{.N..646,.(646|
00000670: 29 AA 31 AF 31 35 3A 89 35 30 30 00 99 0E 58 02 |).1.15:.500...X.|
00000680: 97 35 33 32 38 31 2C C2 28 35 33 32 38 31 29 AA |.53281,.(53281).|
00000690: 31 AF 31 35 3A 89 35 30 30 00 B7 0E 62 02 97 35 |1.15:.500...b..5|
000006A0: 33 32 38 30 2C C2 28 35 33 32 38 30 29 AA 31 AF |3280,.(53280).1.|
000006B0: 31 35 3A 89 35 30 30 00 BE 0E E8 03 83 36 00 E5 |15:.500......6..|
000006C0: 0E F2 03 83 22 C1 44 52 45 53 53 56 45 52 57 41 |....".DRESSVERWA|
000006D0: 4C 54 55 4E 47 22 2C 22 41 22 2C 22 54 36 34 2E |LTUNG","A","T64.|
000006E0: 41 44 52 45 22 00 06 0F FC 03 83 22 C3 4F 4D 4D |ADRE"......".OMM|
000006F0: 4F 44 4F 52 45 2D D4 41 53 54 41 54 55 52 22 2C |ODORE-.ASTATUR",|
00000700: 22 43 22 2C 22 22 00 26 0F 06 04 83 22 44 45 55 |"C","".&...."DEU|
00000710: 54 53 43 48 45 20 D4 41 53 54 41 54 55 52 22 2C |TSCHE .ASTATUR",|
00000720: 22 44 22 2C 22 22 00 46 0F 10 04 83 22 C4 52 55 |"D","".F....".RU|
00000730: 43 4B 45 52 50 41 52 41 4D 45 54 45 52 22 2C 22 |CKERPARAMETER","|
00000740: 44 50 22 2C 22 22 00 6E 0F 1A 04 83 22 C6 41 52 |DP","".n....".AR|
00000750: 42 45 49 4E 53 54 45 4C 4C 55 4E 47 45 4E 20 41 |BEINSTELLUNGEN A|
00000760: 45 4E 44 45 52 4E 22 2C 22 46 22 2C 22 22 00 81 |ENDERN","F",""..|
00000770: 0F 24 04 83 22 C5 4E 44 45 22 2C 22 45 22 2C 22 |.$..".NDE","E","|
00000780: 22 00 00 00 44 FC 11 85 00 30 38 00 |"...D....08. |
....... "AUSWAHL64...???P".#....".".J...
.B(52237).0..9,B(52236):.9,".";: 9.N....
*** PROGRAMMENDEZEIGER SETZEN......B(45
).B(47).B(46).B(48).50...(..45,B(174):.4
6,B(175):..F.2..A:.A$(A,2):GN.B(52243)..
.<..I.1.A:.J.0.2:.A$(I,J):.:....F..I.1.A
:."."A$(I,0).37)A$(I,1):..'.P.."..BITTE
WAEHLEN SIE: ";.?.U..53265,27:.53272,32.
Q.Z..1,0:.1,A$: 1.L.D..I.1.A:.A$.A$(I,1)
.120.R.N.....O..A$."STOP".....P..90...X.
."..."A$(I,0)......A$."C".180......A$."D
".240.N....A$."DP".350......A$."F".500..
. ..A$."E"..64738......53265,59:.53272,1
20:.A$(I,2)."*",GN.'....1,GN,15.=....1,"
S0:'ZS*":.300.S.H..1,"S0:'TS*":.300.~.R.
.1,"C0:'ZS.CBM.$C0=0:.ZS.CBM.$C0":.300..
....1,"C0:'TS.CBM.$CC=0:.TS.CBM.$CC":.30
0......290......1,GN,15.U....1,"S0:'ZS*"
:.300......1,"S0:'TS*":.300......1,"C0:'
ZS.DIN.$C0=0:.ZS.DIN.$C0":.300.A....1,"C
0:'TS.DIN.$CC=0:.TS.DIN.$CC":.300.\."..5
2227:."ADREVA 64",GN.R.,..1,F1,F2$,F3$,F
4$..6..F1.20.....@..F1.26..".SCHREIBSCH
UTZ ENTFERNEN !":.50.I.J.."."F1","F2$","
F3$","F4$.Q.T..50.Z.^..1,0...H.A.B(52236
):.".DRUCKERADRESSE:"A:.".".16);...R..1,
A$:.:A.E(A$)...|..A.4.A.31.360.N...A$."C
":.B(52237).128.A$."A"......"..C.OMMODOR
E / .A.SCII-DRUCKER: "A$".";:.1,A$:.....
..A$."C".B.0:.440......A$."A".B.128:.440
......390.I... 1:.1,GN,15...B..1,"S0:'DP
*":.300...L. 1:.1,GN,2,"0:'DP".D(A).A$."
,P,W".$.V..1,G(12)G(204)G(A)G(B);: 1.-..
..290.P...."*** FARBEINSTELLUNGEN [NDERN
.~...."....T.EXTFARBE AENDERN".30)"("B(6
46)")"......"..H.INTERGRUNDFARBE AENDERN
".30)"("B(53281).15")"......"..R.AHMENFA
RBE AENDERN".30)"("B(53280).15")"......"
..Z.URUECK ZUR AUSWAHL"......A$:.A$."".5
40.*.&..A$."T".590.:.0..A$."H".600.J.5..
A$."R".610.[.:..A$.."Z".540.A.D...{.N..6
46,B(646).1.15:.500...X..53281,B(53281).
1.15:.500...B..53280,B(53280).1.15:.500.
.....6......"ADRESSVERWALTUNG","A","T64.
ADRE"......"COMMODORE-TASTATUR","C","".&
...."DEUTSCHE TASTATUR","D","".F...."DRU
CKERPARAMETER","DP","".N...."FARBEINSTEL
LUNGEN AENDERN","F",""...$.."ENDE","E","
"...D....08.
> CLICK IMAGE PREVIEW FOR FULL MODAL