Multiple names: INPUT (DEMO), INPUT-ROUTINE

FILE INFORMATION

FILENAME(S):
• INPUT&nbsp(DEMO)<br>• INPUT-ROUTINE

FILE TYPE(S): PRG

FILE SIZE: 4K

FIRST SEEN: 2025-10-20 14:29:58

APPEARS ON: 15 disk(s)

FILE HASH

384be2c12de761d2298847f9aa24add6d7b2e900fb8f37b0d9182494ee625e8b

FOUND ON DISKS (15 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
MT90499 SEITE 1	INPUT (DEMO)	PRG	Treasure Chest - Klaus Der Suhler	24	9	DOWNLOAD FILE
A H R1 A	INPUT-ROUTINE	PRG	Treasure Chest - Max	9	0	DOWNLOAD FILE
64 ER 11 85	INPUT-ROUTINE	PRG	Treasure Chest - Reamigation	9	0	DOWNLOAD FILE
64 ER 11 85	INPUT-ROUTINE	PRG	C64er	9	0	DOWNLOAD FILE
ED	INPUT-ROUTINE	PRG	DuncanTwain	8	0	DOWNLOAD FILE
HULPPROGRAM	INPUT-ROUTINE	PRG	DuncanTwain	3	4	DOWNLOAD FILE
64 ER 11 85	INPUT-ROUTINE	PRG	DuncanTwain	9	0	DOWNLOAD FILE
64 ER 11 85	INPUT-ROUTINE	PRG	DuncanTwain	9	0	DOWNLOAD FILE
MT90499 SEITE 1	INPUT (DEMO)	PRG	DuncanTwain	24	9	DOWNLOAD FILE
MR CIRCUIT 1986	INPUT-ROUTINE	PRG	hedning, Christian Johansson	32	9	DOWNLOAD FILE
GREATEST NYTTO	INPUT-ROUTINE	PRG	hedning, Christian Johansson	34	1	DOWNLOAD FILE
ULRIK DISK 1B	INPUT-ROUTINE	PRG	hedning, emil	9	0	DOWNLOAD FILE
053A	INPUT-ROUTINE	PRG	hedning, German ebay	9	0	DOWNLOAD FILE
053B	INPUT-ROUTINE	PRG	hedning, German ebay	9	0	DOWNLOAD FILE
TEST	INPUT-ROUTINE	PRG	hedning, shine	15	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1A 08 00 00 8F 20  20 20 20 20 20 20 49 4E  |.......       IN|
00000010: 50 55 54 20 28 44 45 4D  4F 29 00 38 08 01 00 8F  |PUT (DEMO).8....|
00000020: 20 49 4E 50 55 54 2D 52  4F 55 54 49 4E 45 20 46  | INPUT-ROUTINE F|
00000030: 55 52 20 56 43 20 36 34  00 3E 08 02 00 8F 00 51  |UR VC 64.>.....Q|
00000040: 08 03 00 8F 20 43 4F 50  59 52 49 47 48 54 20 42  |.... COPYRIGHT B|
00000050: 59 00 66 08 04 00 8F 20  4B 41 52 4C 48 45 49 4E  |Y.f.... KARLHEIN|
00000060: 5A 20 42 4F 53 53 00 85  08 05 00 8F 20 53 59 4C  |Z BOSS...... SYL|
00000070: 56 45 53 54 45 52 2D 4A  4F 52 44 41 4E 2D 53 54  |VESTER-JORDAN-ST|
00000080: 52 2E 20 31 31 00 98 08  06 00 8F 20 33 35 35 30  |R. 11...... 3550|
00000090: 20 4D 41 52 42 55 52 47  00 AA 08 07 00 8F 20 30  | MARBURG...... 0|
000000A0: 36 34 32 31 2F 31 33 35  30 39 00 CA 08 08 00 97  |6421/13509......|
000000B0: 35 33 32 38 31 2C 30 39  3A 97 35 33 32 38 30 2C  |53281,09:.53280,|
000000C0: 30 39 3A 97 36 34 36 2C  30 37 00 D6 08 09 00 99  |09:.646,07......|
000000D0: 20 C7 28 31 34 29 00 EA  08 0A 00 8F 20 49 4E 50  | .(14)...... INP|
000000E0: 55 54 2D 52 4F 55 54 49  4E 45 00 F0 08 14 00 8F  |UT-ROUTINE......|
000000F0: 00 13 09 1E 00 8F 20 50  41 24 20 49 53 54 20 41  |...... PA$ IST A|
00000100: 55 46 47 45 42 41 55 54  20 57 49 45 20 46 4F 4C  |UFGEBAUT WIE FOL|
00000110: 47 54 3A 00 33 09 28 00  8F 20 50 41 24 20 3D 20  |GT:.3.(.. PA$ = |
00000120: 5A 45 53 50 4D 49 4D 41  43 20 20 20 20 20 57 4F  |ZESPMIMAC     WO|
00000130: 42 45 49 00 4A 09 32 00  8F 20 20 20 20 20 20 20  |BEI.J.2..       |
00000140: 5A 45 20 3D 20 5A 45 49  4C 45 00 62 09 3C 00 8F  |ZE = ZEILE.b.<..|
00000150: 20 20 20 20 20 20 20 53  50 20 3D 20 53 50 41 4C  |       SP = SPAL|
00000160: 54 45 00 81 09 46 00 8F  20 20 20 20 20 20 20 4D  |TE...F..       M|
00000170: 49 20 3D 20 4D 49 4E 44  45 53 54 4C 41 45 4E 47  |I = MINDESTLAENG|
00000180: 45 00 A2 09 50 00 8F 20  20 20 20 20 20 20 4D 41  |E...P..       MA|
00000190: 20 3D 20 4D 41 58 49 4D  41 4C 45 20 4C 41 45 4E  | = MAXIMALE LAEN|
000001A0: 47 45 00 BF 09 5A 00 8F  20 20 20 20 20 20 20 20  |GE...Z..        |
000001B0: 43 20 3D 20 43 4F 44 45  20 20 57 4F 42 45 49 00  |C = CODE  WOBEI.|
000001C0: DC 09 64 00 8F 20 20 20  20 20 20 20 20 20 31 20  |..d..         1 |
000001D0: 3D 20 4E 55 52 20 5A 41  48 4C 45 4E 00 FD 09 6E  |= NUR ZAHLEN...n|
000001E0: 00 8F 20 20 20 20 20 20  20 20 20 32 20 3D 20 4E  |..         2 = N|
000001F0: 55 52 20 42 55 43 48 53  54 41 42 45 4E 00 15 0A  |UR BUCHSTABEN...|
00000200: 78 00 8F 20 20 20 20 20  20 20 20 20 33 20 3D 20  |x..         3 = |
00000210: 41 4C 4C 45 53 00 38 0A  7D 00 8F 20 20 20 20 20  |ALLES.8.}..     |
00000220: 20 20 20 20 34 20 3D 20  4E 55 52 20 4B 4C 45 49  |    4 = NUR KLEI|
00000230: 4E 42 55 43 48 53 54 2E  00 5E 0A 82 00 8F 20 20  |NBUCHST..^....  |
00000240: 20 20 20 20 20 35 2D 36  20 3D 20 46 52 45 49 20  |     5-6 = FREI |
00000250: 50 52 4F 47 52 41 4D 4D  49 45 52 42 41 52 00 82  |PROGRAMMIERBAR..|
00000260: 0A 84 00 8F 20 20 20 20  20 20 20 20 20 20 20 20  |....            |
00000270: 20 20 20 28 20 5A 45 49  4C 45 20 36 30 34 39 30  |   ( ZEILE 60490|
00000280: 20 29 00 A6 0A 8C 00 8F  20 50 41 24 20 4D 55 53  | )...... PA$ MUS|
00000290: 53 20 44 49 45 20 5A 45  49 4C 45 20 55 4E 44 20  |S DIE ZEILE UND |
000002A0: 53 50 41 4C 54 45 00 C9  0A 96 00 8F 20 42 45 49  |SPALTE...... BEI|
000002B0: 4E 48 41 4C 54 45 4E 2C  44 45 52 20 52 45 53 54  |NHALTEN,DER REST|
000002C0: 20 49 53 54 20 48 49 4E  2D 00 EB 0A A0 00 8F 20  | IST HIN-...... |
000002D0: 52 45 49 43 48 45 4E 44  2E 45 53 20 57 45 52 44  |REICHEND.ES WERD|
000002E0: 45 4E 20 44 41 4E 4E 20  44 49 45 00 0C 0B AA 00  |EN DANN DIE.....|
000002F0: 8F 20 53 54 41 4E 44 41  52 44 50 41 52 41 4D 45  |. STANDARDPARAME|
00000300: 54 45 52 20 49 4E 20 5A  45 49 4C 45 00 23 0B B4  |TER IN ZEILE.#..|
00000310: 00 8F 20 36 30 32 30 30  20 41 4E 47 45 4E 4F 4D  |.. 60200 ANGENOM|
00000320: 4D 45 4E 00 39 0B BE 00  8F 20 5A 2E 42 2E 20 50  |MEN.9.... Z.B. P|
00000330: 41 24 3D 22 30 35 31 30  22 00 3F 0B C8 00 3A 00  |A$="0510".?...:.|
00000340: 49 0B E8 03 99 22 93 22  3B 00 7B 0B F2 03 99 22  |I....".";.{...."|
00000350: 12 20 20 C9 4E 50 55 54  2D D2 4F 55 54 49 4E 45  |.  .NPUT-.OUTINE|
00000360: 20 20 20 43 4F 50 59 52  49 47 48 54 20 42 59 20  |   COPYRIGHT BY |
00000370: CB 2E C2 4F 53 53 20 20  20 92 22 00 AB 0B FC 03  |...OSS   .".....|
00000380: 99 20 22 D5 45 42 45 52  20 47 45 54 20 57 49 52  |. ".EBER GET WIR|
00000390: 44 20 45 49 4E 45 20 C9  4E 50 55 54 2D D2 4F 55  |D EINE .NPUT-.OU|
000003A0: 54 49 4E 45 20 53 49 4D  55 2D 22 00 DD 0B 06 04  |TINE SIMU-".....|
000003B0: 99 20 22 4C 49 45 52 54  2C 20 57 4F 42 45 49 20  |. "LIERT, WOBEI |
000003C0: 53 41 45 4D 54 4C 49 43  48 45 20 D3 4F 4E 44 45  |SAEMTLICHE .ONDE|
000003D0: 52 46 55 4E 4B 54 49 4F  4E 53 2D 22 3B 00 0C 0C  |RFUNKTIONS-";...|
000003E0: 10 04 99 20 22 54 41 53  54 45 4E 20 28 49 4E 53  |... "TASTEN (INS|
000003F0: 54 2C 44 45 4C 2C 48 4F  4D 45 2C 43 4C 52 2C 43  |T,DEL,HOME,CLR,C|
00000400: 52 2C 43 4C 29 20 4E 4F  43 48 20 22 00 3C 0C 1A  |R,CL) NOCH ".<..|
00000410: 04 99 20 22 46 55 4E 4B  54 49 4F 4E 49 45 52 45  |.. "FUNKTIONIERE|
00000420: 4E 2C 20 4D 41 4E 20 41  42 45 52 20 44 41 53 20  |N, MAN ABER DAS |
00000430: C5 49 4E 47 41 42 45 46  45 4C 44 22 00 6E 0C 24  |.INGABEFELD".n.$|
00000440: 04 99 20 22 4E 49 43 48  54 20 56 45 52 4C 41 53  |.. "NICHT VERLAS|
00000450: 53 45 4E 20 4B 41 4E 4E  2E 20 C1 55 53 53 45 52  |SEN KANN. .USSER|
00000460: 44 45 4D 20 4B 41 4E 4E  20 4D 41 4E 22 3B 00 A0  |DEM KANN MAN";..|
00000470: 0C 2E 04 99 20 22 42 45  49 4D 20 C1 55 46 52 55  |.... "BEIM .UFRU|
00000480: 46 20 44 45 52 20 D2 4F  55 54 49 4E 45 20 47 4C  |F DER .OUTINE GL|
00000490: 45 49 43 48 20 CF 52 54  2C 20 4D 49 4E 2E 22 3B  |EICH .RT, MIN.";|
000004A0: 00 D2 0C 38 04 99 20 22  55 4E 44 20 4D 41 58 2E  |...8.. "UND MAX.|
000004B0: 20 CC 41 45 4E 47 45 20  55 4E 44 20 44 49 45 20  | .AENGE UND DIE |
000004C0: 5A 55 4C 41 45 53 53 49  47 45 4E 20 DA 45 49 2D  |ZULAESSIGEN .EI-|
000004D0: 22 3B 00 F4 0C 42 04 99  20 22 43 48 45 4E 20 44  |";...B.. "CHEN D|
000004E0: 45 52 20 C5 49 4E 47 41  42 45 20 41 4E 47 45 42  |ER .INGABE ANGEB|
000004F0: 45 4E 2E 22 00 28 0D 4C  04 99 20 22 12 98 20 C2  |EN.".(.L.. ".. .|
00000500: 45 49 53 50 2E 3A 20 20  20 20 20 20 20 20 20 20  |EISP.:          |
00000510: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000520: 20 20 20 20 20 20 22 3B  00 5A 0D 51 04 99 20 22  |      ";.Z.Q.. "|
00000530: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000540: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000550: 20 20 20 20 20 20 20 20  22 3B 00 8C 0D 56 04 99  |        ";...V..|
00000560: 20 22 C4 41 54 55 4D 20  28 D4 D4 CD CD CA CA 29  | ".ATUM (......)|
00000570: 20 3A 20 20 1D 1D 1D 1D  1D 1D 20 20 20 20 20 20  | :  ......      |
00000580: 20 20 20 20 20 20 20 20  20 20 22 3B 00 BE 0D 60  |          ";...`|
00000590: 04 99 20 22 20 20 20 20  20 20 20 20 20 20 20 20  |.. "            |
000005A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005B0: 20 20 20 20 20 20 20 20  20 20 20 20 22 3B 00 F0  |            ";..|
000005C0: 0D 6A 04 99 20 22 CE 41  4D 45 20 3A 20 20 1D 1D  |.j.. ".AME :  ..|
000005D0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
000005E0: 1D 1D 20 20 20 20 20 20  20 20 20 20 20 20 22 3B  |..            ";|
000005F0: 00 22 0E 74 04 99 20 22  20 20 20 20 20 20 20 20  |.".t.. "        |
00000600: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000610: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000620: 22 3B 00 54 0E 7E 04 99  20 22 CB 55 45 52 5A 45  |";.T.~.. ".UERZE|
00000630: 4C 20 28 4D 49 4E 44 20  32 20 4B 4C 2E 20 C2 55  |L (MIND 2 KL. .U|
00000640: 43 48 53 54 2E 29 20 3A  20 20 1D 1D 1D 20 20 20  |CHST.) :  ...   |
00000650: 20 20 22 3B 00 86 0E 88  04 99 20 22 20 20 20 20  |  ";...... "    |
00000660: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000670: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000680: 20 20 20 20 22 3B 00 B8  0E 92 04 99 20 22 C3 4F  |    ";...... ".O|
00000690: 4D 50 55 54 45 52 20 3A  20 20 1D 1D 1D 1D 1D 1D  |MPUTER :  ......|
000006A0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 20 20 20 20 20 20 20  |.........       |
000006B0: 20 20 20 20 20 20 22 3B  00 EC 0E 9C 04 99 20 22  |      ";...... "|
000006C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006E0: 20 20 20 20 20 20 20 20  92 9E 22 3B 00 0D 0F 6C  |        ..";...l|
000006F0: 07 8F 20 48 49 45 52 20  4E 55 4E 20 44 49 45 20  |.. HIER NUN DIE |
00000700: 34 20 41 55 46 52 55 46  45 20 41 55 53 00 2A 0F  |4 AUFRUFE AUS.*.|
00000710: 76 07 8F 20 56 4F 52 41  4E 47 45 47 41 4E 47 45  |v.. VORANGEGANGE|
00000720: 4E 20 42 45 49 53 50 49  45 4C 00 30 0F 80 07 8F  |N BEISPIEL.0....|
00000730: 00 52 0F D0 07 50 41 24  B2 22 31 32 31 38 30 36  |.R...PA$."121806|
00000740: 30 36 31 22 3A 8D 36 30  30 30 30 3A 41 24 B2 49  |061":.60000:A$.I|
00000750: 4E 24 00 74 0F DA 07 50  41 24 B2 22 31 34 30 38  |N$.t...PA$."1408|
00000760: 30 30 32 30 32 22 3A 8D  36 30 30 30 30 3A 42 24  |00202":.60000:B$|
00000770: B2 49 4E 24 00 96 0F E4  07 50 41 24 B2 22 31 36  |.IN$.....PA$."16|
00000780: 33 32 30 32 30 33 34 22  3A 8D 36 30 30 30 30 3A  |3202034":.60000:|
00000790: 43 24 B2 49 4E 24 00 B3  0F EE 07 50 41 24 B2 22  |C$.IN$.....PA$."|
000007A0: 31 38 31 32 22 3A 8D 36  30 30 30 30 3A 44 24 B2  |1812":.60000:D$.|
000007B0: 49 4E 24 00 B9 0F F8 07  8F 00 CD 0F 34 08 8F 20  |IN$.........4.. |
000007C0: 20 20 20 20 44 41 53 20  57 41 52 27 53 00 D3 0F  |    DAS WAR'S...|
000007D0: 3E 08 8F 00 F5 0F 48 08  8F 20 50 53 3A 20 44 49  |>.....H.. PS: DI|
000007E0: 45 20 52 45 49 4E 45 20  49 4E 50 55 54 2D 52 4F  |E REINE INPUT-RO|
000007F0: 55 54 49 4E 45 00 11 10  52 08 8F 20 49 4E 20 4B  |UTINE...R.. IN K|
00000800: 4F 4D 50 52 2E 20 46 4F  52 4D 20 48 45 49 53 53  |OMPR. FORM HEISS|
00000810: 54 00 2B 10 5C 08 8F 20  20 20 20 20 20 20 20 49  |T.+.\..        I|
00000820: 4E 50 55 54 20 28 4B 55  52 5A 29 00 4E 10 B8 0B  |NPUT (KURZ).N...|
00000830: 99 3A 99 20 22 C4 49 45  20 C5 49 4E 47 41 42 45  |.:. ".IE .INGABE|
00000840: 4E 20 57 41 52 45 4E 20  3A 20 22 3B 41 24 00 57  |N WAREN : ";A$.W|
00000850: 10 C2 0B 99 20 42 24 00  60 10 CC 0B 99 20 43 24  |.... B$.`.... C$|
00000860: 00 69 10 D6 0B 99 20 44  24 00 91 10 E0 0B 99 20  |.i.... D$...... |
00000870: 22 20 20 20 20 20 20 20  20 20 20 20 20 12 20 D4  |"            . .|
00000880: 41 53 54 45 20 44 52 55  45 43 4B 45 4E 20 92 22  |ASTE DRUECKEN ."|
00000890: 3B 00 AD 10 EA 0B A1 20  4E 4A 24 20 3A 20 8B 20  |;...... NJ$ : . |
000008A0: 4E 4A 24 B2 22 22 20 A7  20 33 30 35 30 00 B6 10  |NJ$."" . 3050...|
000008B0: 9B 0F 99 22 93 22 00 D2  10 A0 0F 97 20 32 31 31  |..."."...... 211|
000008C0: 2C 30 3A 97 20 32 31 34  2C 32 34 3A 9E 35 38 36  |,0:. 214,24:.586|
000008D0: 34 30 00 F1 10 AA 0F 99  22 4C 49 53 54 31 39 30  |40......"LIST190|
000008E0: 30 2D 32 31 34 30 20 20  20 20 20 20 20 20 20 20  |0-2140          |
000008F0: 22 00 FA 10 AF 0F 99 22  13 22 00 06 11 B4 0F 9B  |"......"."......|
00000900: 33 30 AB 31 39 30 00 0C  11 2F 75 80 00 12 11 30  |30.190.../u....0|
00000910: 75 3A 00 18 11 18 79 3A  00 1E 11 00 7D 3A 00 24  |u:....y:....}:.$|
00000920: 11 E8 80 3A 00 2A 11 D0  84 3A 00 5D 11 60 EA 42  |...:.*...:.].`.B|
00000930: 4C 24 B2 22 20 20 20 20  20 20 20 20 20 20 20 20  |L$."            |
00000940: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000950: 20 20 20 20 20 20 20 20  20 20 20 20 22 00 68 11  |            ".h.|
00000960: 6A EA 49 4E 24 B2 22 22  00 6E 11 C3 EA 3A 00 83  |j.IN$."".n...:..|
00000970: 11 C4 EA 5A 45 B2 C5 28  CA 28 50 41 24 2C 31 2C  |...ZE..(.(PA$,1,|
00000980: 32 29 29 00 98 11 CE EA  53 50 B2 C5 28 CA 28 50  |2)).....SP..(.(P|
00000990: 41 24 2C 33 2C 32 29 29  00 AF 11 D8 EA 8B 20 C3  |A$,3,2))...... .|
000009A0: 28 50 41 24 29 B2 34 20  A7 20 36 30 32 30 30 00  |(PA$).4 . 60200.|
000009B0: C4 11 E2 EA 4D 49 B2 C5  28 CA 28 50 41 24 2C 35  |....MI..(.(PA$,5|
000009C0: 2C 32 29 29 00 D9 11 EC  EA 4D 41 B2 C5 28 CA 28  |,2)).....MA..(.(|
000009D0: 50 41 24 2C 37 2C 32 29  29 00 EE 11 F6 EA 43 4F  |PA$,7,2)).....CO|
000009E0: B2 C5 28 CA 28 50 41 24  2C 39 2C 31 29 29 00 FA  |..(.(PA$,9,1))..|
000009F0: 11 00 EB 89 20 36 30 33  30 30 00 1E 12 1E EB 8F  |.... 60300......|
00000A00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000A10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 32  |**************.2|
00000A20: 12 28 EB 4D 49 B2 30 3A  4D 41 B2 31 35 3A 43 4F  |.(.MI.0:MA.15:CO|
00000A30: B2 33 00 56 12 32 EB 8F  2A 2A 2A 2A 2A 2A 2A 2A  |.3.V.2..********|
00000A40: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000A50: 2A 2A 2A 2A 2A 2A 00 5C  12 3C EB 3A 00 68 12 8C  |******.\.<.:.h..|
00000A60: EB 8D 20 36 30 39 35 30  00 74 12 96 EB 97 20 32  |.. 60950.t.... 2|
00000A70: 30 34 2C 30 00 8F 12 A0  EB A1 20 4E 24 20 3A 20  |04,0...... N$ : |
00000A80: 8B 20 4E 24 B2 22 22 20  A7 20 36 30 33 32 30 00  |. N$."" . 60320.|
00000A90: 9D 12 AA EB 53 53 B2 C2  28 32 31 31 29 00 CF 12  |....SS..(211)...|
00000AA0: B4 EB 8B 20 C6 28 4E 24  29 B2 31 33 20 AF 20 C3  |... .(N$).13 . .|
00000AB0: 28 49 4E 24 29 B1 B2 4D  49 20 A7 20 97 20 32 30  |(IN$)..MI . . 20|
00000AC0: 34 2C 31 20 3A 20 8D 20  36 33 38 39 30 3A 8E 00  |4,1 : . 63890:..|
00000AD0: F3 12 BE EB 8B 20 C6 28  4E 24 29 B2 31 34 37 20  |..... .(N$).147 |
00000AE0: A7 20 8D 20 36 31 30 30  30 20 3A 20 89 20 36 30  |. . 61000 : . 60|
00000AF0: 33 32 30 00 1E 13 C8 EB  8B 20 C6 28 4E 24 29 B2  |320...... .(N$).|
00000B00: 31 39 20 A7 20 8D 20 36  33 38 39 30 20 3A 20 8D  |19 . . 63890 : .|
00000B10: 20 36 30 39 35 30 3A 89  20 36 30 33 32 30 00 4D  | 60950:. 60320.M|
00000B20: 13 D2 EB 8B 20 C6 28 4E  24 29 B2 32 30 20 AF 20  |.... .(N$).20 . |
00000B30: C2 28 32 31 31 29 B1 53  50 20 A7 20 8D 20 36 31  |.(211).SP . . 61|
00000B40: 34 31 30 20 3A 20 89 20  36 30 33 32 30 00 6F 13  |410 : . 60320.o.|
00000B50: DC EB 8B 20 C6 28 4E 24  29 B2 31 35 37 20 A7 20  |... .(N$).157 . |
00000B60: 8D 20 36 31 33 31 30 3A  89 20 36 30 33 32 30 00  |. 61310:. 60320.|
00000B70: 9D 13 E6 EB 8B 20 C6 28  4E 24 29 B2 31 34 38 20  |..... .(N$).148 |
00000B80: AF 20 C3 28 49 4E 24 29  B3 4D 41 20 A7 20 8D 20  |. .(IN$).MA . . |
00000B90: 36 31 35 30 35 3A 89 20  36 30 33 32 30 00 BE 13  |61505:. 60320...|
00000BA0: F0 EB 8B 20 C6 28 4E 24  29 B2 32 39 20 A7 20 8D  |... .(N$).29 . .|
00000BB0: 20 36 31 32 31 30 3A 89  20 36 30 33 32 30 00 E3  | 61210:. 60320..|
00000BC0: 13 FA EB 8B 20 C6 28 4E  24 29 B2 31 37 20 B0 20  |.... .(N$).17 . |
00000BD0: C6 28 4E 24 29 B2 31 34  35 20 A7 20 20 20 36 30  |.(N$).145 .   60|
00000BE0: 33 32 30 00 13 14 04 EC  8B 20 C6 28 4E 24 29 B2  |320...... .(N$).|
00000BF0: 31 34 38 20 B0 20 C6 28  4E 24 29 B2 32 30 20 B0  |148 . .(N$).20 .|
00000C00: 20 C6 28 4E 24 29 B2 31  33 20 A7 20 89 20 36 30  | .(N$).13 . . 60|
00000C10: 33 32 30 00 19 14 0E EC  3A 00 22 14 45 EC 46 4C  |320.....:.".E.FL|
00000C20: B2 30 00 52 14 4A EC 91  20 43 4F 20 8D 20 20 36  |.0.R.J.. CO .  6|
00000C30: 33 39 30 30 2C 36 33 39  31 30 2C 36 33 39 32 30  |3900,63910,63920|
00000C40: 2C 36 33 39 33 30 2C 36  33 39 34 30 2C 36 33 39  |,63930,63940,639|
00000C50: 35 30 00 65 14 4F EC 8B  20 46 4C B2 31 20 89 20  |50.e.O.. FL.1 . |
00000C60: 36 30 33 32 30 00 6B 14  54 EC 3A 00 93 14 59 EC  |60320.k.T.:...Y.|
00000C70: 8B 20 C3 28 49 4E 24 29  B2 53 53 AB 53 50 20 A7  |. .(IN$).SS.SP .|
00000C80: 20 49 4E 24 B2 49 4E 24  AA 4E 24 3A 89 20 36 30  | IN$.IN$.N$:. 60|
00000C90: 35 31 35 00 C9 14 5E EC  49 4E 24 B2 C8 28 49 4E  |515...^.IN$..(IN|
00000CA0: 24 2C 53 53 AB 53 50 29  AA 4E 24 AA CA 28 49 4E  |$,SS.SP).N$..(IN|
00000CB0: 24 2C 53 53 AB 53 50 AA  32 2C C3 28 49 4E 24 29  |$,SS.SP.2,.(IN$)|
00000CC0: AB 53 53 AA 53 50 AB 31  29 00 D3 14 63 EC 99 20  |.SS.SP.1)...c.. |
00000CD0: 4E 24 3B 00 F0 14 68 EC  8B 20 53 53 B2 53 50 AA  |N$;...h.. SS.SP.|
00000CE0: 4D 41 AB 31 20 A7 20 99  20 C7 28 31 35 37 29 3B  |MA.1 . . .(157);|
00000CF0: 00 FC 14 72 EC 89 20 36  30 33 32 30 00 02 15 E5  |...r.. 60320....|
00000D00: ED 3A 00 08 15 E6 ED 3A  00 0E 15 E7 ED 3A 00 2B  |.:.....:.....:.+|
00000D10: 15 16 EE 97 32 31 31 2C  53 50 3A 97 32 31 34 2C  |....211,SP:.214,|
00000D20: 5A 45 3A 9E 35 38 36 34  30 3A 8E 00 31 15 47 EE  |ZE:.58640:..1.G.|
00000D30: 3A 00 3D 15 48 EE 8D 20  36 30 39 35 30 00 4E 15  |:.=.H.. 60950.N.|
00000D40: 52 EE 99 20 C8 28 42 4C  24 2C 4D 41 29 3B 00 5A  |R.. .(BL$,MA);.Z|
00000D50: 15 5C EE 8D 20 36 30 39  35 30 00 65 15 66 EE 49  |.\.. 60950.e.f.I|
00000D60: 4E 24 B2 22 22 00 6B 15  70 EE 8E 00 71 15 AB EE  |N$."".k.p...q...|
00000D70: 3A 00 99 15 1A EF 8B 20  53 53 B3 53 50 AA C3 28  |:...... SS.SP..(|
00000D80: 49 4E 24 29 AF 20 53 53  B3 53 50 AA 4D 41 AB 31  |IN$). SS.SP.MA.1|
00000D90: A7 20 53 53 B2 53 53 AA  31 00 A5 15 24 EF 8D 20  |. SS.SS.1...$.. |
00000DA0: 36 33 38 39 30 00 B9 15  2E EF 97 20 32 31 31 2C  |63890...... 211,|
00000DB0: 53 53 3A 9E 35 38 36 34  30 00 BF 15 38 EF 8E 00  |SS:.58640...8...|
00000DC0: C5 15 42 EF 3A 00 DB 15  7E EF 8B 20 53 53 B1 53  |..B.:...~.. SS.S|
00000DD0: 50 20 A7 20 53 53 B2 53  53 AB 31 00 E7 15 88 EF  |P . SS.SS.1.....|
00000DE0: 8D 20 36 33 38 39 30 00  FE 15 92 EF 97 20 32 31  |. 63890...... 21|
00000DF0: 31 2C 53 53 20 3A 20 9E  20 35 38 36 34 30 00 04  |1,SS : . 58640..|
00000E00: 16 9C EF 8E 00 0A 16 A6  EF 3A 00 3D 16 E2 EF 49  |.........:.=...I|
00000E10: 4E 24 B2 C8 28 49 4E 24  2C 53 53 AB 53 50 AB 31  |N$..(IN$,SS.SP.1|
00000E20: 29 AA CA 28 49 4E 24 2C  53 53 AB 53 50 AA 31 2C  |)..(IN$,SS.SP.1,|
00000E30: C3 28 49 4E 24 29 AB 53  53 AA 53 50 29 00 49 16  |.(IN$).SS.SP).I.|
00000E40: EC EF 8D 20 36 33 38 39  30 00 63 16 F1 EF 8B 20  |... 63890.c.... |
00000E50: C3 28 49 4E 24 29 B3 4D  41 AB 31 20 A7 20 99 22  |.(IN$).MA.1 . ."|
00000E60: 20 22 3B 00 7C 16 F6 EF  97 20 32 31 31 2C 53 53  | ";.|.... 211,SS|
00000E70: AB 31 20 3A 20 9E 20 35  38 36 34 30 00 82 16 00  |.1 : . 58640....|
00000E80: F0 8E 00 88 16 32 F0 3A  00 A5 16 41 F0 8B 20 53  |.....2.:...A.. S|
00000E90: 53 B2 53 50 AA C3 28 49  4E 24 29 20 A7 20 89 20  |S.SP..(IN$) . . |
00000EA0: 36 31 35 34 30 00 DA 16  46 F0 49 4E 24 B2 C8 28  |61540...F.IN$..(|
00000EB0: 49 4E 24 2C 53 53 AB 53  50 29 AA 22 20 22 AA CA  |IN$,SS.SP)." "..|
00000EC0: 28 49 4E 24 2C 53 53 AB  53 50 AA 31 2C C3 28 49  |(IN$,SS.SP.1,.(I|
00000ED0: 4E 24 29 AB 53 53 AA 53  50 29 00 E6 16 50 F0 8D  |N$).SS.SP)...P..|
00000EE0: 20 36 33 38 39 30 00 FD  16 5A F0 97 20 32 31 31  | 63890...Z.. 211|
00000EF0: 2C 53 53 20 3A 20 9E 20  35 38 36 34 30 00 03 17  |,SS : . 58640...|
00000F00: 64 F0 8E 00 09 17 96 F0  3A 00 15 17 92 F9 8D 20  |d.......:...... |
00000F10: 36 30 39 35 30 00 35 17  94 F9 99 20 49 4E 24 3B  |60950.5.... IN$;|
00000F20: 3A 8B 20 C3 28 49 4E 24  29 B3 4D 41 20 A7 20 99  |:. .(IN$).MA . .|
00000F30: 20 22 20 22 3B 00 3B 17  9A F9 8E 00 41 17 9B F9  | " ";.;.....A...|
00000F40: 3A 00 60 17 9C F9 8B 20  C6 28 4E 24 29 B3 34 38  |:.`.... .(N$).48|
00000F50: B0 C6 28 4E 24 29 B1 35  37 20 A7 20 46 4C B2 31  |..(N$).57 . FL.1|
00000F60: 00 66 17 A5 F9 8E 00 79  17 A6 F9 8B 20 C6 28 4E  |.f.....y.... .(N|
00000F70: 24 29 B2 33 32 20 A7 20  8E 00 AF 17 A7 F9 8B 28  |$).32 . .......(|
00000F80: C6 28 4E 24 29 B3 36 35  B0 C6 28 4E 24 29 B1 39  |.(N$).65..(N$).9|
00000F90: 30 29 AF 28 C6 28 4E 24  29 B3 31 39 33 B0 C6 28  |0).(.(N$).193..(|
00000FA0: 4E 24 29 B1 32 31 38 29  20 A7 20 46 4C B2 31 00  |N$).218) . FL.1.|
00000FB0: B5 17 AF F9 8E 00 BB 17  B0 F9 8F 00 C1 17 B9 F9  |................|
00000FC0: 8E 00 D4 17 BA F9 8B 20  C6 28 4E 24 29 B2 33 32  |....... .(N$).32|
00000FD0: 20 A7 20 8E 00 F4 17 BB  F9 8B 28 C6 28 4E 24 29  | . .......(.(N$)|
00000FE0: B3 36 35 B0 C6 28 4E 24  29 B1 39 30 29 20 A7 20  |.65..(N$).90) . |
00000FF0: 46 4C B2 31 00 FA 17 C3  F9 8E 00 00 18 C4 F9 8F  |FL.1............|
00001000: 00 06 18 CD F9 8E 00 0C  18 CE F9 8F 00 12 18 D7  |................|
00001010: F9 8E 00 00 00                                    |.....           |

.......       INPUT (DEMO).8.... INPUT-R
OUTINE FUR VC 64.>.....Q.... COPYRIGHT B
Y.F.... KARLHEINZ BOSS...... SYLVESTER-J
ORDAN-STR. 11...... 3550 MARBURG...... 0
6421/13509.J....53281,09:.53280,09:.646,
07.V.... G(14)...... INPUT-ROUTINE......
...... PA$ IST AUFGEBAUT WIE FOLGT:.3.(.
. PA$ = ZESPMIMAC     WOBEI.J.2..       
ZE = ZEILE.B.<..       SP = SPALTE...F..
       MI = MINDESTLAENGE...P..       MA
 = MAXIMALE LAENGE...Z..        C = CODE
  WOBEI...D..         1 = NUR ZAHLEN...N
..         2 = NUR BUCHSTABEN...X..     
    3 = ALLES.8.}..         4 = NUR KLEI
NBUCHST..^....       5-6 = FREI PROGRAMM
IERBAR......               ( ZEILE 60490
 )...... PA$ MUSS DIE ZEILE UND SPALTE.I
.... BEINHALTEN,DER REST IST HIN-... .. 
REICHEND.ES WERDEN DANN DIE...... STANDA
RDPARAMETER IN ZEILE.#.... 60200 ANGENOM
MEN.9.... Z.B. PA$="0510".?.H.:.I...."."
;.{....".  INPUT-ROUTINE   COPYRIGHT BY 
K.BOSS   ."...... "UEBER GET WIRD EINE I
NPUT-ROUTINE SIMU-"...... "LIERT, WOBEI 
SAEMTLICHE SONDERFUNKTIONS-";...... "TAS
TEN (INST,DEL,HOME,CLR,CR,CL) NOCH ".<..
.. "FUNKTIONIEREN, MAN ABER DAS EINGABEF
ELD".N.$.. "NICHT VERLASSEN KANN. AUSSER
DEM KANN MAN";. .... "BEIM AUFRUF DER RO
UTINE GLEICH ORT, MIN.";.R.8.. "UND MAX.
 LAENGE UND DIE ZULAESSIGEN ZEI-";...B..
 "CHEN DER EINGABE ANGEBEN.".(.L.. ".. B
EISP.:                                ";
.Z.Q.. "                                
        ";...V.. "DATUM (TTMMJJ) :  ....
..                ";...`.. "            
                            ";...J.. "NA
ME :  ....................            ";
.".T.. "                                
        ";.T.~.. "KUERZEL (MIND 2 KL. BU
CHST.) :  ...     ";...... "            
                            ";...... "CO
MPUTER :  ...............             ";
...... "                                
        ..";...L.. HIER NUN DIE 4 AUFRUF
E AUS.*.V.. VORANGEGANGEN BEISPIEL.0....
.R.P.PA$."121806061":.60000:A$.IN$.T.Z.P
A$."140800202":.60000:B$.IN$.....PA$."16
3202034":.60000:C$.IN$.....PA$."1812":.6
0000:D$.IN$.......M.4..     DAS WAR'S.S.
>.....H.. PS: DIE REINE INPUT-ROUTINE...
R.. IN KOMPR. FORM HEISST.+.\..        I
NPUT (KURZ).N....:. "DIE EINGABEN WAREN 
: ";A$.W.B.. B$.`.L.. C$.I.V.. D$...... 
"            . TASTE DRUECKEN .";...... 
NJ$ : . NJ$."" . 3050......".".R. .. 211
,0:. 214,24:.58640......"LIST1900-2140  
        "......"."......30.190.../U....0
U:....Y:....}:.$...:.*.P.:.].`.BL$."    
                                    ".H.
J.IN$."".N.C.:...D.ZE.E(J(PA$,1,2))...N.
SP.E(J(PA$,3,2))...X.. C(PA$).4 . 60200.
D...MI.E(J(PA$,5,2)).Y...MA.E(J(PA$,7,2)
).....CO.E(J(PA$,9,1))...... 60300......
******************************.2.(.MI.0:
MA.15:CO.3.V.2..************************
******.\.<.:.H.... 60950.T.... 204,0... 
.. N$ : . N$."" . 60320.....SS.B(211).O.
... F(N$).13 . C(IN$)..MI . . 204,1 : . 
63890:....... F(N$).147 . . 61000 : . 60
320...H.. F(N$).19 . . 63890 : . 60950:.
 60320.M.R.. F(N$).20 . B(211).SP . . 61
410 : . 60320.O.... F(N$).157 . . 61310:
. 60320...... F(N$).148 . C(IN$).MA . . 
61505:. 60320...... F(N$).29 . . 61210:.
 60320...... F(N$).17 . F(N$).145 .   60
320...... F(N$).148 . F(N$).20 . F(N$).1
3 . . 60320.....:.".E.FL.0.R.J.. CO .  6
3900,63910,63920,63930,63940,63950.E.O..
 FL.1 . 60320.K.T.:...Y.. C(IN$).SS.SP .
 IN$.IN$.N$:. 60515.I.^.IN$.H(IN$,SS.SP)
.N$.J(IN$,SS.SP.2,C(IN$).SS.SP.1).S.C.. 
N$;...H.. SS.SP.MA.1 . . G(157);...R.. 6
0320.....:.....:.....:.+....211,SP:.214,
ZE:.58640:..1.G.:.=.H.. 60950.N.R.. H(BL
$,MA);.Z.\.. 60950.E.F.IN$."".K.P...Q...
:...... SS.SP.C(IN$). SS.SP.MA.1. SS.SS.
1...$.. 63890...... 211,SS:.58640...8...
E.B.:...~.. SS.SP . SS.SS.1...... 63890.
..... 211,SS : . 58640...........:.=...I
N$.H(IN$,SS.SP.1).J(IN$,SS.SP.1,C(IN$).S
S.SP).I.... 63890.C.... C(IN$).MA.1 . ."
 ";.|.... 211,SS.1 : . 58640.........2.:
...A.. SS.SP.C(IN$) . . 61540.Z.F.IN$.H(
IN$,SS.SP)." ".J(IN$,SS.SP.1,C(IN$).SS.S
P)...P.. 63890...Z.. 211,SS : . 58640...
D.......:...... 60950.5.... IN$;:. C(IN$
).MA . . " ";.;.....A...:.`.... F(N$).48
.F(N$).57 . FL.1.F.....Y.... F(N$).32 . 
.......(F(N$).65.F(N$).90).(F(N$).193.F(
N$).218) . FL.1.............A.....T.... 
F(N$).32 . .......(F(N$).65.F(N$).90) . 
FL.1...C.....D.....M.....N.....W.....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL