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

INPUT 1985

FILE INFORMATION

FILENAME(S): INPUT 1985

FILE TYPE(S): PRG

FILE SIZE: 1.6K

FIRST SEEN: 2025-11-30 01:07:55

APPEARS ON: 2 disk(s)

FILE HASH

2a91eed892a7928175aa6c10c7f18564787d90305e1d61fb88ac7d8178e87026

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
D IVERESE INPUT 1985 PRG Treasure Chest - Wolfgang Rauprich 22 4 DOWNLOAD FILE
FREEWARE DISK NR INPUT 1985 PRG Treasure Chest - Wolfgang Rauprich 22 4 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 27 08 0A 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |..'.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00  4D 08 14 00 8F 20 2A 2A  |*******.M.... **|
00000030: 2A 2A 2A 2A 20 4E 45 55  45 20 49 4E 50 55 54 52  |**** NEUE INPUTR|
00000040: 4F 55 54 49 4E 45 20 2A  2A 2A 2A 2A 2A 00 73 08  |OUTINE ******.s.|
00000050: 1E 00 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |... ************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000070: 2A 2A 2A 00 99 08 28 00  8F 20 2A 2A 2A 20 28 4B  |***...(.. *** (K|
00000080: 29 20 42 45 49 20 58 4F  52 52 4F 4E 20 53 4F 46  |) BEI XORRON SOF|
00000090: 54 57 41 52 45 20 2A 2A  2A 00 BF 08 32 00 8F 20  |TWARE ***...2.. |
000000A0: 2A 2A 20 3C 53 3E 20 20  56 4F 4E 20 47 45 52 48  |** <S>  VON GERH|
000000B0: 41 52 44 20 4C 45 49 42  52 4F 43 4B 20 2A 2A 00  |ARD LEIBROCK **.|
000000C0: E5 08 3C 00 8F 20 2A 2A  2A 2A 2A 20 20 32 31 2F  |..<.. *****  21/|
000000D0: 30 36 2F 31 39 38 35 20  49 4E 20 44 45 52 20 20  |06/1985 IN DER  |
000000E0: 2A 2A 2A 2A 2A 00 0B 09  46 00 8F 20 2A 2A 2A 2A  |*****...F.. ****|
000000F0: 2A 20 46 52 41 4E 5A 4F  45 53 49 53 43 48 2D 53  |* FRANZOESISCH-S|
00000100: 54 55 4E 44 45 20 2A 2A  2A 2A 2A 00 31 09 50 00  |TUNDE *****.1.P.|
00000110: 8F 20 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |. **************|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000130: 2A 00 66 09 5A 00 97 35  33 32 38 31 2C 31 32 3A  |*.f.Z..53281,12:|
00000140: 97 35 33 32 38 30 2C 31  31 3A 97 36 34 36 2C 30  |.53280,11:.646,0|
00000150: 3A 99 22 93 22 3B A6 31  35 29 22 49 4E 50 55 54  |:.".";.15)"INPUT|
00000160: 20 31 39 38 35 22 00 91  09 6E 00 99 22 11 4D 49  | 1985"...n..".MI|
00000170: 54 20 48 49 4C 46 45 20  44 49 45 53 45 52 20 53  |T HILFE DIESER S|
00000180: 45 48 52 20 4B 4F 4D 46  4F 52 54 41 42 4C 45 4E  |EHR KOMFORTABLEN|
00000190: 22 00 BE 09 78 00 99 22  55 4E 54 45 52 52 4F 55  |"...x.."UNTERROU|
000001A0: 54 49 4E 45 20 49 53 54  20 45 53 20 44 45 4D 20  |TINE IST ES DEM |
000001B0: 50 52 4F 47 52 41 4D 4D  49 45 52 45 52 22 00 ED  |PROGRAMMIERER"..|
000001C0: 09 82 00 99 22 4D 4F 45  47 4C 49 43 48 2C 45 4E  |...."MOEGLICH,EN|
000001D0: 54 57 45 44 45 52 20 4E  55 52 20 5A 41 48 4C 45  |TWEDER NUR ZAHLE|
000001E0: 4E 20 4F 44 45 52 20 42  55 43 48 2D 22 00 07 0A  |N ODER BUCH-"...|
000001F0: 8C 00 99 22 53 54 41 42  45 4E 20 45 49 4E 5A 55  |..."STABEN EINZU|
00000200: 47 45 42 45 4E 2E 22 00  2F 0A 96 00 99 22 12 2D  |GEBEN."./....".-|
00000210: 2D 3E 20 4B 45 49 4E 45  20 4D 49 53 43 48 55 4E  |-> KEINE MISCHUN|
00000220: 47 20 4D 4F 45 47 4C 49  43 48 20 3C 2D 2D 22 00  |G MOEGLICH <--".|
00000230: 5D 0A A0 00 99 22 44 49  45 20 4C 41 45 4E 47 45  |]...."DIE LAENGE|
00000240: 20 44 45 53 20 45 49 4E  47 41 42 45 53 54 52 49  | DES EINGABESTRI|
00000250: 4E 47 53 20 57 49 52 44  20 56 4F 4D 22 00 86 0A  |NGS WIRD VOM"...|
00000260: AA 00 99 22 11 50 52 4F  47 52 41 4D 4D 49 45 52  |...".PROGRAMMIER|
00000270: 45 52 20 53 45 4C 42 53  54 20 46 45 53 54 47 45  |ER SELBST FESTGE|
00000280: 4C 45 47 54 2E 22 00 B0  0A B4 00 99 22 11 44 49  |LEGT."......".DI|
00000290: 45 20 45 49 4E 47 41 42  45 20 4C 49 45 47 54 20  |E EINGABE LIEGT |
000002A0: 44 41 4E 4E 20 49 4E 20  42 24 20 56 4F 52 2E 22  |DANN IN B$ VOR."|
000002B0: 00 DE 0A BE 00 99 22 11  53 49 45 20 4B 4F 45 4E  |......".SIE KOEN|
000002C0: 4E 45 4E 20 44 49 45 20  52 4F 55 54 49 4E 45 20  |NEN DIE ROUTINE |
000002D0: 4F 48 4E 45 20 57 45 49  54 45 52 45 53 22 00 0B  |OHNE WEITERES"..|
000002E0: 0B C8 00 99 22 11 49 4E  20 49 48 52 45 4E 20 50  |....".IN IHREN P|
000002F0: 52 4F 47 52 41 4D 4D 45  4E 20 56 45 52 57 45 4E  |ROGRAMMEN VERWEN|
00000300: 44 45 4E 2C 4A 45 44 4F  43 48 22 00 3A 0B D2 00  |DEN,JEDOCH".:...|
00000310: 99 22 11 4D 55 53 53 20  49 4D 20 50 52 4F 47 52  |.".MUSS IM PROGR|
00000320: 41 4D 4D 20 5A 55 20 45  52 4B 45 4E 4E 45 4E 20  |AMM ZU ERKENNEN |
00000330: 53 45 49 4E 2C 44 41 53  53 22 00 73 0B DC 00 99  |SEIN,DASS".s....|
00000340: 22 11 44 49 45 20 55 4E  54 45 52 52 4F 55 54 49  |".DIE UNTERROUTI|
00000350: 4E 45 20 56 4F 4E 20 47  45 52 48 41 52 44 20 4C  |NE VON GERHARD L|
00000360: 45 49 42 52 4F 43 4B 20  11 1D 1D 53 54 41 4D 4D  |EIBROCK ...STAMM|
00000370: 54 2E 22 00 8B 0B E6 00  99 22 11 2A 2A 2D 3E 20  |T."......".**-> |
00000380: 54 41 53 54 45 20 3C 2D  2A 2A 22 00 9E 0B F0 00  |TASTE <-**".....|
00000390: A1 41 24 3A 8B 41 24 B2  22 22 A7 32 34 30 00 B8  |.A$:.A$."".240..|
000003A0: 0B FA 00 99 22 93 22 3B  A6 31 35 29 22 49 4E 50  |....".";.15)"INP|
000003B0: 55 54 20 31 39 38 35 22  00 C7 0B 04 01 99 22 11  |UT 1985"......".|
000003C0: 11 44 45 4D 4F 20 22 00  DF 0B 0E 01 99 22 11 12  |.DEMO "......"..|
000003D0: 31 92 20 4E 55 52 20 5A  41 48 4C 45 4E 2E 22 00  |1. NUR ZAHLEN.".|
000003E0: F5 0B 18 01 99 22 11 49  4E 24 3D 22 5A 22 3A 4D  |.....".IN$="Z":M|
000003F0: 41 58 3D 34 22 00 3C 0C  22 01 99 22 11 2D 2D 3E  |AX=4".<."..".-->|
00000400: 12 49 4E 92 49 54 49 41  4C 49 45 53 49 45 52 54  |.IN.ITIALIESIERT|
00000410: 20 44 49 45 20 5A 41 48  4C 45 4E 45 49 4E 47 41  | DIE ZAHLENEINGA|
00000420: 42 45 2C 20 20 20 20 12  4D 41 58 92 49 4D 41 4C  |BE,    .MAX.IMAL|
00000430: 20 34 20 53 54 45 4C 4C  49 47 2E 22 00 53 0C 2C  | 4 STELLIG.".S.,|
00000440: 01 49 4E 24 B2 22 5A 22  3A 4D 41 58 B2 34 3A 8D  |.IN$."Z":MAX.4:.|
00000450: 34 30 30 00 70 0C 36 01  99 3A 99 22 11 53 49 45  |400.p.6..:.".SIE|
00000460: 20 47 41 42 45 4E 20 22  42 24 22 45 49 4E 2E 22  | GABEN "B$"EIN."|
00000470: 00 89 0C 40 01 99 22 11  12 32 92 20 4E 55 52 20  |...@.."..2. NUR |
00000480: 4C 45 54 54 45 52 4E 2E  22 00 A0 0C 4A 01 99 22  |LETTERN."...J.."|
00000490: 11 49 4E 24 3D 22 42 22  3A 4D 41 58 3D 31 30 22  |.IN$="B":MAX=10"|
000004A0: 00 E9 0C 54 01 99 22 11  2D 2D 3E 12 49 4E 92 49  |...T..".-->.IN.I|
000004B0: 54 49 41 4C 49 45 53 49  45 52 54 20 44 49 45 20  |TIALIESIERT DIE |
000004C0: 4C 45 54 54 45 52 4E 45  49 4E 47 41 42 45 2C 20  |LETTERNEINGABE, |
000004D0: 20 20 20 12 4D 41 58 92  49 4D 41 4C 20 31 30 20  |   .MAX.IMAL 10 |
000004E0: 53 54 45 4C 4C 49 47 2E  22 00 06 0D 5E 01 49 4E  |STELLIG."...^.IN|
000004F0: 24 B2 22 22 3A 4D 41 58  B2 31 30 3A 42 24 B2 22  |$."":MAX.10:B$."|
00000500: 22 3A 8D 34 30 30 00 1D  0D 68 01 99 22 11 11 45  |":.400...h.."..E|
00000510: 49 4E 47 41 42 45 3A 20  22 42 24 3A 80 00 34 0D  |INGABE: "B$:..4.|
00000520: 90 01 8F 20 2A 2A 20 49  4E 50 55 54 20 31 39 38  |... ** INPUT 198|
00000530: 35 20 2A 2A 00 59 0D 9A  01 8B 20 49 4E 24 B2 22  |5 **.Y.... IN$."|
00000540: 5A 22 A7 4D 49 4E 24 B2  22 30 22 3A 4D 41 58 24  |Z".MIN$."0":MAX$|
00000550: B2 22 39 22 3A 89 34 33  30 00 6F 0D A4 01 4D 49  |."9":.430.o...MI|
00000560: 4E 24 B2 22 41 22 3A 4D  41 58 24 B2 22 5A 22 00  |N$."A":MAX$."Z".|
00000570: 89 0D AE 01 97 32 30 34  2C 30 3A A1 41 24 3A 8B  |.....204,0:.A$:.|
00000580: 41 24 B2 22 22 A7 34 33  30 00 BF 0D B8 01 8B 20  |A$."".430...... |
00000590: 41 24 20 B3 20 4D 49 4E  24 20 B0 20 41 24 20 B1  |A$ . MIN$ . A$ .|
000005A0: 20 4D 41 58 24 20 A7 8B  41 24 B3 B1 C7 28 32 30  | MAX$ ..A$...(20|
000005B0: 29 AF 41 24 B3 B1 C7 28  31 33 29 A7 34 33 30 00  |).A$...(13).430.|
000005C0: D2 0D C2 01 8B 41 24 B3  B1 C7 28 32 30 29 A7 34  |.....A$...(20).4|
000005D0: 39 30 00 E3 0D CC 01 8B  C3 28 42 24 29 B1 30 A7  |90.......(B$).0.|
000005E0: 34 38 30 00 EC 0D D6 01  89 34 33 30 00 10 0E E0  |480......430....|
000005F0: 01 42 24 B2 C8 28 42 24  2C C3 28 42 24 29 AB 31  |.B$..(B$,.(B$).1|
00000600: 29 3A 99 22 9D 20 20 9D  9D 22 3B 3A 89 34 33 30  |):.".  ..";:.430|
00000610: 00 23 0E EA 01 8B 41 24  B3 B1 C7 28 31 33 29 A7  |.#....A$...(13).|
00000620: 35 32 30 00 33 0E F4 01  8B C2 28 32 30 37 29 A7  |520.3.....(207).|
00000630: 35 30 30 00 39 0E FE 01  8E 00 4C 0E 08 02 8B C3  |500.9.....L.....|
00000640: 28 42 24 29 B2 4D 41 58  A7 34 33 30 00 63 0E 12  |(B$).MAX.430.c..|
00000650: 02 42 24 B2 42 24 AA 41  24 3A 99 41 24 3B 3A 89  |.B$.B$.A$:.A$;:.|
00000660: 34 33 30 00 00 00                                 |430...          |
..'.... *******************************.
M.... ****** NEUE INPUTROUTINE ******.S.
... *******************************...(.
. *** (K) BEI XORRON SOFTWARE ***...2.. 
** <S>  VON GERHARD LEIBROCK **...<.. **
***  21/06/1985 IN DER  *****...F.. ****
* FRANZOESISCH-STUNDE *****.1.P.. ******
*************************.F.Z..53281,12:
.53280,11:.646,0:.".";.15)"INPUT 1985"..
.N..".MIT HILFE DIESER SEHR KOMFORTABLEN
"...X.."UNTERROUTINE IST ES DEM PROGRAMM
IERER"......"MOEGLICH,ENTWEDER NUR ZAHLE
N ODER BUCH-"......"STABEN EINZUGEBEN.".
/....".--> KEINE MISCHUNG MOEGLICH <--".
]. .."DIE LAENGE DES EINGABESTRINGS WIRD
 VOM"......".PROGRAMMIERER SELBST FESTGE
LEGT."......".DIE EINGABE LIEGT DANN IN 
B$ VOR."......".SIE KOENNEN DIE ROUTINE 
OHNE WEITERES"...H..".IN IHREN PROGRAMME
N VERWENDEN,JEDOCH".:.R..".MUSS IM PROGR
AMM ZU ERKENNEN SEIN,DASS".S....".DIE UN
TERROUTINE VON GERHARD LEIBROCK ...STAMM
T."......".**-> TASTE <-**"......A$:.A$.
"".240......".";.15)"INPUT 1985".G....".
.DEMO "......"..1. NUR ZAHLEN."......".I
N$="Z":MAX=4".<."..".-->.IN.ITIALIESIERT
 DIE ZAHLENEINGABE,    .MAX.IMAL 4 STELL
IG.".S.,.IN$."Z":MAX.4:.400.P.6..:.".SIE
 GABEN "B$"EIN."...@.."..2. NUR LETTERN.
". .J..".IN$="B":MAX=10"...T..".-->.IN.I
TIALIESIERT DIE LETTERNEINGABE,    .MAX.
IMAL 10 STELLIG."...^.IN$."":MAX.10:B$."
":.400...H.."..EINGABE: "B$:..4.... ** I
NPUT 1985 **.Y.... IN$."Z".MIN$."0":MAX$
."9":.430.O...MIN$."A":MAX$."Z"......204
,0:.A$:.A$."".430...... A$ . MIN$ . A$ .
 MAX$ ..A$..G(20).A$..G(13).430.R.B..A$.
.G(20).490...L..C(B$).0.480...V..430....
.B$.H(B$,C(B$).1):.".  ..";:.430.#....A$
..G(13).520.3....B(207).500.9.....L....C
(B$).MAX.430.C...B$.B$.A$:.A$;:.430...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL