VIGENERE-CODE

FILE INFORMATION

FILENAME(S): VIGENERE-CODE

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-11-30 01:12:46

APPEARS ON: 2 disk(s)

FILE HASH

26488d18e9e7f33f0c9def268d84857028968a971d3a9ba64100556dd421f157

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
10012 SEITE A	VIGENERE-CODE	PRG	C64er, DuncanTwain	6	3	DOWNLOAD FILE
10012 SEITE A	VIGENERE-CODE	PRG	BrainSkull, Sammlung	6	3	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 19 08 02 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 31 08 03 00 8F 20  |*********.1.... |
00000020: 2A 20 56 49 47 45 4E 45  52 45 2D 43 4F 44 45 20  |* VIGENERE-CODE |
00000030: 2A 00 49 08 04 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |*.I.... ********|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 4F 08 05 00 3A 00  |*********.O...:.|
00000050: 58 08 06 00 99 22 93 22  00 78 08 07 00 86 43 24  |X....".".x....C$|
00000060: 28 33 37 2C 33 37 29 3A  86 53 24 28 32 31 29 3A  |(37,37):.S$(21):|
00000070: 86 44 24 28 31 30 30 29  00 A3 08 0A 00 99 22 1D  |.D$(100)......".|
00000080: 1D 1D 1D 1D 56 49 47 45  4E 45 52 45 2D 43 4F 44  |....VIGENERE-COD|
00000090: 45 20 20 20 20 20 20 20  20 20 28 31 36 2E 20 4A  |E         (16. J|
000000A0: 48 2E 29 00 BD 08 0B 00  99 22 1D 1D 1D 1D 1D B8  |H.)......"......|
000000B0: B8 B8 B8 B8 B8 B8 B8 B8  B8 B8 B8 B8 22 00 ED 08  |............"...|
000000C0: 0F 00 99 3A 99 22 1D 1D  44 45 52 20 56 49 47 45  |...:."..DER VIGE|
000000D0: 4E 45 52 45 2D 43 4F 44  45 20 41 52 42 45 49 54  |NERE-CODE ARBEIT|
000000E0: 45 54 20 4D 49 54 20 45  49 4E 45 4D 22 00 1B 09  |ET MIT EINEM"...|
000000F0: 14 00 99 3A 99 22 1D 1D  53 43 48 4C 55 45 53 53  |...:."..SCHLUESS|
00000100: 45 4C 57 4F 52 54 2C 44  41 53 20 42 49 53 20 5A  |ELWORT,DAS BIS Z|
00000110: 55 20 32 30 20 42 55 43  48 2D 22 00 3D 09 16 00  |U 20 BUCH-".=...|
00000120: 99 3A 99 22 1D 1D 53 54  41 42 45 4E 20 4C 41 4E  |.:."..STABEN LAN|
00000130: 47 20 53 45 49 4E 20 44  41 52 46 2E 22 00 6A 09  |G SEIN DARF.".j.|
00000140: 18 00 99 3A 99 22 1D 1D  44 45 52 20 54 45 58 54  |...:."..DER TEXT|
00000150: 20 28 42 55 43 48 53 54  41 42 45 4E 20 55 4E 44  | (BUCHSTABEN UND|
00000160: 20 5A 49 46 46 45 52 4E  29 22 00 98 09 19 00 99  | ZIFFERN)"......|
00000170: 3A 99 22 1D 1D 57 49 52  44 20 4F 48 4E 45 20 52  |:."..WIRD OHNE R|
00000180: 45 54 55 52 4E 2D 54 41  53 54 45 20 45 49 4E 47  |ETURN-TASTE EING|
00000190: 45 47 45 42 45 4E 2E 22  00 BD 09 1A 00 99 3A 99  |EGEBEN."......:.|
000001A0: 22 1D 1D 4C 45 45 52 54  41 53 54 45 20 4D 49 54  |"..LEERTASTE MIT|
000001B0: 20 2D 20 45 49 4E 47 45  42 45 4E 2E 22 00 EC 09  | - EINGEBEN."...|
000001C0: 1C 00 99 3A 99 22 1D 1D  42 55 43 48 53 54 41 42  |...:."..BUCHSTAB|
000001D0: 45 4E 20 4C 4F 45 53 43  48 45 4E 20 4D 49 54 20  |EN LOESCHEN MIT |
000001E0: 2F 20 20 28 4E 55 52 20  56 4F 52 22 00 0D 0A 1E  |/  (NUR VOR"....|
000001F0: 00 99 3A 99 22 1D 1D 5A  45 49 4C 45 4E 45 4E 44  |..:."..ZEILENEND|
00000200: 45 20 4D 4F 45 47 4C 49  43 48 29 2E 22 00 38 0A  |E MOEGLICH).".8.|
00000210: 20 00 99 3A 99 22 1D 1D  45 4E 44 45 20 44 45 53  | ..:."..ENDE DES|
00000220: 20 54 45 58 54 45 53 20  4D 49 54 20 2A 20 45 49  | TEXTES MIT * EI|
00000230: 4E 47 45 42 45 4E 21 22  00 5A 0A 22 00 99 3A 99  |NGEBEN!".Z."..:.|
00000240: A3 31 37 29 22 43 20 31  39 39 30 20 44 49 45 54  |.17)"C 1990 DIET|
00000250: 45 52 20 4D 41 52 55 4E  47 22 00 95 0A 64 00 83  |ER MARUNG"...d..|
00000260: 41 2C 42 2C 43 2C 44 2C  45 2C 46 2C 47 2C 48 2C  |A,B,C,D,E,F,G,H,|
00000270: 49 2C 4A 2C 4B 2C 4C 2C  4D 2C 4E 2C 4F 2C 50 2C  |I,J,K,L,M,N,O,P,|
00000280: 51 2C 52 2C 53 2C 54 2C  55 2C 56 2C 57 2C 58 2C  |Q,R,S,T,U,V,W,X,|
00000290: 59 2C 5A 2C 2D 00 AE 0A  69 00 83 31 2C 32 2C 33  |Y,Z,-...i..1,2,3|
000002A0: 2C 34 2C 35 2C 36 2C 37  2C 38 2C 39 2C 30 00 E9  |,4,5,6,7,8,9,0..|
000002B0: 0A 6E 00 83 41 2C 42 2C  43 2C 44 2C 45 2C 46 2C  |.n..A,B,C,D,E,F,|
000002C0: 47 2C 48 2C 49 2C 4A 2C  4B 2C 4C 2C 4D 2C 4E 2C  |G,H,I,J,K,L,M,N,|
000002D0: 4F 2C 50 2C 51 2C 52 2C  53 2C 54 2C 55 2C 56 2C  |O,P,Q,R,S,T,U,V,|
000002E0: 57 2C 58 2C 59 2C 5A 2C  2D 00 02 0B 73 00 83 31  |W,X,Y,Z,-...s..1|
000002F0: 2C 32 2C 33 2C 34 2C 35  2C 36 2C 37 2C 38 2C 39  |,2,3,4,5,6,7,8,9|
00000300: 2C 30 00 0E 0B C8 00 81  53 B2 31 A4 33 37 00 1A  |,0......S.1.37..|
00000310: 0B DC 00 81 5A B2 31 A4  33 37 00 27 0B F0 00 87  |....Z.1.37.'....|
00000320: 43 24 28 53 2C 5A 29 00  2E 0B 2C 01 82 5A 00 34  |C$(S,Z)...,..Z.4|
00000330: 0B 31 01 8C 00 45 0B 36  01 81 41 B2 31 A4 53 3A  |.1...E.6..A.1.S:|
00000340: 87 41 24 3A 82 00 4C 0B  40 01 82 53 00 6A 0B AE  |.A$:..L.@..S.j..|
00000350: 01 49 B2 31 3A 99 22 1D  1D 53 43 48 4C 55 45 53  |.I.1:."..SCHLUES|
00000360: 53 45 4C 57 4F 52 54 3A  22 3B 00 83 0B C2 01 A1  |SELWORT:";......|
00000370: 53 24 28 49 29 3A 8B 53  24 28 49 29 B2 22 22 A7  |S$(I):.S$(I)."".|
00000380: 34 35 30 00 8D 0B C7 01  4C B2 4C AA 31 00 B2 0B  |450.....L.L.1...|
00000390: CC 01 99 53 24 28 49 29  3B 3A 8B 53 24 28 49 29  |...S$(I);:.S$(I)|
000003A0: B3 B1 C7 28 31 33 29 A7  49 B2 49 AA 31 3A 89 34  |...(13).I.I.1:.4|
000003B0: 35 30 00 BC 0B D6 01 4C  B2 4C AB 31 00 C5 0B E0  |50.....L.L.1....|
000003C0: 01 99 22 93 22 00 EA 0B  D0 07 99 3A 99 3A 99 3A  |.."."......:.:.:|
000003D0: 99 22 1D 1D 1D 56 45 52  53 43 48 4C 55 45 53 53  |."...VERSCHLUESS|
000003E0: 45 4C 4E 20 20 20 20 20  31 22 00 0B 0C DA 07 99  |ELN     1"......|
000003F0: 3A 99 22 1D 1D 1D 45 4E  54 53 43 48 4C 55 45 53  |:."...ENTSCHLUES|
00000400: 53 45 4C 4E 20 20 20 20  20 32 22 00 2E 0C EE 07  |SELN     2".....|
00000410: 99 3A 99 3A 99 3A 85 22  1D 1D 1D 1D 1D 1D 1D 1D  |.:.:.:."........|
00000420: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 22 3B 41 55 00 40  |..........";AU.@|
00000430: 0C F8 07 91 41 55 89 33  30 30 30 2C 35 30 30 30  |....AU.3000,5000|
00000440: 00 49 0C B8 0B 99 22 93  22 00 67 0C EA 0B 81 47  |.I....".".g....G|
00000450: B2 31 30 36 31 A4 32 30  32 31 A9 34 30 3A 97 47  |.1061.2021.40:.G|
00000460: 2C 31 31 37 3A 82 47 00  8A 0C 1C 0C 99 3A 99 22  |,117:.G......:."|
00000470: 1D 1D 47 49 42 20 44 45  4E 20 4B 4C 41 52 54 45  |..GIB DEN KLARTE|
00000480: 58 54 20 45 49 4E 3A 22  3A 99 00 92 0C 20 0C 49  |XT EIN:":.... .I|
00000490: B2 30 00 A7 0C 21 0C 49  B2 49 AA 31 3A 8B 49 B2  |.0...!.I.I.1:.I.|
000004A0: 4C AA 31 A7 49 B2 31 00  BB 0C 26 0C A1 4B 24 3A  |L.1.I.1...&..K$:|
000004B0: 8B 4B 24 B2 22 22 A7 33  31 31 30 00 CC 0C 28 0C  |.K$."".3110...(.|
000004C0: 8B 4B 24 B2 22 2A 22 A7  36 30 30 30 00 DD 0C 2A  |.K$."*".6000...*|
000004D0: 0C 8B 4B 24 B2 22 2F 22  A7 33 31 31 37 00 FF 0C  |..K$."/".3117...|
000004E0: 2B 0C 89 33 31 32 33 20  20 20 20 20 20 20 20 20  |+..3123         |
000004F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 00  |               .|
00000500: 26 0D 2D 0C 44 24 28 5A  31 29 B2 C8 28 44 24 28  |&.-.D$(Z1)..(D$(|
00000510: 5A 31 29 2C C3 28 44 24  28 5A 31 29 29 AB 31 29  |Z1),.(D$(Z1)).1)|
00000520: 3A 49 B2 49 AB 31 00 33  0D 2E 0C 8B 49 B2 30 A7  |:I.I.1.3....I.0.|
00000530: 49 B2 4C 00 3F 0D 2F 0C  5A 57 B2 5A 57 AB 31 00  |I.L.?./.ZW.ZW.1.|
00000540: 60 0D 30 0C 99 22 9D 20  11 9D 20 91 9D 22 3B 3A  |`.0..". .. ..";:|
00000550: 8B 5A 57 B2 30 A7 5A 57  B2 31 3A 89 33 31 30 34  |.ZW.0.ZW.1:.3104|
00000560: 00 6A 0D 31 0C 89 33 31  31 30 00 73 0D 33 0C 99  |.j.1..3110.s.3..|
00000570: 4B 24 3B 00 7F 0D 35 0C  81 5A B2 31 A4 33 37 00  |K$;...5..Z.1.37.|
00000580: 88 0D 37 0C 46 4C B2 30  00 A3 0D 3A 0C 8B 4B 24  |..7.FL.0...:..K$|
00000590: B2 43 24 28 31 2C 5A 29  A7 46 4C B2 31 3A 89 33  |.C$(1,Z).FL.1:.3|
000005A0: 31 35 30 00 AA 0D 44 0C  82 5A 00 B9 0D 4E 0C 8B  |150...D..Z...N..|
000005B0: 46 4C B2 30 A7 33 31 32  30 00 C5 0D 8A 0C 81 53  |FL.0.3120......S|
000005C0: B2 31 A4 33 37 00 DD 0D  94 0C 8B 53 24 28 49 29  |.1.37......S$(I)|
000005D0: B2 43 24 28 53 2C 31 29  A7 33 35 30 30 00 E4 0D  |.C$(S,1).3500...|
000005E0: 9E 0C 82 53 00 FB 0D AC  0D 99 22 9D 11 22 3B 43  |...S......"..";C|
000005F0: 24 28 53 2C 5A 29 3B 22  91 22 3B 00 15 0E B6 0D  |$(S,Z);".";.....|
00000600: 44 24 28 5A 31 29 B2 44  24 28 5A 31 29 AA 43 24  |D$(Z1).D$(Z1).C$|
00000610: 28 53 2C 5A 29 00 2F 0E  C0 0D 8B C3 28 44 24 28  |(S,Z)./.....(D$(|
00000620: 5A 31 29 29 B2 37 36 A7  5A 31 B2 5A 31 AA 31 00  |Z1)).76.Z1.Z1.1.|
00000630: 51 0E 12 0E 5A 57 B2 5A  57 AA 31 3A 8B 5A 57 AD  |Q...ZW.ZW.1:.ZW.|
00000640: 33 38 B2 B5 28 5A 57 AD  33 38 29 A7 99 3A 99 3A  |38..(ZW.38)..:.:|
00000650: 99 00 5B 0E 1A 0E 89 33  31 30 35 00 64 0E 88 13  |..[....3105.d...|
00000660: 99 22 93 22 00 6A 0E 92  13 99 00 88 0E BA 13 81  |.".".j..........|
00000670: 47 B2 31 30 36 31 A4 32  30 32 31 A9 34 30 3A 97  |G.1061.2021.40:.|
00000680: 47 2C 31 31 37 3A 82 47  00 C8 0E EC 13 99 3A 99  |G,117:.G......:.|
00000690: 22 1D 1D 47 49 42 20 44  45 4E 20 56 45 52 53 43  |"..GIB DEN VERSC|
000006A0: 48 4C 55 45 53 53 45 4C  54 45 4E 20 54 45 58 54  |HLUESSELTEN TEXT|
000006B0: 20 45 49 4E 3A 22 3A 99  20 20 20 20 20 20 20 20  | EIN:":.        |
000006C0: 20 20 20 20 20 20 20 20  00 D0 0E 46 14 49 B2 30  |        ...F.I.0|
000006D0: 00 E5 0E 4B 14 49 B2 49  AA 31 3A 8B 49 B2 4C AA  |...K.I.I.1:.I.L.|
000006E0: 31 A7 49 B2 31 00 F9 0E  50 14 A1 56 24 3A 8B 56  |1.I.1...P..V$:.V|
000006F0: 24 B2 22 22 A7 35 32 30  30 00 0A 0F 55 14 8B 56  |$."".5200...U..V|
00000700: 24 B2 22 2A 22 A7 36 30  30 30 00 1B 0F 57 14 8B  |$."*".6000...W..|
00000710: 56 24 B2 22 2F 22 A7 35  32 31 30 00 25 0F 59 14  |V$."/".5210.%.Y.|
00000720: 89 35 32 33 30 00 4C 0F  5A 14 44 24 28 5A 31 29  |.5230.L.Z.D$(Z1)|
00000730: B2 C8 28 44 24 28 5A 31  29 2C C3 28 44 24 28 5A  |..(D$(Z1),.(D$(Z|
00000740: 31 29 29 AB 31 29 3A 49  B2 49 AB 31 00 59 0F 5C  |1)).1):I.I.1.Y.\|
00000750: 14 8B 49 B2 30 A7 49 B2  4C 00 65 0F 5E 14 5A 57  |..I.0.I.L.e.^.ZW|
00000760: B2 5A 57 AB 31 00 86 0F  60 14 99 22 9D 20 11 9D  |.ZW.1...`..". ..|
00000770: 20 91 9D 22 3B 3A 8B 5A  57 B2 30 A7 5A 57 B2 31  | ..";:.ZW.0.ZW.1|
00000780: 3A 89 35 31 39 30 00 90  0F 63 14 89 35 32 30 30  |:.5190...c..5200|
00000790: 00 99 0F 6E 14 99 56 24  3B 00 A5 0F 73 14 81 5A  |...n..V$;...s..Z|
000007A0: B2 31 A4 33 37 00 BD 0F  78 14 8B 53 24 28 49 29  |.1.37...x..S$(I)|
000007B0: B2 43 24 28 31 2C 5A 29  A7 35 33 30 30 00 C4 0F  |.C$(1,Z).5300...|
000007C0: 82 14 82 5A 00 D0 0F B4  14 81 53 B2 31 A4 33 37  |...Z......S.1.37|
000007D0: 00 D9 0F B9 14 46 4C B2  30 00 F4 0F BE 14 8B 56  |.....FL.0......V|
000007E0: 24 B2 43 24 28 53 2C 5A  29 A7 46 4C B2 31 3A 89  |$.C$(S,Z).FL.1:.|
000007F0: 35 33 33 30 00 FB 0F C8  14 82 53 00 0A 10 D2 14  |5330......S.....|
00000800: 8B 46 4C B2 30 A7 35 32  31 36 00 21 10 18 15 99  |.FL.0.5216.!....|
00000810: 22 9D 11 22 3B 43 24 28  53 2C 31 29 3B 22 91 22  |"..";C$(S,1);"."|
00000820: 3B 00 3B 10 22 15 44 24  28 5A 31 29 B2 44 24 28  |;.;.".D$(Z1).D$(|
00000830: 5A 31 29 AA 43 24 28 53  2C 31 29 00 55 10 2C 15  |Z1).C$(S,1).U.,.|
00000840: 8B C3 28 44 24 28 5A 31  29 29 B2 37 36 A7 5A 31  |..(D$(Z1)).76.Z1|
00000850: B2 5A 31 AA 31 00 77 10  7E 15 5A 57 B2 5A 57 AA  |.Z1.1.w.~.ZW.ZW.|
00000860: 31 3A 8B 5A 57 AD 33 38  B2 B5 28 5A 57 AD 33 38  |1:.ZW.38..(ZW.38|
00000870: 29 A7 99 3A 99 3A 99 00  81 10 E0 15 89 35 31 39  |)..:.:.......519|
00000880: 35 00 8A 10 70 17 99 22  93 22 00 92 10 7A 17 99  |5...p.."."...z..|
00000890: 3A 99 00 B7 10 84 17 85  22 20 20 53 4F 4C 4C 20  |:......."  SOLL |
000008A0: 47 45 44 52 55 43 4B 54  20 57 45 52 44 45 4E 20  |GEDRUCKT WERDEN |
000008B0: 4A 2F 4E 22 3B 41 24 00  C5 10 8E 17 8B 41 24 B2  |J/N";A$......A$.|
000008C0: 22 4E 22 A7 80 00 DE 10  98 17 8B 41 24 B3 B1 22  |"N"........A$.."|
000008D0: 4A 22 A7 99 22 91 91 22  3A 89 36 30 32 30 00 EA  |J".."..":.6020..|
000008E0: 10 D4 17 9F 31 2C 34 3A  9D 31 00 F6 10 38 18 81  |....1,4:.1...8..|
000008F0: 49 B2 30 A4 5A 31 00 01  11 42 18 99 44 24 28 49  |I.0.Z1...B..D$(I|
00000900: 29 00 08 11 4C 18 82 49  00 12 11 9C 18 98 31 3A  |)...L..I......1:|
00000910: A0 31 00 36 11 A6 18 85  22 20 20 4E 4F 43 48 20  |.1.6...."  NOCH |
00000920: 45 49 4E 4D 41 4C 20 44  52 55 43 4B 45 4E 20 4A  |EINMAL DRUCKEN J|
00000930: 2F 4E 22 3B 41 24 00 44  11 AB 18 8B 41 24 B2 22  |/N";A$.D....A$."|
00000940: 4E 22 A7 80 00 55 11 B0  18 8B 41 24 B2 22 4A 22  |N"...U....A$."J"|
00000950: A7 36 31 30 30 00 6E 11  BA 18 8B 41 24 B3 B1 22  |.6100.n....A$.."|
00000960: 4A 22 A7 99 22 91 91 22  3A 89 36 33 31 30 00 00  |J".."..":.6310..|
00000970: 00                                                |.               |

....... *****************.1.... * VIGENE
RE-CODE *.I.... *****************.O...:.
X....".".X....C$(37,37):.S$(21):.D$(100)
......".....VIGENERE-CODE         (16. J
H.)......".................."......:."..
DER VIGENERE-CODE ARBEITET MIT EINEM"...
...:."..SCHLUESSELWORT,DAS BIS ZU 20 BUC
H-".=....:."..STABEN LANG SEIN DARF.".J.
...:."..DER TEXT (BUCHSTABEN UND ZIFFERN
)"......:."..WIRD OHNE RETURN-TASTE EING
EGEBEN."......:."..LEERTASTE MIT - EINGE
BEN."......:."..BUCHSTABEN LOESCHEN MIT 
/  (NUR VOR"......:."..ZEILENENDE MOEGLI
CH).".8. ..:."..ENDE DES TEXTES MIT * EI
NGEBEN!".Z."..:..17)"C 1990 DIETER MARUN
G"...D..A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,
Q,R,S,T,U,V,W,X,Y,Z,-...I..1,2,3,4,5,6,7
,8,9,0...N..A,B,C,D,E,F,G,H,I,J,K,L,M,N,
O,P,Q,R,S,T,U,V,W,X,Y,Z,-...S..1,2,3,4,5
,6,7,8,9,0...H..S.1.37......Z.1.37.'....
C$(S,Z)...,..Z.4.1...E.6..A.1.S:.A$:..L.
@..S.J...I.1:."..SCHLUESSELWORT:";...B..
S$(I):.S$(I)."".450...G.L.L.1...L..S$(I)
;:.S$(I)..G(13).I.I.1:.450...V.L.L.1.E..
.."."...P..:.:.:."...VERSCHLUESSELN     
1"...Z..:."...ENTSCHLUESSELN     2".....
.:.:.:."..................";AU.@....AU.3
000,5000.I....".".G....G.1061.2021.40:.G
,117:.G......:."..GIB DEN KLARTEXT EIN:"
:.... .I.0...!.I.I.1:.I.L.1.I.1...&..K$:
.K$."".3110.L.(..K$."*".6000...*..K$."/"
.3117...+..3123                        .
&.-.D$(Z1).H(D$(Z1),C(D$(Z1)).1):I.I.1.3
....I.0.I.L.?./.ZW.ZW.1.`.0..". .. ..";:
.ZW.0.ZW.1:.3104.J.1..3110.S.3..K$;..5.
.Z.1.37...7.FL.0...:..K$.C$(1,Z).FL.1:.3
150...D..Z...N..FL.0.3120.E....S.1.37...
...S$(I).C$(S,1).3500......S......"..";C
$(S,Z);".";.....D$(Z1).D$(Z1).C$(S,Z)./.
...C(D$(Z1)).76.Z1.Z1.1.Q...ZW.ZW.1:.ZW.
38..(ZW.38)..:.:..[....3105.D....".".J..
........G.1061.2021.40:.G,117:.G.H....:.
"..GIB DEN VERSCHLUESSELTEN TEXT EIN:":.
                .P.F.I.0...K.I.I.1:.I.L.
1.I.1...P..V$:.V$."".5200...U..V$."*".60
00...W..V$."/".5210.%.Y..5230.L.Z.D$(Z1)
.H(D$(Z1),C(D$(Z1)).1):I.I.1.Y.\..I.0.I.
L.E.^.ZW.ZW.1...`..". .. ..";:.ZW.0.ZW.1
:.5190...C..5200...N..V$;...S..Z.1.37...
X..S$(I).C$(1,Z).5300.D....Z.P....S.1.37
.Y...FL.0......V$.C$(S,Z).FL.1:.5330...H
..S...R..FL.0.5216.!...."..";C$(S,1);"."
;.;.".D$(Z1).D$(Z1).C$(S,1).U.,..C(D$(Z1
)).76.Z1.Z1.1.W.~.ZW.ZW.1:.ZW.38..(ZW.38
)..:.:.......5195...P.."."...Z..:.......
"  SOLL GEDRUCKT WERDEN J/N";A$.E....A$.
"N"........A$.."J".."..":.6020...T..1,4:
.1...8..I.0.Z1...B..D$(I)...L..I......1:
 1.6...."  NOCH EINMAL DRUCKEN J/N";A$.D
....A$."N"...U....A$."J".6100.N....A$.."
J".."..":.6310...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL