INPUT
FILE INFORMATION
FILENAME(S): INPUT
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 01:07:59
APPEARS ON: 3 disk(s)
FILE HASH
d2b8503c6413ae0b895e098dbede3b9e682b104c35b73b778b023320150bf2c1
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUBLIC DOMAIN | INPUT | PRG | Treasure Chest - Wolfgang Rauprich | 27 | 11 | DOWNLOAD FILE |
| DIVERSES ON C64 | INPUT | PRG | Treasure Chest - Wolfgang Rauprich | 33 | 0 | DOWNLOAD FILE |
| D IVERSES | INPUT | PRG | Treasure Chest - Wolfgang Rauprich | 33 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 01 00 8F 20 43 4F 50 59 52 49 47 48 |..(.... COPYRIGH|
00000010: 54 20 42 59 20 43 48 49 50 2C 20 44 49 53 4B 20 |T BY CHIP, DISK |
00000020: 23 35 2E 30 30 38 2E 31 00 3E 08 0A 00 8F 20 27 |#5.008.1.>.... '|
00000030: 49 4E 50 55 54 2D 52 4F 55 54 49 4E 45 27 00 58 |INPUT-ROUTINE'.X|
00000040: 08 14 00 8F 20 54 49 4C 4C 20 5A 49 45 47 45 52 |.... TILL ZIEGER|
00000050: 20 20 39 2E 35 2E 38 35 00 5E 08 1E 00 3A 00 79 | 9.5.85.^...:.y|
00000060: 08 28 00 89 20 31 30 30 30 3A 8F 20 48 41 55 50 |.(.. 1000:. HAUP|
00000070: 54 50 52 4F 47 52 41 4D 4D 00 7F 08 32 00 3A 00 |TPROGRAMM...2.:.|
00000080: 8B 08 64 00 8F 20 49 4E 50 55 54 00 97 08 6E 00 |..d.. INPUT...n.|
00000090: 8F 20 2D 2D 2D 2D 2D 00 B3 08 78 00 97 20 31 39 |. -----...x.. 19|
000000A0: 38 2C 30 3A 59 53 B2 C2 28 32 31 31 29 3A 59 43 |8,0:YS..(211):YC|
000000B0: B2 59 53 00 CB 08 82 00 8B 20 C3 28 59 24 29 B1 |.YS...... .(Y$).|
000000C0: B2 59 4C 20 A7 20 89 20 31 36 30 00 DF 08 8C 00 |.YL . . 160.....|
000000D0: 59 24 B2 59 24 AA 22 20 22 3A 89 20 31 33 30 00 |Y$.Y$." ":. 130.|
000000E0: E5 08 96 00 3A 00 01 09 A0 00 97 20 32 31 31 2C |....:...... 211,|
000000F0: 59 53 3A 99 20 59 24 3B 3A 97 20 32 31 31 2C 59 |YS:. Y$;:. 211,Y|
00000100: 43 00 07 09 AA 00 3A 00 13 09 B4 00 97 20 32 30 |C.....:...... 20|
00000110: 34 2C 30 00 2D 09 BE 00 A1 20 59 54 24 3A 8B 20 |4,0.-.... YT$:. |
00000120: 59 54 24 B2 22 22 A7 20 89 20 31 39 30 00 39 09 |YT$."". . 190.9.|
00000130: C8 00 97 20 32 30 34 2C 31 00 51 09 D2 00 59 54 |... 204,1.Q...YT|
00000140: B2 C6 28 59 54 24 29 3A 59 43 B2 C2 28 32 31 31 |..(YT$):YC..(211|
00000150: 29 00 6F 09 DC 00 8B 20 59 54 B2 31 33 20 A7 20 |).o.... YT.13 . |
00000160: 97 20 32 31 31 2C 59 53 3A 99 20 59 24 3A 8E 00 |. 211,YS:. Y$:..|
00000170: 83 09 E6 00 8B 20 59 54 B2 32 39 20 A7 20 89 20 |..... YT.29 . . |
00000180: 34 33 30 00 98 09 F0 00 8B 20 59 54 B2 31 35 37 |430...... YT.157|
00000190: 20 A7 20 89 20 34 36 30 00 C3 09 FA 00 8B 20 59 | . . 460...... Y|
000001A0: 54 B2 31 34 37 20 A7 20 97 20 32 31 31 2C 59 53 |T.147 . . 211,YS|
000001B0: 3A 59 24 B2 22 20 22 3A 59 43 B2 59 53 3A 89 20 |:Y$." ":YC.YS:. |
000001C0: 31 33 30 00 D8 09 04 01 8B 20 59 54 B2 31 34 38 |130...... YT.148|
000001D0: 20 A7 20 89 20 34 39 30 00 EC 09 0E 01 8B 20 59 | . . 490...... Y|
000001E0: 54 B2 32 30 20 A7 20 89 20 35 33 30 00 06 0A 18 |T.20 . . 530....|
000001F0: 01 8B 20 59 54 B2 31 39 20 A7 20 59 43 B2 59 53 |.. YT.19 . YC.YS|
00000200: 3A 89 20 31 36 30 00 1D 0A 22 01 91 20 59 46 20 |:. 160...".. YF |
00000210: 89 20 33 34 30 2C 33 37 30 2C 34 30 30 00 4C 0A |. 340,370,400.L.|
00000220: 2C 01 59 24 B2 C8 28 59 24 2C 59 43 AB 59 53 29 |,.Y$..(Y$,YC.YS)|
00000230: AA 59 54 24 AA C9 28 59 24 2C 59 53 AA 59 4C AB |.YT$..(Y$,YS.YL.|
00000240: 59 43 AB 31 29 3A 99 20 59 54 24 3B 00 6D 0A 36 |YC.1):. YT$;.m.6|
00000250: 01 8B 20 C2 28 32 31 31 29 B1 59 53 AB 31 AA 59 |.. .(211).YS.1.Y|
00000260: 4C 20 A7 20 99 20 C7 28 31 35 37 29 3B 00 77 0A |L . . .(157);.w.|
00000270: 40 01 89 20 31 38 30 00 7D 0A 4A 01 3A 00 99 0A |@.. 180.}.J.:...|
00000280: 54 01 8B 20 59 54 B3 34 38 20 B0 20 59 54 B1 35 |T.. YT.48 . YT.5|
00000290: 37 20 A7 20 89 20 31 38 30 00 A3 0A 5E 01 89 20 |7 . . 180...^.. |
000002A0: 33 30 30 00 A9 0A 68 01 3A 00 D5 0A 72 01 8B 20 |300...h.:...r.. |
000002B0: 59 54 B3 33 32 20 B0 28 59 54 B1 33 32 20 AF 20 |YT.32 .(YT.32 . |
000002C0: 59 54 B3 34 30 29 B0 20 59 54 B1 35 37 20 A7 20 |YT.40). YT.57 . |
000002D0: 89 20 31 38 30 00 DF 0A 7C 01 89 20 33 30 30 00 |. 180...|.. 300.|
000002E0: E5 0A 86 01 3A 00 13 0B 90 01 8B 20 59 54 B3 33 |....:...... YT.3|
000002F0: 32 20 B0 28 59 54 B1 39 35 20 AF 20 59 54 B3 31 |2 .(YT.95 . YT.1|
00000300: 39 33 29 B0 20 59 54 B1 32 31 38 20 A7 20 89 20 |93). YT.218 . . |
00000310: 31 38 30 00 1D 0B 9A 01 89 20 33 30 30 00 23 0B |180...... 300.#.|
00000320: A4 01 3A 00 40 0B AE 01 8B 20 C2 28 32 31 31 29 |..:.@.... .(211)|
00000330: B1 59 53 AB 32 AA 59 4C 20 A7 20 89 20 31 38 30 |.YS.2.YL . . 180|
00000340: 00 52 0B B8 01 59 43 B2 59 43 AA 31 3A 89 20 31 |.R...YC.YC.1:. 1|
00000350: 36 30 00 58 0B C2 01 3A 00 70 0B CC 01 8B 20 C2 |60.X...:.p.... .|
00000360: 28 32 31 31 29 B2 59 53 20 A7 20 89 20 31 38 30 |(211).YS . . 180|
00000370: 00 82 0B D6 01 59 43 B2 59 43 AB 31 3A 89 20 31 |.....YC.YC.1:. 1|
00000380: 36 30 00 88 0B E0 01 3A 00 9B 0B EA 01 8B 20 59 |60.....:...... Y|
00000390: 46 B2 31 20 A7 20 89 20 31 38 30 00 D5 0B F4 01 |F.1 . . 180.....|
000003A0: 59 43 B2 C2 28 32 31 31 29 3A 59 24 B2 C8 28 59 |YC..(211):Y$..(Y|
000003B0: 24 2C 59 43 AB 59 53 29 AA 22 20 22 AA CA 28 59 |$,YC.YS)." "..(Y|
000003C0: 24 2C 59 43 AB 59 53 AA 31 2C 59 53 AA 59 4C AB |$,YC.YS.1,YS.YL.|
000003D0: 59 43 AB 31 29 00 F7 0B FE 01 97 20 32 31 31 2C |YC.1)...... 211,|
000003E0: 59 53 3A 99 20 59 24 3B 3A 97 20 32 31 31 2C 59 |YS:. Y$;:. 211,Y|
000003F0: 43 3A 89 20 31 38 30 00 FD 0B 08 02 3A 00 2F 0C |C:. 180.....:./.|
00000400: 12 02 59 43 B2 C2 28 32 31 31 29 3A 59 24 B2 C8 |..YC..(211):Y$..|
00000410: 28 59 24 2C 59 43 AB 59 53 29 AA C9 28 59 24 2C |(Y$,YC.YS)..(Y$,|
00000420: 59 53 AA 59 4C AB 59 43 AB 31 29 AA 22 20 22 00 |YS.YL.YC.1)." ".|
00000430: 51 0C 1C 02 97 20 32 31 31 2C 59 53 3A 99 20 59 |Q.... 211,YS:. Y|
00000440: 24 3B 3A 97 20 32 31 31 2C 59 43 3A 89 20 31 38 |$;:. 211,YC:. 18|
00000450: 30 00 57 0C 26 02 3A 00 5D 0C 30 02 3A 00 71 0C |0.W.&.:.].0.:.q.|
00000460: E8 03 8F 20 48 41 55 50 54 50 52 4F 47 52 41 4D |... HAUPTPROGRAM|
00000470: 4D 00 85 0C F2 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |M...... --------|
00000480: 2D 2D 2D 2D 2D 00 98 0C FC 03 99 20 C7 28 31 34 |-----...... .(14|
00000490: 37 29 3B C7 28 31 34 29 00 B7 0C 06 04 99 22 20 |7);.(14)......" |
000004A0: 20 20 20 20 20 20 20 20 C9 4E 50 55 54 2D C2 45 | .NPUT-.E|
000004B0: 49 53 50 49 45 4C 22 00 D8 0C 10 04 99 22 20 20 |ISPIEL"......" |
000004C0: 20 20 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D | =========|
000004D0: 3D 3D 3D 3D 3D 22 3A 99 00 E8 0C 1A 04 99 22 C5 |=====":.......".|
000004E0: 49 4E 47 41 42 45 4E 22 00 FA 0C 24 04 99 22 2D |INGABEN"...$.."-|
000004F0: 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 2C 0D 2E 04 99 |-------":..,....|
00000500: 22 4E 55 4D 45 52 49 53 43 48 3A 20 22 3B 3A 59 |"NUMERISCH: ";:Y|
00000510: 4C B2 35 3A 59 46 B2 31 3A 59 24 B2 4E 55 24 3A |L.5:YF.1:Y$.NU$:|
00000520: 8D 20 31 30 30 3A 4E 55 24 B2 59 24 00 32 0D 38 |. 100:NU$.Y$.2.8|
00000530: 04 99 00 69 0D 42 04 99 22 4B 41 55 46 4D 41 45 |...i.B.."KAUFMAE|
00000540: 4E 4E 49 53 43 48 3A 20 22 3B 3A 59 4C B2 31 30 |NNISCH: ";:YL.10|
00000550: 3A 59 46 B2 32 3A 59 24 B2 4B 41 24 3A 8D 20 31 |:YF.2:Y$.KA$:. 1|
00000560: 30 30 3A 4B 41 24 B2 59 24 00 6F 0D 4C 04 99 00 |00:KA$.Y$.o.L...|
00000570: A7 0D 56 04 99 22 41 4C 50 48 41 4E 55 4D 45 52 |..V.."ALPHANUMER|
00000580: 49 53 43 48 3A 20 22 3B 3A 59 4C B2 31 35 3A 59 |ISCH: ";:YL.15:Y|
00000590: 46 B2 33 3A 59 24 B2 41 4C 24 3A 8D 20 31 30 30 |F.3:Y$.AL$:. 100|
000005A0: 3A 41 4C 24 B2 59 24 00 AF 0D 60 04 99 3A 99 00 |:AL$.Y$...`..:..|
000005B0: BF 0D 6A 04 99 22 C1 55 53 47 41 42 45 4E 22 00 |..j..".USGABEN".|
000005C0: CF 0D 74 04 99 22 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |..t.."--------".|
000005D0: D9 0D 7E 04 99 20 4E 55 24 00 E3 0D 88 04 99 20 |..~.. NU$...... |
000005E0: 4B 41 24 00 ED 0D 92 04 99 20 41 4C 24 00 FB 0D |KA$...... AL$...|
000005F0: 9C 04 92 20 31 39 38 2C 32 35 35 00 16 0E A6 04 |... 198,255.....|
00000600: 89 20 31 30 30 30 3A 8F 20 48 41 55 50 54 50 52 |. 1000:. HAUPTPR|
00000610: 4F 47 52 41 4D 4D 00 1C 0E B0 04 80 00 22 0E BA |OGRAMM......."..|
00000620: 04 3A 00 28 0E C4 04 3A 00 3C 0E D0 07 45 58 54 |.:.(...:.<...EXT|
00000630: 45 52 4E 45 20 56 41 52 49 41 42 C3 00 52 0E DA |ERNE VARIAB..R..|
00000640: 07 AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00000650: AB AB 00 76 0E E4 07 59 4C 20 B2 20 4D 41 58 49 |...v...YL . MAXI|
00000660: 4D 41 4C 4C 41 45 4E 47 45 20 44 45 52 20 56 41 |MALLAENGE DER VA|
00000670: 52 49 41 42 4C 45 00 8A 0E EE 07 27 20 20 20 20 |RIABLE.....' |
00000680: 28 31 20 42 49 53 20 34 30 29 00 A4 0E F8 07 59 |(1 BIS 40).....Y|
00000690: 46 20 B2 20 41 52 54 20 44 45 52 20 45 49 4E 47 |F . ART DER EING|
000006A0: 41 42 45 3A 00 C8 0E 02 08 27 31 20 AB 20 4E 55 |ABE:.....'1 . NU|
000006B0: 4D 45 52 49 53 43 48 20 28 5A 8B 46 45 52 4E 20 |MERISCH (Z.FERN |
000006C0: 30 20 42 49 53 20 39 29 00 E8 0E 0C 08 27 32 20 |0 BIS 9).....'2 |
000006D0: AB 20 4B 41 55 46 4D 41 45 4E 4E 49 53 43 48 20 |. KAUFMAENNISCH |
000006E0: 28 5A 8B 46 45 52 4E 2C 00 0D 0F 11 08 27 20 20 |(Z.FERN,.....' |
000006F0: 20 20 4D 41 54 48 2E 20 5A 45 49 43 48 45 4E 2C | MATH. ZEICHEN,|
00000700: 20 4C 45 45 52 5A 45 49 43 48 45 4E 29 00 34 0F | LEERZEICHEN).4.|
00000710: 16 08 27 33 20 AB 20 41 4C 50 48 41 4E 55 4D 45 |..'3 . ALPHANUME|
00000720: 52 49 53 43 48 20 28 57 49 45 20 32 20 AA 20 42 |RISCH (WIE 2 . B|
00000730: 55 43 48 AB 00 56 0F 20 08 27 20 20 20 20 53 54 |UCH..V. .' ST|
00000740: 41 42 45 4E 20 55 4E 44 20 53 91 44 45 52 5A 45 |ABEN UND S.DERZE|
00000750: 49 43 48 45 4E 29 00 75 0F 52 08 59 24 20 B2 20 |ICHEN).u.R.Y$ . |
00000760: 45 49 4E AB AD 41 55 53 47 41 42 45 AB 56 41 52 |EIN..AUSGABE.VAR|
00000770: 49 41 42 4C 45 00 7B 0F 5C 08 27 00 8D 0F 66 08 |IABLE.{.\.'...f.|
00000780: B5 45 52 4E 45 20 56 41 52 49 41 42 C3 00 A3 0F |.ERNE VARIAB....|
00000790: 70 08 AB AB AB AB AB AB AB AB AB AB AB AB AB AB |p...............|
000007A0: AB AB AB 00 BF 0F 7A 08 59 53 20 B2 20 41 4E 46 |......z.YS . ANF|
000007B0: 41 4E 47 53 B9 49 54 49 91 20 43 55 52 53 B0 00 |ANGS.ITI. CURS..|
000007C0: DC 0F 84 08 59 43 20 B2 20 41 4B 54 55 45 4C 4C |....YC . AKTUELL|
000007D0: 45 20 43 55 52 53 B0 B9 49 54 49 91 00 F6 0F 8E |E CURS..ITI.....|
000007E0: 08 59 54 24 B2 20 47 45 44 52 55 45 43 4B 54 45 |.YT$. GEDRUECKTE|
000007F0: 20 54 41 53 54 45 00 19 10 98 08 59 54 20 B2 20 | TASTE.....YT . |
00000800: C6 49 49 20 44 45 52 20 47 45 44 52 55 45 43 4B |.II DER GEDRUECK|
00000810: 54 45 4E 20 54 41 53 54 45 00 1F 10 A2 08 27 00 |TEN TASTE.....'.|
00000820: 30 10 AC 08 45 52 4C 41 45 55 54 45 8A 47 45 4E |0...ERLAEUTE.GEN|
00000830: 00 43 10 B6 08 AB AB AB AB AB AB AB AB AB AB AB |.C..............|
00000840: AB AB AB 00 66 10 C0 08 44 49 45 20 85 AB 52 4F |....f...DIE ..RO|
00000850: 55 54 49 4E 45 20 45 52 4D 4F 45 47 4C 49 43 48 |UTINE ERMOEGLICH|
00000860: 54 20 45 49 4E 45 00 88 10 CA 08 46 45 48 4C 45 |T EINE.....FEHLE|
00000870: 52 B8 49 45 20 45 49 4E 47 41 42 45 20 4F 48 4E |R.IE EINGABE OHN|
00000880: 45 20 47 45 46 41 48 52 00 AA 10 D4 08 44 45 52 |E GEFAHR.....DER|
00000890: 20 4D 41 53 4B 45 4E 5A 45 52 53 A4 45 8A 47 2C | MASKENZERS.E.G,|
000008A0: 20 49 4E 44 45 4D 20 45 49 4E 00 CF 10 DE 08 45 | INDEM EIN.....E|
000008B0: 49 4E 47 41 42 45 46 45 4E 53 54 45 52 20 4D 49 |INGABEFENSTER MI|
000008C0: 54 20 44 45 52 20 4C 41 45 4E 47 45 20 59 4C 00 |T DER LAENGE YL.|
000008D0: ED 10 E8 08 4D 49 54 20 46 4F 4C 47 80 45 4E 20 |....MIT FOLG.EN |
000008E0: 45 49 47 45 4E 53 43 48 41 46 54 45 4E 00 FF 10 |EIGENSCHAFTEN...|
000008F0: F2 08 45 52 5A 45 55 47 54 20 57 49 52 44 3A 00 |..ERZEUGT WIRD:.|
00000900: 05 11 FC 08 27 00 28 11 06 09 AB 20 53 4F 81 54 |....'.(.... SO.T|
00000910: 49 47 45 20 50 52 55 45 46 55 4E 47 20 41 55 46 |IGE PRUEFUNG AUF|
00000920: 20 5A 55 4C 41 45 53 AB 00 4C 11 10 09 27 20 53 | ZULAES..L...' S|
00000930: 49 47 4B 45 49 54 20 44 45 52 20 47 45 44 52 55 |IGKEIT DER GEDRU|
00000940: 45 43 4B 54 45 4E 20 54 41 53 54 45 00 6A 11 1A |ECKTEN TASTE.j..|
00000950: 09 27 20 49 4E 20 41 42 48 41 45 4E 47 49 47 4B |.' IN ABHAENGIGK|
00000960: 45 49 54 20 56 91 20 59 46 2E 00 8E 11 24 09 AB |EIT V. YF....$..|
00000970: 20 B8 49 45 20 43 55 52 53 B0 42 45 57 45 47 55 | .IE CURS.BEWEGU|
00000980: 4E 47 45 4E 20 49 4E 4E 45 52 48 41 4C 42 00 A2 |NGEN INNERHALB..|
00000990: 11 2E 09 27 20 44 45 53 20 46 45 4E 53 54 45 52 |...' DES FENSTER|
000009A0: 53 2E 00 C1 11 38 09 AB 20 48 4F 4D 45 3A 20 43 |S....8.. HOME: C|
000009B0: 55 52 53 B0 20 41 4E 20 4C 49 4E 4B 45 4E 20 52 |URS. AN LINKEN R|
000009C0: AF 00 CF 11 42 09 27 20 53 45 54 5A 45 4E 2E 00 |....B.' SETZEN..|
000009D0: EE 11 4C 09 AB 20 9C 3A 20 4C 4F 45 53 43 48 45 |..L.. .: LOESCHE|
000009E0: 4E 20 44 45 53 20 47 45 53 41 4D 54 45 4E 00 FE |N DES GESAMTEN..|
000009F0: 11 56 09 27 20 46 45 4E 53 54 45 52 53 2E 00 21 |.V.' FENSTERS..!|
00000A00: 12 60 09 AB 20 44 45 4C 3A 20 4C 4F 45 53 43 48 |.`.. DEL: LOESCH|
00000A10: 45 4E 20 41 42 20 43 55 52 53 B0 B9 49 54 49 91 |EN AB CURS..ITI.|
00000A20: 2E 00 46 12 6A 09 AB 20 49 4E 53 54 3A 20 45 49 |..F.j.. INST: EI|
00000A30: 4E 46 55 45 47 45 4E 20 56 91 20 4C 45 45 52 5A |NFUEGEN V. LEERZ|
00000A40: 45 49 43 48 45 4E 00 65 12 74 09 27 20 41 42 20 |EICHEN.e.t.' AB |
00000A50: 43 55 52 53 B0 B9 49 54 49 91 20 28 4E 49 43 48 |CURS..ITI. (NICH|
00000A60: 54 20 42 45 49 00 81 12 7E 09 27 20 4E 55 4D 45 |T BEI...~.' NUME|
00000A70: 52 49 53 43 48 45 52 20 45 49 4E 47 41 42 45 29 |RISCHER EINGABE)|
00000A80: 2E 00 00 00 |.... |
..(.... COPYRIGHT BY CHIP, DISK #5.008.1
.>.... 'INPUT-ROUTINE'.X.... TILL ZIEGER
9.5.85.^...:.Y.(.. 1000:. HAUPTPROGRAM
M..2.:...D.. INPUT...N.. -----...X.. 19
8,0:YS.B(211):YC.YS.K.... C(Y$)..YL . .
160.....Y$.Y$." ":. 130.....:... .. 211,
YS:. Y$;:. 211,YC.....:...... 204,0.-...
. YT$:. YT$."". . 190.9.H.. 204,1.Q.R.YT
.F(YT$):YC.B(211).O.... YT.13 . . 211,YS
:. Y$:....... YT.29 . . 430...... YT.157
. . 460.C.... YT.147 . . 211,YS:Y$." ":
YC.YS:. 130.X.... YT.148 . . 490...... Y
T.20 . . 530...... YT.19 . YC.YS:. 160..
.".. YF . 340,370,400.L.,.Y$.H(Y$,YC.YS)
.YT$.I(Y$,YS.YL.YC.1):. YT$;.M.6.. B(211
).YS.1.YL . . G(157);.W.@.. 180.}.J.:...
T.. YT.48 . YT.57 . . 180...^.. 300...H.
:.U.R.. YT.32 .(YT.32 . YT.40). YT.57 .
. 180...|.. 300.....:...... YT.32 .(YT.9
5 . YT.193). YT.218 . . 180...... 300.#.
..:.@.... B(211).YS.2.YL . . 180.R...YC.
YC.1:. 160.X.B.:.P.L.. B(211).YS . . 180
...V.YC.YC.1:. 160.....:...... YF.1 . .
180.U...YC.B(211):Y$.H(Y$,YC.YS)." ".J(Y
$,YC.YS.1,YS.YL.YC.1)...... 211,YS:. Y$;
:. 211,YC:. 180.....:./...YC.B(211):Y$.H
(Y$,YC.YS).I(Y$,YS.YL.YC.1)." ".Q.... 21
1,YS:. Y$;:. 211,YC:. 180.W.&.:.].0.:.Q.
... HAUPTPROGRAMM...... -------------...
... G(147);G(14)......" INPUT-BE
ISPIEL".X...." ==============":.
......"EINGABEN"...$.."--------":..,....
"NUMERISCH: ";:YL.5:YF.1:Y$.NU$:. 100:NU
$.Y$.2.8...I.B.."KAUFMAENNISCH: ";:YL.10
:YF.2:Y$.KA$:. 100:KA$.Y$.O.L.....V.."AL
PHANUMERISCH: ";:YL.15:YF.3:Y$.AL$:. 100
:AL$.Y$...`..:....J.."AUSGABEN".O.T.."--
------".Y.~.. NU$...... KA$...... AL$...
... 198,255...... 1000:. HAUPTPROGRAMM..
....."...:.(.D.:.<.P.EXTERNE VARIABC.R.Z
...................V...YL . MAXIMALLAENG
E DER VARIABLE.....' (1 BIS 40).....Y
F . ART DER EINGABE:.H...'1 . NUMERISCH
(Z.FERN 0 BIS 9).....'2 . KAUFMAENNISCH
(Z.FERN,.....' MATH. ZEICHEN, LEERZEI
CHEN).4...'3 . ALPHANUMERISCH (WIE 2 . B
UCH..V. .' STABEN UND S.DERZEICHEN).U
.R.Y$ . EIN..AUSGABE.VARIABLE.{.\.'...F.
.ERNE VARIABC...P.....................Z.
YS . ANFANGS.ITI. CURS......YC . AKTUELL
E CURS..ITI......YT$. GEDRUECKTE TASTE..
...YT . FII DER GEDRUECKTEN TASTE.....'.
0...ERLAEUTE.GEN.C..................F...
DIE ..ROUTINE ERMOEGLICHT EINE...J.FEHLE
R.IE EINGABE OHNE GEFAHR...T.DER MASKENZ
ERS.E.G, INDEM EIN.O...EINGABEFENSTER MI
T DER LAENGE YL.....MIT FOLG.EN EIGENSCH
AFTEN.....ERZEUGT WIRD:.....'.(.... SO.T
IGE PRUEFUNG AUF ZULAES..L...' SIGKEIT D
ER GEDRUECKTEN TASTE.J...' IN ABHAENGIGK
EIT V. YF....$.. .IE CURS.BEWEGUNGEN INN
ERHALB.....' DES FENSTERS..A.8.. HOME: C
URS. AN LINKEN R..O.B.' SETZEN....L.. .:
LOESCHEN DES GESAMTEN...V.' FENSTERS..!
.`.. DEL: LOESCHEN AB CURS..ITI...F.J..
INST: EINFUEGEN V. LEERZEICHEN.E.T.' AB
CURS..ITI. (NICHT BEI...~.' NUMERISCHER
EINGABE)....
> CLICK IMAGE PREVIEW FOR FULL MODAL