_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

VISI-LIST

FILE INFORMATION

FILENAME(S): VISI-LIST

FILE TYPE(S): PRG

FILE SIZE: 4.8K

FIRST SEEN: 2025-11-30 21:22:56

APPEARS ON: 1 disk(s)

FILE HASH

4263413204cdc5d8b19935c47914d3d5455bfc08b0114e2b5a7a617456388172

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 50 1 VISI-LIST PRG DuncanTwain 22 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 34 08 00 00 8F 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..4....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000030: 2A 2A 2A 2A 00 52 08 05  00 8F 20 20 20 20 20 20  |****.R....      |
00000040: 20 20 20 20 20 20 20 20  20 56 49 53 49 2E 4C 49  |         VISI.LI|
00000050: 53 54 00 74 08 0A 00 8F  20 20 20 20 20 20 20 20  |ST.t....        |
00000060: 20 20 20 20 2D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |    -===========|
00000070: 3D 3D 3D 2D 00 9E 08 0F  00 8F 20 20 20 20 20 20  |===-......      |
00000080: 20 20 4C 49 53 54 45 4E  20 56 41 4E 20 42 41 53  |  LISTEN VAN BAS|
00000090: 49 43 2D 50 52 4F 47 52  41 4D 4D 41 27 53 00 D0  |IC-PROGRAMMA'S..|
000000A0: 08 14 00 8F 20 20 20 20  20 4D 45 54 20 4B 4F 4E  |....     MET KON|
000000B0: 54 52 4F 4C 45 20 28 52  56 53 29 2D 53 59 4D 42  |TROLE (RVS)-SYMB|
000000C0: 4F 4C 45 4E 20 55 49 54  47 45 50 52 49 4E 54 2E  |OLEN UITGEPRINT.|
000000D0: 00 FD 08 19 00 8F 20 20  20 20 20 20 20 54 45 20  |......       TE |
000000E0: 47 45 42 52 55 49 4B 45  4E 20 56 4F 4F 52 20 41  |GEBRUIKEN VOOR A|
000000F0: 4C 4C 45 20 50 52 49 4E  54 45 52 53 2E 00 26 09  |LLE PRINTERS..&.|
00000100: 1E 00 8F 20 20 20 20 20  20 20 20 45 4E 20 41 4C  |...        EN AL|
00000110: 4C 45 20 43 4F 4D 4D 4F  44 4F 52 45 20 43 4F 4D  |LE COMMODORE COM|
00000120: 50 55 54 45 52 53 00 2C  09 23 00 8F 00 4E 09 28  |PUTERS.,.#...N.(|
00000130: 00 8F 20 20 50 52 4F 47  52 41 4D 4D 41 20 4F 4E  |..  PROGRAMMA ON|
00000140: 54 57 49 4B 4B 45 4C 44  20 44 4F 4F 52 3A 00 78  |TWIKKELD DOOR:.x|
00000150: 09 2D 00 8F 20 20 20 20  20 20 20 20 20 20 20 20  |.-..            |
00000160: 20 20 4A 41 4E 20 42 4F  44 5A 49 4E 47 41 2C 20  |  JAN BODZINGA, |
00000170: 42 4C 41 52 49 43 55 4D  00 7E 09 32 00 8F 00 8D  |BLARICUM.~.2....|
00000180: 09 37 00 8F 20 38 34 30  37 30 37 2E 32 00 C0 09  |.7.. 840707.2...|
00000190: 3C 00 8F 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |<..*************|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001C0: 00 DB 09 5F 00 97 35 33  32 38 30 2C 36 3A 97 35  |..._..53280,6:.5|
000001D0: 33 32 38 31 2C 36 3A 99  22 05 22 00 05 0A 63 00  |3281,6:."."...c.|
000001E0: 8F 20 20 20 20 20 20 20  20 20 2D 2D 2D 2D 20 20  |.         ----  |
000001F0: 42 45 47 49 4E 20 50 52  4F 47 52 41 4D 4D 41 20  |BEGIN PROGRAMMA |
00000200: 20 2D 2D 2D 2D 00 22 0A  64 00 99 C7 28 31 34 29  | ----.".d...(14)|
00000210: 20 20 20 20 20 20 3A 8F  20 54 45 4B 53 54 4D 4F  |      :. TEKSTMO|
00000220: 44 45 00 53 0A 6E 00 99  22 93 11 11 1D 1D 1D C4  |DE.S.n..".......|
00000230: 49 54 20 50 52 4F 47 52  41 4D 4D 41 20 47 45 42  |IT PROGRAMMA GEB|
00000240: 52 55 49 4B 54 20 12 C4  C9 D3 CB 2D 44 52 49 56  |RUIKT .....-DRIV|
00000250: 45 92 22 00 76 0A 78 00  8D 32 30 30 30 20 20 20  |E.".v.x..2000   |
00000260: 20 20 20 20 20 20 20 3A  8F 20 4D 41 4B 45 4E 20  |       :. MAKEN |
00000270: 41 52 52 41 59 53 00 A3  0A 82 00 99 A3 35 29 22  |ARRAYS.......5)"|
00000280: 11 12 C6 49 4C 45 4E 41  41 4D 92 20 56 41 4E 20  |...ILENAAM. VAN |
00000290: 54 45 20 4C 49 53 54 45  4E 20 20 20 20 20 20 20  |TE LISTEN       |
000002A0: 20 20 22 00 C7 0A 8C 00  99 A3 35 29 22 50 52 4F  |  ".......5)"PRO|
000002B0: 47 52 41 4D 4D 41 20 28  4F 50 20 44 49 53 4B 29  |GRAMMA (OP DISK)|
000002C0: 22 3B 3A 85 50 47 24 00  FA 0A 96 00 4B 52 24 B2  |";:.PG$.....KR$.|
000002D0: 22 20 20 20 20 20 20 20  CC C9 D3 D4 C9 CE C7 20  |"       ....... |
000002E0: 50 52 4F 47 52 41 4D 4D  41 20 3A 20 22 AA 50 47  |PROGRAMMA : ".PG|
000002F0: 24 AA 22 20 20 50 41 47  2E 22 00 0D 0B A0 00 50  |$."  PAG.".....P|
00000300: 47 24 B2 50 47 24 AA 22  2C 50 2C 52 22 00 37 0B  |G$.PG$.",P,R".7.|
00000310: AA 00 44 56 B2 38 3A 53  41 B2 32 20 20 20 20 20  |..DV.8:SA.2     |
00000320: 20 20 20 20 3A 8F 20 44  45 56 49 43 45 2B 53 45  |    :. DEVICE+SE|
00000330: 43 2E 41 44 52 45 53 00  65 0B B4 00 99 A3 35 29  |C.ADRES.e.....5)|
00000340: 22 11 CC 49 53 54 20 4F  50 20 12 D3 92 43 48 45  |"..IST OP ...CHE|
00000350: 52 4D 20 4F 46 20 12 D0  92 52 49 4E 54 45 52 22  |RM OF ...RINTER"|
00000360: 3B 3A 85 50 24 00 7E 0B  BE 00 50 24 B2 C7 28 C6  |;:.P$.~...P$..(.|
00000370: 28 C8 28 50 24 2C 31 29  29 AF 31 32 37 29 00 97  |(.(P$,1)).127)..|
00000380: 0B C8 00 8B 50 24 B3 B1  22 53 22 AF 50 24 B3 B1  |....P$.."S".P$..|
00000390: 22 50 22 A7 31 38 30 00  AD 0B D2 00 8B 50 24 B2  |"P".180......P$.|
000003A0: 22 53 22 A7 50 53 B2 33  3A 89 32 38 30 00 D3 0B  |"S".PS.3:.280...|
000003B0: DC 00 99 A3 35 29 22 11  C4 45 56 49 43 45 4E 55  |....5)"..EVICENU|
000003C0: 4D 4D 45 52 20 50 52 49  4E 54 45 52 20 22 3B 3A  |MMER PRINTER ";:|
000003D0: 85 50 53 00 FA 0B E6 00  99 A3 35 29 22 11 C1 41  |.PS.......5)"..A|
000003E0: 4E 54 41 4C 20 52 45 47  45 4C 53 20 50 45 52 20  |NTAL REGELS PER |
000003F0: 42 4C 41 44 22 3B 3A 85  52 47 00 25 0C F0 00 99  |BLAD";:.RG.%....|
00000400: A3 35 29 22 11 C1 41 4E  54 41 4C 20 4B 41 52 41  |.5)"..ANTAL KARA|
00000410: 4B 54 45 52 53 20 50 45  52 20 52 45 47 45 4C 22  |KTERS PER REGEL"|
00000420: 3B 3A 85 4B 52 00 52 0C  FA 00 99 A3 35 29 22 11  |;:.KR.R.....5)".|
00000430: 12 D0 52 49 4E 54 45 52  20 41 41 4E 5A 45 54 54  |..RINTER AANZETT|
00000440: 45 4E 20 2F 20 54 59 50  20 3E D3 50 41 54 49 45  |EN / TYP >.PATIE|
00000450: 3C 22 00 69 0C 04 01 A1  41 24 3A 8B 41 24 B3 B1  |<".i....A$:.A$..|
00000460: C7 28 33 32 29 A7 32 36  30 00 9E 0C 0E 01 99 A3  |.(32).260.......|
00000470: 35 29 22 91 A0 A0 3E 3E  3E 3E 20 20 D0 52 49 4E  |5)"...>>>>  .RIN|
00000480: 54 45 52 20 49 4E 20 4F  52 44 45 20 20 20 20 20  |TER IN ORDE     |
00000490: 3C 3C 3C 3C 20 20 20 20  20 20 20 20 20 22 00 CF  |<<<<         "..|
000004A0: 0C 18 01 8B 50 53 B2 33  A7 99 A3 35 29 22 11 C1  |....PS.3...5)"..|
000004B0: 41 4E 54 41 4C 20 4B 41  52 41 4B 54 45 52 53 20  |ANTAL KARAKTERS |
000004C0: 50 45 52 20 52 45 47 45  4C 22 3B 3A 85 4B 52 00  |PER REGEL";:.KR.|
000004D0: F9 0C 22 01 8F 20 20 20  2A 2A 2A 2A 2A 2A 2A 20  |.."..   ******* |
000004E0: 20 49 4E 49 54 49 41 4C  49 53 45 52 45 4E 20 2A  | INITIALISEREN *|
000004F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 16 0D 2C 01 9F 31  |*********...,..1|
00000500: 35 2C 28 44 56 29 2C 31  35 20 20 3A 8F 20 46 E0  |5,(DV),15  :. F.|
00000510: 4B 41 4E 41 41 4C 00 44  0D 36 01 9F 32 2C 28 44  |KANAAL.D.6..2,(D|
00000520: 56 29 2C 28 53 41 29 2C  50 47 24 20 20 3A 8F 20  |V),(SA),PG$  :. |
00000530: 4F 50 45 4E 45 4E 20 50  52 4F 47 52 41 4D 4D 41  |OPENEN PROGRAMMA|
00000540: 46 49 4C 45 00 65 0D 40  01 8B 50 53 B2 33 A7 99  |FILE.e.@..PS.3..|
00000550: 22 93 22 20 20 20 3A 8F  20 43 4C 45 41 52 20 53  |"."   :. CLEAR S|
00000560: 43 48 45 52 4D 00 7E 0D  4A 01 84 31 35 2C 45 4E  |CHERM.~.J..15,EN|
00000570: 2C 45 4D 24 3A 8B 45 4E  B2 30 A7 33 36 30 00 9A  |,EM$:.EN.0.360..|
00000580: 0D 54 01 99 A3 35 29 22  11 D3 20 CF 20 D2 20 D2  |.T...5)".. . . .|
00000590: 20 D9 20 12 22 45 4D 24  3A 99 00 AA 0D 5E 01 A0  | . ."EM$:....^..|
000005A0: 32 3A A0 31 35 3A 89 31  33 30 00 D6 0D 68 01 8F  |2:.15:.130...h..|
000005B0: 20 2A 2A 2A 2A 2A 2A 2A  20 4F 50 45 4E 45 4E 20  | ******* OPENEN |
000005C0: 50 52 49 4E 54 2D 44 45  56 49 43 45 20 2A 2A 2A  |PRINT-DEVICE ***|
000005D0: 2A 2A 2A 2A 2A 2A 00 01  0E 72 01 52 4C B2 30 3A  |******...r.RL.0:|
000005E0: 4B 4C B2 30 3A 54 45 B2  31 3A 42 4E B2 32 20 3A  |KL.0:TE.1:BN.2 :|
000005F0: 8F 20 54 45 4C 4C 45 52  53 20 50 52 49 4E 54 45  |. TELLERS PRINTE|
00000600: 52 00 23 0E 7C 01 45 4C  24 B2 22 20 20 2A 2A 2A  |R.#.|.EL$."  ***|
00000610: A0 C5 C9 CE C4 C5 20 CC  C9 D3 D4 C9 CE C7 20 2A  |...... ....... *|
00000620: 2A 2A 22 00 31 0E 86 01  9F 34 2C 28 50 53 29 2C  |**".1....4,(PS),|
00000630: 37 00 47 0E 90 01 98 34  2C 4B 52 24 3B 31 3A 98  |7.G....4,KR$;1:.|
00000640: 34 20 3A 52 4C B2 33 00  6C 0E 9A 01 A1 23 32 2C  |4 :RL.3.l....#2,|
00000650: 53 31 24 2C 53 32 24 20  20 20 20 20 20 20 3A 8F  |S1$,S2$       :.|
00000660: 20 53 54 41 52 54 20 41  44 52 45 53 00 8A 0E A4  | START ADRES....|
00000670: 01 8D 31 30 30 30 3A 89  34 34 30 3A 8F 20 52 45  |..1000:.440:. RE|
00000680: 47 45 4C 4E 55 4D 4D 45  52 53 00 AC 0E AE 01 A1  |GELNUMMERS......|
00000690: 23 32 2C 41 24 3A 8B 41  24 B2 22 22 A7 8D 31 30  |#2,A$:.A$.""..10|
000006A0: 30 30 3A 8B A8 4F 4B A7  33 30 30 30 00 D9 0E B8  |00:..OK.3000....|
000006B0: 01 8F 2A 2A 2A 2A 2A 2A  2A 2A 20 41 46 48 41 4E  |..******** AFHAN|
000006C0: 44 45 4C 45 4E 20 31 20  52 45 47 45 4C 20 2A 2A  |DELEN 1 REGEL **|
000006D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 0D 0F C2 01 8B 41  |*********......A|
000006E0: 24 B2 C7 28 33 34 29 A7  51 55 4F 54 45 25 B2 51  |$..(34).QUOTE%.Q|
000006F0: 55 4F 54 45 25 AC AB 31  3A 8B A8 51 55 4F 54 45  |UOTE%..1:..QUOTE|
00000700: 25 A7 8D 36 30 30 3A 43  52 24 B2 22 22 00 2F 0F  |%..600:CR$.""./.|
00000710: CC 01 8B A8 51 55 4F 54  45 25 A7 35 32 30 20 20  |....QUOTE%.520  |
00000720: 20 3A 8F 20 42 41 53 49  43 54 4F 4B 45 4E 53 00  | :. BASICTOKENS.|
00000730: 52 0F D6 01 43 4F 24 B2  43 24 28 C6 28 41 24 29  |R...CO$.C$(.(A$)|
00000740: 29 20 20 20 20 20 20 3A  8F 20 4B 41 52 41 4B 54  |)      :. KARAKT|
00000750: 45 52 00 6D 0F E0 01 8B  20 C3 28 43 52 24 29 B2  |ER.m.... .(CR$).|
00000760: 31 20 A7 8D 36 30 30 3A  20 89 35 33 30 00 8A 0F  |1 ..600: .530...|
00000770: EA 01 8B 20 43 4F 24 B3  B1 43 52 24 20 20 20 A7  |... CO$..CR$   .|
00000780: 8D 36 30 30 3A 20 89 35  33 30 00 B6 0F F4 01 54  |.600: .530.....T|
00000790: 45 B2 54 45 AA 31 20 20  20 20 20 20 20 20 20 3A  |E.TE.1         :|
000007A0: 8F 20 54 45 4C 4C 45 52  20 47 45 4C 49 4A 4B 45  |. TELLER GELIJKE|
000007B0: 20 43 48 41 52 2E 00 BF  0F FE 01 89 35 34 30 00  | CHAR.......540.|
000007C0: E6 0F 08 02 98 34 2C 41  24 28 C6 28 41 24 29 29  |.....4,A$(.(A$))|
000007D0: 3B 3A 4B 4C B2 4B 4C AA  42 25 28 C6 28 41 24 29  |;:KL.KL.B%(.(A$)|
000007E0: 29 3A 89 35 33 30 00 08  10 12 02 8B 4B 4C B1 4B  |):.530......KL.K|
000007F0: 52 AB 35 A7 98 34 3A 8D  31 35 30 30 3A 98 34 2C  |R.5..4:.1500:.4,|
00000800: 53 24 3B 3A 4B 4C B2 36  00 16 10 1C 02 8B 53 54  |S$;:KL.6......ST|
00000810: B2 30 A7 34 33 30 00 1C  10 26 02 3A 00 48 10 58  |.0.430...&.:.H.X|
00000820: 02 8F 20 2A 2A 2A 2A 20  50 52 49 4E 54 45 4E 20  |.. **** PRINTEN |
00000830: 54 55 53 53 45 4E 20 51  55 4F 54 45 53 20 2A 2A  |TUSSEN QUOTES **|
00000840: 2A 2A 2A 2A 2A 2A 2A 2A  00 5B 10 62 02 8B C3 28  |********.[.b...(|
00000850: 43 52 24 29 B2 31 A7 54  45 B2 31 00 69 10 6C 02  |CR$).1.TE.1.i.l.|
00000860: 8B 54 45 B2 31 A7 36 35  30 00 90 10 76 02 54 45  |.TE.1.650...v.TE|
00000870: 24 B2 C4 28 54 45 29 3A  54 45 24 B2 CA 28 54 45  |$..(TE):TE$..(TE|
00000880: 24 2C 32 29 3A 4C 45 B2  C3 28 54 45 24 29 AA 32  |$,2):LE..(TE$).2|
00000890: 00 B2 10 80 02 43 52 24  B2 22 5B 22 AA 54 45 24  |.....CR$."[".TE$|
000008A0: AA 22 58 22 AA CA 28 43  52 24 2C 32 29 3A 54 45  |."X"..(CR$,2):TE|
000008B0: B2 31 00 CE 10 8A 02 8B  43 52 24 B2 22 5B 53 50  |.1......CR$."[SP|
000008C0: 41 54 49 45 5D 22 A7 43  52 24 B2 22 A0 22 00 F1  |ATIE]".CR$."."..|
000008D0: 10 94 02 98 34 2C 43 52  24 3B 3A 4B 4C B2 4B 4C  |....4,CR$;:KL.KL|
000008E0: AA C3 28 43 52 24 29 3A  43 52 24 B2 43 4F 24 3A  |..(CR$):CR$.CO$:|
000008F0: 8E 00 F7 10 9E 02 3A 00  29 11 E8 03 8F 2A 2A 2A  |......:.)....***|
00000900: 2A 2A 2A 2A 2A 20 41 46  48 41 4E 44 45 4C 45 4E  |***** AFHANDELEN|
00000910: 20 52 45 47 45 4C 4E 55  4D 4D 45 52 20 2A 2A 2A  | REGELNUMMER ***|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 44 11 F2 03 8B 51  |*********.D....Q|
00000930: 55 4F 54 45 25 B2 AB 31  A7 8D 36 30 30 3A 43 52  |UOTE%..1..600:CR|
00000940: 24 B2 22 22 00 4E 11 FC  03 8D 31 35 30 30 00 80  |$."".N....1500..|
00000950: 11 06 04 4F 4B B2 AB 31  20 20 20 20 20 20 20 20  |...OK..1        |
00000960: 20 20 20 3A 8F 20 4F 4B  3D 56 4C 41 47 20 4F 50  |   :. OK=VLAG OP|
00000970: 20 45 49 4E 44 45 20 50  52 4F 47 52 41 4D 4D 41  | EINDE PROGRAMMA|
00000980: 00 96 11 10 04 8B 20 4B  4C B3 B1 36 20 A7 98 34  |...... KL..6 ..4|
00000990: 3A 89 31 30 37 30 00 B6  11 1A 04 8B 20 50 53 B3  |:.1070...... PS.|
000009A0: B1 33 20 A7 98 34 2C C7  28 31 34 31 29 3B 3A 52  |.3 ..4,.(141);:R|
000009B0: 4C B2 52 4C AB 31 00 D1  11 24 04 8B 20 50 53 20  |L.RL.1...$.. PS |
000009C0: B2 33 20 A7 98 34 2C 22  9D 9D 9D 9D 9D 9D 9D 22  |.3 ..4,"......."|
000009D0: 3B 00 F2 11 2E 04 A1 23  32 2C 4C 24 3A A1 23 32  |;......#2,L$:.#2|
000009E0: 2C 4C 24 3A 8F 20 4C 49  4E 4B 20 50 4F 49 4E 54  |,L$:. LINK POINT|
000009F0: 45 52 00 0E 12 38 04 8B  4C 24 B2 22 22 A7 98 34  |ER...8..L$.""..4|
00000A00: 3A 98 34 2C 45 4C 24 3A  4F 4B B2 30 3A 8E 00 2B  |:.4,EL$:OK.0:..+|
00000A10: 12 42 04 A1 23 32 2C 4E  31 24 3A 8B 4E 31 24 B2  |.B..#2,N1$:.N1$.|
00000A20: 22 22 A7 4E 31 24 B2 C7  28 30 29 00 48 12 4C 04  |"".N1$..(0).H.L.|
00000A30: A1 23 32 2C 4E 32 24 3A  8B 4E 32 24 B2 22 22 A7  |.#2,N2$:.N2$."".|
00000A40: 4E 32 24 B2 C7 28 30 29  00 75 12 56 04 52 24 B2  |N2$..(0).u.V.R$.|
00000A50: C4 28 C6 28 4E 32 24 29  AC 32 35 36 AA C6 28 4E  |.(.(N2$).256..(N|
00000A60: 31 24 29 29 20 20 3A 8F  20 52 45 47 45 4C 2D 4E  |1$))  :. REGEL-N|
00000A70: 55 4D 4D 45 52 00 95 12  60 04 98 34 2C C8 28 53  |UMMER...`..4,.(S|
00000A80: 24 2C 36 AB C3 28 52 24  29 29 52 24 22 20 22 3B  |$,6..(R$))R$" ";|
00000A90: 3A 4B 4C B2 36 00 C2 12  6A 04 A1 23 32 2C 41 24  |:KL.6...j..#2,A$|
00000AA0: 20 20 20 20 20 20 20 20  20 20 20 3A 8F 20 42 59  |           :. BY|
00000AB0: 54 45 20 42 41 53 49 43  20 50 52 4F 47 52 41 4D  |TE BASIC PROGRAM|
00000AC0: 4D 41 00 EA 12 74 04 51  55 4F 54 45 25 B2 31 20  |MA...t.QUOTE%.1 |
00000AD0: 20 20 20 20 20 20 20 20  20 3A 8F 20 47 45 45 4E  |         :. GEEN|
00000AE0: 20 51 55 4F 54 45 4D 4F  44 45 00 F0 12 7E 04 8E  | QUOTEMODE...~..|
00000AF0: 00 F6 12 88 04 3A 00 29  13 DC 05 8F 20 2A 2A 2A  |.....:.).... ***|
00000B00: 2A 2A 2A 2A 2A 20 4B 4F  4E 54 52 4F 4C 45 20 4F  |***** KONTROLE O|
00000B10: 50 20 52 45 47 45 4C 41  41 4E 54 41 4C 20 2A 2A  |P REGELAANTAL **|
00000B20: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 40 13 E6 05 52 4C  |*********.@...RL|
00000B30: B2 52 4C AA 31 3A 8B 50  53 B2 33 A7 31 35 33 30  |.RL.1:.PS.3.1530|
00000B40: 00 73 13 F0 05 8B 52 4C  B1 52 47 AB 33 A7 52 4C  |.s....RL.RG.3.RL|
00000B50: B2 33 3A 81 49 B2 30 A4  32 3A 98 34 3A 82 3A 98  |.3:.I.0.2:.4:.:.|
00000B60: 34 2C 4B 52 24 3B 42 4E  3A 42 4E B2 42 4E AA 31  |4,KR$;BN:BN.BN.1|
00000B70: 3A 98 34 00 79 13 FA 05  8E 00 7F 13 04 06 3A 00  |:.4.y.........:.|
00000B80: B0 13 D0 07 8F 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.....***********|
00000B90: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000BA0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000BB0: 00 CD 13 DA 07 8F 20 49  4E 4C 45 5A 45 4E 20 44  |...... INLEZEN D|
00000BC0: 41 54 41 20 49 4E 20 41  52 52 41 59 53 00 FC 13  |ATA IN ARRAYS...|
00000BD0: E4 07 99 A3 35 29 22 11  12 C5 20 45 20 4E 20 20  |....5)"... E N  |
00000BE0: 20 4F 20 47 20 45 20 4E  20 42 20 4C 20 49 20 4B  | O G E N B L I K|
00000BF0: 20 20 53 2E 56 2E 50 2E  92 91 91 22 00 3F 14 EE  |  S.V.P....".?..|
00000C00: 07 86 41 24 28 32 35 35  29 2C 43 24 28 32 35 35  |..A$(255),C$(255|
00000C10: 29 20 20 3A 8F 20 41 24  3D 42 41 53 49 43 20 54  |)  :. A$=BASIC T|
00000C20: 4F 4B 45 4E 53 2F 43 24  3D 4B 41 52 41 4B 54 45  |OKENS/C$=KARAKTE|
00000C30: 52 53 20 2B 20 56 45 52  4B 4C 41 52 49 4E 47 00  |RS + VERKLARING.|
00000C40: 5F 14 F8 07 86 42 25 28  32 35 35 29 20 20 20 3A  |_....B%(255)   :|
00000C50: 8F 20 4C 45 4E 47 54 45  20 54 4F 4B 45 4E 53 00  |. LENGTE TOKENS.|
00000C60: 88 14 02 08 81 49 B2 30  A4 32 35 35 3A 43 24 28  |.....I.0.255:C$(|
00000C70: 49 29 B2 C7 28 49 29 3A  82 20 20 3A 8F 20 4C 45  |I)..(I):.  :. LE|
00000C80: 5A 45 4E 20 4B 41 52 2E  00 B3 14 0C 08 81 49 B2  |ZEN KAR.......I.|
00000C90: 30 A4 31 32 37 3A 41 24  28 49 29 B2 C7 28 49 29  |0.127:A$(I)..(I)|
00000CA0: 3A 82 20 20 3A 8F 20 4C  45 5A 45 4E 20 54 4F 4B  |:.  :. LEZEN TOK|
00000CB0: 45 4E 53 00 BD 14 11 08  49 B2 31 32 38 00 E1 14  |ENS.....I.128...|
00000CC0: 16 08 87 41 24 28 49 29  3A 8B 41 24 28 49 29 B3  |...A$(I):.A$(I).|
00000CD0: B1 22 2D 31 22 A7 49 B2  49 AA 31 3A 89 32 30 37  |."-1".I.I.1:.207|
00000CE0: 30 00 EE 14 20 08 41 24  28 49 29 B2 22 22 00 FE  |0... .A$(I).""..|
00000CF0: 14 2A 08 43 24 28 35 29  B2 22 D7 C9 D4 22 00 10  |.*.C$(5)."..."..|
00000D00: 15 34 08 43 24 28 31 37  29 B2 22 4E 45 45 52 22  |.4.C$(17)."NEER"|
00000D10: 00 25 15 3E 08 43 24 28  31 38 29 B2 22 D2 D6 D3  |.%.>.C$(18)."...|
00000D20: 2D 41 41 4E 22 00 37 15  48 08 43 24 28 31 39 29  |-AAN".7.H.C$(19)|
00000D30: B2 22 C8 CF CD C5 22 00  4B 15 52 08 43 24 28 32  |."....".K.R.C$(2|
00000D40: 30 29 B2 22 C4 C5 CC 45  54 45 22 00 5D 15 5C 08  |0)."...ETE".].\.|
00000D50: 43 24 28 32 38 29 B2 22  D2 CF CF C4 22 00 71 15  |C$(28)."....".q.|
00000D60: 66 08 43 24 28 32 39 29  B2 22 52 45 43 48 54 53  |f.C$(29)."RECHTS|
00000D70: 22 00 84 15 70 08 43 24  28 33 30 29 B2 22 C7 D2  |"...p.C$(30)."..|
00000D80: CF C5 CE 22 00 97 15 7A  08 43 24 28 33 31 29 B2  |..."...z.C$(31).|
00000D90: 22 C2 CC C1 D5 D7 22 00  AB 15 7F 08 43 24 28 33  |".....".....C$(3|
00000DA0: 32 29 B2 22 53 50 41 54  49 45 22 00 C0 15 84 08  |2)."SPATIE".....|
00000DB0: 43 24 28 31 32 39 29 B2  22 4F 52 41 4E 4A 45 22  |C$(129)."ORANJE"|
00000DC0: 00 D3 15 8E 08 43 24 28  31 33 33 29 B2 22 20 C6  |.....C$(133)." .|
00000DD0: 31 20 22 00 E6 15 98 08  43 24 28 31 33 34 29 B2  |1 ".....C$(134).|
00000DE0: 22 20 C6 33 20 22 00 F9  15 A2 08 43 24 28 31 33  |" .3 ".....C$(13|
00000DF0: 35 29 B2 22 20 C6 35 20  22 00 0C 16 AC 08 43 24  |5)." .5 ".....C$|
00000E00: 28 31 33 36 29 B2 22 20  C6 37 20 22 00 1F 16 B6  |(136)." .7 "....|
00000E10: 08 43 24 28 31 33 37 29  B2 22 20 C6 32 20 22 00  |.C$(137)." .2 ".|
00000E20: 32 16 C0 08 43 24 28 31  33 38 29 B2 22 20 C6 34  |2...C$(138)." .4|
00000E30: 20 22 00 45 16 CA 08 43  24 28 31 33 39 29 B2 22  | ".E...C$(139)."|
00000E40: 20 C6 36 20 22 00 58 16  D4 08 43 24 28 31 34 30  | .6 ".X...C$(140|
00000E50: 29 B2 22 20 C6 38 20 22  00 6C 16 DE 08 43 24 28  |)." .8 ".l...C$(|
00000E60: 31 34 34 29 B2 22 DA D7  C1 D2 D4 22 00 7D 16 E8  |144).".....".}..|
00000E70: 08 43 24 28 31 34 35 29  B2 22 4F 50 22 00 93 16  |.C$(145)."OP"...|
00000E80: F2 08 43 24 28 31 34 36  29 B2 22 D2 D6 D3 2D 55  |..C$(146)."...-U|
00000E90: 49 54 22 00 AA 16 FC 08  43 24 28 31 34 37 29 B2  |IT".....C$(147).|
00000EA0: 22 C3 CC D2 2D C8 CF CD  C5 22 00 BF 16 06 09 43  |"...-....".....C|
00000EB0: 24 28 31 34 38 29 B2 22  C9 CE D3 45 52 54 22 00  |$(148)."...ERT".|
00000EC0: D3 16 10 09 43 24 28 31  34 39 29 B2 22 42 52 55  |....C$(149)."BRU|
00000ED0: 49 4E 22 00 E8 16 1A 09  43 24 28 31 35 30 29 B2  |IN".....C$(150).|
00000EE0: 22 4C 2E 52 4F 4F 44 22  00 FE 16 24 09 43 24 28  |"L.ROOD"...$.C$(|
00000EF0: 31 35 31 29 B2 22 47 52  49 4A 53 20 31 22 00 14  |151)."GRIJS 1"..|
00000F00: 17 2E 09 43 24 28 31 35  32 29 B2 22 47 52 49 4A  |...C$(152)."GRIJ|
00000F10: 53 20 32 22 00 2A 17 38  09 43 24 28 31 35 33 29  |S 2".*.8.C$(153)|
00000F20: B2 22 4C 2E 47 52 4F 45  4E 22 00 40 17 42 09 43  |."L.GROEN".@.B.C|
00000F30: 24 28 31 35 34 29 B2 22  4C 2E 42 4C 41 55 57 22  |$(154)."L.BLAUW"|
00000F40: 00 56 17 4C 09 43 24 28  31 35 35 29 B2 22 47 52  |.V.L.C$(155)."GR|
00000F50: 49 4A 53 20 33 22 00 6B  17 56 09 43 24 28 31 35  |IJS 3".k.V.C$(15|
00000F60: 36 29 B2 22 D0 D5 D2 D0  C5 D2 22 00 7F 17 60 09  |6)."......"...`.|
00000F70: 43 24 28 31 35 37 29 B2  22 4C 49 4E 4B 53 22 00  |C$(157)."LINKS".|
00000F80: 92 17 6A 09 43 24 28 31  35 38 29 B2 22 C7 C5 C5  |..j.C$(158)."...|
00000F90: CC 22 00 A6 17 74 09 43  24 28 31 35 39 29 B2 22  |."...t.C$(159)."|
00000FA0: C3 D9 C1 C1 CE 22 00 C1  17 7E 09 43 24 28 31 36  |....."...~.C$(16|
00000FB0: 30 29 B2 22 53 48 49 46  54 2D D3 D0 C1 D4 C9 C5  |0)."SHIFT-......|
00000FC0: 22 00 CE 17 88 09 81 49  B2 30 A4 32 35 35 00 E1  |"......I.0.255..|
00000FD0: 17 92 09 42 25 28 49 29  B2 C3 28 41 24 28 49 29  |...B%(I)..(A$(I)|
00000FE0: 29 00 05 18 9C 09 8B C3  28 43 24 28 49 29 29 B1  |).......(C$(I)).|
00000FF0: 31 A7 43 24 28 49 29 B2  22 5B 22 AA 43 24 28 49  |1.C$(I)."[".C$(I|
00001000: 29 AA 22 5D 22 00 0B 18  B0 09 82 00 37 18 BA 09  |)."]".......7...|
00001010: 53 24 B2 22 A0 A0 A0 A0  A0 A0 A0 22 20 20 20 20  |S$."......."    |
00001020: 3A 8F 20 52 45 47 45 4C  4E 55 4D 4D 45 52 20 54  |:. REGELNUMMER T|
00001030: 52 41 49 4C 49 4E 47 00  3D 18 C4 09 8E 00 68 18  |RAILING.=.....h.|
00001040: B8 0B 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 20 53 4C 55  |... ******** SLU|
00001050: 49 54 45 4E 20 50 52 4F  47 52 41 4D 4D 41 20 2A  |ITEN PROGRAMMA *|
00001060: 2A 2A 2A 2A 2A 2A 2A 2A  00 72 18 C2 0B 98 34 3A  |********.r....4:|
00001070: A0 34 00 7D 18 CC 0B A0  32 3A A0 31 35 00 A1 18  |.4.}....2:.15...|
00001080: D6 0B 99 A3 35 29 22 11  12 C4 52 55 4B 20 54 4F  |....5)"...RUK TO|
00001090: 45 54 53 20 56 4F 4F 52  20 56 45 52 56 4F 4C 47  |ETS VOOR VERVOLG|
000010A0: 22 00 B5 18 E0 0B A1 41  24 3A 8B 41 24 B2 22 22  |"......A$:.A$.""|
000010B0: A7 33 30 34 30 00 DB 18  EA 0B 99 22 93 22 3A 89  |.3040......".":.|
000010C0: 31 33 30 20 3A 8F 20 4C  49 53 54 45 4E 20 56 4F  |130 :. LISTEN VO|
000010D0: 4C 47 45 4E 44 20 50 52  4F 47 2E 00 0B 19 88 13  |LGEND PROG......|
000010E0: 8F 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.***************|
000010F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001100: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 39 19 EC 13  |***********.9...|
00001110: 83 20 45 4E 44 2C 46 4F  52 2C 4E 45 58 54 2C 44  |. END,FOR,NEXT,D|
00001120: 41 54 41 2C 49 4E 50 55  54 23 2C 49 4E 50 55 54  |ATA,INPUT#,INPUT|
00001130: 2C 44 49 4D 2C 52 45 41  44 00 68 19 F6 13 83 20  |,DIM,READ.h.... |
00001140: 4C 45 54 2C 47 4F 54 4F  2C 52 55 4E 2C 49 46 2C  |LET,GOTO,RUN,IF,|
00001150: 52 45 53 54 4F 52 45 2C  47 4F 53 55 42 2C 52 45  |RESTORE,GOSUB,RE|
00001160: 54 55 52 4E 2C 52 45 4D  00 95 19 00 14 83 20 53  |TURN,REM...... S|
00001170: 54 4F 50 2C 4F 4E 2C 57  41 49 54 2C 4C 4F 41 44  |TOP,ON,WAIT,LOAD|
00001180: 2C 53 41 56 45 2C 56 45  52 49 46 59 2C 44 45 46  |,SAVE,VERIFY,DEF|
00001190: 2C 50 4F 4B 45 00 C3 19  0A 14 83 20 50 52 49 4E  |,POKE...... PRIN|
000011A0: 54 23 2C 50 52 49 4E 54  2C 43 4F 4E 54 2C 4C 49  |T#,PRINT,CONT,LI|
000011B0: 53 54 2C 43 4C 52 2C 43  4D 44 2C 53 59 53 2C 4F  |ST,CLR,CMD,SYS,O|
000011C0: 50 45 4E 00 EC 19 14 14  83 20 43 4C 4F 53 45 2C  |PEN...... CLOSE,|
000011D0: 47 45 54 2C 4E 45 57 2C  54 41 42 28 2C 54 4F 2C  |GET,NEW,TAB(,TO,|
000011E0: 46 4E 2C 53 50 43 28 2C  54 48 45 4E 00 09 1A 1E  |FN,SPC(,THEN....|
000011F0: 14 83 20 4E 4F 54 2C 53  54 45 50 2C 2B 2C 2D 2C  |.. NOT,STEP,+,-,|
00001200: 2A 2C 2F 2C 5E 2C 41 4E  44 00 28 1A 28 14 83 20  |*,/,^,AND.(.(.. |
00001210: 4F 52 2C 3E 2C 3D 2C 3C  2C 53 47 4E 2C 49 4E 54  |OR,>,=,<,SGN,INT|
00001220: 2C 41 42 53 2C 55 53 52  00 4E 1A 32 14 83 20 46  |,ABS,USR.N.2.. F|
00001230: 52 45 2C 50 4F 53 2C 53  51 52 2C 52 4E 44 2C 4C  |RE,POS,SQR,RND,L|
00001240: 4F 47 2C 45 58 50 2C 43  4F 53 2C 53 49 4E 00 77  |OG,EXP,COS,SIN.w|
00001250: 1A 3C 14 83 20 54 41 4E  2C 41 54 4E 2C 50 45 45  |.<.. TAN,ATN,PEE|
00001260: 4B 2C 4C 45 4E 2C 53 54  52 24 2C 56 41 4C 2C 41  |K,LEN,STR$,VAL,A|
00001270: 53 43 2C 43 48 52 24 00  AD 1A 46 14 83 20 4C 45  |SC,CHR$...F.. LE|
00001280: 46 54 24 2C 52 49 47 48  54 24 2C 4D 49 44 24 2C  |FT$,RIGHT$,MID$,|
00001290: 47 4F 2C 43 4F 4E 43 41  54 2C 44 4F 50 45 4E 2C  |GO,CONCAT,DOPEN,|
000012A0: 44 43 4C 4F 53 45 2C 52  45 43 4F 52 44 00 E1 1A  |DCLOSE,RECORD...|
000012B0: 50 14 83 20 48 45 41 44  45 52 2C 43 4F 4C 4C 45  |P.. HEADER,COLLE|
000012C0: 43 54 2C 42 41 43 4B 55  50 2C 43 4F 50 59 2C 41  |CT,BACKUP,COPY,A|
000012D0: 50 50 45 4E 44 2C 44 53  41 56 45 2C 44 4C 4F 41  |PPEND,DSAVE,DLOA|
000012E0: 44 00 08 1B 5A 14 83 20  43 41 54 41 4C 4F 47 2C  |D...Z.. CATALOG,|
000012F0: 52 45 4E 41 4D 45 2C 53  43 52 41 54 43 48 2C 44  |RENAME,SCRATCH,D|
00001300: 49 52 45 43 54 4F 52 59  00 11 1B 64 14 83 20 2D  |IRECTORY...d.. -|
00001310: 31 00 00 00 04                                    |1....           |
..4....*********************************
************.R....               VISI.LI
ST.T....            -==============-....
..        LISTEN VAN BASIC-PROGRAMMA'S.P
....     MET KONTROLE (RVS)-SYMBOLEN UIT
GEPRINT.......       TE GEBRUIKEN VOOR A
LLE PRINTERS..&....        EN ALLE COMMO
DORE COMPUTERS.,.#...N.(..  PROGRAMMA ON
TWIKKELD DOOR:.X.-..              JAN BO
DZINGA, BLARICUM.~.2.....7.. 840707.2...
<..*************************************
********..._..53280,6:.53281,6:."."...C.
.         ----  BEGIN PROGRAMMA  ----.".
D..G(14)      :. TEKSTMODE.S.N.."......D
IT PROGRAMMA GEBRUIKT .DISK-DRIVE.".V.X.
.2000          :. MAKEN ARRAYS.......5)"
..FILENAAM. VAN TE LISTEN         ".G...
..5)"PROGRAMMA (OP DISK)";:.PG$.....KR$.
"       LISTING PROGRAMMA : ".PG$."  PAG
."... .PG$.PG$.",P,R".7...DV.8:SA.2     
    :. DEVICE+SEC.ADRES.E.....5)".LIST O
P .S.CHERM OF .P.RINTER";:.P$.~...P$.G(F
(H(P$,1)).127)...H..P$.."S".P$.."P".180.
..R..P$."S".PS.3:.280.S.....5)".DEVICENU
MMER PRINTER ";:.PS.......5)".AANTAL REG
ELS PER BLAD";:.RG.%.....5)".AANTAL KARA
KTERS PER REGEL";:.KR.R.....5)"..PRINTER
 AANZETTEN / TYP >SPATIE<".I....A$:.A$..
G(32).260.......5)".  >>>>  PRINTER IN O
RDE     <<<<         ".O....PS.3...5)".A
ANTAL KARAKTERS PER REGEL";:.KR..."..   
*******  INITIALISEREN **********...,..1
5,(DV),15  :. F.KANAAL.D.6..2,(DV),(SA),
PG$  :. OPENEN PROGRAMMAFILE.E.@..PS.3..
"."   :. CLEAR SCHERM.~.J..15,EN,EM$:.EN
.0.360...T...5)".S O R R Y ."EM$:....^. 
2: 15:.130.V.H.. ******* OPENEN PRINT-DE
VICE *********...R.RL.0:KL.0:TE.1:BN.2 :
. TELLERS PRINTER.#.|.EL$."  *** EINDE L
ISTING ***".1....4,(PS),7.G....4,KR$;1:.
4 :RL.3.L....#2,S1$,S2$       :. START A
DRES......1000:.440:. REGELNUMMERS......
#2,A$:.A$.""..1000:..OK.3000.Y....******
** AFHANDELEN 1 REGEL ***********...B..A
$.G(34).QUOTE%.QUOTE%..1:..QUOTE%..600:C
R$.""./.L...QUOTE%.520   :. BASICTOKENS.
R.V.CO$.C$(F(A$))      :. KARAKTER.M....
 C(CR$).1 ..600: .530...... CO$..CR$   .
.600: .530.....TE.TE.1         :. TELLER
 GELIJKE CHAR.......540......4,A$(F(A$))
;:KL.KL.B%(F(A$)):.530......KL.KR.5..4:.
1500:.4,S$;:KL.6......ST.0.430...&.:.H.X
.. **** PRINTEN TUSSEN QUOTES **********
.[.B..C(CR$).1.TE.1.I.L..TE.1.650...V.TE
$.D(TE):TE$.J(TE$,2):LE.C(TE$).2.....CR$
."[".TE$."X".J(CR$,2):TE.1.N....CR$."[SP
ATIE]".CR$." "......4,CR$;:KL.KL.C(CR$):
CR$.CO$:......:.)....******** AFHANDELEN
 REGELNUMMER ************.D....QUOTE%..1
..600:CR$."".N....1500.....OK..1        
   :. OK=VLAG OP EINDE PROGRAMMA...... K
L..6 ..4:.1070...... PS..3 ..4,G(141);:R
L.RL.1.Q.$.. PS .3 ..4,".......";......#
2,L$:.#2,L$:. LINK POINTER...8..L$.""..4
:.4,EL$:OK.0:..+.B..#2,N1$:.N1$."".N1$.G
(0).H.L..#2,N2$:.N2$."".N2$.G(0).U.V.R$.
D(F(N2$).256.F(N1$))  :. REGEL-NUMMER...
`..4,H(S$,6.C(R$))R$" ";:KL.6.B.J..#2,A$
           :. BYTE BASIC PROGRAMMA...T.Q
UOTE%.1          :. GEEN QUOTEMODE...~..
.....:.).... ******** KONTROLE OP REGELA
ANTAL ***********.@...RL.RL.1:.PS.3.1530
.S....RL.RG.3.RL.3:.I.0.2:.4:.:.4,KR$;BN
:BN.BN.1:.4.Y........:...P..***********
********************************.M.Z.. I
NLEZEN DATA IN ARRAYS.......5)"..E E N  
 O G E N B L I K  S.V.P....".?....A$(255
),C$(255)  :. A$=BASIC TOKENS/C$=KARAKTE
RS + VERKLARING._....B%(255)   :. LENGTE
 TOKENS......I.0.255:C$(I).G(I):.  :. LE
ZEN KAR.......I.0.127:A$(I).G(I):.  :. L
EZEN TOKENS.....I.128......A$(I):.A$(I).
."-1".I.I.1:.2070... .A$(I).""...*.C$(5)
."WIT"...4.C$(17)."NEER".%.>.C$(18)."RVS
-AAN".7.H.C$(19)."HOME".K.R.C$(20)."DELE
TE".].\.C$(28)."ROOD".Q.F.C$(29)."RECHTS
"...P.C$(30)."GROEN"...Z.C$(31)."BLAUW".
...C$(32)."SPATIE".....C$(129)."ORANJE"
.S...C$(133)." F1 ".....C$(134)." F3 "..
...C$(135)." F5 ".....C$(136)." F7 "....
.C$(137)." F2 ".2...C$(138)." F4 ".E.J.C
$(139)." F6 ".X.T.C$(140)." F8 ".L...C$(
144)."ZWART".}...C$(145)."OP".....C$(146
)."RVS-UIT".....C$(147)."CLR-HOME".....C
$(148)."INSERT".S...C$(149)."BRUIN".....
C$(150)."L.ROOD"...$.C$(151)."GRIJS 1"..
...C$(152)."GRIJS 2".*.8.C$(153)."L.GROE
N".@.B.C$(154)."L.BLAUW".V.L.C$(155)."GR
IJS 3".K.V.C$(156)."PURPER"..`.C$(157).
"LINKS"...J.C$(158)."GEEL"...T.C$(159)."
CYAAN".A.~.C$(160)."SHIFT-SPATIE".N....I
.0.255.....B%(I).C(A$(I))......C(C$(I)).
1.C$(I)."[".C$(I)."]".......7...S$."    
   "    :. REGELNUMMER TRAILING.=.D...H.
... ******** SLUITEN PROGRAMMA *********
.R.B..4: 4.}.L. 2: 15...V...5)"..DRUK TO
ETS VOOR VERVOLG"......A$:.A$."".3040...
...".":.130 :. LISTEN VOLGEND PROG......
.***************************************
***.9.... END,FOR,NEXT,DATA,INPUT#,INPUT
,DIM,READ.H.... LET,GOTO,RUN,IF,RESTORE,
GOSUB,RETURN,REM...... STOP,ON,WAIT,LOAD
,SAVE,VERIFY,DEF,POKE.C.... PRINT#,PRINT
,CONT,LIST,CLR,CMD,SYS,OPEN...... CLOSE,
GET,NEW,TAB(,TO,FN,SPC(,THEN...... NOT,S
TEP,+,-,*,/,^,AND.(.(.. OR,>,=,<,SGN,INT
,ABS,USR.N.2.. FRE,POS,SQR,RND,LOG,EXP,C
OS,SIN.W.<.. TAN,ATN,PEEK,LEN,STR$,VAL,A
SC,CHR$...F.. LEFT$,RIGHT$,MID$,GO,CONCA
T,DOPEN,DCLOSE,RECORD...P.. HEADER,COLLE
CT,BACKUP,COPY,APPEND,DSAVE,DLOAD...Z.. 
CATALOG,RENAME,SCRATCH,DIRECTORY...D.. -
1....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL