OPTINPUT.DEMO
FILE INFORMATION
FILENAME(S): OPTINPUT.DEMO
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-11-30 01:12:52
APPEARS ON: 1 disk(s)
FILE HASH
59d569db340776c9a29da20ded72e94f022f7b804a0d0bf2fc29fa560bcb1609
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10807 SEITE A | OPTINPUT.DEMO | PRG | C64er, DuncanTwain | 2 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 10 07 10 E8 03 3A 00 22 10 ED 03 8F 20 2A 2A |......:.".... **| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 00 3D 10 F2 03 8F 20 2A 20 2D 2D 2D 20 4F |**.=.... * --- O| 00000030: 50 54 49 4E 50 55 54 20 2D 2D 2D 20 2A 00 58 10 |PTINPUT --- *.X.| 00000040: F7 03 8F 20 2A 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... * ==========| 00000050: 3D 3D 3D 3D 3D 3D 20 2A 00 73 10 FC 03 8F 20 2A |====== *.s.... *| 00000060: 20 4D 2E 20 4A 41 53 49 4E 53 4B 49 20 31 39 38 | M. JASINSKI 198| 00000070: 38 20 2A 00 8E 10 01 04 8F 20 2A 2A 2A 2A 2A 2A |8 *...... ******| 00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 94 |**************..| 00000090: 10 06 04 3A 00 C4 10 4C 04 DB 20 38 3A F9 20 31 |...:...L.. 8:. 1| 000000A0: 2C C7 28 31 33 33 29 3A F9 20 32 2C C7 28 31 33 |,.(133):. 2,.(13| 000000B0: 34 29 3A E8 3A 99 20 C7 28 39 29 C7 28 31 34 29 |4):.:. .(9).(14)| 000000C0: C7 28 38 29 00 EF 10 51 04 99 20 22 2A 2A 2A 20 |.(8)...Q.. "*** | 000000D0: C4 45 4D 4F 4E 53 54 52 41 54 49 4F 4E 53 50 52 |.EMONSTRATIONSPR| 000000E0: 4F 47 52 41 4D 4D 20 2A 2A 2A 22 3A 99 3A 99 00 |OGRAMM ***":.:..| 000000F0: 1D 11 56 04 99 20 22 C2 49 54 54 45 20 47 45 42 |..V.. ".ITTE GEB| 00000100: 45 4E 20 D3 49 45 20 46 4F 4C 47 45 4E 44 45 20 |EN .IE FOLGENDE | 00000110: C4 41 54 45 4E 20 45 49 4E 3A 22 3A 99 00 52 11 |.ATEN EIN:":..R.| 00000120: 5B 04 99 20 22 D6 4F 52 4E 41 4D 45 3A 20 22 3B |[.. ".ORNAME: ";| 00000130: 3A 4C 47 B2 31 35 3A 5A 53 B2 31 3A 56 47 24 B2 |:LG.15:ZS.1:VG$.| 00000140: 22 22 3A 8D 20 38 30 30 30 3A 56 4E 24 B2 49 4E |"":. 8000:VN$.IN| 00000150: 50 24 00 7C 11 60 04 99 20 22 CE 41 43 48 4E 41 |P$.|.`.. ".ACHNA| 00000160: 4D 45 3A 20 22 3B 3A 4C 47 B2 31 35 3A 8D 20 38 |ME: ";:LG.15:. 8| 00000170: 30 30 30 3A 4E 4E 24 B2 49 4E 50 24 00 AE 11 65 |000:NN$.INP$...e| 00000180: 04 99 20 22 D3 54 52 2E 20 55 4E 44 20 C8 41 55 |.. ".TR. UND .AU| 00000190: 53 4E 52 2E 3A 20 22 3B 3A 4C 47 B2 32 30 3A 8D |SNR.: ";:LG.20:.| 000001A0: 20 38 30 30 30 3A 53 54 24 B2 49 4E 50 24 00 EF | 8000:ST$.INP$..| 000001B0: 11 6A 04 99 20 22 D0 4C 5A 20 55 4E 44 20 CF 52 |.j.. ".LZ UND .R| 000001C0: 54 3A 20 22 3B 3A 56 47 24 B2 22 38 30 30 30 20 |T: ";:VG$."8000 | 000001D0: CD 55 45 4E 43 48 45 4E 22 3A 4C 47 B2 32 30 3A |.UENCHEN":LG.20:| 000001E0: 8D 20 38 30 30 30 3A 4F 54 24 B2 49 4E 50 24 00 |. 8000:OT$.INP$.| 000001F0: 22 12 6F 04 99 20 22 C1 4C 54 45 52 3A 20 22 3B |".o.. ".LTER: ";| 00000200: 3A 5A 53 B2 32 3A 56 47 24 B2 22 22 3A 4C 47 B2 |:ZS.2:VG$."":LG.| 00000210: 35 3A 8D 20 38 30 30 30 3A 41 4C 54 24 B2 49 4E |5:. 8000:ALT$.IN| 00000220: 50 24 00 2A 12 74 04 99 3A 99 00 4A 12 79 04 99 |P$.*.t..:..J.y..| 00000230: 20 56 4E 24 3B 22 20 22 3B 4E 4E 24 3B 22 20 28 | VN$;" ";NN$;" (| 00000240: 22 3B 41 4C 54 24 3B 22 29 22 00 5E 12 7E 04 99 |";ALT$;")".^.~..| 00000250: 20 53 54 24 3A 99 20 4F 54 24 3A 99 3A 99 00 93 | ST$:. OT$:.:...| 00000260: 12 83 04 99 20 22 12 C2 49 54 54 45 20 D4 41 53 |.... "..ITTE .AS| 00000270: 54 45 20 44 52 55 45 43 4B 45 4E 20 46 55 45 52 |TE DRUECKEN FUER| 00000280: 20 CE 45 55 53 54 41 52 54 92 22 3A A1 F9 20 54 | .EUSTART.":.. T| 00000290: 24 3A 8A 00 99 12 88 04 3A 00 9F 12 40 1F 3A 00 |$:......:...@.:.| 000002A0: C3 12 45 1F 8F 20 2A 20 4F 50 54 49 4E 50 55 54 |..E.. * OPTINPUT| 000002B0: 20 2D 20 42 59 20 4D 2E 20 4A 41 53 49 4E 53 4B | - BY M. JASINSK| 000002C0: 49 20 2A 00 C9 12 4A 1F 3A 00 17 13 4F 1F 5A 31 |I *...J.:...O.Z1| 000002D0: 24 B2 22 41 42 43 44 45 46 47 48 49 4A 4B 4C 4D |$."ABCDEFGHIJKLM| 000002E0: 4E 4F 50 51 52 53 54 55 56 57 58 59 5A 20 C1 C2 |NOPQRSTUVWXYZ ..| 000002F0: C3 C4 C5 C6 C7 C8 C9 CA CB CC CD CE CF D0 D1 D2 |................| 00000300: D3 D4 D5 D6 D7 D8 D9 DA 31 32 33 34 35 36 37 38 |........12345678| 00000310: 39 30 2B 2D 3D 5F 22 00 62 13 54 1F 5A 31 24 B2 |90+-=_".b.T.Z1$.| 00000320: 5A 31 24 AA 22 21 23 24 25 26 27 28 29 5E 40 5C |Z1$."!#$%&'()^@\| 00000330: 2A 3A 3B 5B 5D 3C 3E 2C 2E 2F 3F 22 3A 5A 32 24 |*:;[]<>,./?":Z2$| 00000340: B2 22 31 32 33 34 35 36 37 38 39 30 2B 2D 45 22 |."1234567890+-E"| 00000350: 3A 58 50 B2 C2 28 32 30 35 29 3A 59 50 B2 B9 28 |:XP..(205):YP..(| 00000360: 58 29 00 7F 13 59 1F 8B 20 5A 53 B2 31 20 A7 20 |X)...Y.. ZS.1 . | 00000370: 5A 24 B2 5A 31 24 3A D5 20 5A 24 B2 5A 32 24 00 |Z$.Z1$:. Z$.Z2$.| 00000380: A1 13 5E 1F 49 4E 50 24 B2 56 47 24 3A 43 50 B2 |..^.INP$.VG$:CP.| 00000390: 31 3A 8B 20 56 47 24 B2 22 22 20 A7 20 38 30 34 |1:. VG$."" . 804| 000003A0: 30 00 BD 13 63 1F 8B 20 4C 47 B3 C3 28 56 47 24 |0...c.. LG..(VG$| 000003B0: 29 20 A7 20 4C 47 B2 C3 28 56 47 24 29 00 DA 13 |) . LG..(VG$)...| 000003C0: 68 1F 4D 4C B2 34 30 AB 59 50 3A 8B 20 4C 47 B1 |h.ML.40.YP:. LG.| 000003D0: 4D 4C 20 A7 20 4C 47 B2 4D 4C 00 14 14 6D 1F 4B |ML . LG.ML...m.K| 000003E0: 24 B2 22 1D 9D 13 93 22 AA C7 28 32 30 29 AA C7 |$."...."..(20)..| 000003F0: 28 31 34 38 29 3A 8B 20 C3 28 49 4E 50 24 29 B1 |(148):. .(INP$).| 00000400: 4D 4C 20 A7 20 49 4E 50 24 B2 C8 28 49 4E 50 24 |ML . INP$..(INP$| 00000410: 2C 4D 4C 29 00 50 14 72 1F 4B 24 B2 4B 24 AA C7 |,ML).P.r.K$.K$..| 00000420: 28 31 33 33 29 AA C7 28 31 33 34 29 3A 8B 20 C3 |(133)..(134):. .| 00000430: 28 49 4E 50 24 29 B3 4C 47 20 A7 20 49 4E 50 24 |(INP$).LG . INP$| 00000440: B2 49 4E 50 24 AA 22 20 22 3A 89 20 38 30 35 30 |.INP$." ":. 8050| 00000450: 00 93 14 77 1F E0 2C 59 50 2C 58 50 2C 49 4E 50 |...w..,YP,XP,INP| 00000460: 24 3A E0 2C 28 59 50 AB 31 29 AA 43 50 2C 58 50 |$:.,(YP.1).CP,XP| 00000470: 2C 22 12 22 AA CA 28 49 4E 50 24 2C 43 50 2C 31 |,"."..(INP$,CP,1| 00000480: 29 AA 22 92 22 3A 8B 20 54 41 B2 30 20 A7 20 54 |).".":. TA.0 . T| 00000490: 41 B2 38 00 B3 14 7C 1F A1 F9 20 45 49 4E 24 3A |A.8...|... EIN$:| 000004A0: 8B 20 45 49 4E 24 B2 C7 28 31 33 29 20 A7 20 38 |. EIN$..(13) . 8| 000004B0: 31 33 30 00 CB 14 81 1F 8B 20 D4 28 5A 24 2C 45 |130...... .(Z$,E| 000004C0: 49 4E 24 29 20 A7 20 38 30 38 30 00 0A 15 86 1F |IN$) . 8080.....| 000004D0: 4B B2 D4 28 4B 24 2C 45 49 4E 24 29 3A 91 20 4B |K..(K$,EIN$):. K| 000004E0: 20 89 20 38 30 38 35 2C 38 30 39 30 2C 38 30 39 | . 8085,8090,809| 000004F0: 35 2C 38 31 30 30 2C 38 31 30 35 2C 38 31 31 30 |5,8100,8105,8110| 00000500: 2C 38 31 32 30 2C 38 31 32 35 00 1F 15 8B 1F DA |,8120,8125......| 00000510: 20 31 2C 31 30 30 2C 35 3A 89 20 38 30 36 30 00 | 1,100,5:. 8060.| 00000520: 35 15 90 1F CA 28 49 4E 50 24 2C 43 50 2C 31 29 |5....(INP$,CP,1)| 00000530: B2 45 49 4E 24 00 60 15 95 1F 8B 20 43 50 B2 4C |.EIN$.`.... CP.L| 00000540: 47 20 A7 20 43 50 B2 31 3A 89 20 38 30 35 35 3A |G . CP.1:. 8055:| 00000550: D5 20 43 50 B2 43 50 AA 31 3A 89 20 38 30 35 35 |. CP.CP.1:. 8055| 00000560: 00 8B 15 9A 1F 8B 20 43 50 B2 31 20 A7 20 43 50 |...... CP.1 . CP| 00000570: B2 4C 47 3A 89 20 38 30 35 35 3A D5 20 43 50 B2 |.LG:. 8055:. CP.| 00000580: 43 50 AB 31 3A 89 20 38 30 35 35 00 9B 15 9F 1F |CP.1:. 8055.....| 00000590: 43 50 B2 31 3A 89 20 38 30 35 35 00 CB 15 A4 1F |CP.1:. 8055.....| 000005A0: 49 4E 50 24 B2 22 22 3A 81 20 49 B2 31 20 A4 20 |INP$."":. I.1 . | 000005B0: 4C 47 3A 49 4E 50 24 B2 49 4E 50 24 AA 22 20 22 |LG:INP$.INP$." "| 000005C0: 3A 82 20 49 3A 89 20 38 30 39 35 00 0A 16 A9 1F |:. I:. 8095.....| 000005D0: 4C 54 24 B2 C8 28 49 4E 50 24 2C 43 50 AB 31 29 |LT$..(INP$,CP.1)| 000005E0: 3A 52 54 24 B2 C9 28 49 4E 50 24 2C 4C 47 AB 43 |:RT$..(INP$,LG.C| 000005F0: 50 29 3A 49 4E 50 24 B2 4C 54 24 AA 52 54 24 AA |P):INP$.LT$.RT$.| 00000600: 22 20 22 3A 89 20 38 30 35 35 00 44 16 AE 1F 8B |" ":. 8055.D....| 00000610: 20 43 50 B2 4C 47 20 A7 20 38 30 37 35 3A D5 20 | CP.LG . 8075:. | 00000620: 4C 54 24 B2 C8 28 49 4E 50 24 2C 43 50 AB 31 29 |LT$..(INP$,CP.1)| 00000630: 3A 52 54 24 B2 C9 28 49 4E 50 24 2C 4C 47 AB 43 |:RT$..(INP$,LG.C| 00000640: 50 AA 31 29 00 77 16 B3 1F 49 4E 50 24 B2 4C 54 |P.1).w...INP$.LT| 00000650: 24 AA 22 20 22 AA 52 54 24 3A 49 4E 50 24 B2 C8 |$." ".RT$:INP$..| 00000660: 28 49 4E 50 24 2C C3 28 49 4E 50 24 29 AB 31 29 |(INP$,.(INP$).1)| 00000670: 3A 89 20 38 30 35 35 00 AB 16 B8 1F 8B 20 28 43 |:. 8055...... (C| 00000680: 50 AA 54 41 42 29 B1 4C 47 20 A7 20 43 50 B2 4C |P.TAB).LG . CP.L| 00000690: 47 3A 89 20 38 30 35 35 3A D5 20 43 50 B2 43 50 |G:. 8055:. CP.CP| 000006A0: AA 54 41 42 3A 89 20 38 30 35 35 00 DD 16 BD 1F |.TAB:. 8055.....| 000006B0: 8B 20 28 43 50 AB 54 41 42 29 B3 31 20 A7 20 43 |. (CP.TAB).1 . C| 000006C0: 50 B2 31 3A 89 20 38 30 35 35 3A D5 20 43 50 B2 |P.1:. 8055:. CP.| 000006D0: 43 50 AB 54 41 42 3A 89 20 38 30 35 35 00 18 17 |CP.TAB:. 8055...| 000006E0: C2 1F E0 2C 59 50 2C 58 50 2C 49 4E 50 24 3A 99 |...,YP,XP,INP$:.| 000006F0: 3A 49 B2 4C 47 3A EB 20 FC 20 CA 28 49 4E 50 24 |:I.LG:. . .(INP$| 00000700: 2C 49 2C 31 29 B3 B1 22 20 22 20 B0 20 49 B2 31 |,I,1).." " . I.1| 00000710: 3A 49 B2 49 AB 31 3A EC 00 41 17 C7 1F 8B 20 49 |:I.I.1:..A.... I| 00000720: B2 31 20 A7 20 49 4E 50 24 B2 22 22 3A 8E 3A D5 |.1 . INP$."":.:.| 00000730: 20 49 4E 50 24 B2 C8 28 49 4E 50 24 2C 49 29 3A | INP$..(INP$,I):| 00000740: 8E 00 00 00 |.... |
......:.".... ********************.=....
* --- OPTINPUT --- *.X.... * ==========
====== *.S.... * M. JASINSKI 1988 *.....
. ********************.....:.D.L.. 8:. 1
,G(133):. 2,G(134):.:. G(9)G(14)G(8)...Q
.. "*** DEMONSTRATIONSPROGRAMM ***":.:..
..V.. "BITTE GEBEN SIE FOLGENDE DATEN EI
N:":..R.[.. "VORNAME: ";:LG.15:ZS.1:VG$.
"":. 8000:VN$.INP$.|.`.. "NACHNAME: ";:L
G.15:. 8000:NN$.INP$...E.. "STR. UND HAU
SNR.: ";:LG.20:. 8000:ST$.INP$...J.. "PL
Z UND ORT: ";:VG$."8000 MUENCHEN":LG.20:
. 8000:OT$.INP$.".O.. "ALTER: ";:ZS.2:VG
$."":LG.5:. 8000:ALT$.INP$.*.T..:..J.Y..
VN$;" ";NN$;" (";ALT$;")".^.~.. ST$:. O
T$:.:....... ".BITTE TASTE DRUECKEN FUER
NEUSTART.":.. T$:......:...@.:.C.E.. *
OPTINPUT - BY M. JASINSKI *.I.J.:...O.Z1
$."ABCDEFGHIJKLMNOPQRSTUVWXYZ ABCDEFGHIJ
KLMNOPQRSTUVWXYZ1234567890+-=_".B.T.Z1$.
Z1$."!#$%&'()^@\*:;[]<>,./?":Z2$."123456
7890+-E":XP.B(205):YP..(X)..Y.. ZS.1 .
Z$.Z1$:U Z$.Z2$...^.INP$.VG$:CP.1:. VG$.
"" . 8040...C.. LG.C(VG$) . LG.C(VG$).Z.
H.ML.40.YP:. LG.ML . LG.ML...M.K$."...."
.G(20).G(148):. C(INP$).ML . INP$.H(INP$
,ML).P.R.K$.K$.G(133).G(134):. C(INP$).L
G . INP$.INP$." ":. 8050...W..,YP,XP,INP
$:.,(YP.1).CP,XP,".".J(INP$,CP,1).".":.
TA.0 . TA.8...|... EIN$:. EIN$.G(13) . 8
130.K.... T(Z$,EIN$) . 8080.....K.T(K$,E
IN$):. K . 8085,8090,8095,8100,8105,8110
,8120,8125.....Z 1,100,5:. 8060.5...J(IN
P$,CP,1).EIN$.`.... CP.LG . CP.1:. 8055:
U CP.CP.1:. 8055...... CP.1 . CP.LG:. 80
55:U CP.CP.1:. 8055.....CP.1:. 8055.K...
INP$."":. I.1 . LG:INP$.INP$." ":. I:. 8
095.....LT$.H(INP$,CP.1):RT$.I(INP$,LG.C
P):INP$.LT$.RT$." ":. 8055.D.... CP.LG .
8075:U LT$.H(INP$,CP.1):RT$.I(INP$,LG.C
P.1).W...INP$.LT$." ".RT$:INP$.H(INP$,C(
INP$).1):. 8055...... (CP.TAB).LG . CP.L
G:. 8055:U CP.CP.TAB:. 8055...... (CP.TA
B).1 . CP.1:. 8055:U CP.CP.TAB:. 8055...
B..,YP,XP,INP$:.:I.LG:. . J(INP$,I,1).."
" . I.1:I.I.1:..A.G.. I.1 . INP$."":.:U
INP$.H(INP$,I):....
> CLICK IMAGE PREVIEW FOR FULL MODAL