STROUT
FILE INFORMATION
FILENAME(S): STROUT
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-02 22:11:12
APPEARS ON: 1 disk(s)
FILE HASH
0afc112f799d92eb31fe2c8a7525a7f60fd1700693d98ebc39fafd35322f53dd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 90617 | STROUT | PRG | Treasure Chest - ToGuMi | 7 | 2 | 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 20 20 53 54 52 49 4E 47 41 55 53 47 41 | STRINGAUSGA| 00000710: 42 45 20 20 20 20 20 20 20 20 20 2A 00 42 0F DC |BE *.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 6F 0F F0 00 46 41 B2 |**.H...:.o...FA.| 00000750: 36 3A 86 20 58 25 28 46 41 29 2C 59 25 28 46 41 |6:. X%(FA),Y%(FA| 00000760: 29 2C 4C 25 28 46 41 29 2C 53 24 28 46 41 29 00 |),L%(FA),S$(FA).| 00000770: 75 0F FA 00 3A 00 8E 0F FF 00 8F 20 2A 2A 20 41 |u...:...... ** A| 00000780: 55 53 47 41 42 45 5A 4F 4E 45 4E 20 2A 2A 00 AB |USGABEZONEN **..| 00000790: 0F 04 01 58 25 28 31 29 B2 35 3A 59 25 28 31 29 |...X%(1).5:Y%(1)| 000007A0: B2 31 3A 4C 25 28 31 29 B2 31 34 00 C9 0F 0E 01 |.1:L%(1).14.....| 000007B0: 58 25 28 32 29 B2 32 39 3A 59 25 28 32 29 B2 31 |X%(2).29:Y%(2).1| 000007C0: 3A 4C 25 28 32 29 B2 31 30 00 E6 0F 18 01 58 25 |:L%(2).10.....X%| 000007D0: 28 33 29 B2 38 3A 59 25 28 33 29 B2 33 3A 4C 25 |(3).8:Y%(3).3:L%| 000007E0: 28 33 29 B2 32 38 00 02 10 22 01 58 25 28 34 29 |(3).28...".X%(4)| 000007F0: B2 34 3A 59 25 28 34 29 B2 35 3A 4C 25 28 34 29 |.4:Y%(4).5:L%(4)| 00000800: B2 34 00 20 10 2C 01 58 25 28 35 29 B2 31 33 3A |.4. .,.X%(5).13:| 00000810: 59 25 28 35 29 B2 35 3A 4C 25 28 35 29 B2 32 35 |Y%(5).5:L%(5).25| 00000820: 00 3D 10 36 01 58 25 28 36 29 B2 38 3A 59 25 28 |.=.6.X%(6).8:Y%(| 00000830: 36 29 B2 37 3A 4C 25 28 36 29 B2 31 35 00 43 10 |6).7:L%(6).15.C.| 00000840: 40 01 3A 00 65 10 4A 01 8F 20 2A 2A 20 41 55 53 |@.:.e.J.. ** AUS| 00000850: 47 41 42 45 20 56 4F 4E 20 41 44 52 45 53 53 45 |GABE VON ADRESSE| 00000860: 20 31 20 2A 2A 00 A3 10 54 01 53 24 28 31 29 B2 | 1 **...T.S$(1).| 00000870: 22 CD 41 49 45 52 22 3A 53 24 28 32 29 B2 22 C8 |".AIER":S$(2).".| 00000880: 41 4E 53 22 3A 53 24 28 33 29 B2 22 C1 41 4C 57 |ANS":S$(3).".ALW| 00000890: 45 47 20 31 30 22 3A 53 24 28 34 29 B2 22 38 30 |EG 10":S$(4)."80| 000008A0: 30 30 22 00 CA 10 5E 01 53 24 28 35 29 B2 22 CD |00"...^.S$(5).".| 000008B0: 40 4E 43 48 45 4E 22 3A 53 24 28 36 29 B2 22 30 |@NCHEN":S$(6)."0| 000008C0: 38 39 2F 31 32 33 34 35 36 22 00 D0 10 68 01 3A |89/123456"...h.:| 000008D0: 00 FB 10 72 01 9E 20 41 55 53 47 41 42 45 2C 58 |...r.. AUSGABE,X| 000008E0: 25 28 31 29 2C 59 25 28 31 29 2C 4C 25 28 31 29 |%(1),Y%(1),L%(1)| 000008F0: 2C 53 24 28 31 29 2C 46 41 2C 31 00 01 11 7C 01 |,S$(1),FA,1...|.| 00000900: 3A 00 1B 11 86 01 99 3A 99 3A 99 20 22 D4 41 53 |:......:.:. ".AS| 00000910: 54 45 20 44 52 40 43 4B 45 4E 22 00 34 11 90 01 |TE DR@CKEN".4...| 00000920: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 89 |. A$:. A$."" . .| 00000930: 20 34 30 30 00 3A 11 9A 01 3A 00 5C 11 A4 01 8F | 400.:...:.\....| 00000940: 20 2A 2A 20 41 55 53 47 41 42 45 20 56 4F 4E 20 | ** AUSGABE VON | 00000950: 41 44 52 45 53 53 45 20 32 20 2A 2A 00 9F 11 AE |ADRESSE 2 **....| 00000960: 01 53 24 28 31 29 B2 22 CD 40 4C 4C 45 52 22 3A |.S$(1).".@LLER":| 00000970: 53 24 28 32 29 B2 22 D7 49 4C 48 45 4C 4D 22 3A |S$(2).".ILHELM":| 00000980: 53 24 28 33 29 B2 22 CF 54 54 4F 53 54 52 2E 31 |S$(3).".TTOSTR.1| 00000990: 41 22 3A 53 24 28 34 29 B2 22 36 38 30 30 22 00 |A":S$(4)."6800".| 000009A0: C7 11 B8 01 53 24 28 35 29 B2 22 CD 41 4E 4E 48 |....S$(5).".ANNH| 000009B0: 45 49 4D 22 3A 53 24 28 36 29 B2 22 30 36 32 31 |EIM":S$(6)."0621| 000009C0: 2F 35 32 37 35 36 22 00 CD 11 C2 01 3A 00 F8 11 |/52756".....:...| 000009D0: CC 01 9E 20 41 55 53 47 41 42 45 2C 58 25 28 31 |... AUSGABE,X%(1| 000009E0: 29 2C 59 25 28 31 29 2C 4C 25 28 31 29 2C 53 24 |),Y%(1),L%(1),S$| 000009F0: 28 31 29 2C 46 41 2C 31 00 00 00 |(1),FA,1... |
..$.... ** 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.. * STR
INGAUSGABE *.B.... *************
******************.H...:.O...FA.6:. X%(F
A),Y%(FA),L%(FA),S$(FA).U...:...... ** A
USGABEZONEN **.....X%(1).5:Y%(1).1:L%(1)
.14.I...X%(2).29:Y%(2).1:L%(2).10.....X%
(3).8:Y%(3).3:L%(3).28...".X%(4).4:Y%(4)
.5:L%(4).4. .,.X%(5).13:Y%(5).5:L%(5).25
.=.6.X%(6).8:Y%(6).7:L%(6).15.C.@.:.E.J.
. ** AUSGABE VON ADRESSE 1 **...T.S$(1).
"MAIER":S$(2)."HANS":S$(3)."AALWEG 10":S
$(4)."8000".J.^.S$(5)."M@NCHEN":S$(6)."0
89/123456".P.H.:...R.. AUSGABE,X%(1),Y%(
1),L%(1),S$(1),FA,1...|.:......:.:. "TAS
TE DR@CKEN".4.... A$:. A$."" . . 400.:..
.:.\.... ** AUSGABE VON ADRESSE 2 **....
.S$(1)."M@LLER":S$(2)."WILHELM":S$(3)."O
TTOSTR.1A":S$(4)."6800".G...S$(5)."MANNH
EIM":S$(6)."0621/52756".M.B.:...L.. AUSG
ABE,X%(1),Y%(1),L%(1),S$(1),FA,1...
> CLICK IMAGE PREVIEW FOR FULL MODAL