INPUT1
FILE INFORMATION
FILENAME(S): INPUT1
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-11-02 22:11:12
APPEARS ON: 1 disk(s)
FILE HASH
cdd15c1ddf890b245d87656f9ec7e98e79c40db5b53fe400b065954db155b230
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 90617 | INPUT1 | PRG | Treasure Chest - ToGuMi | 27 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 8F 20 2A 2A 20 4D 43 2D 52 4F |..$.... ** MC-RO| 00000010: 55 54 49 4E 45 4E 20 4E 41 43 48 4C 41 44 45 4E |UTINEN NACHLADEN| 00000020: 20 2A 2A 2A 00 39 08 0C 00 8B 20 C2 28 35 36 29 | ***.9.... .(56)| 00000030: B2 31 34 39 20 A7 20 32 36 00 66 08 0E 00 46 B2 |.149 . 26.f...F.| 00000040: C2 28 31 38 37 29 AA 32 35 36 AC C2 28 31 38 38 |.(187).256..(188| 00000050: 29 3A 8F 20 41 4B 54 55 45 4C 4C 45 52 20 46 49 |):. AKTUELLER FI| 00000060: 4C 45 4E 41 4D 45 00 A1 08 10 00 8B 20 C2 28 46 |LENAME...... .(F| 00000070: 29 B3 B1 37 37 20 AF 20 C2 28 46 AA 31 29 B3 B1 |)..77 . .(F.1)..| 00000080: 36 37 20 AF 20 C2 28 46 AA 32 29 B3 B1 35 30 20 |67 . .(F.2)..50 | 00000090: A7 20 93 20 22 4D 43 31 2E 4F 42 4A 22 2C 38 2C |. . "MC1.OBJ",8,| 000000A0: 31 00 E2 08 12 00 97 20 35 35 2C 30 3A 97 20 35 |1...... 55,0:. 5| 000000B0: 36 2C 31 34 39 3A 9C 3A 93 20 22 4D 43 32 2E 4F |6,149:.:. "MC2.O| 000000C0: 42 4A 22 2C 38 2C 31 3A 8F 20 42 41 53 49 43 2D |BJ",8,1:. BASIC-| 000000D0: 41 4E 46 41 4E 47 20 48 45 52 41 42 53 45 54 5A |ANFANG HERABSETZ| 000000E0: 45 4E 00 E8 08 14 00 3A 00 EE 08 16 00 3A 00 14 |EN.....:.....:..| 000000F0: 09 18 00 8F 20 2A 2A 20 53 54 41 52 54 41 44 52 |.... ** STARTADR| 00000100: 45 53 53 45 4E 20 4D 43 2D 52 4F 55 54 49 4E 45 |ESSEN MC-ROUTINE| 00000110: 4E 20 2A 2A 00 3B 09 1A 00 49 4F B2 33 38 39 31 |N **.;...IO.3891| 00000120: 32 3A 20 20 20 20 20 20 20 8F 20 4D 4F 44 55 4C |2: . MODUL| 00000130: 20 31 20 28 44 49 53 4B 49 4F 29 00 5B 09 1C 00 | 1 (DISKIO).[...| 00000140: 42 4C 41 45 54 54 45 52 4E B2 49 4F 3A 20 20 20 |BLAETTERN.IO: | 00000150: 8F 20 42 4C 41 45 54 54 45 52 4E 00 79 09 1E 00 |. BLAETTERN.y...| 00000160: 43 4F 56 45 52 54 B2 49 4F AA 33 3A 20 20 20 20 |COVERT.IO.3: | 00000170: 8F 20 43 4F 4E 56 45 52 54 00 9D 09 20 00 43 52 |. CONVERT... .CR| 00000180: 53 B2 49 4F AA 36 3A 20 20 20 20 20 20 20 8F 20 |S.IO.6: . | 00000190: 43 55 52 53 4F 52 20 53 45 54 5A 45 4E 00 BC 09 |CURSOR SETZEN...| 000001A0: 22 00 53 49 B2 49 4F AA 39 3A 20 20 20 20 20 20 |".SI.IO.9: | 000001B0: 20 20 8F 20 53 41 54 5A 49 4E 46 4F 00 DF 09 24 | . SATZINFO...$| 000001C0: 00 44 41 55 53 47 41 42 45 B2 49 4F AA 31 32 3A |.DAUSGABE.IO.12:| 000001D0: 20 8F 20 44 49 53 4B 2D 41 55 53 47 41 42 45 00 | . DISK-AUSGABE.| 000001E0: 02 0A 26 00 44 45 49 4E 47 41 42 45 B2 49 4F AA |..&.DEINGABE.IO.| 000001F0: 31 35 3A 20 8F 20 44 49 53 4B 2D 45 49 4E 47 41 |15: . DISK-EINGA| 00000200: 42 45 00 22 0A 28 00 44 49 52 B2 49 4F AA 31 38 |BE.".(.DIR.IO.18| 00000210: 3A 20 20 20 20 20 20 8F 20 44 49 52 45 43 54 4F |: . DIRECTO| 00000220: 52 59 00 48 0A 2A 00 53 50 45 49 43 48 45 52 4E |RY.H.*.SPEICHERN| 00000230: B2 49 4F AA 32 31 3A 8F 20 42 4C 4F 43 4B 20 53 |.IO.21:. BLOCK S| 00000240: 50 45 49 43 48 45 52 4E 00 6A 0A 2C 00 56 4C 41 |PEICHERN.j.,.VLA| 00000250: 44 45 4E B2 49 4F AA 32 34 3A 20 20 20 8F 20 42 |DEN.IO.24: . B| 00000260: 4C 4F 43 4B 20 4C 41 44 45 4E 00 70 0A 2E 00 3A |LOCK LADEN.p...:| 00000270: 00 97 0A 30 00 54 52 B2 33 39 38 38 38 3A 20 20 |...0.TR.39888: | 00000280: 20 20 20 20 20 8F 20 4D 4F 44 55 4C 20 32 28 54 | . MODUL 2(T| 00000290: 52 45 49 42 45 52 29 00 BA 0A 32 00 4D 41 4B 52 |REIBER)...2.MAKR| 000002A0: 4F B2 54 52 3A 20 20 20 20 20 20 20 8F 20 4D 41 |O.TR: . MA| 000002B0: 4B 52 4F 53 20 49 4E 49 54 2E 00 E1 0A 34 00 46 |KROS INIT....4.F| 000002C0: 53 43 52 45 45 4E B2 54 52 AA 33 3A 20 20 20 8F |SCREEN.TR.3: .| 000002D0: 20 46 41 53 54 53 43 52 45 45 4E 20 49 4E 49 54 | FASTSCREEN INIT| 000002E0: 2E 00 08 0B 36 00 57 41 48 4C B2 54 52 AA 36 3A |....6.WAHL.TR.6:| 000002F0: 20 20 20 20 20 20 8F 20 4B 4F 4D 4D 41 4E 44 4F | . KOMMANDO| 00000300: 2D 41 55 53 57 41 48 4C 00 2C 0B 38 00 53 45 41 |-AUSWAHL.,.8.SEA| 00000310: 52 43 48 B2 54 52 AA 39 3A 20 20 20 20 8F 20 53 |RCH.TR.9: . S| 00000320: 54 52 49 4E 47 20 53 55 43 48 45 4E 00 51 0B 3A |TRING SUCHEN.Q.:| 00000330: 00 41 55 53 47 41 42 45 B2 54 52 AA 31 32 3A 20 |.AUSGABE.TR.12: | 00000340: 20 8F 20 53 54 52 49 4E 47 2D 41 55 53 47 41 42 | . STRING-AUSGAB| 00000350: 45 00 75 0B 3C 00 53 52 49 45 4C 4C B2 54 52 AA |E.u.<.SRIELL.TR.| 00000360: 31 35 3A 20 20 20 8F 20 53 45 52 49 45 4C 4C 20 |15: . SERIELL | 00000370: 49 4E 49 54 2E 00 9A 0B 3E 00 50 41 52 41 4C 4C |INIT....>.PARALL| 00000380: 45 4C B2 54 52 AA 31 38 3A 20 8F 20 50 41 52 41 |EL.TR.18: . PARA| 00000390: 4C 4C 45 4C 20 49 4E 49 54 2E 00 BF 0B 40 00 50 |LLEL INIT....@.P| 000003A0: 52 45 53 45 4E 54 B2 54 52 AA 32 31 3A 20 20 8F |RESENT.TR.21: .| 000003B0: 20 44 45 56 49 43 45 20 50 52 45 53 45 4E 54 00 | DEVICE PRESENT.| 000003C0: C5 0B 42 00 3A 00 E8 0B 44 00 50 49 4E 49 54 B2 |..B.:...D.PINIT.| 000003D0: 35 30 39 36 30 3A 20 20 20 20 8F 20 50 55 46 46 |50960: . PUFF| 000003E0: 45 52 20 49 4E 49 54 2E 00 0C 0C 46 00 57 49 4E |ER INIT....F.WIN| 000003F0: 44 4F 57 B2 50 49 4E 49 54 AA 33 3A 20 8F 20 57 |DOW.PINIT.3: . W| 00000400: 49 4E 44 4F 57 53 20 4D 41 4C 45 4E 00 32 0C 48 |INDOWS MALEN.2.H| 00000410: 00 50 55 46 46 45 52 B2 50 49 4E 49 54 AA 36 3A |.PUFFER.PINIT.6:| 00000420: 20 8F 20 57 49 4E 44 4F 57 53 20 50 55 46 46 45 | . WINDOWS PUFFE| 00000430: 52 4E 00 54 0C 4A 00 49 4E 56 45 52 54 B2 50 49 |RN.T.J.INVERT.PI| 00000440: 4E 49 54 AA 39 3A 20 8F 20 49 4E 56 45 52 54 49 |NIT.9: . INVERTI| 00000450: 45 52 45 4E 00 7A 0C 4C 00 43 4E 54 52 4F 4C B2 |EREN.z.L.CNTROL.| 00000460: 50 49 4E 49 54 AA 31 32 3A 8F 20 4D 45 4E 55 45 |PINIT.12:. MENUE| 00000470: 2D 4B 4F 4E 54 52 4F 4C 4C 45 00 80 0C 4E 00 3A |-KONTROLLE...N.:| 00000480: 00 A6 0C 50 00 45 49 4E 47 41 42 45 B2 35 30 31 |...P.EINGABE.501| 00000490: 37 36 3A 20 20 8F 20 45 49 4E 47 41 42 45 2D 52 |76: . EINGABE-R| 000004A0: 4F 55 54 49 4E 45 00 C6 0C 52 00 51 55 49 43 4B |OUTINE...R.QUICK| 000004B0: B2 35 32 32 34 30 3A 20 20 20 20 8F 20 51 55 49 |.52240: . QUI| 000004C0: 43 4B 53 4F 52 54 00 ED 0C 54 00 43 48 41 52 B2 |CKSORT...T.CHAR.| 000004D0: 35 33 30 33 39 3A 20 20 20 20 20 8F 20 5A 45 49 |53039: . ZEI| 000004E0: 43 48 45 4E 53 41 54 5A 20 49 4E 49 54 00 14 0D |CHENSATZ INIT...| 000004F0: 56 00 47 43 B2 33 38 31 34 34 3A 20 20 20 20 20 |V.GC.38144: | 00000500: 20 20 8F 20 47 41 52 42 41 47 45 20 43 4F 4C 4C | . GARBAGE COLL| 00000510: 45 43 54 2E 00 1A 0D 58 00 3A 00 20 0D 5A 00 3A |ECT....X.:. .Z.:| 00000520: 00 45 0D 5C 00 8F 20 2A 2A 20 53 54 41 52 54 41 |.E.\.. ** STARTA| 00000530: 44 52 45 53 53 45 4E 20 44 2E 54 41 42 45 4C 4C |DRESSEN D.TABELL| 00000540: 45 4E 20 2A 2A 00 69 0D 5E 00 4D 54 B2 31 35 33 |EN **.i.^.MT.153| 00000550: 36 3A 20 20 20 20 20 20 20 20 8F 20 4D 41 4B 52 |6: . MAKR| 00000560: 4F 2D 54 41 42 45 4C 4C 45 00 8C 0D 60 00 43 54 |O-TABELLE...`.CT| 00000570: B2 31 37 39 32 3A 20 20 20 20 20 20 20 20 8F 20 |.1792: . | 00000580: 43 4F 44 45 2D 54 41 42 45 4C 4C 45 00 92 0D 62 |CODE-TABELLE...b| 00000590: 00 3A 00 98 0D 64 00 3A 00 BE 0D 66 00 8F 20 2A |.:...d.:...f.. *| 000005A0: 2A 20 5A 57 49 4E 47 45 4E 44 45 20 49 4E 49 54 |* ZWINGENDE INIT| 000005B0: 49 41 4C 49 53 49 45 52 47 2E 20 2A 2A 2A 00 E0 |IALISIERG. ***..| 000005C0: 0D 68 00 9E 20 46 53 43 52 45 45 4E 20 3A 8F 20 |.h.. FSCREEN :. | 000005D0: 46 41 53 54 53 43 52 45 45 4E 20 49 4E 49 54 2E |FASTSCREEN INIT.| 000005E0: 00 FE 0D 6A 00 9E 20 4D 41 4B 52 4F 20 20 20 3A |...j.. MAKRO :| 000005F0: 8F 20 4D 41 4B 52 4F 53 20 49 4E 49 54 2E 00 21 |. MAKROS INIT..!| 00000600: 0E 6C 00 9E 20 43 48 41 52 20 20 20 20 3A 8F 20 |.l.. CHAR :. | 00000610: 5A 45 49 43 48 45 4E 53 41 54 5A 20 49 4E 49 54 |ZEICHENSATZ INIT| 00000620: 2E 00 45 0E 6E 00 9E 20 50 49 4E 49 54 20 20 20 |..E.n.. PINIT | 00000630: 3A 8F 20 50 55 46 46 45 52 52 4F 55 54 49 4E 45 |:. PUFFERROUTINE| 00000640: 20 49 4E 49 54 00 4B 0E 70 00 3A 00 81 0E 72 00 | INIT.K.p.:...r.| 00000650: 99 20 C7 28 31 34 29 20 C7 28 38 29 3A 8F 20 4B |. .(14) .(8):. K| 00000660: 4C 45 49 4E 2F 47 52 4F 53 53 2D 4D 4F 44 55 53 |LEIN/GROSS-MODUS| 00000670: 20 49 53 54 20 5A 57 49 4E 47 45 4E 44 20 21 21 | IST ZWINGEND !!| 00000680: 21 00 87 0E 74 00 3A 00 BE 0E 76 00 81 20 49 B2 |!...t.:...v.. I.| 00000690: 31 20 A4 20 32 35 35 3A 97 20 43 54 AA 49 AB 31 |1 . 255:. CT.I.1| 000006A0: 2C 49 3A 82 20 49 3A 8F 20 43 4F 4D 4D 4F 44 4F |,I:. I:. COMMODO| 000006B0: 52 45 2D 43 4F 44 45 53 20 49 4E 49 54 2E 00 C4 |RE-CODES INIT...| 000006C0: 0E 78 00 3A 00 CA 0E 7A 00 3A 00 D0 0E 8A 00 3A |.x.:...z.:.....:| 000006D0: 00 F6 0E C8 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********| 000006E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006F0: 2A 2A 2A 2A 2A 2A 00 1C 0F D2 00 8F 20 2A 20 20 |******...... * | 00000700: 20 20 20 45 49 4E 47 41 42 45 52 4F 55 54 49 4E | EINGABEROUTIN| 00000710: 45 20 44 45 4D 4F 31 20 20 20 20 2A 00 42 0F DC |E DEMO1 *.B..| 00000720: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 00000730: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000740: 2A 2A 00 48 0F E6 00 3A 00 61 0F EB 00 8F 20 2A |**.H...:.a.... *| 00000750: 20 45 49 4E 47 41 42 45 5A 45 49 43 48 45 4E 20 | EINGABEZEICHEN | 00000760: 2A 00 7A 0F ED 00 4E 55 4D 24 B2 22 31 32 33 34 |*.z...NUM$."1234| 00000770: 35 36 37 38 39 30 2E 2D 20 22 00 BC 0F F0 00 41 |567890.- ".....A| 00000780: 4C 50 48 41 24 B2 22 51 57 45 52 54 59 55 49 4F |LPHA$."QWERTYUIO| 00000790: 50 41 53 44 46 47 48 4A 4B 4C 5A 58 43 56 42 4E |PASDFGHJKLZXCVBN| 000007A0: 4D D1 D7 C5 D2 D4 D9 D5 C9 CF D0 C1 D3 C4 C6 C7 |M...............| 000007B0: C8 CA CB CC DA D8 C3 D6 C2 CE CD 22 00 FC 0F FA |..........."....| 000007C0: 00 41 4C 50 48 41 24 B2 41 4C 50 48 41 24 AA 22 |.ALPHA$.ALPHA$."| 000007D0: 3A 3B 40 5C 5B 5D BA 2C 2E 2F 3C 3E 3F 3D 2A 5E |:;@\[].,./<>?=*^| 000007E0: 2B 2D 31 32 33 34 35 36 37 38 39 30 21 23 24 25 |+-1234567890!#$%| 000007F0: 26 27 28 29 20 22 AA C7 28 33 34 29 00 02 10 04 |&'() "..(34)....| 00000800: 01 3A 00 18 10 0E 01 8F 20 2A 20 45 4E 44 45 5A |.:...... * ENDEZ| 00000810: 45 49 43 48 45 4E 20 2A 00 34 10 18 01 45 24 B2 |EICHEN *.4...E$.| 00000820: C7 28 31 33 29 3A 8F 20 52 45 54 55 52 4E 2D 54 |.(13):. RETURN-T| 00000830: 41 53 54 45 00 3A 10 22 01 3A 00 51 10 2C 01 8F |ASTE.:.".:.Q.,..| 00000840: 20 2A 2A 2A 20 41 55 46 52 55 46 20 31 20 2A 2A | *** AUFRUF 1 **| 00000850: 2A 00 76 10 31 01 4C 41 53 54 24 B2 22 22 3A 8F |*.v.1.LAST$."":.| 00000860: 20 53 54 52 49 4E 47 56 41 52 2E 49 4E 49 54 49 | STRINGVAR.INITI| 00000870: 41 4C 2E 21 21 21 00 80 10 36 01 4E 52 25 B2 30 |AL.!!!...6.NR%.0| 00000880: 00 9F 10 40 01 56 24 B2 22 C4 49 45 53 20 49 53 |...@.V$.".IES IS| 00000890: 54 20 44 49 45 20 D6 4F 52 47 41 42 45 21 22 00 |T DIE .ORGABE!".| 000008A0: D0 10 4A 01 9E 20 45 49 4E 47 41 42 45 2C 35 2C |..J.. EINGABE,5,| 000008B0: 33 2C 33 30 2C 56 24 2C 41 4C 50 48 41 24 2C 45 |3,30,V$,ALPHA$,E| 000008C0: 24 2C 4C 41 53 54 24 2C 4E 52 25 2C 31 2C 45 25 |$,LAST$,NR%,1,E%| 000008D0: 00 DB 10 54 01 99 3A 99 20 56 24 00 E1 10 5E 01 |...T..:. V$...^.| 000008E0: 3A 00 F8 10 68 01 8F 20 2A 2A 2A 20 41 55 46 52 |:...h.. *** AUFR| 000008F0: 55 46 20 32 20 2A 2A 2A 00 12 11 72 01 56 24 B2 |UF 2 ***...r.V$.| 00000900: 22 22 3A 8F 20 4B 45 49 4E 45 20 56 4F 52 47 41 |"":. KEINE VORGA| 00000910: 42 45 00 43 11 7C 01 9E 20 45 49 4E 47 41 42 45 |BE.C.|.. EINGABE| 00000920: 2C 31 30 2C 31 35 2C 31 30 2C 56 24 2C 4E 55 4D |,10,15,10,V$,NUM| 00000930: 24 2C 45 24 2C 4C 41 53 54 24 2C 4E 52 25 2C 30 |$,E$,LAST$,NR%,0| 00000940: 2C 45 25 00 4E 11 86 01 99 3A 99 20 56 24 00 00 |,E%.N....:. V$..| 00000950: 00 |. |
..$.... ** MC-ROUTINEN NACHLADEN ***.9..
.. B(56).149 . 26.F...F.B(187).256.B(188
):. AKTUELLER FILENAME...... B(F)..77 .
B(F.1)..67 . B(F.2)..50 . . "MC1.OBJ",8,
1...... 55,0:. 56,149:.:. "MC2.OBJ",8,1:
. BASIC-ANFANG HERABSETZEN.....:.....:..
.... ** STARTADRESSEN MC-ROUTINEN **.;..
.IO.38912: . MODUL 1 (DISKIO).[...
BLAETTERN.IO: . BLAETTERN.Y...COVERT.I
O.3: . CONVERT... .CRS.IO.6: .
CURSOR SETZEN...".SI.IO.9: . SATZ
INFO...$.DAUSGABE.IO.12: . DISK-AUSGABE.
..&.DEINGABE.IO.15: . DISK-EINGABE.".(.D
IR.IO.18: . DIRECTORY.H.*.SPEICHERN
.IO.21:. BLOCK SPEICHERN.J.,.VLADEN.IO.2
4: . BLOCK LADEN.P...:...0.TR.39888:
. MODUL 2(TREIBER)...2.MAKRO.TR:
. MAKROS INIT....4.FSCREEN.TR.3: .
FASTSCREEN INIT....6.WAHL.TR.6: .
KOMMANDO-AUSWAHL.,.8.SEARCH.TR.9: . S
TRING SUCHEN.Q.:.AUSGABE.TR.12: . STRIN
G-AUSGABE.U.<.SRIELL.TR.15: . SERIELL
INIT....>.PARALLEL.TR.18: . PARALLEL INI
T....@.PRESENT.TR.21: . DEVICE PRESENT.
E.B.:...D.PINIT.50960: . PUFFER INIT.
...F.WINDOW.PINIT.3: . WINDOWS MALEN.2.H
.PUFFER.PINIT.6: . WINDOWS PUFFERN.T.J.I
NVERT.PINIT.9: . INVERTIEREN.Z.L.CNTROL.
PINIT.12:. MENUE-KONTROLLE...N.:...P.EIN
GABE.50176: . EINGABE-ROUTINE.F.R.QUICK
.52240: . QUICKSORT...T.CHAR.53039:
. ZEICHENSATZ INIT...V.GC.38144:
. GARBAGE COLLECT....X.:. .Z.:.E.\.. *
* STARTADRESSEN D.TABELLEN **.I.^.MT.153
6: . MAKRO-TABELLE...`.CT.1792:
. CODE-TABELLE...B.:...D.:...F.. *
* ZWINGENDE INITIALISIERG. ***...H.. FSC
REEN :. FASTSCREEN INIT....J.. MAKRO :
. MAKROS INIT..!.L.. CHAR :. ZEICHENS
ATZ INIT..E.N.. PINIT :. PUFFERROUTINE
INIT.K.P.:...R.. G(14) G(8):. KLEIN/GRO
SS-MODUS IST ZWINGEND !!!...T.:...V.. I.
1 . 255:. CT.I.1,I:. I:. COMMODORE-CODES
INIT..D.X.:.J.Z.:.P...:...H.. *********
**********************...R.. * EINGA
BEROUTINE DEMO1 *.B.... *************
******************.H...:.A.... * EINGABE
ZEICHEN *.Z...NUM$."1234567890.- ".....A
LPHA$."QWERTYUIOPASDFGHJKLZXCVBNMQWERTYU
IOPASDFGHJKLZXCVBNM".....ALPHA$.ALPHA$."
:;@\[].,./<>?=*^+-1234567890!#$%&'() ".G
(34).....:...... * ENDEZEICHEN *.4...E$.
G(13):. RETURN-TASTE.:.".:.Q.,.. *** AUF
RUF 1 ***.V.1.LAST$."":. STRINGVAR.INITI
AL.!!!...6.NR%.0...@.V$."DIES IST DIE VO
RGABE!".P.J.. EINGABE,5,3,30,V$,ALPHA$,E
$,LAST$,NR%,1,E%...T..:. V$...^.:...H..
*** AUFRUF 2 ***...R.V$."":. KEINE VORGA
BE.C.|.. EINGABE,10,15,10,V$,NUM$,E$,LAS
T$,NR%,0,E%.N....:. V$...
> CLICK IMAGE PREVIEW FOR FULL MODAL