LISTER
FILE INFORMATION
FILENAME(S): LISTER
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 21:23:14
APPEARS ON: 1 disk(s)
FILE HASH
3a330b7ab206887c8af2d64ac10ef77523d0b88f8677be21c68f2a4d339f4c15
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 1 1 | LISTER | PRG | DuncanTwain | 17 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 64 00 86 42 54 24 28 37 35 29 00 34 |....d..BT$(75).4|
00000010: 08 6E 00 4C 4D 24 B2 22 20 20 20 20 20 20 22 3A |.n.LM$." ":|
00000020: 4E 46 24 B2 22 20 20 22 20 3A 42 4C 24 B2 22 2E |NF$." " :BL$.".|
00000030: 20 20 20 22 00 4D 08 78 00 81 49 B2 31 A4 38 3A | ".M.x..I.1.8:|
00000040: 48 5A 24 B2 48 5A 24 AA 4C 4D 24 3A 82 00 62 08 |HZ$.HZ$.LM$:..b.|
00000050: 82 00 48 5A 24 B2 48 5A 24 AA 22 53 45 49 54 45 |..HZ$.HZ$."SEITE|
00000060: 20 22 00 75 08 8C 00 46 31 24 B2 C7 28 31 34 35 | ".u...F1$..(145|
00000070: 29 AA 4C 4D 24 00 7E 08 96 00 53 4E B2 31 00 8A |).LM$.~...SN.1..|
00000080: 08 A0 00 99 C7 28 31 34 37 29 00 AB 08 AA 00 99 |.....(147)......|
00000090: 3A 99 3A 99 22 20 20 20 20 20 20 4C 49 53 54 20 |:.:." LIST |
000000A0: 2D 20 50 52 4F 47 52 41 4D 4D 22 00 B3 08 B4 00 |- PROGRAMM".....|
000000B0: 99 3A 99 00 D5 08 BE 00 85 22 20 20 20 20 4E 41 |.:......." NA|
000000C0: 4D 45 20 44 45 53 20 50 52 4F 47 52 41 4D 4D 53 |ME DES PROGRAMMS|
000000D0: 22 3B 4E 41 24 00 EE 08 C8 00 4E 50 24 B2 4E 41 |";NA$.....NP$.NA|
000000E0: 24 AA 22 2C 50 2C 52 22 AA C7 28 33 34 29 00 0B |$.",P,R"..(34)..|
000000F0: 09 D2 00 99 3A 99 22 20 20 20 20 20 20 20 41 55 |....:." AU|
00000100: 53 47 41 42 45 20 41 55 46 20 22 00 48 09 DC 00 |SGABE AUF ".H...|
00000110: 99 22 20 20 20 22 C7 28 31 38 29 22 44 22 C7 28 |." ".(18)"D".(|
00000120: 31 34 36 29 22 52 55 43 4B 45 52 20 4F 44 45 52 |146)"RUCKER ODER|
00000130: 20 22 C7 28 31 38 29 22 46 22 C7 28 31 34 36 29 | ".(18)"F".(146)|
00000140: 22 4C 4F 50 50 59 22 3B 00 52 09 E6 00 85 20 47 |"LOPPY";.R.... G|
00000150: 41 24 00 68 09 F0 00 8B 47 41 24 B2 22 22 A7 47 |A$.h....GA$."".G|
00000160: 41 B2 33 3A 89 33 31 30 00 94 09 FA 00 8B 47 41 |A.3:.310......GA|
00000170: 24 B2 22 46 22 A7 47 41 B2 38 3A 4E 4C 24 B2 4E |$."F".GA.8:NL$.N|
00000180: 41 24 AA 22 2C 53 2C 57 22 AA C7 28 33 34 29 3A |A$.",S,W"..(34):|
00000190: 89 33 31 30 00 A6 09 04 01 8B 47 41 24 B2 22 44 |.310......GA$."D|
000001A0: 22 A7 47 41 B2 34 00 C9 09 0E 01 99 3A 85 22 20 |".GA.4......:." |
000001B0: 20 20 20 5A 45 49 4C 45 4E 20 50 52 4F 20 53 45 | ZEILEN PRO SE|
000001C0: 49 54 45 20 22 3B 5A 4E 3A 00 DE 09 18 01 5A 4E |ITE ";ZN:.....ZN|
000001D0: B2 28 5A 4E B2 30 29 AC AB 36 36 AA 5A 4E 00 01 |.(ZN.0)..66.ZN..|
000001E0: 0A 22 01 99 3A 85 22 20 20 20 20 55 45 42 45 52 |."..:." UEBER|
000001F0: 53 43 48 52 49 46 54 20 20 20 20 20 22 3B 55 45 |SCHRIFT ";UE|
00000200: 24 00 2A 0A 2C 01 48 5A 24 B2 C9 28 48 5A 24 2C |$.*.,.HZ$..(HZ$,|
00000210: C3 28 48 5A 24 29 AB C3 28 55 45 24 29 29 3A 55 |.(HZ$)..(UE$)):U|
00000220: 45 24 B2 55 45 24 AA 48 5A 24 00 4B 0A 36 01 99 |E$.UE$.HZ$.K.6..|
00000230: 3A 85 22 20 20 20 20 4C 49 4E 4B 45 52 20 52 41 |:." LINKER RA|
00000240: 4E 44 20 20 20 20 20 20 22 3B 4C 00 6B 0A 40 01 |ND ";L.k.@.|
00000250: 99 3A 99 3A 20 20 20 81 49 B2 30 A4 4C 3A 4C 4D |.:.: .I.0.L:LM|
00000260: 24 B2 4C 4D 24 AA 22 20 22 3A 82 00 78 0A 4A 01 |$.LM$." ":..x.J.|
00000270: 9F 31 35 2C 38 2C 31 35 00 8C 0A 54 01 9F 31 2C |.15,8,15...T..1,|
00000280: 38 2C 34 2C 4E 50 24 3A 8D 39 35 30 00 94 0A 5E |8,4,NP$:.950...^|
00000290: 01 49 B2 30 00 A7 0A 68 01 81 41 B2 34 31 31 31 |.I.0...h..A.4111|
000002A0: 38 A4 34 31 33 37 32 00 B2 0A 72 01 58 B2 C2 28 |8.41372...r.X..(|
000002B0: 41 29 00 C1 0A 7C 01 8B 58 B1 31 32 37 A7 34 31 |A)...|..X.127.41|
000002C0: 30 00 D8 0A 86 01 42 54 24 28 49 29 B2 42 54 24 |0.....BT$(I).BT$|
000002D0: 28 49 29 AA C7 28 58 29 00 E1 0A 90 01 89 34 34 |(I)..(X)......44|
000002E0: 30 00 ED 0A 9A 01 58 B2 58 AF 31 32 37 00 14 0B |0.....X.X.127...|
000002F0: A4 01 42 54 24 28 49 29 B2 42 54 24 28 49 29 AA |..BT$(I).BT$(I).|
00000300: C7 28 58 29 3A 99 46 31 24 3B 42 54 24 28 49 29 |.(X):.F1$;BT$(I)|
00000310: 3B 4C 4D 24 00 1E 0B AE 01 49 B2 49 AA 31 00 29 |;LM$.....I.I.1.)|
00000320: 0B B8 01 82 20 3A 99 3A 99 00 43 0B C2 01 42 54 |.... :.:..C...BT|
00000330: 24 28 31 31 29 B2 42 54 24 28 31 31 29 AA 22 20 |$(11).BT$(11)." |
00000340: 20 20 22 00 5B 0B CC 01 42 54 24 28 33 39 29 B2 | ".[...BT$(39).|
00000350: 42 54 24 28 33 39 29 AA 22 20 22 00 89 0B D6 01 |BT$(39)." ".....|
00000360: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 50 52 4F |. ********* PRO|
00000370: 47 52 41 4D 4D 20 4C 45 53 45 4E 20 20 20 2A 2A |GRAMM LESEN **|
00000380: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 95 0B E0 01 99 C7 |*********.......|
00000390: 28 31 34 37 29 00 AB 0B EA 01 8B 47 41 B3 38 A7 |(147)......GA.8.|
000003A0: 9F 34 2C 47 41 20 3A 89 35 31 30 00 C6 0B F4 01 |.4,GA :.510.....|
000003B0: 9F 34 2C 47 41 2C 33 2C 4E 41 24 AA 22 2E 4C 53 |.4,GA,3,NA$.".LS|
000003C0: 54 2C 53 2C 57 22 00 F4 0B FE 01 8B 47 41 B3 B1 |T,S,W"......GA..|
000003D0: 33 A7 99 22 41 55 53 47 41 42 45 20 45 52 46 4F |3.."AUSGABE ERFO|
000003E0: 4C 47 54 20 41 55 46 20 47 45 52 41 45 54 20 23 |LGT AUF GERAET #|
000003F0: 22 3B 47 41 00 01 0C 08 02 98 34 3A 8D 31 30 34 |";GA......4:.104|
00000400: 30 00 25 0C 12 02 8D 39 38 30 3A 8D 39 38 30 20 |0.%....980:.980 |
00000410: 20 20 20 3A 20 8F 20 50 52 47 2D 53 54 41 52 54 | : . PRG-START|
00000420: 20 53 4B 49 50 00 53 0C 1C 02 8F 20 2A 2A 2A 2A | SKIP.S.... ****|
00000430: 2A 2A 2A 2A 2A 20 20 20 20 48 41 55 50 54 53 43 |***** HAUPTSC|
00000440: 48 4C 45 49 46 45 20 20 2A 2A 2A 2A 2A 2A 2A 2A |HLEIFE ********|
00000450: 2A 2A 2A 00 7A 0C 26 02 8D 39 38 30 3A 8D 39 38 |***.z.&..980:.98|
00000460: 30 20 20 20 20 3A 20 8F 20 53 4B 49 50 20 4C 49 |0 : . SKIP LI|
00000470: 4E 4B 20 41 44 52 45 53 53 45 00 80 0C 30 02 8F |NK ADRESSE...0..|
00000480: 00 AC 0C 3A 02 8D 39 38 30 20 3A 4C 42 B2 41 20 |...:..980 :LB.A |
00000490: 20 20 20 20 20 20 20 3A 20 8F 20 5A 45 49 4C 45 | : . ZEILE|
000004A0: 20 20 4C 4F 57 20 2D 20 42 59 54 45 00 D8 0C 44 | LOW - BYTE...D|
000004B0: 02 8D 39 38 30 20 3A 48 42 B2 41 20 20 20 20 20 |..980 :HB.A |
000004C0: 20 20 20 3A 20 8F 20 5A 45 49 4C 45 20 48 49 47 | : . ZEILE HIG|
000004D0: 48 20 2D 20 42 59 54 45 00 ED 0C 4E 02 5A 4E 24 |H - BYTE...N.ZN$|
000004E0: B2 C4 28 48 42 AC 32 35 36 AA 4C 42 29 00 21 0D |..(HB.256.LB).!.|
000004F0: 58 02 4C 4E 24 B2 C8 28 4C 4D 24 2C C3 28 4C 4D |X.LN$..(LM$,.(LM|
00000500: 24 29 AB C3 28 5A 4E 24 29 29 AA 5A 4E 24 AA 4E |$)..(ZN$)).ZN$.N|
00000510: 46 24 3A 4C 46 B2 30 3A 50 46 B2 30 3A 4E 4E B2 |F$:LF.0:PF.0:NN.|
00000520: 30 00 4F 0D 62 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |0.O.b.. ********|
00000530: 2A 20 20 20 5A 45 49 4C 45 4E 53 43 48 4C 45 49 |* ZEILENSCHLEI|
00000540: 46 45 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |FE ***********.|
00000550: 62 0D 6C 02 8B C3 28 4C 4E 24 29 B3 37 30 A7 36 |b.l...(LN$).70.6|
00000560: 38 30 00 77 0D 76 02 98 34 2C 4C 4E 24 3B 3A 8B |80.w.v..4,LN$;:.|
00000570: A8 20 51 46 A7 98 34 00 88 0D 80 02 8B 51 46 A7 |. QF..4......QF.|
00000580: 98 34 2C C7 28 33 34 29 00 AA 0D 8A 02 4C 4E 24 |.4,.(34).....LN$|
00000590: B2 4C 4D 24 AA 4E 46 24 3A 8B 51 46 A7 4C 4E 24 |.LM$.NF$:.QF.LN$|
000005A0: B2 4C 4E 24 AA C7 28 33 34 29 00 B3 0D 94 02 4E |.LN$..(34).....N|
000005B0: 4E B2 30 00 BD 0D 9E 02 8D 31 30 31 30 00 E6 0D |N.0......1010...|
000005C0: A8 02 8D 39 38 30 20 20 20 20 20 20 20 20 20 20 |...980 |
000005D0: 20 20 20 20 3A 20 8F 20 45 49 4E 20 42 59 54 45 | : . EIN BYTE|
000005E0: 20 48 4F 4C 45 4E 00 13 0E B2 02 8B 41 B2 30 A7 | HOLEN......A.0.|
000005F0: 98 34 2C 20 4C 4E 24 3A 4C 4E 24 B2 22 22 3A 51 |.4, LN$:LN$."":Q|
00000600: 46 B2 30 3A 52 46 B2 30 3A 8D 31 30 31 30 3A 89 |F.0:RF.0:.1010:.|
00000610: 35 35 30 00 41 0E BC 02 8B 20 A8 20 52 46 20 A7 |550.A.... . RF .|
00000620: 20 37 32 30 20 20 20 20 3A 20 8F 20 42 45 49 20 | 720 : . BEI |
00000630: 52 45 4D 20 52 45 53 54 20 53 4F 20 4C 45 53 45 |REM REST SO LESE|
00000640: 4E 00 57 0E C6 02 4C 4E 24 B2 4C 4E 24 AA C7 28 |N.W...LN$.LN$..(|
00000650: 41 29 3A 89 36 32 30 00 6A 0E D0 02 8B 41 B2 33 |A):.620.j....A.3|
00000660: 32 AF A8 51 46 A7 20 36 32 30 00 7B 0E DA 02 8B |2..QF. 620.{....|
00000670: 20 41 B3 B1 34 34 20 A7 37 36 30 00 91 0E E4 02 | A..44 .760.....|
00000680: 8B 20 41 B2 34 34 20 AF 20 4E 4E B2 30 A7 37 36 |. A.44 . NN.0.76|
00000690: 30 00 B4 0E EE 02 8B 4E 46 24 B3 B1 22 20 20 22 |0......NF$.." "|
000006A0: A7 4E 46 24 B2 C8 28 4E 46 24 2C C3 28 4E 46 24 |.NF$..(NF$,.(NF$|
000006B0: 29 AB 34 29 00 C5 0E F8 02 8B 41 B2 33 34 A7 51 |).4)......A.34.Q|
000006C0: 46 B2 A8 51 46 00 FA 0E 02 03 8B 41 B2 35 38 AF |F..QF......A.58.|
000006D0: A8 51 46 A7 98 34 2C 4C 4E 24 3B 22 3A 22 3A 4C |.QF..4,LN$;":":L|
000006E0: 4E 24 B2 4C 4D 24 AA 4E 46 24 3A 4E 4E B2 30 3A |N$.LM$.NF$:NN.0:|
000006F0: 8D 31 30 31 30 3A 89 36 32 30 00 0F 0F 0C 03 8B |.1010:.620......|
00000700: 41 B2 36 31 AF A8 51 46 A7 4C 46 B2 A8 4C 46 00 |A.61..QF.LF..LF.|
00000710: 28 0F 16 03 8B 41 B1 31 32 37 AF A8 51 46 A7 8D |(....A.127..QF..|
00000720: 38 35 30 3A 89 36 32 30 00 43 0F 20 03 4C 4E 24 |850:.620.C. .LN$|
00000730: B2 4C 4E 24 AA C7 28 41 29 3A 8B A8 51 46 A7 8D |.LN$..(A):..QF..|
00000740: 38 32 30 00 4C 0F 2A 03 89 36 32 30 00 7F 0F 34 |820.L.*..620...4|
00000750: 03 8B C9 28 4C 4E 24 2C 34 29 B2 22 3B 20 22 AA |...(LN$,4)."; ".|
00000760: C7 28 33 34 29 AA C7 28 33 34 29 A7 4C 4E 24 B2 |.(34)..(34).LN$.|
00000770: C8 28 4C 4E 24 2C C3 28 4C 4E 24 29 AB 34 29 00 |.(LN$,.(LN$).4).|
00000780: B2 0F 3E 03 8B C9 28 4C 4E 24 2C 34 29 B2 22 2B |..>...(LN$,4)."+|
00000790: 20 22 AA C7 28 33 34 29 AA C7 28 33 34 29 A7 4C | "..(34)..(34).L|
000007A0: 4E 24 B2 C8 28 4C 4E 24 2C C3 28 4C 4E 24 29 AB |N$..(LN$,.(LN$).|
000007B0: 34 29 00 B8 0F 48 03 8E 00 D7 0F 52 03 8B C9 28 |4)...H.....R...(|
000007C0: 4C 4E 24 2C 31 29 B3 B1 22 20 22 A7 4C 4E 24 B2 |LN$,1).." ".LN$.|
000007D0: 4C 4E 24 AA 22 20 22 00 09 10 5C 03 8B 41 B2 31 |LN$." "...\..A.1|
000007E0: 32 38 AA 33 39 A7 98 34 2C 4C 4E 24 3A 4C 4E 24 |28.39..4,LN$:LN$|
000007F0: B2 4C 4D 24 AA 4E 46 24 20 3A 8D 31 30 31 30 20 |.LM$.NF$ :.1010 |
00000800: 20 3A 20 8F 20 54 48 45 4E 00 40 10 66 03 8B 41 | : . THEN.@.f..A|
00000810: B2 31 32 39 A7 4E 46 24 B2 4E 46 24 AA 42 4C 24 |.129.NF$.NF$.BL$|
00000820: 20 3A 20 8F 20 42 4C 24 3D 20 34 20 53 50 41 43 | : . BL$= 4 SPAC|
00000830: 45 53 20 46 55 45 52 20 46 4F 52 20 4E 45 58 54 |ES FUER FOR NEXT|
00000840: 00 56 10 70 03 8B 41 B2 31 33 30 A7 4E 4E B2 31 |.V.p..A.130.NN.1|
00000850: 3A 20 8D 39 33 30 00 7A 10 7A 03 8B 41 B2 31 34 |: .930.z.z..A.14|
00000860: 33 A7 52 46 B2 A8 52 46 20 20 20 20 3A 20 8F 20 |3.RF..RF : . |
00000870: 52 45 4D 46 4C 41 47 20 4F 4E 00 A1 10 84 03 8B |REMFLAG ON......|
00000880: 41 B2 31 35 33 A7 50 46 B2 A8 50 46 20 20 20 20 |A.153.PF..PF |
00000890: 3A 20 8F 20 50 52 49 4E 54 20 46 4C 41 47 20 4F |: . PRINT FLAG O|
000008A0: 4E 00 C8 10 8E 03 8B 41 B2 31 37 38 A7 4C 46 B2 |N......A.178.LF.|
000008B0: A8 4C 46 20 20 20 20 3A 20 8F 20 4C 45 54 20 20 |.LF : . LET |
000008C0: 20 46 4C 41 47 20 4F 4E 00 E5 10 98 03 4C 4E 24 | FLAG ON.....LN$|
000008D0: B2 4C 4E 24 AA 42 54 24 28 41 AB 31 32 38 29 AA |.LN$.BT$(A.128).|
000008E0: 22 20 22 3A 8E 00 1C 11 A2 03 8B 4E 46 24 B3 B1 |" ":.......NF$..|
000008F0: 22 20 20 22 A7 4E 46 24 B2 C8 28 4E 46 24 2C C3 |" ".NF$..(NF$,.|
00000900: 28 4E 46 24 29 AB 34 29 3A 4C 4E 24 B2 C8 28 4C |(NF$).4):LN$..(L|
00000910: 4E 24 2C C3 28 4C 4E 24 29 AB 34 29 00 22 11 AC |N$,.(LN$).4)."..|
00000920: 03 8E 00 36 11 B6 03 84 31 35 2C 41 24 2C 42 24 |...6....15,A$,B$|
00000930: 2C 43 24 2C 44 24 00 54 11 C0 03 8B 41 24 B3 B1 |,C$,D$.T....A$..|
00000940: 22 30 30 22 A7 99 42 24 3A A0 31 3A A0 34 3A A0 |"00"..B$:.1:.4:.|
00000950: 31 35 3A 80 00 5A 11 CA 03 8E 00 72 11 D4 03 A1 |15:..Z.....r....|
00000960: 23 31 2C 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 |#1,A$:A..(A$..(0|
00000970: 29 29 00 8D 11 DE 03 8B 20 53 54 20 B3 B1 30 20 |))...... ST ..0 |
00000980: 20 A7 A0 31 3A A0 34 3A A0 31 35 3A 80 00 93 11 | ..1:.4:.15:....|
00000990: E8 03 8E 00 AC 11 F2 03 5A 5A B2 5A 5A AA 31 3A |........ZZ.ZZ.1:|
000009A0: 8B 5A 5A B2 5A 4E 20 A7 31 30 33 30 00 B2 11 FC |.ZZ.ZN .1030....|
000009B0: 03 8E 00 C6 11 06 04 81 49 B2 31 A4 37 32 AB 5A |........I.1.72.Z|
000009C0: 4E 3A 98 34 3A 82 00 DD 11 10 04 98 34 2C 4C 4D |N:.4:.......4,LM|
000009D0: 24 3B 22 20 20 22 3B 55 45 24 3B 53 4E 00 EC 11 |$;" ";UE$;SN...|
000009E0: 1A 04 98 34 3A 98 34 3A 5A 5A B2 33 00 F8 11 24 |...4:.4:ZZ.3...$|
000009F0: 04 53 4E B2 53 4E AA 31 00 FE 11 2E 04 8E 00 00 |.SN.SN.1........|
00000A00: 00 |. |
....D..BT$(75).4.N.LM$." ":NF$." "
:BL$.". ".M.X..I.1.8:HZ$.HZ$.LM$:..B.
..HZ$.HZ$."SEITE ".U...F1$.G(145).LM$.~.
..SN.1... ..G(147)......:.:." LIST
- PROGRAMM"......:..U...." NAME DES P
ROGRAMMS";NA$...H.NP$.NA$.",P,R".G(34)..
.R..:." AUSGABE AUF ".H...." "G(
18)"D"G(146)"RUCKER ODER "G(18)"F"G(146)
"LOPPY";.R.... GA$.H....GA$."".GA.3:.310
......GA$."F".GA.8:NL$.NA$.",S,W".G(34):
.310......GA$."D".GA.4.I....:." ZEILE
N PRO SEITE ";ZN:.....ZN.(ZN.0)..66.ZN..
."..:." UEBERSCHRIFT ";UE$.*.,.HZ
$.I(HZ$,C(HZ$).C(UE$)):UE$.UE$.HZ$.K.6..
:." LINKER RAND ";L.K.@..:.: .
I.0.L:LM$.LM$." ":..X.J..15,8,15...T..1,
8,4,NP$:.950...^.I.0...H..A.41118.41372.
..R.X.B(A).A.|..X.127.410.X...BT$(I).BT$
(I).G(X)......440.....X.X.127.....BT$(I)
.BT$(I).G(X):.F1$;BT$(I);LM$.....I.I.1.)
.... :.:..C.B.BT$(11).BT$(11)." ".[.L.
BT$(39).BT$(39)." "...V.. ********* PRO
GRAMM LESEN ***********......G(147)...
...GA.8..4,GA :.510.F....4,GA,3,NA$.".LS
T,S,W"......GA..3.."AUSGABE ERFOLGT AUF
GERAET #";GA......4:.1040.%....980:.980
: . PRG-START SKIP.S.... *********
HAUPTSCHLEIFE ***********.Z.&..980:.98
0 : . SKIP LINK ADRESSE...0.....:..98
0 :LB.A : . ZEILE LOW - BYTE.X.D
..980 :HB.A : . ZEILE HIGH - BYTE
...N.ZN$.D(HB.256.LB).!.X.LN$.H(LM$,C(LM
$).C(ZN$)).ZN$.NF$:LF.0:PF.0:NN.0.O.B..
********* ZEILENSCHLEIFE ***********.
B.L..C(LN$).70.680.W.V..4,LN$;:.. QF..4.
.....QF..4,G(34).....LN$.LM$.NF$:.QF.LN$
.LN$.G(34).....NN.0......1010......980
: . EIN BYTE HOLEN......A.0.
.4, LN$:LN$."":QF.0:RF.0:.1010:.550.A...
. . RF . 720 : . BEI REM REST SO LESE
N.W.F.LN$.LN$.G(A):.620.J.P..A.32..QF. 6
20.{.Z.. A..44 .760...... A.44 . NN.0.76
0......NF$.." ".NF$.H(NF$,C(NF$).4).E..
..A.34.QF..QF......A.58..QF..4,LN$;":":L
N$.LM$.NF$:NN.0:.1010:.620......A.61..QF
.LF..LF.(....A.127..QF..850:.620.C. .LN$
.LN$.G(A):..QF..820.L.*..620..4..I(LN$,
4)."; ".G(34).G(34).LN$.H(LN$,C(LN$).4).
..>..I(LN$,4)."+ ".G(34).G(34).LN$.H(LN$
,C(LN$).4)...H...W.R..I(LN$,1).." ".LN$.
LN$." "...\..A.128.39..4,LN$:LN$.LM$.NF$
:.1010 : . THEN.@.F..A.129.NF$.NF$.BL$
: . BL$= 4 SPACES FUER FOR NEXT.V.P..A.
130.NN.1: .930.Z.Z..A.143.RF..RF : .
REMFLAG ON......A.153.PF..PF : . PRIN
T FLAG ON.H....A.178.LF..LF : . LET
FLAG ON.....LN$.LN$.BT$(A.128)." ":....
...NF$.." ".NF$.H(NF$,C(NF$).4):LN$.H(L
N$,C(LN$).4).".....6....15,A$,B$,C$,D$.T
....A$.."00"..B$: 1: 4: 15:..Z.J...R.T..
#1,A$:A.F(A$.G(0))...... ST ..0 . 1: 4:
15:............ZZ.ZZ.1:.ZZ.ZN .1030....
...F....I.1.72.ZN:.4:.......4,LM$;" ";U
E$;SN......4:.4:ZZ.3...$.SN.SN.1........
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL