Multiple names: ACHTHOEK.LOGO, DIAMANT.LOGO, KANTEEL.LOGO, KASTEEL.LOGO
FILE INFORMATION
FILENAME(S):
• ACHTHOEK.LOGO<br>• DIAMANT.LOGO<br>• KANTEEL.LOGO<br>• KASTEEL.LOGO
FILE TYPE(S): DEL, PRG
FILE SIZE: 6.6K
FIRST SEEN: 2025-11-30 21:11:01
APPEARS ON: 4 disk(s)
FILE HASH
ecd619484f6b77d2921dbd3f06143c570c94e1b8b6508a4b19d234e7c029782f
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOGO | ACHTHOEK.LOGO | DEL | DuncanTwain | 25 | 0 | DOWNLOAD FILE |
| LOGO | DIAMANT.LOGO | DEL | DuncanTwain | 23 | 11 | DOWNLOAD FILE |
| LOGO | KANTEEL.LOGO | DEL | DuncanTwain | 10 | 9 | DOWNLOAD FILE |
| LOGO | KASTEEL.LOGO | PRG | DuncanTwain | 17 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 20 54 4F 20 5A 45 54 4F 50 0D 20 54 45 4D 50 |. TO ZETOP. TEMP| 00000010: 4F 20 32 30 0D 20 4D 41 41 4B 20 22 41 44 20 39 |O 20. MAAK "AD 9| 00000020: 0D 20 4D 41 41 4B 20 22 53 52 20 30 0D 20 4D 41 |. MAAK "SR 0. MA| 00000030: 41 4B 20 22 47 4F 4C 46 20 31 37 0D 20 4D 41 41 |AK "GOLF 17. MAA| 00000040: 4B 20 22 4F 43 54 41 41 46 20 31 0D 20 4D 41 41 |K "OCTAAF 1. MAA| 00000050: 4B 20 22 48 50 20 31 35 0D 20 4D 41 41 4B 20 22 |K "HP 15. MAAK "| 00000060: 4C 50 20 31 35 0D 20 4D 41 41 4B 20 22 4C 41 44 |LP 15. MAAK "LAD| 00000070: 44 45 52 20 5B 38 37 37 39 20 39 33 30 31 20 39 |DER [8779 9301 9| 00000080: 38 35 34 20 31 30 34 34 30 20 31 31 30 36 30 20 |854 10440 11060 | 00000090: 31 31 37 31 38 20 31 32 34 31 35 20 31 33 31 35 |11718 12415 1315| 000000A0: 33 20 31 33 39 33 35 20 31 34 37 36 34 20 31 35 |3 13935 14764 15| 000000B0: 37 34 32 20 31 36 35 37 32 20 31 37 35 35 37 20 |742 16572 17557 | 000000C0: 31 38 36 30 31 5D 0D 20 4D 41 41 4B 20 22 41 20 |18601]. MAAK "A | 000000D0: 39 0D 20 4D 41 41 4B 20 22 42 20 31 31 0D 20 4D |9. MAAK "B 11. M| 000000E0: 41 41 4B 20 22 43 20 30 0D 20 4D 41 41 4B 20 22 |AAK "C 0. MAAK "| 000000F0: 44 20 32 0D 20 4D 41 41 4B 20 22 45 20 34 0D 20 |D 2. MAAK "E 4. | 00000100: 4D 41 41 4B 20 22 46 20 35 0D 20 4D 41 41 4B 20 |MAAK "F 5. MAAK | 00000110: 22 47 20 37 0D 20 4D 41 41 4B 20 22 41 49 53 20 |"G 7. MAAK "AIS | 00000120: 31 30 0D 20 4D 41 41 4B 20 22 42 45 53 20 31 30 |10. MAAK "BES 10| 00000130: 0D 20 4D 41 41 4B 20 22 43 49 53 20 31 0D 20 4D |. MAAK "CIS 1. M| 00000140: 41 41 4B 20 22 44 49 53 20 33 0D 20 4D 41 41 4B |AAK "DIS 3. MAAK| 00000150: 20 22 46 49 53 20 36 0D 20 4D 41 41 4B 20 22 47 | "FIS 6. MAAK "G| 00000160: 49 53 20 38 0D 45 4E 44 0D 0D 54 4F 20 50 55 4C |IS 8.END..TO PUL| 00000170: 53 20 3A 42 52 45 45 44 54 45 0D 20 2E 44 45 50 |S :BREEDTE. .DEP| 00000180: 4F 53 49 54 20 35 34 32 37 35 20 51 55 4F 54 49 |OSIT 54275 QUOTI| 00000190: 45 4E 54 20 3A 42 52 45 45 44 54 45 20 32 35 36 |ENT :BREEDTE 256| 000001A0: 0D 20 2E 44 45 50 4F 53 49 54 20 35 34 32 37 34 |. .DEPOSIT 54274| 000001B0: 20 42 49 54 41 4E 44 20 3A 42 52 45 45 44 54 45 | BITAND :BREEDTE| 000001C0: 20 32 35 35 0D 45 4E 44 0D 0D 54 4F 20 21 4D 0D | 255.END..TO !M.| 000001D0: 20 57 45 47 20 50 55 4C 53 20 57 45 47 20 54 4F | WEG PULS WEG TO| 000001E0: 4F 4E 4F 43 54 20 57 45 47 20 4F 43 54 41 41 46 |ONOCT WEG OCTAAF| 000001F0: 20 57 45 47 20 47 4F 4C 46 20 57 45 47 20 54 45 | WEG GOLF WEG TE| 00000200: 4D 50 4F 0D 20 57 45 47 20 5A 49 4E 47 20 57 45 |MPO. WEG ZING WE| 00000210: 47 20 53 50 45 45 4C 20 57 45 47 20 54 4F 4F 4E |G SPEEL WEG TOON| 00000220: 20 57 45 47 20 47 45 4C 55 49 44 20 57 45 47 20 | WEG GELUID WEG | 00000230: 4B 4C 41 4E 4B 20 57 45 47 20 5A 45 54 4F 50 0D |KLANK WEG ZETOP.| 00000240: 20 57 45 47 20 50 49 41 4E 4F 20 57 45 47 20 58 | WEG PIANO WEG X| 00000250: 59 4C 4F 46 4F 4F 4E 20 57 45 47 20 42 41 4E 4A |YLOFOON WEG BANJ| 00000260: 4F 20 57 45 47 20 46 4C 55 49 54 20 57 45 47 20 |O WEG FLUIT WEG | 00000270: 53 4A 4A 4A 20 57 45 47 20 47 45 53 4A 4A 4A 20 |SJJJ WEG GESJJJ | 00000280: 57 45 47 20 4E 41 4D 45 4E 20 57 45 47 20 21 4D |WEG NAMEN WEG !M| 00000290: 20 2E 47 43 4F 4C 4C 20 50 52 20 2E 4E 4F 44 45 | .GCOLL PR .NODE| 000002A0: 53 0D 45 4E 44 0D 0D 54 4F 20 5A 49 4E 47 20 3A |S.END..TO ZING :| 000002B0: 4E 4F 54 45 4E 0D 20 41 4C 53 20 3A 4E 4F 54 45 |NOTEN. ALS :NOTE| 000002C0: 4E 20 3D 20 5B 5D 20 44 41 4E 20 53 54 4F 50 0D |N = [] DAN STOP.| 000002D0: 20 54 4F 4F 4E 20 45 45 52 53 54 45 20 3A 4E 4F | TOON EERSTE :NO| 000002E0: 54 45 4E 20 31 30 0D 20 5A 49 4E 47 20 4D 45 20 |TEN 10. ZING ME | 000002F0: 3A 4E 4F 54 45 4E 0D 45 4E 44 0D 0D 54 4F 20 53 |:NOTEN.END..TO S| 00000300: 50 45 45 4C 20 3A 4E 4F 54 45 4E 20 3A 44 55 52 |PEEL :NOTEN :DUR| 00000310: 45 4E 0D 20 41 4C 53 20 4C 45 45 47 3F 20 3A 4E |EN. ALS LEEG? :N| 00000320: 4F 54 45 4E 20 53 54 4F 50 0D 20 54 4F 4F 4E 20 |OTEN STOP. TOON | 00000330: 45 45 52 53 54 45 20 3A 4E 4F 54 45 4E 20 45 45 |EERSTE :NOTEN EE| 00000340: 52 53 54 45 20 3A 44 55 52 45 4E 0D 20 53 50 45 |RSTE :DUREN. SPE| 00000350: 45 4C 20 4D 45 20 3A 4E 4F 54 45 4E 20 4D 45 20 |EL ME :NOTEN ME | 00000360: 3A 44 55 52 45 4E 0D 45 4E 44 0D 0D 54 4F 20 4F |:DUREN.END..TO O| 00000370: 43 54 41 41 46 20 3A 4E 0D 20 41 4C 53 20 3A 4E |CTAAF :N. ALS :N| 00000380: 20 3D 20 22 2B 20 4D 41 41 4B 20 22 4F 43 54 41 | = "+ MAAK "OCTA| 00000390: 41 46 20 3A 4F 43 54 41 41 46 20 2B 20 31 20 53 |AF :OCTAAF + 1 S| 000003A0: 54 4F 50 0D 20 41 4C 53 20 3A 4E 20 3D 20 22 2D |TOP. ALS :N = "-| 000003B0: 20 4D 41 41 4B 20 22 4F 43 54 41 41 46 20 3A 4F | MAAK "OCTAAF :O| 000003C0: 43 54 41 41 46 20 2D 20 31 20 53 54 4F 50 0D 20 |CTAAF - 1 STOP. | 000003D0: 41 4C 53 20 45 45 4E 56 41 4E 20 3A 4E 20 3C 20 |ALS EENVAN :N < | 000003E0: 2D 20 32 20 3A 4E 20 3E 20 34 20 50 52 20 5B 4B |- 2 :N > 4 PR [K| 000003F0: 41 4E 20 4E 49 45 54 5D 0D 20 4D 41 41 4B 20 22 |AN NIET]. MAAK "| 00000400: 4F 43 54 41 41 46 20 3A 4E 0D 45 4E 44 0D 0D 54 |OCTAAF :N.END..T| 00000410: 4F 20 54 4F 4F 4E 4F 43 54 0D 20 41 4C 53 20 4C |O TOONOCT. ALS L| 00000420: 41 41 54 53 54 45 20 3A 4E 54 20 3D 20 22 2B 20 |AATSTE :NT = "+ | 00000430: 4D 41 41 4B 20 22 4E 54 20 4D 4C 20 3A 4E 54 20 |MAAK "NT ML :NT | 00000440: 52 45 53 20 31 32 0D 20 41 4C 53 20 4C 41 41 54 |RES 12. ALS LAAT| 00000450: 53 54 45 20 3A 4E 54 20 3D 20 22 2D 20 4D 41 41 |STE :NT = "- MAA| 00000460: 4B 20 22 4E 54 20 4D 4C 20 3A 4E 54 20 52 45 53 |K "NT ML :NT RES| 00000470: 20 2D 20 31 32 0D 20 52 45 53 20 30 0D 45 4E 44 | - 12. RES 0.END| 00000480: 0D 0D 54 4F 20 54 45 4D 50 4F 20 3A 4E 0D 20 4D |..TO TEMPO :N. M| 00000490: 41 41 4B 20 22 54 45 4D 50 4F 20 3A 4E 0D 45 4E |AAK "TEMPO :N.EN| 000004A0: 44 0D 0D 54 4F 20 47 45 4C 55 49 44 20 3A 4E 4F |D..TO GELUID :NO| 000004B0: 4F 54 20 3A 44 55 55 52 20 3A 41 44 20 3A 53 52 |OT :DUUR :AD :SR| 000004C0: 20 3A 47 4F 4C 46 0D 20 2E 44 45 50 4F 53 49 54 | :GOLF. .DEPOSIT| 000004D0: 20 35 34 32 39 36 20 31 35 0D 20 2E 44 45 50 4F | 54296 15. .DEPO| 000004E0: 53 49 54 20 35 34 32 37 37 20 3A 41 44 0D 20 2E |SIT 54277 :AD. .| 000004F0: 44 45 50 4F 53 49 54 20 35 34 32 37 38 20 3A 53 |DEPOSIT 54278 :S| 00000500: 52 0D 20 2E 44 45 50 4F 53 49 54 20 35 34 32 37 |R. .DEPOSIT 5427| 00000510: 33 20 51 55 4F 54 49 45 4E 54 20 3A 4E 4F 4F 54 |3 QUOTIENT :NOOT| 00000520: 20 32 35 36 0D 20 2E 44 45 50 4F 53 49 54 20 35 | 256. .DEPOSIT 5| 00000530: 34 32 37 32 20 42 49 54 41 4E 44 20 3A 4E 4F 4F |4272 BITAND :NOO| 00000540: 54 20 32 35 35 0D 20 2E 44 45 50 4F 53 49 54 20 |T 255. .DEPOSIT | 00000550: 35 34 32 37 36 20 3A 47 4F 4C 46 0D 20 41 4C 53 |54276 :GOLF. ALS| 00000560: 20 3A 47 4F 4C 46 20 3D 20 36 35 20 44 41 4E 20 | :GOLF = 65 DAN | 00000570: 2E 44 45 50 4F 53 49 54 20 35 34 32 37 34 20 3A |.DEPOSIT 54274 :| 00000580: 4C 50 20 2E 44 45 50 4F 53 49 54 20 35 34 32 37 |LP .DEPOSIT 5427| 00000590: 35 20 3A 48 50 0D 20 48 45 52 48 41 41 4C 20 3A |5 :HP. HERHAAL :| 000005A0: 44 55 55 52 20 2A 20 3A 54 45 4D 50 4F 20 5B 5D |DUUR * :TEMPO []| 000005B0: 0D 20 2E 44 45 50 4F 53 49 54 20 35 34 32 37 36 |. .DEPOSIT 54276| 000005C0: 20 30 0D 45 4E 44 0D 0D 54 4F 20 50 49 41 4E 4F | 0.END..TO PIANO| 000005D0: 0D 20 4D 41 41 4B 20 22 41 44 20 31 32 20 4D 41 |. MAAK "AD 12 MA| 000005E0: 41 4B 20 22 53 52 20 31 32 20 4D 41 41 4B 20 22 |AK "SR 12 MAAK "| 000005F0: 47 4F 4C 46 20 33 33 0D 45 4E 44 0D 0D 54 4F 20 |GOLF 33.END..TO | 00000600: 58 59 4C 4F 46 4F 4F 4E 0D 20 4D 41 41 4B 20 22 |XYLOFOON. MAAK "| 00000610: 41 44 20 32 34 20 4D 41 41 4B 20 22 53 52 20 31 |AD 24 MAAK "SR 1| 00000620: 35 20 4D 41 41 4B 20 22 47 4F 4C 46 20 31 37 0D |5 MAAK "GOLF 17.| 00000630: 45 4E 44 0D 0D 54 4F 20 42 41 4E 4A 4F 0D 20 4D |END..TO BANJO. M| 00000640: 41 41 4B 20 22 41 44 20 39 20 4D 41 41 4B 20 22 |AAK "AD 9 MAAK "| 00000650: 53 52 20 30 20 4D 41 41 4B 20 22 47 4F 4C 46 20 |SR 0 MAAK "GOLF | 00000660: 36 35 20 4D 41 41 4B 20 22 48 50 20 31 30 20 4D |65 MAAK "HP 10 M| 00000670: 41 41 4B 20 22 4C 50 20 31 30 0D 45 4E 44 0D 0D |AAK "LP 10.END..| 00000680: 54 4F 20 47 4F 4C 46 20 3A 4E 0D 20 4D 41 41 4B |TO GOLF :N. MAAK| 00000690: 20 22 47 4F 4C 46 20 3A 4E 0D 45 4E 44 0D 0D 54 | "GOLF :N.END..T| 000006A0: 4F 20 46 4C 55 49 54 0D 20 4D 41 41 4B 20 22 41 |O FLUIT. MAAK "A| 000006B0: 44 20 31 33 35 20 4D 41 41 4B 20 22 53 52 20 31 |D 135 MAAK "SR 1| 000006C0: 35 20 4D 41 41 4B 20 22 47 4F 4C 46 20 31 37 0D |5 MAAK "GOLF 17.| 000006D0: 45 4E 44 0D 0D 54 4F 20 54 4F 4F 4E 20 3A 4E 4F |END..TO TOON :NO| 000006E0: 4F 54 20 3A 44 55 55 52 0D 20 4C 4F 4B 41 41 4C |OT :DUUR. LOKAAL| 000006F0: 20 22 4E 54 0D 20 41 4C 53 20 4C 49 4A 53 54 3F | "NT. ALS LIJST?| 00000700: 20 3A 4E 4F 4F 54 20 4D 41 41 4B 20 22 4E 4F 4F | :NOOT MAAK "NOO| 00000710: 54 20 45 45 52 53 54 45 20 3A 4E 4F 4F 54 0D 20 |T EERSTE :NOOT. | 00000720: 41 4C 53 20 28 20 45 45 4E 56 41 4E 20 3A 4E 4F |ALS ( EENVAN :NO| 00000730: 4F 54 20 3D 20 22 52 20 3A 4E 4F 4F 54 20 3D 20 |OT = "R :NOOT = | 00000740: 22 2D 20 29 20 44 41 4E 20 48 45 52 48 41 41 4C |"- ) DAN HERHAAL| 00000750: 20 3A 54 45 4D 50 4F 20 2A 20 3A 44 55 55 52 20 | :TEMPO * :DUUR | 00000760: 5B 5D 20 53 54 4F 50 0D 20 4D 41 41 4B 20 22 4E |[] STOP. MAAK "N| 00000770: 54 20 3A 4E 4F 4F 54 0D 20 41 4C 53 20 4E 49 45 |T :NOOT. ALS NIE| 00000780: 54 20 47 45 54 41 4C 3F 20 3A 4E 54 20 44 41 4E |T GETAL? :NT DAN| 00000790: 20 4D 41 41 4B 20 22 4E 54 20 54 4F 4F 4E 4F 43 | MAAK "NT TOONOC| 000007A0: 54 20 2B 20 54 4F 4F 4E 4F 43 54 20 2B 20 57 41 |T + TOONOCT + WA| 000007B0: 41 52 44 45 20 3A 4E 54 0D 20 4D 41 41 4B 20 22 |ARDE :NT. MAAK "| 000007C0: 4E 54 20 3A 4E 54 20 2B 20 31 32 20 2A 20 28 20 |NT :NT + 12 * ( | 000007D0: 31 20 2B 20 3A 4F 43 54 41 41 46 20 29 0D 20 41 |1 + :OCTAAF ). A| 000007E0: 4C 53 20 3A 4E 54 20 3E 20 37 30 20 44 41 4E 20 |LS :NT > 70 DAN | 000007F0: 50 52 20 53 41 4D 45 4E 20 3A 4E 4F 4F 54 20 5B |PR SAMEN :NOOT [| 00000800: 49 53 20 54 45 20 48 4F 4F 47 5D 20 53 54 4F 50 |IS TE HOOG] STOP| 00000810: 0D 20 41 4C 53 20 3A 4E 54 20 3C 20 30 20 44 41 |. ALS :NT < 0 DA| 00000820: 4E 20 50 52 20 53 41 4D 45 4E 20 3A 4E 4F 4F 54 |N PR SAMEN :NOOT| 00000830: 20 5B 49 53 20 54 45 20 4C 41 41 47 5D 20 53 54 | [IS TE LAAG] ST| 00000840: 4F 50 0D 20 47 45 4C 55 49 44 20 28 20 45 4C 45 |OP. GELUID ( ELE| 00000850: 4D 45 4E 54 20 31 20 2B 20 28 20 52 45 53 54 20 |MENT 1 + ( REST | 00000860: 3A 4E 54 20 31 32 20 29 20 3A 4C 41 44 44 45 52 |:NT 12 ) :LADDER| 00000870: 20 29 20 2A 20 28 20 45 4C 45 4D 45 4E 54 20 31 | ) * ( ELEMENT 1| 00000880: 20 2B 20 28 20 51 55 4F 54 49 45 4E 54 20 3A 4E | + ( QUOTIENT :N| 00000890: 54 20 31 32 20 29 20 5B 30 2E 31 32 35 20 30 2E |T 12 ) [0.125 0.| 000008A0: 32 35 20 30 2E 35 20 31 20 32 20 34 20 38 5D 20 |25 0.5 1 2 4 8] | 000008B0: 29 20 3A 44 55 55 52 20 3A 41 44 20 3A 53 52 20 |) :DUUR :AD :SR | 000008C0: 3A 47 4F 4C 46 0D 45 4E 44 0D 0D 54 4F 20 4B 4C |:GOLF.END..TO KL| 000008D0: 41 4E 4B 20 3A 41 54 54 20 3A 44 45 43 20 3A 53 |ANK :ATT :DEC :S| 000008E0: 55 53 20 3A 52 45 4C 20 3A 47 4F 4C 46 56 4F 52 |US :REL :GOLFVOR| 000008F0: 4D 0D 20 41 4C 53 20 28 20 45 45 4E 56 41 4E 20 |M. ALS ( EENVAN | 00000900: 3A 41 54 54 20 3C 20 30 20 3A 44 45 43 20 3C 20 |:ATT < 0 :DEC < | 00000910: 30 20 3A 53 55 53 20 3C 20 30 20 3A 52 45 4C 20 |0 :SUS < 0 :REL | 00000920: 3C 20 30 20 3A 41 54 54 20 3E 20 31 35 20 3A 44 |< 0 :ATT > 15 :D| 00000930: 45 43 20 3E 20 31 35 20 3A 53 55 53 20 3E 20 31 |EC > 15 :SUS > 1| 00000940: 35 20 3A 52 45 4C 20 3E 20 31 35 20 29 20 44 41 |5 :REL > 15 ) DA| 00000950: 4E 20 50 52 20 5B 47 45 54 41 4C 4C 45 4E 20 4D |N PR [GETALLEN M| 00000960: 4F 45 54 45 4E 20 54 55 53 53 45 4E 20 30 20 45 |OETEN TUSSEN 0 E| 00000970: 4E 20 31 35 5D 0D 20 4D 41 41 4B 20 22 41 44 20 |N 15]. MAAK "AD | 00000980: 42 49 54 4F 52 20 28 20 42 49 54 41 4E 44 20 3A |BITOR ( BITAND :| 00000990: 41 54 54 20 31 35 20 29 20 2A 20 31 36 20 28 20 |ATT 15 ) * 16 ( | 000009A0: 42 49 54 41 4E 44 20 3A 41 44 20 31 35 20 29 0D |BITAND :AD 15 ).| 000009B0: 20 4D 41 41 4B 20 22 41 44 20 42 49 54 4F 52 20 | MAAK "AD BITOR | 000009C0: 28 20 42 49 54 41 4E 44 20 3A 44 45 43 20 31 35 |( BITAND :DEC 15| 000009D0: 20 29 20 28 20 42 49 54 41 4E 44 20 3A 41 44 20 | ) ( BITAND :AD | 000009E0: 32 34 30 20 29 0D 20 4D 41 41 4B 20 22 53 52 20 |240 ). MAAK "SR | 000009F0: 42 49 54 4F 52 20 28 20 42 49 54 41 4E 44 20 3A |BITOR ( BITAND :| 00000A00: 53 55 53 20 31 35 20 29 20 2A 20 31 36 20 28 20 |SUS 15 ) * 16 ( | 00000A10: 42 49 54 41 4E 44 20 3A 53 52 20 31 35 20 29 0D |BITAND :SR 15 ).| 00000A20: 20 4D 41 41 4B 20 22 53 52 20 42 49 54 4F 52 20 | MAAK "SR BITOR | 00000A30: 28 20 42 49 54 41 4E 44 20 3A 52 45 4C 20 31 35 |( BITAND :REL 15| 00000A40: 20 29 20 28 20 42 49 54 41 4E 44 20 3A 53 52 20 | ) ( BITAND :SR | 00000A50: 32 34 30 20 29 0D 20 4D 41 41 4B 20 22 47 4F 4C |240 ). MAAK "GOL| 00000A60: 46 20 3A 47 4F 4C 46 56 4F 52 4D 0D 45 4E 44 0D |F :GOLFVORM.END.| 00000A70: 0D 54 4F 20 53 4A 4A 4A 20 3A 44 55 55 52 0D 20 |.TO SJJJ :DUUR. | 00000A80: 4B 4C 41 4E 4B 20 39 20 35 20 30 20 30 20 31 32 |KLANK 9 5 0 0 12| 00000A90: 39 20 54 4F 4F 4E 20 5B 43 5D 20 3A 44 55 55 52 |9 TOON [C] :DUUR| 00000AA0: 0D 45 4E 44 0D 0D 54 4F 20 47 45 53 4A 4A 4A 20 |.END..TO GESJJJ | 00000AB0: 3A 44 55 52 45 4E 0D 20 41 4C 53 20 4C 45 45 47 |:DUREN. ALS LEEG| 00000AC0: 3F 20 3A 44 55 52 45 4E 20 44 41 4E 20 53 54 4F |? :DUREN DAN STO| 00000AD0: 50 0D 20 53 4A 4A 4A 20 45 45 52 53 54 45 20 3A |P. SJJJ EERSTE :| 00000AE0: 44 55 52 45 4E 0D 20 47 45 53 4A 4A 4A 20 4D 45 |DUREN. GESJJJ ME| 00000AF0: 20 3A 44 55 52 45 4E 0D 45 4E 44 0D 0D 54 4F 20 | :DUREN.END..TO | 00000B00: 21 5A 0D 20 57 45 47 20 5A 45 54 20 57 45 47 20 |!Z. WEG ZET WEG | 00000B10: 5A 45 54 31 20 57 45 47 20 5A 45 54 52 49 4A 20 |ZET1 WEG ZETRIJ | 00000B20: 57 45 47 20 5A 45 54 57 4F 4F 52 44 20 57 45 47 |WEG ZETWOORD WEG| 00000B30: 20 5A 45 54 52 41 4E 44 20 57 45 47 20 42 45 47 | ZETRAND WEG BEG| 00000B40: 49 4E 20 57 45 47 20 4E 41 41 52 50 4C 20 57 45 |IN WEG NAARPL WE| 00000B50: 47 20 50 4C 41 41 54 53 20 57 45 47 20 4B 4F 4C |G PLAATS WEG KOL| 00000B60: 4F 4D 20 57 45 47 20 52 45 47 45 4C 20 57 45 47 |OM WEG REGEL WEG| 00000B70: 20 21 5A 0D 20 2E 47 43 4F 4C 4C 20 50 52 20 2E | !Z. .GCOLL PR .| 00000B80: 4E 4F 44 45 53 0D 45 4E 44 0D 0D 54 4F 20 50 4C |NODES.END..TO PL| 00000B90: 41 41 54 53 0D 20 52 45 53 55 4C 54 41 41 54 20 |AATS. RESULTAAT | 00000BA0: 53 41 4D 45 4E 20 4B 4F 4C 4F 4D 20 52 45 47 45 |SAMEN KOLOM REGE| 00000BB0: 4C 0D 45 4E 44 0D 0D 54 4F 20 4B 4F 4C 4F 4D 0D |L.END..TO KOLOM.| 00000BC0: 20 52 45 53 20 49 4E 54 45 47 45 52 20 28 20 58 | RES INTEGER ( X| 00000BD0: 50 4F 53 20 2F 20 38 20 29 20 2B 20 31 39 0D 45 |POS / 8 ) + 19.E| 00000BE0: 4E 44 0D 0D 54 4F 20 5A 45 54 57 4F 4F 52 44 20 |ND..TO ZETWOORD | 00000BF0: 3A 57 4F 4F 52 44 0D 20 50 4F 20 56 44 20 4E 41 |:WOORD. PO VD NA| 00000C00: 41 52 48 4F 45 4B 20 39 30 0D 20 41 4C 53 20 4B |ARHOEK 90. ALS K| 00000C10: 4F 4C 4F 4D 20 3E 20 33 37 20 41 4C 53 20 52 45 |OLOM > 37 ALS RE| 00000C20: 47 45 4C 20 3C 20 31 38 20 44 41 4E 20 4E 41 41 |GEL < 18 DAN NAA| 00000C30: 52 50 4C 20 30 20 52 45 47 45 4C 20 2B 20 31 20 |RPL 0 REGEL + 1 | 00000C40: 41 4E 44 45 52 53 20 4E 41 41 52 50 4C 20 30 20 |ANDERS NAARPL 0 | 00000C50: 30 0D 20 41 4C 53 20 3A 57 4F 4F 52 44 20 3D 20 |0. ALS :WOORD = | 00000C60: 22 20 44 41 4E 20 53 54 45 4D 50 45 4C 20 22 20 |" DAN STEMPEL " | 00000C70: 4E 41 41 52 58 20 58 50 4F 53 20 2B 20 38 20 53 |NAARX XPOS + 8 S| 00000C80: 54 4F 50 0D 20 53 54 45 4D 50 45 4C 20 45 45 52 |TOP. STEMPEL EER| 00000C90: 53 54 45 20 3A 57 4F 4F 52 44 20 4E 41 41 52 58 |STE :WOORD NAARX| 00000CA0: 20 58 50 4F 53 20 2B 20 38 0D 20 5A 45 54 57 4F | XPOS + 8. ZETWO| 00000CB0: 4F 52 44 20 4D 45 20 3A 57 4F 4F 52 44 0D 45 4E |ORD ME :WOORD.EN| 00000CC0: 44 0D 0D 54 4F 20 4E 41 41 52 50 4C 20 3A 4B 4F |D..TO NAARPL :KO| 00000CD0: 4C 4F 4D 20 3A 52 45 47 45 4C 0D 20 4C 4F 4B 41 |LOM :REGEL. LOKA| 00000CE0: 41 4C 20 22 50 20 4D 41 41 4B 20 22 50 20 45 45 |AL "P MAAK "P EE| 00000CF0: 52 53 54 45 20 54 4F 45 53 54 41 4E 44 20 50 4F |RSTE TOESTAND PO| 00000D00: 0D 20 41 4C 53 20 28 20 45 45 4E 56 41 4E 20 3A |. ALS ( EENVAN :| 00000D10: 52 45 47 45 4C 20 3E 20 31 38 20 3A 52 45 47 45 |REGEL > 18 :REGE| 00000D20: 4C 20 3C 20 30 20 3A 4B 4F 4C 4F 4D 20 3C 20 30 |L < 0 :KOLOM < 0| 00000D30: 20 3A 4B 4F 4C 4F 4D 20 3E 20 33 38 20 29 20 44 | :KOLOM > 38 ) D| 00000D40: 41 4E 20 50 52 49 4E 54 20 5B 42 55 49 54 45 4E |AN PRINT [BUITEN| 00000D50: 20 52 41 4E 44 5D 20 53 54 4F 50 0D 20 4E 41 41 | RAND] STOP. NAA| 00000D60: 52 58 20 28 20 3A 4B 4F 4C 4F 4D 20 2D 20 31 39 |RX ( :KOLOM - 19| 00000D70: 20 29 20 2A 20 38 0D 20 4E 41 41 52 59 20 28 20 | ) * 8. NAARY ( | 00000D80: 31 32 20 2D 20 3A 52 45 47 45 4C 20 29 20 2A 20 |12 - :REGEL ) * | 00000D90: 31 30 2E 34 0D 20 41 4C 53 20 3A 50 20 44 41 4E |10.4. ALS :P DAN| 00000DA0: 20 50 4E 0D 45 4E 44 0D 0D 54 4F 20 52 45 47 45 | PN.END..TO REGE| 00000DB0: 4C 0D 20 52 45 53 20 49 4E 54 45 47 45 52 20 28 |L. RES INTEGER (| 00000DC0: 20 31 32 2E 31 20 2D 20 59 50 4F 53 20 2F 20 31 | 12.1 - YPOS / 1| 00000DD0: 30 2E 34 20 29 0D 45 4E 44 0D 0D 54 4F 20 5A 45 |0.4 ).END..TO ZE| 00000DE0: 54 31 20 3A 54 45 4B 53 54 0D 20 41 4C 53 20 57 |T1 :TEKST. ALS W| 00000DF0: 4F 4F 52 44 3F 20 3A 54 45 4B 53 54 20 44 41 4E |OORD? :TEKST DAN| 00000E00: 20 5A 45 54 57 4F 4F 52 44 20 3A 54 45 4B 53 54 | ZETWOORD :TEKST| 00000E10: 20 4E 41 41 52 58 20 58 50 4F 53 20 2D 20 38 20 | NAARX XPOS - 8 | 00000E20: 4B 4F 4D 20 53 54 4F 50 0D 20 41 4C 53 20 4C 45 |KOM STOP. ALS LE| 00000E30: 45 47 3F 20 3A 54 45 4B 53 54 20 44 41 4E 20 4E |EG? :TEKST DAN N| 00000E40: 41 41 52 58 20 58 50 4F 53 20 2D 20 38 20 4B 4F |AARX XPOS - 8 KO| 00000E50: 4D 20 53 54 4F 50 0D 20 5A 45 54 57 4F 4F 52 44 |M STOP. ZETWOORD| 00000E60: 20 45 45 52 53 54 45 20 3A 54 45 4B 53 54 20 5A | EERSTE :TEKST Z| 00000E70: 45 54 31 20 4D 45 20 3A 54 45 4B 53 54 0D 45 4E |ET1 ME :TEKST.EN| 00000E80: 44 0D 0D 54 4F 20 5A 45 54 52 49 4A 20 3A 4E 20 |D..TO ZETRIJ :N | 00000E90: 3A 54 4F 45 54 53 0D 20 4C 4F 4B 41 41 4C 20 22 |:TOETS. LOKAAL "| 00000EA0: 54 20 4C 4F 4B 41 41 4C 20 22 50 0D 20 4D 41 41 |T LOKAAL "P. MAA| 00000EB0: 4B 20 22 50 20 45 45 52 53 54 45 20 54 4F 45 53 |K "P EERSTE TOES| 00000EC0: 54 41 4E 44 0D 20 41 4C 53 20 4E 49 45 54 20 47 |TAND. ALS NIET G| 00000ED0: 45 54 41 4C 3F 20 3A 4E 20 50 52 49 4E 54 20 5B |ETAL? :N PRINT [| 00000EE0: 47 45 54 41 4C 20 45 45 52 53 54 5D 20 53 54 4F |GETAL EERST] STO| 00000EF0: 50 0D 20 41 4C 53 20 3A 4E 20 3E 20 30 20 4D 41 |P. ALS :N > 0 MA| 00000F00: 41 4B 20 22 54 20 31 20 41 4E 44 45 52 53 20 4D |AK "T 1 ANDERS M| 00000F10: 41 41 4B 20 22 54 20 28 20 2D 20 31 20 29 0D 20 |AAK "T ( - 1 ). | 00000F20: 41 4C 53 20 4C 45 45 47 3F 20 3A 54 4F 45 54 53 |ALS LEEG? :TOETS| 00000F30: 20 44 41 4E 20 4D 41 41 4B 20 22 54 4F 45 54 53 | DAN MAAK "TOETS| 00000F40: 20 22 20 41 4E 44 45 52 53 20 41 4C 53 20 4C 49 | " ANDERS ALS LI| 00000F50: 4A 53 54 3F 20 3A 54 4F 45 54 53 20 44 41 4E 20 |JST? :TOETS DAN | 00000F60: 4D 41 41 4B 20 22 54 4F 45 54 53 20 45 45 52 53 |MAAK "TOETS EERS| 00000F70: 54 45 20 45 45 52 53 54 45 20 3A 54 4F 45 54 53 |TE EERSTE :TOETS| 00000F80: 20 41 4E 44 45 52 53 20 4D 41 41 4B 20 22 54 4F | ANDERS MAAK "TO| 00000F90: 45 54 53 20 45 45 52 53 54 45 20 3A 54 4F 45 54 |ETS EERSTE :TOET| 00000FA0: 53 0D 20 50 4F 20 48 45 52 48 41 41 4C 20 3A 4E |S. PO HERHAAL :N| 00000FB0: 20 2A 20 3A 54 20 5B 53 54 45 4D 50 45 4C 20 3A | * :T [STEMPEL :| 00000FC0: 54 4F 45 54 53 20 56 54 20 38 20 2A 20 3A 54 5D |TOETS VT 8 * :T]| 00000FD0: 0D 20 41 4C 53 20 3A 50 20 44 41 4E 20 50 4E 0D |. ALS :P DAN PN.| 00000FE0: 45 4E 44 0D 0D 54 4F 20 4B 41 4E 54 45 45 4C 0D |END..TO KANTEEL.| 00000FF0: 20 52 45 20 39 30 20 56 54 20 35 20 52 45 20 39 | RE 90 VT 5 RE 9| 00001000: 30 20 56 54 20 35 20 4C 49 20 39 30 20 56 54 20 |0 VT 5 LI 90 VT | 00001010: 35 20 4C 49 20 39 30 20 56 54 20 35 0D 45 4E 44 |5 LI 90 VT 5.END| 00001020: 0D 0D 54 4F 20 4B 41 53 54 45 45 4C 0D 20 4E 42 |..TO KASTEEL. NB| 00001030: 20 4D 53 20 50 4F 20 41 54 20 35 30 0D 20 41 54 | MS PO AT 50. AT| 00001040: 20 32 30 0D 20 52 45 20 39 30 20 56 54 20 38 30 | 20. RE 90 VT 80| 00001050: 0D 20 56 54 20 34 30 0D 20 50 4E 20 41 54 20 31 |. VT 40. PN AT 1| 00001060: 37 30 0D 20 41 54 20 37 30 0D 20 4C 49 20 39 30 |70. AT 70. LI 90| 00001070: 20 56 54 20 38 30 20 4C 49 20 39 30 20 56 54 20 | VT 80 LI 90 VT | 00001080: 31 30 20 52 45 20 39 30 20 56 54 20 32 30 20 48 |10 RE 90 VT 20 H| 00001090: 45 52 48 41 41 4C 20 35 20 5B 4B 41 4E 54 45 45 |ERHAAL 5 [KANTEE| 000010A0: 4C 5D 0D 20 52 45 20 39 30 20 56 54 20 35 20 52 |L]. RE 90 VT 5 R| 000010B0: 45 20 39 30 20 56 54 20 32 30 20 52 45 20 39 30 |E 90 VT 20 RE 90| 000010C0: 20 56 54 20 31 30 20 4C 49 20 39 30 20 56 54 20 | VT 10 LI 90 VT | 000010D0: 38 30 0D 20 41 54 20 36 30 20 52 45 20 31 38 30 |80. AT 60 RE 180| 000010E0: 20 48 45 52 48 41 41 4C 20 31 30 20 5B 4B 41 4E | HERHAAL 10 [KAN| 000010F0: 54 45 45 4C 5D 0D 20 48 45 52 48 41 41 4C 20 35 |TEEL]. HERHAAL 5| 00001100: 20 5B 4B 41 4E 54 45 45 4C 5D 0D 20 52 45 20 39 | [KANTEEL]. RE 9| 00001110: 30 20 56 54 20 35 20 4C 49 20 39 30 20 41 54 20 |0 VT 5 LI 90 AT | 00001120: 36 30 20 56 54 20 38 30 0D 20 4C 49 20 39 30 20 |60 VT 80. LI 90 | 00001130: 56 54 20 31 30 20 52 45 20 39 30 20 56 54 20 32 |VT 10 RE 90 VT 2| 00001140: 30 0D 20 48 45 52 48 41 41 4C 20 35 20 5B 4B 41 |0. HERHAAL 5 [KA| 00001150: 4E 54 45 45 4C 5D 20 52 45 20 39 30 20 56 54 20 |NTEEL] RE 90 VT | 00001160: 35 20 52 45 20 39 30 20 56 54 20 32 30 20 52 45 |5 RE 90 VT 20 RE| 00001170: 20 39 30 20 56 54 20 31 30 20 4C 49 20 39 30 20 | 90 VT 10 LI 90 | 00001180: 56 54 20 38 30 0D 20 4C 49 20 39 30 20 47 55 4D |VT 80. LI 90 GUM| 00001190: 20 56 54 20 32 30 20 50 45 4E 20 50 4F 20 4E 42 | VT 20 PEN PO NB| 000011A0: 0D 20 41 54 20 36 30 0D 20 41 54 20 35 0D 20 52 |. AT 60. AT 5. R| 000011B0: 45 20 39 30 20 50 4E 20 56 54 20 35 0D 20 47 55 |E 90 PN VT 5. GU| 000011C0: 4D 20 41 54 20 35 20 4C 49 20 39 30 20 50 45 4E |M AT 5 LI 90 PEN| 000011D0: 0D 20 56 54 20 32 30 0D 20 41 54 20 32 35 0D 20 |. VT 20. AT 25. | 000011E0: 56 54 20 32 35 0D 20 4C 49 20 39 30 20 56 54 20 |VT 25. LI 90 VT | 000011F0: 31 35 20 4C 49 20 39 30 20 56 54 20 32 35 0D 45 |15 LI 90 VT 25.E| 00001200: 4E 44 0D 0D 54 4F 20 5A 45 54 52 41 4E 44 0D 20 |ND..TO ZETRAND. | 00001210: 4C 4F 4B 41 41 4C 20 22 58 30 20 4D 41 41 4B 20 |LOKAAL "X0 MAAK | 00001220: 22 58 30 20 58 50 4F 53 20 4C 4F 4B 41 41 4C 20 |"X0 XPOS LOKAAL | 00001230: 22 59 30 20 4D 41 41 4B 20 22 59 30 20 59 50 4F |"Y0 MAAK "Y0 YPO| 00001240: 53 0D 20 50 4F 20 4E 41 41 52 58 59 20 2D 20 31 |S. PO NAARXY - 1| 00001250: 36 30 20 31 33 30 20 50 4E 20 4E 41 41 52 59 20 |60 130 PN NAARY | 00001260: 2D 20 37 35 20 4E 41 41 52 58 20 31 35 39 20 4E |- 75 NAARX 159 N| 00001270: 41 41 52 59 20 31 33 30 20 4E 41 41 52 58 20 2D |AARY 130 NAARX -| 00001280: 20 31 36 30 0D 20 50 4F 20 4E 41 41 52 58 59 20 | 160. PO NAARXY | 00001290: 3A 58 30 20 3A 59 30 0D 45 4E 44 0D 0D 54 4F 20 |:X0 :Y0.END..TO | 000012A0: 42 45 47 49 4E 0D 20 50 4F 20 4E 41 41 52 50 4C |BEGIN. PO NAARPL| 000012B0: 20 30 20 30 20 4D 53 20 4E 41 41 52 48 4F 45 4B | 0 0 MS NAARHOEK| 000012C0: 20 39 30 0D 45 4E 44 0D 0D 54 4F 20 5A 45 54 20 | 90.END..TO ZET | 000012D0: 3A 54 45 4B 53 54 0D 20 53 50 52 4F 4F 4B 20 30 |:TEKST. SPROOK 0| 000012E0: 20 4B 4F 4D 20 5A 45 54 31 20 3A 54 45 4B 53 54 | KOM ZET1 :TEKST| 000012F0: 0D 20 41 4C 53 20 52 45 47 45 4C 20 3C 20 31 38 |. ALS REGEL < 18| 00001300: 20 44 41 4E 20 4E 41 41 52 50 4C 20 30 20 52 45 | DAN NAARPL 0 RE| 00001310: 47 45 4C 20 2B 20 31 20 41 4E 44 45 52 53 20 4E |GEL + 1 ANDERS N| 00001320: 41 41 52 50 4C 20 30 20 30 0D 45 4E 44 0D 0D 54 |AARPL 0 0.END..T| 00001330: 4F 20 52 41 41 4D 0D 20 48 45 52 48 41 41 4C 20 |O RAAM. HERHAAL | 00001340: 34 20 5B 52 45 20 39 30 20 56 49 45 52 4B 41 4E |4 [RE 90 VIERKAN| 00001350: 54 5D 0D 20 50 4F 20 56 54 20 34 35 20 50 4E 20 |T]. PO VT 45 PN | 00001360: 52 45 20 39 30 20 56 54 20 34 35 20 48 45 52 48 |RE 90 VT 45 HERH| 00001370: 41 41 4C 20 34 20 5B 52 45 20 39 30 20 56 54 20 |AAL 4 [RE 90 VT | 00001380: 39 30 5D 0D 45 4E 44 0D 0D 54 4F 20 44 49 41 4D |90].END..TO DIAM| 00001390: 41 4E 54 20 0D 45 4E 44 0D 0D 54 4F 20 41 43 48 |ANT .END..TO ACH| 000013A0: 54 48 4F 45 4B 0D 20 48 45 52 48 41 41 4C 20 38 |THOEK. HERHAAL 8| 000013B0: 20 5B 56 54 20 32 35 20 52 45 20 34 35 5D 0D 45 | [VT 25 RE 45].E| 000013C0: 4E 44 0D 0D 54 4F 20 56 49 45 52 4B 41 4E 54 0D |ND..TO VIERKANT.| 000013D0: 20 48 45 52 48 41 41 4C 20 34 20 5B 56 54 20 34 | HERHAAL 4 [VT 4| 000013E0: 30 20 52 45 20 39 30 5D 0D 45 4E 44 0D 0D 54 4F |0 RE 90].END..TO| 000013F0: 20 26 42 0D 20 26 26 20 22 50 52 49 4E 54 42 0D | &B. && "PRINTB.| 00001400: 45 4E 44 0D 0D 54 4F 20 21 48 0D 20 57 45 47 20 |END..TO !H. WEG | 00001410: 5B 42 45 57 41 41 52 50 20 4F 4E 54 48 4F 55 44 |[BEWAARP ONTHOUD| 00001420: 20 50 52 4F 47 20 41 4E 54 57 4F 4F 52 44 31 20 | PROG ANTWOORD1 | 00001430: 49 4E 20 45 45 4E 55 49 54 20 50 45 4E 20 42 4F |IN EENUIT PEN BO| 00001440: 4F 47 4A 45 20 57 41 43 48 54 20 53 50 41 54 49 |OGJE WACHT SPATI| 00001450: 45 20 53 50 20 52 55 49 4D 54 45 20 26 56 20 26 |E SP RUIMTE &V &| 00001460: 4C 20 26 50 20 26 5A 20 26 4D 20 26 53 20 26 26 |L &P &Z &M &S &&| 00001470: 20 26 42 20 21 48 5D 0D 45 4E 44 0D 0D 54 4F 20 | &B !H].END..TO | 00001480: 42 45 57 41 41 52 50 20 3A 42 45 53 54 41 4E 44 |BEWAARP :BESTAND| 00001490: 20 3A 4E 41 4D 45 4E 0D 20 28 20 42 45 57 41 41 | :NAMEN. ( BEWAA| 000014A0: 52 20 3A 42 45 53 54 41 4E 44 20 3A 4E 41 4D 45 |R :BESTAND :NAME| 000014B0: 4E 20 29 0D 20 50 52 20 22 42 45 57 41 41 52 44 |N ). PR "BEWAARD| 000014C0: 0D 45 4E 44 0D 0D 54 4F 20 4F 4E 54 48 4F 55 44 |.END..TO ONTHOUD| 000014D0: 20 3A 4E 41 41 4D 0D 20 50 52 49 4E 54 31 20 22 | :NAAM. PRINT1 "| 000014E0: 3E 20 44 45 46 49 4E 49 45 45 52 20 3A 4E 41 41 |> DEFINIEER :NAA| 000014F0: 4D 20 5A 45 54 56 20 5B 5D 20 50 52 4F 47 20 3A |M ZETV [] PROG :| 00001500: 4E 41 41 4D 20 41 4E 54 57 4F 4F 52 44 0D 45 4E |NAAM ANTWOORD.EN| 00001510: 44 0D 0D 54 4F 20 50 52 4F 47 20 3A 4E 41 41 4D |D..TO PROG :NAAM| 00001520: 20 3A 43 4F 4D 4D 0D 20 41 4C 53 20 3A 43 4F 4D | :COMM. ALS :COM| 00001530: 4D 20 3D 20 5B 45 4E 44 5D 20 50 52 49 4E 54 20 |M = [END] PRINT | 00001540: 53 41 4D 45 4E 20 3A 4E 41 41 4D 20 5B 47 45 4C |SAMEN :NAAM [GEL| 00001550: 45 45 52 44 5D 20 52 45 53 20 5B 5D 0D 20 52 55 |EERD] RES []. RU| 00001560: 4E 20 3A 43 4F 4D 4D 20 50 52 49 4E 54 31 20 22 |N :COMM PRINT1 "| 00001570: 3E 0D 20 52 45 53 20 5A 45 54 56 20 3A 43 4F 4D |>. RES ZETV :COM| 00001580: 4D 20 50 52 4F 47 20 3A 4E 41 41 4D 20 41 4E 54 |M PROG :NAAM ANT| 00001590: 57 4F 4F 52 44 0D 45 4E 44 0D 0D 54 4F 20 41 4E |WOORD.END..TO AN| 000015A0: 54 57 4F 4F 52 44 31 0D 20 4C 4F 4B 41 41 4C 20 |TWOORD1. LOKAAL | 000015B0: 22 41 20 4D 41 41 4B 20 22 41 20 41 4E 54 57 4F |"A MAAK "A ANTWO| 000015C0: 4F 52 44 0D 20 41 4C 53 20 4C 45 45 47 3F 20 3A |ORD. ALS LEEG? :| 000015D0: 41 20 52 45 53 20 22 20 41 4E 44 45 52 53 20 52 |A RES " ANDERS R| 000015E0: 45 53 20 45 45 52 53 54 45 20 3A 41 0D 45 4E 44 |ES EERSTE :A.END| 000015F0: 0D 0D 54 4F 20 49 4E 20 3A 4C 49 4A 53 54 20 3A |..TO IN :LIJST :| 00001600: 54 45 4B 53 54 0D 20 41 4C 53 20 57 4F 4F 52 44 |TEKST. ALS WOORD| 00001610: 3F 20 3A 54 45 4B 53 54 20 4D 41 41 4B 20 22 54 |? :TEKST MAAK "T| 00001620: 45 4B 53 54 20 53 41 4D 45 4E 20 3A 54 45 4B 53 |EKST SAMEN :TEKS| 00001630: 54 20 5B 5D 0D 20 41 4C 53 20 4C 45 45 47 3F 20 |T []. ALS LEEG? | 00001640: 3A 54 45 4B 53 54 20 52 45 53 55 4C 54 41 41 54 |:TEKST RESULTAAT| 00001650: 20 22 57 41 41 52 0D 20 41 4C 53 20 4E 49 45 54 | "WAAR. ALS NIET| 00001660: 20 45 52 42 49 4A 3F 20 45 45 52 53 54 45 20 3A | ERBIJ? EERSTE :| 00001670: 54 45 4B 53 54 20 3A 4C 49 4A 53 54 20 52 45 53 |TEKST :LIJST RES| 00001680: 20 22 4E 49 45 54 57 0D 20 52 45 53 55 4C 54 41 | "NIETW. RESULTA| 00001690: 41 54 20 49 4E 20 3A 4C 49 4A 53 54 20 4D 45 20 |AT IN :LIJST ME | 000016A0: 3A 54 45 4B 53 54 0D 45 4E 44 0D 0D 54 4F 20 45 |:TEKST.END..TO E| 000016B0: 45 4E 55 49 54 20 3A 4C 49 4A 53 54 0D 20 52 45 |ENUIT :LIJST. RE| 000016C0: 53 55 4C 54 41 41 54 20 53 41 4D 45 4E 20 5B 5D |SULTAAT SAMEN []| 000016D0: 20 45 4C 45 4D 45 4E 54 20 28 20 31 20 2B 20 52 | ELEMENT ( 1 + R| 000016E0: 41 4E 44 4F 4D 20 41 41 4E 54 41 4C 20 3A 4C 49 |ANDOM AANTAL :LI| 000016F0: 4A 53 54 20 29 20 3A 4C 49 4A 53 54 0D 45 4E 44 |JST ) :LIJST.END| 00001700: 0D 0D 54 4F 20 50 45 4E 0D 20 4B 4C 20 31 0D 45 |..TO PEN. KL 1.E| 00001710: 4E 44 0D 0D 54 4F 20 42 4F 4F 47 4A 45 20 3A 53 |ND..TO BOOGJE :S| 00001720: 54 52 41 41 4C 0D 20 48 45 52 48 41 41 4C 20 31 |TRAAL. HERHAAL 1| 00001730: 30 20 5B 56 54 20 33 2E 31 34 31 20 2A 20 3A 53 |0 [VT 3.141 * :S| 00001740: 54 52 41 41 4C 20 2F 20 32 30 20 52 45 20 39 5D |TRAAL / 20 RE 9]| 00001750: 0D 45 4E 44 0D 0D 54 4F 20 57 41 43 48 54 20 3A |.END..TO WACHT :| 00001760: 54 49 4A 44 0D 20 48 45 52 48 41 41 4C 20 37 35 |TIJD. HERHAAL 75| 00001770: 30 20 2A 20 3A 54 49 4A 44 20 5B 5D 0D 45 4E 44 |0 * :TIJD [].END| 00001780: 0D 0D 54 4F 20 53 50 41 54 49 45 20 3A 41 41 4E |..TO SPATIE :AAN| 00001790: 54 41 4C 0D 20 41 4C 53 20 3A 41 41 4E 54 41 4C |TAL. ALS :AANTAL| 000017A0: 20 3D 20 31 20 52 45 53 20 43 48 41 52 20 33 32 | = 1 RES CHAR 32| 000017B0: 0D 20 52 45 53 20 57 4F 4F 52 44 20 43 48 41 52 |. RES WOORD CHAR| 000017C0: 20 33 32 20 53 50 41 54 49 45 20 3A 41 41 4E 54 | 32 SPATIE :AANT| 000017D0: 41 4C 20 2D 20 31 0D 45 4E 44 0D 0D 54 4F 20 53 |AL - 1.END..TO S| 000017E0: 50 20 3A 41 41 4E 54 41 4C 0D 20 52 45 53 55 4C |P :AANTAL. RESUL| 000017F0: 54 41 41 54 20 53 50 41 54 49 45 20 3A 41 41 4E |TAAT SPATIE :AAN| 00001800: 54 41 4C 0D 45 4E 44 0D 0D 54 4F 20 52 55 49 4D |TAL.END..TO RUIM| 00001810: 54 45 0D 20 2E 47 43 4F 4C 4C 20 50 52 20 2E 4E |TE. .GCOLL PR .N| 00001820: 4F 44 45 53 0D 45 4E 44 0D 0D 54 4F 20 26 56 0D |ODES.END..TO &V.| 00001830: 20 26 26 20 22 56 4F 52 4D 45 4E 0D 45 4E 44 0D | && "VORMEN.END.| 00001840: 0D 54 4F 20 26 4C 0D 20 26 26 20 22 4C 49 4A 53 |.TO &L. && "LIJS| 00001850: 54 45 4E 0D 45 4E 44 0D 0D 54 4F 20 26 50 0D 20 |TEN.END..TO &P. | 00001860: 26 26 20 22 50 52 49 4E 54 56 0D 45 4E 44 0D 0D |&& "PRINTV.END..| 00001870: 54 4F 20 26 5A 0D 20 26 26 20 22 5A 45 54 54 45 |TO &Z. && "ZETTE| 00001880: 4E 0D 45 4E 44 0D 0D 54 4F 20 26 4D 0D 20 26 26 |N.END..TO &M. &&| 00001890: 20 22 4D 55 5A 49 45 4B 0D 45 4E 44 0D 0D 54 4F | "MUZIEK.END..TO| 000018A0: 20 26 53 0D 20 26 26 20 22 53 50 52 4F 4B 45 4E | &S. && "SPROKEN| 000018B0: 0D 45 4E 44 0D 0D 54 4F 20 26 26 20 3A 58 0D 20 |.END..TO && :X. | 000018C0: 53 43 48 52 49 4A 56 45 4E 0D 20 4D 41 41 4B 20 |SCHRIJVEN. MAAK | 000018D0: 22 58 20 57 4F 4F 52 44 20 22 4C 4F 47 4F 20 3A |"X WOORD "LOGO :| 000018E0: 58 0D 20 50 52 20 53 41 4D 45 4E 20 3A 58 20 5B |X. PR SAMEN :X [| 000018F0: 57 4F 52 44 54 20 4E 55 20 47 45 4C 41 44 45 4E |WORDT NU GELADEN| 00001900: 5D 0D 20 4C 41 41 44 20 3A 58 0D 45 4E 44 0D 0D |]. LAAD :X.END..| 00001910: 4D 41 41 4B 20 22 47 49 53 20 28 38 29 0D 4D 41 |MAAK "GIS (8).MA| 00001920: 41 4B 20 22 46 49 53 20 28 36 29 0D 4D 41 41 4B |AK "FIS (6).MAAK| 00001930: 20 22 44 49 53 20 28 33 29 0D 4D 41 41 4B 20 22 | "DIS (3).MAAK "| 00001940: 43 49 53 20 28 31 29 0D 4D 41 41 4B 20 22 42 45 |CIS (1).MAAK "BE| 00001950: 53 20 28 31 30 29 0D 4D 41 41 4B 20 22 41 49 53 |S (10).MAAK "AIS| 00001960: 20 28 31 30 29 0D 4D 41 41 4B 20 22 47 20 28 37 | (10).MAAK "G (7| 00001970: 29 0D 4D 41 41 4B 20 22 46 20 28 35 29 0D 4D 41 |).MAAK "F (5).MA| 00001980: 41 4B 20 22 45 20 28 34 29 0D 4D 41 41 4B 20 22 |AK "E (4).MAAK "| 00001990: 44 20 28 32 29 0D 4D 41 41 4B 20 22 42 20 28 31 |D (2).MAAK "B (1| 000019A0: 31 29 0D 4D 41 41 4B 20 22 4C 41 44 44 45 52 20 |1).MAAK "LADDER | 000019B0: 5B 38 37 37 39 20 39 33 30 31 20 39 38 35 34 20 |[8779 9301 9854 | 000019C0: 31 30 34 34 30 20 31 31 30 36 30 20 31 31 37 31 |10440 11060 1171| 000019D0: 38 20 31 32 34 31 35 20 31 33 31 35 33 20 31 33 |8 12415 13153 13| 000019E0: 39 33 35 20 31 34 37 36 34 20 31 35 37 34 32 20 |935 14764 15742 | 000019F0: 31 36 35 37 32 20 31 37 35 35 37 20 31 38 36 30 |16572 17557 1860| 00001A00: 31 5D 0D 4D 41 41 4B 20 22 4F 43 54 41 41 46 20 |1].MAAK "OCTAAF | 00001A10: 28 31 29 0D 4D 41 41 4B 20 22 54 45 4D 50 4F 20 |(1).MAAK "TEMPO | 00001A20: 28 32 30 29 0D 4D 41 41 4B 20 22 4C 50 20 28 31 |(20).MAAK "LP (1| 00001A30: 35 29 0D 4D 41 41 4B 20 22 48 50 20 28 31 35 29 |5).MAAK "HP (15)| 00001A40: 0D 4D 41 41 4B 20 22 47 4F 4C 46 20 28 31 37 29 |.MAAK "GOLF (17)| 00001A50: 0D 4D 41 41 4B 20 22 53 52 20 28 30 29 0D 4D 41 |.MAAK "SR (0).MA| 00001A60: 41 4B 20 22 41 44 20 28 39 29 0D 4D 41 41 4B 20 |AK "AD (9).MAAK | 00001A70: 22 43 20 28 30 29 0D 4D 41 41 4B 20 22 41 20 28 |"C (0).MAAK "A (| 00001A80: 39 29 0D 4D 41 41 4B 20 22 53 54 41 52 54 4F 50 |9).MAAK "STARTOP| 00001A90: 20 5B 5A 45 54 4F 50 5D 0D | [ZETOP]. |
. TO ZETOP. TEMPO 20. MAAK "AD 9. MAAK " SR 0. MAAK "GOLF 17. MAAK "OCTAAF 1. MAA K "HP 15. MAAK "LP 15. MAAK "LADDER [877 9 9301 9854 10440 11060 11718 12415 1315 3 13935 14764 15742 16572 17557 18601]. MAAK "A 9. MAAK "B 11. MAAK "C 0. MAAK " D 2. MAAK "E 4. MAAK "F 5. MAAK "G 7. MA AK "AIS 10. MAAK "BES 10. MAAK "CIS 1. M AAK "DIS 3. MAAK "FIS 6. MAAK "GIS 8.END ..TO PULS :BREEDTE. .DEPOSIT 54275 QUOTI ENT :BREEDTE 256. .DEPOSIT 54274 BITAND :BREEDTE 255.END..TO !M. WEG PULS WEG TO ONOCT WEG OCTAAF WEG GOLF WEG TEMPO. WEG ZING WEG SPEEL WEG TOON WEG GELUID WEG KLANK WEG ZETOP. WEG PIANO WEG XYLOFOON WEG BANJO WEG FLUIT WEG SJJJ WEG GESJJJ WEG NAMEN WEG !M .GCOLL PR .NODES.END..T O ZING :NOTEN. ALS :NOTEN = [] DAN STOP. TOON EERSTE :NOTEN 10. ZING ME :NOTEN.E ND..TO SPEEL :NOTEN :DUREN. ALS LEEG? :N OTEN STOP. TOON EERSTE :NOTEN EERSTE :DU REN. SPEEL ME :NOTEN ME :DUREN.END..TO O CTAAF :N. ALS :N = "+ MAAK "OCTAAF :OCTA AF + 1 STOP. ALS :N = "- MAAK "OCTAAF :O CTAAF - 1 STOP. ALS EENVAN :N < - 2 :N > 4 PR [KAN NIET]. MAAK "OCTAAF :N.END..T O TOONOCT. ALS LAATSTE :NT = "+ MAAK "NT ML :NT RES 12. ALS LAATSTE :NT = "- MAA K "NT ML :NT RES - 12. RES 0.END..TO TEM PO :N. MAAK "TEMPO :N.END..TO GELUID :NO OT :DUUR :AD :SR :GOLF. .DEPOSIT 54296 1 5. .DEPOSIT 54277 :AD. .DEPOSIT 54278 :S R. .DEPOSIT 54273 QUOTIENT :NOOT 256. .D EPOSIT 54272 BITAND :NOOT 255. .DEPOSIT 54276 :GOLF. ALS :GOLF = 65 DAN .DEPOSIT 54274 :LP .DEPOSIT 54275 :HP. HERHAAL : DUUR * :TEMPO []. .DEPOSIT 54276 0.END.. TO PIANO. MAAK "AD 12 MAAK "SR 12 MAAK " GOLF 33.END..TO XYLOFOON. MAAK "AD 24 MA AK "SR 15 MAAK "GOLF 17.END..TO BANJO. M AAK "AD 9 MAAK "SR 0 MAAK "GOLF 65 MAAK "HP 10 MAAK "LP 10.END..TO GOLF :N. MAAK "GOLF :N.END..TO FLUIT. MAAK "AD 135 MA AK "SR 15 MAAK "GOLF 17.END..TO TOON :NO OT :DUUR. LOKAAL "NT. ALS LIJST? :NOOT M AAK "NOOT EERSTE :NOOT. ALS ( EENVAN :NO OT = "R :NOOT = "- ) DAN HERHAAL :TEMPO * :DUUR [] STOP. MAAK "NT :NOOT. ALS NIE T GETAL? :NT DAN MAAK "NT TOONOCT + TOON OCT + WAARDE :NT. MAAK "NT :NT + 12 * ( 1 + :OCTAAF ). ALS :NT > 70 DAN PR SAMEN :NOOT [IS TE HOOG] STOP. ALS :NT < 0 DA N PR SAMEN :NOOT [IS TE LAAG] STOP. GELU ID ( ELEMENT 1 + ( REST :NT 12 ) :LADDER ) * ( ELEMENT 1 + ( QUOTIENT :NT 12 ) [ 0.125 0.25 0.5 1 2 4 8] ) :DUUR :AD :SR :GOLF.END..TO KLANK :ATT :DEC :SUS :REL :GOLFVORM. ALS ( EENVAN :ATT < 0 :DEC < 0 :SUS < 0 :REL < 0 :ATT > 15 :DEC > 15 :SUS > 15 :REL > 15 ) DAN PR [GETALLEN M OETEN TUSSEN 0 EN 15]. MAAK "AD BITOR ( BITAND :ATT 15 ) * 16 ( BITAND :AD 15 ). MAAK "AD BITOR ( BITAND :DEC 15 ) ( BIT AND :AD 240 ). MAAK "SR BITOR ( BITAND : SUS 15 ) * 16 ( BITAND :SR 15 ). MAAK "S R BITOR ( BITAND :REL 15 ) ( BITAND :SR 240 ). MAAK "GOLF :GOLFVORM.END..TO SJJJ :DUUR. KLANK 9 5 0 0 129 TOON [C] :DUUR .END..TO GESJJJ :DUREN. ALS LEEG? :DUREN DAN STOP. SJJJ EERSTE :DUREN. GESJJJ ME :DUREN.END..TO !Z. WEG ZET WEG ZET1 WEG ZETRIJ WEG ZETWOORD WEG ZETRAND WEG BEG IN WEG NAARPL WEG PLAATS WEG KOLOM WEG R EGEL WEG !Z. .GCOLL PR .NODES.END..TO PL AATS. RESULTAAT SAMEN KOLOM REGEL.END..T O KOLOM. RES INTEGER ( XPOS / 8 ) + 19.E ND..TO ZETWOORD :WOORD. PO VD NAARHOEK 9 0. ALS KOLOM > 37 ALS REGEL < 18 DAN NAA RPL 0 REGEL + 1 ANDERS NAARPL 0 0. ALS : WOORD = " DAN STEMPEL " NAARX XPOS + 8 S TOP. STEMPEL EERSTE :WOORD NAARX XPOS + 8. ZETWOORD ME :WOORD.END..TO NAARPL :KO LOM :REGEL. LOKAAL "P MAAK "P EERSTE TOE STAND PO. ALS ( EENVAN :REGEL > 18 :REGE L < 0 :KOLOM < 0 :KOLOM > 38 ) DAN PRINT [BUITEN RAND] STOP. NAARX ( :KOLOM - 19 ) * 8. NAARY ( 12 - :REGEL ) * 10.4. AL S :P DAN PN.END..TO REGEL. RES INTEGER ( 12.1 - YPOS / 10.4 ).END..TO ZET1 :TEKS T. ALS WOORD? :TEKST DAN ZETWOORD :TEKST NAARX XPOS - 8 KOM STOP. ALS LEEG? :TEK ST DAN NAARX XPOS - 8 KOM STOP. ZETWOORD EERSTE :TEKST ZET1 ME :TEKST.END..TO ZE TRIJ :N :TOETS. LOKAAL "T LOKAAL "P. MAA K "P EERSTE TOESTAND. ALS NIET GETAL? :N PRINT [GETAL EERST] STOP. ALS :N > 0 MA AK "T 1 ANDERS MAAK "T ( - 1 ). ALS LEEG ? :TOETS DAN MAAK "TOETS " ANDERS ALS LI JST? :TOETS DAN MAAK "TOETS EERSTE EERST E :TOETS ANDERS MAAK "TOETS EERSTE :TOET S. PO HERHAAL :N * :T [STEMPEL :TOETS VT 8 * :T]. ALS :P DAN PN.END..TO KANTEEL. RE 90 VT 5 RE 90 VT 5 LI 90 VT 5 LI 90 VT 5.END..TO KASTEEL. NB MS PO AT 50. AT 20. RE 90 VT 80. VT 40. PN AT 170. AT 7 0. LI 90 VT 80 LI 90 VT 10 RE 90 VT 20 H ERHAAL 5 [KANTEEL]. RE 90 VT 5 RE 90 VT 20 RE 90 VT 10 LI 90 VT 80. AT 60 RE 180 HERHAAL 10 [KANTEEL]. HERHAAL 5 [KANTEE L]. RE 90 VT 5 LI 90 AT 60 VT 80. LI 90 VT 10 RE 90 VT 20. HERHAAL 5 [KANTEEL] R E 90 VT 5 RE 90 VT 20 RE 90 VT 10 LI 90 VT 80. LI 90 GUM VT 20 PEN PO NB. AT 60. AT 5. RE 90 PN VT 5. GUM AT 5 LI 90 PEN . VT 20. AT 25. VT 25. LI 90 VT 15 LI 90 VT 25.END..TO ZETRAND. LOKAAL "X0 MAAK "X0 XPOS LOKAAL "Y0 MAAK "Y0 YPOS. PO NA ARXY - 160 130 PN NAARY - 75 NAARX 159 N AARY 130 NAARX - 160. PO NAARXY :X0 :Y0. END..TO BEGIN. PO NAARPL 0 0 MS NAARHOEK 90.END..TO ZET :TEKST. SPROOK 0 KOM ZET 1 :TEKST. ALS REGEL < 18 DAN NAARPL 0 RE GEL + 1 ANDERS NAARPL 0 0.END..TO RAAM. HERHAAL 4 [RE 90 VIERKANT]. PO VT 45 PN RE 90 VT 45 HERHAAL 4 [RE 90 VT 90].END. .TO DIAMANT .END..TO ACHTHOEK. HERHAAL 8 [VT 25 RE 45].END..TO VIERKANT. HERHAAL 4 [VT 40 RE 90].END..TO &B. && "PRINTB. END..TO !H. WEG [BEWAARP ONTHOUD PROG AN TWOORD1 IN EENUIT PEN BOOGJE WACHT SPATI E SP RUIMTE &V &L &P &Z &M &S && &B !H]. END..TO BEWAARP :BESTAND :NAMEN. ( BEWAA R :BESTAND :NAMEN ). PR "BEWAARD.END..TO ONTHOUD :NAAM. PRINT1 "> DEFINIEER :NAA M ZETV [] PROG :NAAM ANTWOORD.END..TO PR OG :NAAM :COMM. ALS :COMM = [END] PRINT SAMEN :NAAM [GELEERD] RES []. RUN :COMM PRINT1 ">. RES ZETV :COMM PROG :NAAM ANT WOORD.END..TO ANTWOORD1. LOKAAL "A MAAK "A ANTWOORD. ALS LEEG? :A RES " ANDERS R ES EERSTE :A.END..TO IN :LIJST :TEKST. A LS WOORD? :TEKST MAAK "TEKST SAMEN :TEKS T []. ALS LEEG? :TEKST RESULTAAT "WAAR. ALS NIET ERBIJ? EERSTE :TEKST :LIJST RES "NIETW. RESULTAAT IN :LIJST ME :TEKST.E ND..TO EENUIT :LIJST. RESULTAAT SAMEN [] ELEMENT ( 1 + RANDOM AANTAL :LIJST ) :L IJST.END..TO PEN. KL 1.END..TO BOOGJE :S TRAAL. HERHAAL 10 [VT 3.141 * :STRAAL / 20 RE 9].END..TO WACHT :TIJD. HERHAAL 75 0 * :TIJD [].END..TO SPATIE :AANTAL. ALS :AANTAL = 1 RES CHAR 32. RES WOORD CHAR 32 SPATIE :AANTAL - 1.END..TO SP :AANTA L. RESULTAAT SPATIE :AANTAL.END..TO RUIM TE. .GCOLL PR .NODES.END..TO &V. && "VOR MEN.END..TO &L. && "LIJSTEN.END..TO &P. && "PRINTV.END..TO &Z. && "ZETTEN.END..T O &M. && "MUZIEK.END..TO &S. && "SPROKEN .END..TO && :X. SCHRIJVEN. MAAK "X WOORD "LOGO :X. PR SAMEN :X [WORDT NU GELADEN ]. LAAD :X.END..MAAK "GIS (8).MAAK "FIS (6).MAAK "DIS (3).MAAK "CIS (1).MAAK "BE S (10).MAAK "AIS (10).MAAK "G (7).MAAK " F (5).MAAK "E (4).MAAK "D (2).MAAK "B (1 1).MAAK "LADDER [8779 9301 9854 10440 11 060 11718 12415 13153 13935 14764 15742 16572 17557 18601].MAAK "OCTAAF (1).MAAK "TEMPO (20).MAAK "LP (15).MAAK "HP (15) .MAAK "GOLF (17).MAAK "SR (0).MAAK "AD ( 9).MAAK "C (0).MAAK "A (9).MAAK "STARTOP [ZETOP].
> CLICK IMAGE PREVIEW FOR FULL MODAL