REKENGALG
FILE INFORMATION
FILENAME(S): REKENGALG
FILE TYPE(S): PRG
FILE SIZE: 10.4K
FIRST SEEN: 2025-11-30 21:14:56
APPEARS ON: 1 disk(s)
FILE HASH
8b65762a27b30c9233323a571fd202d780744a15c1a28467ed4e9e40d27bd254
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| VCGN EDUCA 03 | REKENGALG | PRG | DuncanTwain | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23 00 8F 20 2B 2B 2B 20 49 |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B |NPUT SECTION +++|
000000F0: 00 08 09 28 00 55 52 24 B2 22 22 3A 55 49 24 B2 |...(.UR$."":UI$.|
00000100: 22 22 3A 97 55 4F 2C 30 00 18 09 2A 00 8B 55 4C |"":.UO,0...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 22 09 2D 00 97 55 43 |.0.UL.80.".-..UC|
00000120: 2C 30 00 36 09 32 00 A1 55 49 24 3A 8B 55 49 24 |,0.6.2..UI$:.UI$|
00000130: B2 22 22 A7 35 30 00 60 09 37 00 8B 55 49 24 B2 |."".50.`.7..UI$.|
00000140: C7 28 31 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 |.(13)..(UR$)..1.|
00000150: 97 55 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 |.UC,1:." .";:.85|
00000160: 00 73 09 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 |.s.<..UI$..(20).|
00000170: 31 30 35 00 87 09 3E 00 8B 20 C3 28 55 52 24 29 |105...>.. .(UR$)|
00000180: B2 B1 55 4C A7 35 30 00 AC 09 41 00 8D 31 32 30 |..UL.50...A..120|
00000190: 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |:. CHECK FOR VAL|
000001A0: 49 44 20 43 48 41 52 41 43 54 45 52 00 BC 09 46 |ID CHARACTER...F|
000001B0: 00 55 52 24 B2 55 52 24 AA 55 49 24 00 C6 09 4B |.UR$.UR$.UI$...K|
000001C0: 00 99 55 49 24 3B 00 CE 09 50 00 89 35 30 00 F3 |..UI$;...P..50..|
000001D0: 09 55 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 |.U.. +++ CHECK F|
000001E0: 4F 52 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 |OR HELP REQUEST |
000001F0: 2B 2B 2B 00 1B 0A 5A 00 8B 55 52 24 B2 55 58 24 |+++...Z..UR$.UX$|
00000200: A7 31 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 |.195:. EXIT TO H|
00000210: 45 4C 50 20 52 4F 55 54 49 4E 45 00 2A 0A 5F 00 |ELP ROUTINE.*._.|
00000220: 8B 55 46 B2 31 A7 8D 32 34 30 00 37 0A 64 00 55 |.UF.1..240.7.d.U|
00000230: 46 B2 30 3A 99 3A 8E 00 50 0A 66 00 8F 20 2B 2B |F.0:.:..P.f.. ++|
00000240: 20 43 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B | CHECK DELETE ++|
00000250: 00 61 0A 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 |.a.i...(UR$).1.5|
00000260: 30 00 79 0A 6E 00 55 52 24 B2 C8 28 55 52 24 2C |0.y.n.UR$..(UR$,|
00000270: C3 28 55 52 24 29 AB 31 29 00 8B 0A 73 00 99 22 |.(UR$).1)...s.."|
00000280: 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 B2 0A 78 00 |. ..";:.50...x.|
00000290: 8F 20 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 |. ++ CHECK FOR V|
000002A0: 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 53 20 |ALID CHARACTERS |
000002B0: 2B 2B 00 C4 0A 7D 00 8B C3 28 55 53 24 29 B2 30 |++...}...(US$).0|
000002C0: A7 31 35 30 00 D5 0A 82 00 81 55 53 B2 31 A4 C3 |.150......US.1..|
000002D0: 28 55 53 24 29 00 EC 0A 87 00 8B 55 49 24 B2 CA |(US$)......UI$..|
000002E0: 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 F2 0A 8C |(US$,US,1)......|
000002F0: 00 82 00 FF 0A 91 00 55 49 24 B2 22 22 3A 8E 00 |.......UI$."":..|
00000300: 1A 0B 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 |..... ** STANDAR|
00000310: 44 20 49 4E 50 55 54 20 2A 2A 00 2B 0B 98 00 8B |D INPUT **.+....|
00000320: C6 28 55 49 24 29 B2 34 36 A7 8E 00 3C 0B 9B 00 |.(UI$).46...<...|
00000330: 8B 55 49 24 B2 C7 28 33 32 29 A7 8E 00 59 0B A0 |.UI$..(32)...Y..|
00000340: 00 8B C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 |...(UI$).48..(UI|
00000350: 24 29 B1 35 37 A7 31 37 30 00 5F 0B A5 00 8E 00 |$).57.170._.....|
00000360: 7C 0B AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 ||.....(UI$).65..|
00000370: 28 55 49 24 29 B1 39 30 A7 31 38 30 00 82 0B AF |(UI$).90.180....|
00000380: 00 8E 00 A6 0B B4 00 8B C6 28 55 49 24 29 B3 31 |.........(UI$).1|
00000390: 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 |93..(UI$).218.UI|
000003A0: 24 B2 22 22 3A 8E 00 C9 0B B9 00 8B C2 28 55 54 |$."":........(UT|
000003B0: 29 B2 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 |).UU%.UI$..(.(UI|
000003C0: 24 29 AB 31 32 38 29 3A 8E 00 CF 0B BB 00 8E 00 |$).128):........|
000003D0: DC 0B BE 00 55 49 24 B2 22 22 3A 8E 00 01 0C C3 |....UI$."":.....|
000003E0: 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 |.UF.1:. +++ HELP|
000003F0: 20 52 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B | ROUTINE EXIT ++|
00000400: 2B 00 0A 0C C5 00 8D 32 35 30 00 13 0C C8 00 8D |+......250......|
00000410: 32 34 35 00 32 0C CD 00 81 55 51 B2 55 42 A4 28 |245.2....UQ.UB.(|
00000420: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB |U2%.256.U1%.U3%.|
00000430: 32 29 00 4E 0C D2 00 55 51 25 28 55 51 AB 55 42 |2).N...UQ%(UQ.UB|
00000440: 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 00 61 |)..(UQ):.:.".".a|
00000450: 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 |...UZ.1:UV%..(UT|
00000460: 29 00 6A 0C D8 00 89 33 30 30 00 AE 0C D9 00 55 |).j....300.....U|
00000470: 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 |Z.0:US$.UJ$:UG$.|
00000480: 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 3A |UK$:UP.UJ:UL.UK:|
00000490: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
000004A0: 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 E3 |81,6:.53280,14..|
000004B0: 0C DC 00 55 54 24 B2 55 4C 24 3A 99 22 93 22 3B |...UT$.UL$:.".";|
000004C0: 3A 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 42 A4 |:.UT,UV%:.UQ.UB.|
000004D0: 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 |(U2%.256.U1%.U3%|
000004E0: AB 33 29 00 F8 0C E1 00 97 55 51 2C 55 51 25 28 |.3)......UQ,UQ%(|
000004F0: 55 51 AB 55 42 29 3A 82 00 04 0D E6 00 97 55 31 |UQ.UB):.......U1|
00000500: 2C 55 31 25 00 10 0D E8 00 97 55 32 2C 55 32 25 |,U1%......U2,U2%|
00000510: 00 1C 0D E9 00 97 55 34 2C 55 34 25 00 2A 0D EA |......U4,U4%.*..|
00000520: 00 97 55 33 2C 55 33 25 AB 31 00 32 0D EB 00 89 |..U3,U3%.1.2....|
00000530: 33 35 00 64 0D F0 00 55 44 25 B2 28 28 55 32 25 |35.d...UD%.((U2%|
00000540: AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 |.256.U1%.U3%).UB|
00000550: 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA |).40:..(UD$,UD%.|
00000560: 31 29 3A 8E 00 9F 0D F5 00 99 C8 28 55 44 24 2C |1):........(UD$,|
00000570: 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 |24);" |
00000580: 20 20 20 20 20 20 20 20 20 20 20 12 20 48 45 4C | . HEL|
00000590: 50 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 |P COMING . ":..|
000005A0: CB 0D FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 32 |....U1%..(U1):U2|
000005B0: 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 |%..(U2):U3%..(U3|
000005C0: 29 3A 55 34 25 B2 C2 28 55 34 29 00 F3 0D FB 00 |):U4%..(U4).....|
000005D0: 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A |UJ$.US$:UK$.UG$:|
000005E0: 55 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 4B |UL$.UT$:UJ.UP:UK|
000005F0: B2 55 4C 00 F9 0D FF 00 8E 00 0A 0E 2C 01 8F 20 |.UL.........,.. |
00000600: 2A 2A 20 4D 45 4E 55 20 2A 2A 00 10 0E 2D 01 3A |** MENU **...-.:|
00000610: 00 3F 0E 2E 01 99 22 93 22 3A 97 55 54 2C 55 55 |.?....".":.UT,UU|
00000620: 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 |%:..(50003).0..5|
00000630: 33 32 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 |3281,9:.53280,8.|
00000640: 45 0E 2F 01 3A 00 62 0E 31 01 99 22 13 20 20 20 |E./.:.b.1..". |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E | MEN|
00000660: 55 22 00 91 0E 36 01 99 22 20 2D 2D 2D 2D 2D 2D |U"...6.." ------|
00000670: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000690: 22 00 B6 0E 3B 01 99 22 11 11 20 20 20 20 20 20 |"...;..".. |
000006A0: 20 31 2E 20 20 20 42 45 47 49 4E 20 52 45 4B 45 | 1. BEGIN REKE|
000006B0: 4E 47 41 4C 47 22 00 E0 0E 40 01 99 22 11 11 20 |NGALG"...@..".. |
000006C0: 20 20 20 20 20 20 32 2E 20 20 20 4C 45 45 52 4C | 2. LEERL|
000006D0: 49 4E 47 20 49 4E 53 54 52 55 43 54 49 45 53 22 |ING INSTRUCTIES"|
000006E0: 00 0C 0F 45 01 99 22 11 11 20 20 20 20 20 20 20 |...E..".. |
000006F0: 33 2E 20 20 20 4C 45 45 52 4B 52 41 43 48 54 20 |3. LEERKRACHT |
00000700: 49 4E 53 54 52 55 43 54 49 45 53 22 00 28 0F 4F |INSTRUCTIES".(.O|
00000710: 01 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 20 |..".. 4. |
00000720: 20 53 54 4F 50 11 11 22 00 57 0F 54 01 99 22 20 | STOP..".W.T.." |
00000730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000750: 2D 2D 2D 2D 2D 2D 22 00 81 0F 59 01 99 22 11 11 |------"...Y.."..|
00000760: 20 20 20 20 20 20 20 54 4F 45 54 53 20 45 45 4E | TOETS EEN|
00000770: 20 4E 55 4D 4D 45 52 20 20 28 31 2D 34 29 20 22 | NUMMER (1-4) "|
00000780: 3B 00 A9 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 22 |;...^.UL.1:US$."|
00000790: 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 |1234":.35:. INPU|
000007A0: 54 20 52 4F 55 54 49 4E 45 00 B4 0F 60 01 55 53 |T ROUTINE...`.US|
000007B0: 24 B2 22 22 00 D1 0F 63 01 91 C5 28 55 52 24 29 |$.""...c...(UR$)|
000007C0: 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 |.1000,400,500,39|
000007D0: 36 00 DA 0F 68 01 89 33 30 30 00 01 10 8B 01 8F |6...h..300......|
000007E0: 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 54 | ** RE-ENABLE ST|
000007F0: 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 2A |OP KEY AND END *|
00000800: 2A 00 30 10 8C 01 8B C2 28 35 30 30 30 33 29 B3 |*.0.....(50003).|
00000810: B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 30 |.1..(50003)..160|
00000820: AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 39 |..(50003)..0.399|
00000830: 00 5A 10 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 35 |.Z....UU.71:..(5|
00000840: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 |0003).0..53281,6|
00000850: 3A 97 35 33 32 38 30 2C 31 34 00 66 10 8E 01 99 |:.53280,14.f....|
00000860: 22 9A 93 22 3A 80 00 71 10 8F 01 8D 38 37 35 3A |"..":..q....875:|
00000870: 8E 00 92 10 90 01 8F 20 2A 2A 20 53 54 55 44 45 |....... ** STUDE|
00000880: 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |NT INSTRUCTIONS |
00000890: 2A 2A 00 C1 10 95 01 99 22 93 22 3A 97 55 54 2C |**......".":.UT,|
000008A0: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.|
000008B0: 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C |.53281,0:.53280,|
000008C0: 30 00 E3 10 9A 01 55 50 B2 30 3A 55 47 24 B2 22 |0.....UP.0:UG$."|
000008D0: CC 45 45 52 4C 49 4E 47 20 C9 4E 53 54 22 3A 8D |.EERLING .NST":.|
000008E0: 38 35 30 00 0D 11 9B 01 99 22 20 20 20 D2 45 4B |850......" .EK|
000008F0: 45 4E 47 41 4C 47 20 4C 41 41 54 20 4A 45 20 45 |ENGALG LAAT JE E|
00000900: 45 4E 20 56 45 52 4D 45 4E 49 47 2D 22 00 36 11 |EN VERMENIG-".6.|
00000910: 9C 01 99 22 11 1D 56 55 4C 44 49 47 49 4E 47 20 |..."..VULDIGING |
00000920: 5A 49 45 4E 20 57 41 41 52 49 4E 20 44 45 20 43 |ZIEN WAARIN DE C|
00000930: 49 4A 46 45 52 53 00 5C 11 9D 01 99 22 11 1D 5A |IJFERS.\...."..Z|
00000940: 49 4A 4E 20 56 45 52 56 41 4E 47 45 4E 20 44 4F |IJN VERVANGEN DO|
00000950: 4F 52 20 4C 45 54 54 45 52 53 2E 22 00 74 11 9E |OR LETTERS.".t..|
00000960: 01 99 22 11 1D C2 49 4A 56 4F 4F 52 42 45 45 4C |.."...IJVOORBEEL|
00000970: 44 3A 11 22 00 99 11 9F 01 99 22 20 20 20 20 20 |D:."......" |
00000980: 20 20 20 C1 20 C2 A0 C6 20 20 20 20 20 20 20 20 | . ... |
00000990: 20 20 20 34 20 35 20 36 22 00 BE 11 A0 01 99 22 | 4 5 6"......"|
000009A0: 20 20 20 20 20 20 20 2A 20 20 C5 A0 C4 A0 20 20 | * .... |
000009B0: 20 20 20 20 20 20 20 2A 20 20 33 20 32 22 00 E3 | * 3 2"..|
000009C0: 11 A1 01 99 22 20 20 20 20 20 20 20 C0 C0 C0 C0 |...." ....|
000009D0: C0 C0 20 20 20 20 20 20 20 20 20 20 C0 C0 C0 C0 |.. ....|
000009E0: C0 C0 22 00 08 12 A2 01 99 22 20 20 20 20 20 20 |.."......" |
000009F0: 20 20 C8 20 C3 20 C4 20 20 20 20 20 20 20 20 20 | . . . |
00000A00: 20 20 39 20 31 20 32 22 00 2B 12 A3 01 99 22 20 | 9 1 2".+...." |
00000A10: 20 20 20 C3 20 C5 20 C6 20 C9 20 20 20 20 20 20 | . . . . |
00000A20: 20 20 20 31 20 33 20 36 20 38 22 00 50 12 A4 01 | 1 3 6 8".P...|
00000A30: 99 22 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 20 |." ......... |
00000A40: 20 20 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 | ........."|
00000A50: 00 75 12 A5 01 99 22 20 20 20 20 C3 20 C1 20 C2 |.u...." . . .|
00000A60: 20 C8 20 C4 A0 20 20 20 20 20 20 31 20 34 20 35 | . .. 1 4 5|
00000A70: 20 39 20 32 22 00 A5 12 A6 01 99 22 11 20 20 20 | 9 2"......". |
00000A80: 20 C8 49 45 52 20 49 53 20 44 45 20 4C 45 54 54 | .IER IS DE LETT|
00000A90: 45 52 20 27 C1 27 20 48 45 54 20 43 49 4A 46 45 |ER '.' HET CIJFE|
00000AA0: 52 20 34 2C 22 00 D2 12 A7 01 99 22 11 1D 44 45 |R 4,"......"..DE|
00000AB0: 20 4C 45 54 54 45 52 20 27 C8 27 20 49 53 20 48 | LETTER '.' IS H|
00000AC0: 45 54 20 43 49 4A 46 45 52 20 39 20 20 45 4E 5A |ET CIJFER 9 ENZ|
00000AD0: 4F 2D 00 E7 12 A8 01 99 22 11 1D 56 4F 4F 52 54 |O-......"..VOORT|
00000AE0: 2E 22 3A 8D 38 33 35 00 F0 12 A9 01 8D 38 35 30 |.":.835......850|
00000AF0: 00 1B 13 AA 01 99 22 11 20 20 20 C1 4C 53 20 4A |......". .LS J|
00000B00: 49 4A 20 44 45 4E 4B 54 20 44 41 54 20 44 45 20 |IJ DENKT DAT DE |
00000B10: 4C 45 54 54 45 52 20 27 C1 27 22 00 49 13 AB 01 |LETTER '.'".I...|
00000B20: 99 22 11 1D 45 45 4E 20 34 20 49 53 2C 20 54 59 |."..EEN 4 IS, TY|
00000B30: 50 20 44 41 4E 3A 20 20 27 C1 34 27 20 2B 20 3C |P DAN: '.4' + <|
00000B40: 52 45 54 55 52 4E 3E 2E 22 00 61 13 AC 01 99 22 |RETURN>.".a...."|
00000B50: 11 1D 28 27 34 C1 27 20 4D 41 47 20 4F 4F 4B 29 |..('4.' MAG OOK)|
00000B60: 22 00 90 13 AE 01 99 22 11 20 20 20 CA 45 20 4B |"......". .E K|
00000B70: 52 49 4A 47 54 20 31 32 20 4B 41 4E 53 45 4E 20 |RIJGT 12 KANSEN |
00000B80: 4F 4D 20 44 45 20 50 55 5A 5A 45 4C 20 4F 50 22 |OM DE PUZZEL OP"|
00000B90: 00 CD 13 AF 01 99 22 11 1D 54 45 20 4C 4F 53 53 |......"..TE LOSS|
00000BA0: 45 4E 20 56 4F 4F 52 44 41 54 20 49 4B 20 48 45 |EN VOORDAT IK HE|
00000BB0: 54 20 41 4E 54 57 4F 4F 52 44 20 20 20 20 20 20 |T ANTWOORD |
00000BC0: 20 11 4C 41 41 54 20 5A 49 45 4E 2E 22 00 10 14 | .LAAT ZIEN."...|
00000BD0: B0 01 99 22 11 20 20 20 C1 4C 53 20 4A 45 20 44 |...". .LS JE D|
00000BE0: 45 20 27 4F 27 20 49 4E 54 59 50 54 2C 20 5A 41 |E 'O' INTYPT, ZA|
00000BF0: 4C 20 49 4B 20 44 45 20 4F 50 2D 20 20 11 1D 4C |L IK DE OP- ..L|
00000C00: 4F 53 53 49 4E 47 20 47 45 56 45 4E 2E 22 3A 99 |OSSING GEVEN.":.|
00000C10: 00 19 14 E5 01 8D 38 33 35 00 2D 14 EA 01 8B 55 |......835.-....U|
00000C20: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 33 14 |Z.1..UP%:.217.3.|
00000C30: F3 01 8E 00 54 14 F4 01 8F 20 2A 2A 20 54 45 41 |....T.... ** TEA|
00000C40: 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E |CHER INSTRUCTION|
00000C50: 53 20 2A 2A 00 84 14 F5 01 99 22 93 22 3A 97 55 |S **......".":.U|
00000C60: 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UL%:..(50003).|
00000C70: 30 A7 97 35 33 32 38 31 2C 32 3A 97 35 33 32 38 |0..53281,2:.5328|
00000C80: 30 2C 31 30 00 A5 14 F6 01 55 50 B2 30 3A 55 47 |0,10.....UP.0:UG|
00000C90: 24 B2 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 |$.".EACHER .NST"|
00000CA0: 3A 8D 38 35 30 00 D3 14 F7 01 99 22 11 11 20 20 |:.850......".. |
00000CB0: 20 20 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 | .O THE BEST |
00000CC0: 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 |OF OUR KNOWLEDGE|
00000CD0: 2C 11 22 00 FC 14 F8 01 99 22 20 20 20 54 48 49 |,."......" THI|
00000CE0: 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 |S PROGRAM IS IN |
00000CF0: 54 48 45 20 50 55 42 4C 49 43 11 22 00 28 15 F9 |THE PUBLIC.".(..|
00000D00: 01 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 |.." DOMAIN. .|
00000D10: 46 20 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 |F THIS IS NOT TH|
00000D20: 45 20 43 41 53 45 11 22 00 45 15 FA 01 99 22 20 |E CASE.".E...." |
00000D30: 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 | PLEASE CONTACT|
00000D40: 3A 11 11 11 22 00 6F 15 FB 01 99 22 20 20 20 20 |:...".o...." |
00000D50: 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 | .OMMODORE .USI|
00000D60: 4E 45 53 53 20 CD 41 43 48 49 4E 45 53 11 22 00 |NESS .ACHINES.".|
00000D70: 92 15 FC 01 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
00000D80: 33 33 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 |3370 .HARMACY .V|
00000D90: 45 2E 00 B6 15 FD 01 99 22 20 20 20 20 20 20 20 |E......." |
00000DA0: 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E | .GINCOURT, .N|
00000DB0: 54 41 52 49 4F 22 00 D8 15 FE 01 99 22 20 20 20 |TARIO"......" |
00000DC0: 20 20 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 | .ANADA |
00000DD0: CD 31 D7 20 32 CB 34 22 00 F8 15 FF 01 99 22 20 |.1. 2.4"......" |
00000DE0: 20 20 20 20 20 20 20 20 20 28 34 31 36 29 20 34 | (416) 4|
00000DF0: 39 39 2D 34 32 39 32 22 00 0E 16 00 02 55 50 B2 |99-4292".....UP.|
00000E00: 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 3B |1:. 835:. 850:.;|
00000E10: 16 01 02 99 22 11 11 20 20 20 20 CF 52 49 47 49 |....".. .RIGI|
00000E20: 4E 41 4C 20 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 |NAL .ROGRAM .AME|
00000E30: 3A 20 C8 41 4E 47 4D 41 54 48 11 00 5D 16 02 02 |: .ANGMATH..]...|
00000E40: 99 22 20 20 20 20 20 D7 52 49 54 54 45 4E 20 C2 |." .RITTEN .|
00000E50: 59 20 20 3A 20 D5 4E 4B 4E 4F 57 4E 11 00 8B 16 |Y : .NKNOWN....|
00000E60: 03 02 99 22 20 20 D6 45 52 54 41 41 4C 44 20 44 |..." .ERTAALD D|
00000E70: 4F 4F 52 20 20 3A 20 C1 2E 56 2F 44 20 CE 49 45 |OOR : ..V/D .IE|
00000E80: 55 57 45 4E 48 55 49 5A 45 4E 22 00 B6 16 04 02 |UWENHUIZEN".....|
00000E90: 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 52 4F |." ..HIS PRO|
00000EA0: 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F 4E |GRAM WILL RUN ON|
00000EB0: 20 41 4E 59 11 11 00 DD 16 05 02 99 22 20 20 20 | ANY........" |
00000EC0: 20 20 20 20 20 20 C2 C1 D3 C9 C3 A0 32 2E 30 20 | ......2.0 |
00000ED0: D0 C5 D4 20 C3 CF CD D0 D5 D4 C5 D2 11 00 04 17 |... ............|
00000EE0: 06 02 99 22 20 20 20 20 20 20 20 20 20 C2 C1 D3 |..." ...|
00000EF0: C9 C3 20 34 2E 30 20 D0 C5 D4 A0 C3 CF CD D0 D5 |.. 4.0 .........|
00000F00: D4 C5 D2 11 00 26 17 07 02 99 22 20 20 20 20 20 |.....&...." |
00000F10: 20 20 20 20 38 30 33 32 20 C3 C2 CD 20 C3 CF CD | 8032 ... ...|
00000F20: D0 D5 D4 C5 D2 11 00 4B 17 08 02 99 22 20 20 20 |.......K...." |
00000F30: 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 20 | ......... |
00000F40: 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 54 17 09 02 |64 .........T...|
00000F50: 8D 38 33 35 00 68 17 4E 02 8B 55 5A B2 31 A7 9E |.835.h.N..UZ.1..|
00000F60: 55 50 25 3A 89 32 31 37 00 6E 17 57 02 8E 00 94 |UP%:.217.n.W....|
00000F70: 17 58 02 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 |.X.. ** PROGRAM |
00000F80: 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 49 4E 53 |MODIFICATION INS|
00000F90: 54 20 2A 2A 00 A5 17 59 02 99 22 93 22 3A 97 55 |T **...Y..".":.U|
00000FA0: 54 2C 55 4C 25 00 C5 17 5D 02 55 50 B2 30 3A 55 |T,UL%...].UP.0:U|
00000FB0: 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 |G$.".ROGRAM .OD"|
00000FC0: 3A 8D 38 35 30 00 CE 17 94 02 8D 38 33 35 00 E2 |:.850......835..|
00000FD0: 17 B2 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 |....UZ.1..UP%:.2|
00000FE0: 31 37 00 E8 17 BB 02 8E 00 0D 18 BC 02 8F 20 2A |17............ *|
00000FF0: 2A 20 54 4F 20 55 53 45 20 38 30 33 32 20 4C 4F |* TO USE 8032 LO|
00001000: 41 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 43 18 |AD CBM4032 **.C.|
00001010: C6 02 99 22 93 11 11 11 05 42 45 46 4F 52 45 20 |...".....BEFORE |
00001020: 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 4F |RUNNING THIS PRO|
00001030: 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 |GRAM ON AN 8032 |
00001040: 20 11 11 00 79 18 D0 02 99 22 20 20 20 20 20 20 | ...y...." |
00001050: 4C 4F 41 44 20 54 48 45 20 27 43 42 4D 20 34 30 |LOAD THE 'CBM 40|
00001060: 33 32 27 20 50 52 4F 47 52 41 4D 11 11 11 11 11 |32' PROGRAM.....|
00001070: 11 11 11 11 11 11 11 11 22 00 84 18 DA 02 9E 55 |........"......U|
00001080: 55 AA 37 31 00 8A 18 E4 02 80 00 AF 18 1D 03 8F |U.71............|
00001090: 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 32 20 | ** TO USE 8032 |
000010A0: 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 |LOAD CBM4032 **.|
000010B0: FA 18 1E 03 99 22 93 11 11 11 42 45 46 4F 52 45 |....."....BEFORE|
000010C0: 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 | RUNNING THIS PR|
000010D0: 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 |OGRAM ON AN 8032|
000010E0: 20 20 11 11 4C 4F 41 44 20 43 42 4D 20 34 30 33 | ..LOAD CBM 403|
000010F0: 32 20 50 52 4F 47 52 41 4D 22 00 06 19 1F 03 9E |2 PROGRAM"......|
00001100: 31 30 39 33 3A 80 00 26 19 20 03 8F 20 2A 2A 20 |1093:..&. .. ** |
00001110: 54 20 49 20 54 20 4C 20 45 20 20 20 50 20 41 20 |T I T L E P A |
00001120: 47 20 45 20 2A 2A 00 5A 19 22 03 99 22 93 11 1D |G E **.Z.".."...|
00001130: 05 22 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 |.";:.UT,UU%:..(5|
00001140: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 |0003).0..53280,1|
00001150: 34 3A 97 35 33 32 38 31 2C 36 00 70 19 24 03 81 |4:.53281,6.p.$..|
00001160: 49 B2 31 A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 |I.1.38:."...";:.|
00001170: 00 88 19 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 |...&..I.1.22:.".|
00001180: 9D 12 A6 92 22 3B 3A 82 00 A0 19 28 03 81 49 B2 |....";:....(..I.|
00001190: 31 A4 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 |1.37:.".....";:.|
000011A0: 00 B8 19 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 |...*..I.1.22:.".|
000011B0: 9D 12 A6 92 22 3B 3A 82 00 DD 19 2C 03 99 22 13 |....";:....,..".|
000011C0: 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000011D0: 1D 1D 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 FF 19 |.......... ....|
000011E0: 2E 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
000011F0: 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 |....... . . ...|
00001200: 20 1A 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D | .0.."..........|
00001210: 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF |......... . ...|
00001220: 00 3E 1A 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.>.2..".........|
00001230: 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 66 |........... ..f|
00001240: 1A 34 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |.4.."...........|
00001250: 1D 1D 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F |...C O M M O D O|
00001260: 20 52 20 45 11 11 00 89 1A 36 03 99 22 1D 1D 1D | R E.....6.."...|
00001270: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 |............EDUC|
00001280: 41 54 49 4F 4E 41 4C 11 11 00 A8 1A 38 03 99 22 |ATIONAL.....8.."|
00001290: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000012A0: 53 4F 46 54 57 41 52 45 00 C3 1A 3A 03 8F 20 2A |SOFTWARE...:.. *|
000012B0: 2A 20 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F |* COMMODORE LOGO|
000012C0: 20 2A 2A 00 FC 1A 3B 03 99 C8 28 55 44 24 2C 32 | **...;...(UD$,2|
000012D0: 34 29 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 12 54 4F 45 |4);".........TOE|
000012E0: 54 53 20 53 50 41 54 49 45 42 41 4C 4B 20 4F 46 |TS SPATIEBALK OF|
000012F0: 20 57 41 43 48 54 92 22 3A 49 B2 30 00 1E 1B 3C | WACHT.":I.0...<|
00001300: 03 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 |..A$:.A$.." ".I.|
00001310: 49 AA 31 3A 8B 49 B3 32 35 30 A7 38 32 38 00 42 |I.1:.I.250.828.B|
00001320: 1B 3E 03 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 |.>.T1$."":T2$.""|
00001330: 3A 54 33 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 |:T3$."":T4$."":I|
00001340: B2 30 00 4B 1B 40 03 89 33 30 30 00 67 1B 43 03 |.0.K.@..300.g.C.|
00001350: 8F 20 2A 2A 20 53 50 41 43 45 20 42 41 52 20 50 |. ** SPACE BAR P|
00001360: 52 45 53 53 20 2A 2A 00 A3 1B 48 03 99 C8 28 55 |RESS **...H...(U|
00001370: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 12 54 4F |D$,24);"......TO|
00001380: 45 54 53 20 53 50 41 54 49 45 42 41 4C 4B 20 56 |ETS SPATIEBALK V|
00001390: 4F 4F 52 20 56 45 52 56 4F 4C 47 92 22 3A 97 55 |OOR VERVOLG.":.U|
000013A0: 4F 2C 30 00 BA 1B 4C 03 A1 55 49 24 3A 8B 55 49 |O,0...L..UI$:.UI|
000013B0: 24 B3 B1 22 20 22 A7 38 34 34 00 C0 1B 4E 03 8E |$.." ".844...N..|
000013C0: 00 E0 1B 52 03 8F 20 2A 2A 20 50 41 47 45 20 44 |...R.. ** PAGE D|
000013D0: 45 53 49 47 4E 20 52 4F 55 54 49 4E 45 20 2A 2A |ESIGN ROUTINE **|
000013E0: 00 EC 1B 54 03 55 50 B2 55 50 AA 31 00 16 1C 57 |...T.UP.UP.1...W|
000013F0: 03 99 22 93 22 C8 28 55 54 24 AA 55 50 24 2C 32 |..".".(UT$.UP$,2|
00001400: 31 29 3B C9 28 55 50 24 AA 55 47 24 AA C4 28 55 |1);.(UP$.UG$..(U|
00001410: 50 29 2C 31 38 29 00 45 1C 5C 03 99 22 20 2D 2D |P),18).E.\.." --|
00001420: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001430: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001440: 2D 2D 2D 2D 22 00 54 1C 60 03 8B 55 48 B3 B1 30 |----".T.`..UH..0|
00001450: A7 38 37 30 00 85 1C 61 03 99 C8 28 55 44 24 2C |.870...a...(UD$,|
00001460: 32 34 29 3B C8 28 55 50 24 2C 37 29 3B 22 56 4F |24);.(UP$,7);"VO|
00001470: 4F 52 20 4D 45 4E 55 20 3A 20 4D 20 3C 52 45 54 |OR MENU : M <RET|
00001480: 55 52 4E 3E 22 00 96 1C 66 03 55 48 B2 30 3A 99 |URN>"...f.UH.0:.|
00001490: 22 13 11 22 3A 8E 00 B5 1C 6B 03 8F 20 2A 2A 20 |"..":....k.. ** |
000014A0: 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 |PLEASE WAIT REMA|
000014B0: 52 4B 20 2A 2A 00 E9 1C 70 03 99 C8 28 55 44 24 |RK **...p...(UD$|
000014C0: 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 |,24);" |
000014D0: 20 4D 4F 4D 45 4E 54 4A 45 20 41 2E 55 2E 42 2E | MOMENTJE A.U.B.|
000014E0: 2E 2E 2E 20 20 20 20 20 22 00 EF 1C 75 03 8E 00 |... "...u...|
000014F0: 0C 1D 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 |..... ** SET UP |
00001500: 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 57 1D 85 |VARIABLES **.W..|
00001510: 03 55 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 |.UX$."H":.UQ%(10|
00001520: 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 |00):UB.32768:U1.|
00001530: 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 |196:U2.197:U3.19|
00001540: 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A |8:U4.216:UC.167:|
00001550: 55 55 B2 31 30 32 34 00 95 1D 86 03 55 54 B2 35 |UU.1024.....UT.5|
00001560: 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 |9468:UU%.12:UL%.|
00001570: 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 |14:UP%.1146:UM.3|
00001580: 32 37 36 38 3A 97 20 35 30 30 30 33 2C 30 3A 55 |2768:. 50003,0:U|
00001590: 4F B2 31 35 38 00 D8 1D 87 03 8B C2 28 35 30 30 |O.158.......(500|
000015A0: 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 |03).0.UB.1024:U1|
000015B0: B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 |.209:U2.210:U3.2|
000015C0: 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 |11:U4.214:UC.204|
000015D0: 3A 55 55 B2 32 30 34 38 00 17 1E 88 03 8B C2 28 |:UU.2048.......(|
000015E0: 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 |50003).0.UT.5327|
000015F0: 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A |2:UU%.21:UL%.23:|
00001600: 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 |UP%.2139:UM.1024|
00001610: 3A 55 4F B2 31 39 38 00 3B 1E 89 03 55 44 24 B2 |:UO.198.;...UD$.|
00001620: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00001630: 11 11 11 11 11 11 11 11 11 11 22 00 6D 1E 8A 03 |..........".m...|
00001640: 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |UP$." |
00001650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001660: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 BA 1E | "...|
00001670: 8B 03 55 54 24 B2 22 20 D2 C5 CB C5 CE C7 C1 CC |..UT$." ........|
00001680: C7 20 20 20 20 20 A0 A0 A0 22 3A 8F 20 50 4C 41 |. ...":. PLA|
00001690: 43 45 20 50 52 4F 47 52 41 4D 20 54 49 54 4C 45 |CE PROGRAM TITLE|
000016A0: 20 48 45 52 45 20 21 21 21 21 21 21 21 21 21 21 | HERE !!!!!!!!!!|
000016B0: 21 21 21 21 21 21 21 2A 2A 2A 00 C0 1E 8C 03 8E |!!!!!!!***......|
000016C0: 00 DA 1E 8E 03 8F 20 2A 2A 20 53 45 54 20 56 41 |...... ** SET VA|
000016D0: 52 49 41 42 4C 45 53 20 2A 2A 00 E3 1E 93 03 8D |RIABLES **......|
000016E0: 39 30 30 00 15 1F 94 03 86 20 41 28 34 2C 35 29 |900...... A(4,5)|
000016F0: 2C 42 28 34 2C 35 29 2C 43 28 34 2C 35 29 2C 45 |,B(4,5),C(4,5),E|
00001700: 24 28 34 2C 35 29 2C 48 4D 24 28 31 32 29 2C 50 |$(4,5),HM$(12),P|
00001710: 24 28 31 33 29 00 2B 1F 95 03 81 4A B2 31 A4 31 |$(13).+....J.1.1|
00001720: 32 3A 87 48 4D 24 28 4A 29 3A 82 00 46 1F 98 03 |2:.HM$(J):..F...|
00001730: 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F 52 20 38 |. ** CHECK FOR 8|
00001740: 30 33 32 20 2A 2A 00 6F 1F 9D 03 8F 50 52 49 4E |032 **.o....PRIN|
00001750: 54 22 93 22 3A 50 52 49 4E 54 22 A0 22 3A 52 45 |T".":PRINT".":RE|
00001760: 4D 20 53 48 49 46 54 45 44 20 53 50 41 43 45 00 |M SHIFTED SPACE.|
00001770: 92 1F A2 03 8F 49 46 50 45 45 4B 28 55 42 2B 34 |.....IFPEEK(UB+4|
00001780: 30 29 3C 3E 39 36 54 48 45 4E 47 4F 53 55 42 37 |0)<>96THENGOSUB7|
00001790: 30 30 00 AB 1F A3 03 8F 20 2A 2A 20 4D 45 4D 4F |00...... ** MEMO|
000017A0: 52 59 20 43 48 45 43 4B 20 2A 2A 00 BF 1F A4 03 |RY CHECK **.....|
000017B0: 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 00 |. .(0).2000.937.|
000017C0: ED 1F A5 03 99 22 93 11 11 05 54 48 49 53 20 4D |....."....THIS M|
000017D0: 41 43 48 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 |ACHINE DOES NOT |
000017E0: 48 41 56 45 20 45 4E 4F 55 47 48 11 22 00 11 20 |HAVE ENOUGH.".. |
000017F0: A6 03 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 |..."MEMORY TO RU|
00001800: 4E 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 21 |N THIS PROGRAM !|
00001810: 22 00 1C 20 A7 03 9E 55 55 AA 37 31 00 22 20 A8 |".. ...UU.71." .|
00001820: 03 80 00 3C 20 A9 03 99 22 93 05 22 3A 8B C2 28 |...< ..."..":..(|
00001830: 35 30 30 30 33 29 B2 30 A7 39 36 32 00 6B 20 AC |50003).0.962.k .|
00001840: 03 8F 20 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 |.. ** BASIC 2.0 |
00001850: 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 2D | OR 4.0 OR C-|
00001860: 36 34 20 53 45 54 55 50 20 2A 2A 00 A9 20 AD 03 |64 SETUP **.. ..|
00001870: 97 31 30 37 35 2C 31 33 33 3A 97 31 30 37 36 2C |.1075,133:.1076,|
00001880: 31 34 34 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 |144:.1077,234:.1|
00001890: 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A |079,4:.1080,133:|
000018A0: 97 31 30 38 31 2C 31 34 35 00 DF 20 AE 03 97 31 |.1081,145.. ...1|
000018B0: 30 39 31 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 |091,155:.1098,13|
000018C0: 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 31 30 |3:.1099,144:.110|
000018D0: 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 33 00 |0,234:.1103,133.|
000018E0: 01 21 AF 03 97 31 31 30 34 2C 31 34 35 3A 97 31 |.!...1104,145:.1|
000018F0: 31 30 35 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 |105,234:.1082,23|
00001900: 34 00 18 21 B1 03 8B C2 28 35 30 30 30 33 29 B3 |4..!....(50003).|
00001910: B1 31 36 30 A7 39 35 35 00 47 21 B6 03 97 31 30 |.160.955.G!...10|
00001920: 39 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 3A |93,88:.1094,228:|
00001930: 97 31 30 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 |.1097,85:.1102,2|
00001940: 32 38 3A 89 39 36 35 00 5C 21 BB 03 8B C2 28 35 |28:.965.\!....(5|
00001950: 30 30 30 33 29 B3 B1 31 A7 39 39 30 00 8B 21 C0 |0003)..1.990..!.|
00001960: 03 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 2C |..1093,49:.1094,|
00001970: 32 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 |230:.1097,46:.11|
00001980: 30 32 2C 32 33 30 3A 89 39 36 35 00 C5 21 C2 03 |02,230:.965..!..|
00001990: 97 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 2C |.2099,141:.2100,|
000019A0: 32 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 33 |20:.2101,3:.2103|
000019B0: 2C 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 31 |,8:.2104,141:.21|
000019C0: 30 35 2C 32 31 00 01 22 C3 03 97 32 31 30 36 2C |05,21.."...2106,|
000019D0: 33 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 31 |3:.2115,145:.211|
000019E0: 37 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 |7,52:.2118,234:.|
000019F0: 32 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 |2121,49:.2122,14|
00001A00: 31 00 3B 22 C4 03 97 32 31 32 33 2C 32 30 3A 97 |1.;"...2123,20:.|
00001A10: 32 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 |2124,3:.2126,234|
00001A20: 3A 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 38 |:.2127,141:.2128|
00001A30: 2C 32 31 3A 97 32 31 32 39 2C 33 00 59 22 C5 03 |,21:.2129,3.Y"..|
00001A40: 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 |.UU.48:. DISABLE|
00001A50: 20 53 54 4F 50 20 4B 45 59 00 6A 22 CA 03 8D 38 | STOP KEY.j"...8|
00001A60: 30 30 3A 8F 20 54 49 54 4C 45 00 7A 22 D4 03 89 |00:. TITLE.z"...|
00001A70: 33 30 30 3A 8F 20 4D 45 4E 55 00 B2 22 DE 03 8F |300:. MENU.."...|
00001A80: 50 52 49 4E 54 22 93 54 48 45 20 50 47 4D 20 57 |PRINT".THE PGM W|
00001A90: 49 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 |ILL NOT WORK ON |
00001AA0: 54 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 45 |THIS MACHINE!":E|
00001AB0: 4E 44 00 E7 22 E8 03 8B 55 5A B2 31 A7 9E 55 50 |ND.."...UZ.1..UP|
00001AC0: 25 3A 9E 55 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A |%:.UP%:UZ.0:. **|
00001AD0: 20 50 52 4F 47 52 41 4D 20 53 54 41 52 54 53 20 | PROGRAM STARTS |
00001AE0: 48 45 52 45 20 2A 2A 00 12 23 E9 03 99 22 93 05 |HERE **..#..."..|
00001AF0: 22 3B 3A 8C 3A 8B C2 28 35 30 30 30 33 29 B2 30 |";:.:..(50003).0|
00001B00: A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 |..53281,6:.53280|
00001B10: 2C 36 00 44 23 1A 04 58 58 24 B2 22 91 20 20 20 |,6.D#..XX$.". |
00001B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B40: 20 20 20 22 00 59 23 24 04 53 24 B2 22 13 11 11 | ".Y#$.S$."...|
00001B50: 11 11 11 11 11 11 11 11 22 00 99 23 42 04 83 20 |........"..#B.. |
00001B60: 48 4F 4F 46 44 2C 42 4F 56 45 4E 4C 49 4A 46 2C |HOOFD,BOVENLIJF,|
00001B70: 4F 4E 44 45 52 4C 49 4A 46 2C 4C 49 4E 4B 45 52 |ONDERLIJF,LINKER|
00001B80: 41 52 4D 2C 52 45 43 48 54 45 52 41 52 4D 2C 4C |ARM,RECHTERARM,L|
00001B90: 49 4E 4B 45 52 42 45 45 4E 00 D9 23 4C 04 83 20 |INKERBEEN..#L.. |
00001BA0: 52 45 43 48 54 45 52 42 45 45 4E 2C 4C 49 4E 4B |RECHTERBEEN,LINK|
00001BB0: 45 52 48 41 4E 44 2C 52 45 43 48 54 45 52 48 41 |ERHAND,RECHTERHA|
00001BC0: 4E 44 2C 4C 49 4E 4B 45 52 56 4F 45 54 2C 52 45 |ND,LINKERVOET,RE|
00001BD0: 43 48 54 45 52 56 4F 45 54 00 02 24 56 04 83 20 |CHTERVOET..$V.. |
00001BE0: 22 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 20 20 4A |" ***** J|
00001BF0: 45 20 20 48 41 4E 47 54 20 21 21 20 2A 2A 2A 2A |E HANGT !! ****|
00001C00: 2A 22 00 4B 24 60 04 50 24 28 30 29 B2 22 9D 9D |*".K$`.P$(0)."..|
00001C10: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 12 C0 C0 C0 B1 C0 |................|
00001C20: C0 C0 C0 C0 C0 C0 C0 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00001C30: 9D 9D 9D 11 20 52 45 4B 45 4E 47 41 4C 47 20 20 |.... REKENGALG |
00001C40: 9D 9D 9D 9D 9D 9D 9D 9D 9D 91 22 00 81 24 6A 04 |.........."..$j.|
00001C50: 50 24 28 30 29 B2 50 24 28 30 29 AA 22 91 DD 91 |P$(0).P$(0)."...|
00001C60: 9D DD 91 9D DD 91 9D DD 91 9D DD 91 9D DD 91 9D |................|
00001C70: DD 91 9D DD 91 9D B0 C0 C0 C0 C0 2E 92 11 9D DD |................|
00001C80: 22 00 9A 24 74 04 50 24 28 31 29 B2 22 9D 9D 9D |"..$t.P$(1)."...|
00001C90: 9D 91 91 91 91 91 91 91 D7 22 00 B2 24 7E 04 50 |........."..$~.P|
00001CA0: 24 28 32 29 B2 22 9D 9D 9D 9D 91 91 91 91 91 91 |$(2)."..........|
00001CB0: DB 22 00 C9 24 88 04 50 24 28 33 29 B2 22 9D 9D |."..$..P$(3)."..|
00001CC0: 9D 9D 91 91 91 91 91 B1 22 00 E2 24 92 04 50 24 |........"..$..P$|
00001CD0: 28 34 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 91 |(4)."...........|
00001CE0: AD 22 00 F9 24 9C 04 50 24 28 35 29 B2 22 9D 9D |."..$..P$(5)."..|
00001CF0: 9D 91 91 91 91 91 91 BD 22 00 11 25 A6 04 50 24 |........"..%..P$|
00001D00: 28 36 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 D5 |(6)."...........|
00001D10: 22 00 27 25 B0 04 50 24 28 37 29 B2 22 9D 9D 9D |".'%..P$(7)."...|
00001D20: 91 91 91 91 91 C9 22 00 41 25 BA 04 50 24 28 38 |......".A%..P$(8|
00001D30: 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 91 91 BB |).".............|
00001D40: 22 00 59 25 C4 04 50 24 28 39 29 B2 22 9D 9D 9D |".Y%..P$(9)."...|
00001D50: 91 91 91 91 91 91 91 AC 22 00 71 25 CE 04 50 24 |........".q%..P$|
00001D60: 28 31 30 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 BE |(10)."..........|
00001D70: 22 00 87 25 D8 04 50 24 28 31 31 29 B2 22 9D 9D |"..%..P$(11)."..|
00001D80: 9D 91 91 91 91 BC 22 00 BD 25 E2 04 50 24 28 31 |......"..%..P$(1|
00001D90: 32 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 91 AC |2)."............|
00001DA0: DD BB 11 9D 9D 9D AD DB BD 11 9D 9D 9D D5 B1 C9 |................|
00001DB0: 11 9D 9D 9D BC 20 BE 11 11 11 1D 1D 22 00 03 26 |..... ......"..&|
00001DC0: EC 04 50 24 28 31 33 29 B2 22 9D 9D 9D 9D 9D 91 |..P$(13)."......|
00001DD0: 91 91 91 91 91 91 20 1D 20 11 9D 9D 9D 20 DD 20 |...... . .... . |
00001DE0: 11 9D 9D 9D 20 20 20 11 9D 9D 9D 20 20 20 11 9D |.... .... ..|
00001DF0: 9D 9D 20 20 20 11 11 11 1D 1D 22 3A 97 55 54 2C |.. .....":.UT,|
00001E00: 55 55 25 00 1C 26 F6 04 99 22 93 20 45 56 45 4E |UU%..&...". EVEN|
00001E10: 20 52 45 4B 45 4E 45 4E 2E 2E 2E 22 00 45 26 00 | REKENEN...".E&.|
00001E20: 05 81 42 B2 30 A4 31 30 3A 4B 28 42 29 B2 AB 31 |..B.0.10:K(B)..1|
00001E30: 3A 51 24 28 42 29 B2 22 22 3A 43 4B 24 28 42 29 |:Q$(B)."":CK$(B)|
00001E40: B2 22 22 3A 82 00 56 26 0A 05 99 53 24 3B 22 11 |."":..V&...S$;".|
00001E50: 11 11 11 11 11 22 00 6E 26 14 05 57 B2 30 3A 46 |.....".n&..W.0:F|
00001E60: 24 B2 22 22 3A 52 31 B2 BB 28 AB 54 49 29 00 82 |$."":R1..(.TI)..|
00001E70: 26 1E 05 43 24 B2 22 41 42 43 44 45 46 47 48 49 |&..C$."ABCDEFGHI|
00001E80: 4A 22 00 98 26 28 05 52 B2 B5 28 C3 28 43 24 29 |J"..&(.R..(.(C$)|
00001E90: AC BB 28 31 29 AA 31 29 00 B2 26 32 05 4E 24 B2 |..(1).1)..&2.N$.|
00001EA0: CA 28 43 24 2C 52 2C 31 29 3A 46 24 B2 46 24 AA |.(C$,R,1):F$.F$.|
00001EB0: 4E 24 00 CE 26 3C 05 8B 52 B1 31 A7 54 24 B2 C8 |N$..&<..R.1.T$..|
00001EC0: 28 43 24 2C 52 AB 31 29 3A 89 31 33 36 30 00 D8 |(C$,R.1):.1360..|
00001ED0: 26 46 05 54 24 B2 22 22 00 EC 26 50 05 43 24 B2 |&F.T$.""..&P.C$.|
00001EE0: 54 24 AA CA 28 43 24 2C 52 AA 31 29 00 FE 26 5A |T$..(C$,R.1)..&Z|
00001EF0: 05 8B C3 28 43 24 29 B1 30 A7 31 33 32 30 00 12 |...(C$).0.1320..|
00001F00: 27 64 05 8B C3 28 46 24 29 B3 B1 31 30 A7 31 33 |'d...(F$)..10.13|
00001F10: 30 30 00 2B 27 6E 05 4E 28 30 29 B2 31 30 30 AA |00.+'n.N(0).100.|
00001F20: B5 28 BB 28 31 29 AC 39 30 30 29 00 42 27 78 05 |.(.(1).900).B'x.|
00001F30: 4E 28 31 29 B2 31 30 AA B5 28 BB 28 31 29 AC 39 |N(1).10..(.(1).9|
00001F40: 30 29 00 65 27 82 05 4E 28 32 29 B2 4E 28 30 29 |0).e'..N(2).N(0)|
00001F50: AC 28 4E 28 31 29 AB 31 30 AC B5 28 4E 28 31 29 |.(N(1).10..(N(1)|
00001F60: AD 31 30 29 29 00 7E 27 8C 05 4E 28 33 29 B2 4E |.10)).~'..N(3).N|
00001F70: 28 30 29 AC B5 28 4E 28 31 29 AD 31 30 29 00 91 |(0)..(N(1).10)..|
00001F80: 27 96 05 4E 28 34 29 B2 4E 28 30 29 AC 4E 28 31 |'..N(4).N(0).N(1|
00001F90: 29 00 AE 27 A0 05 8B 31 30 AC B5 28 4E 28 31 29 |)..'...10..(N(1)|
00001FA0: AD 31 30 29 B2 4E 28 31 29 A7 31 34 30 30 00 C4 |.10).N(1).1400..|
00001FB0: 27 AA 05 81 58 B2 30 A4 34 3A 43 B2 30 3A 81 59 |'...X.0.4:C.0:.Y|
00001FC0: B2 31 A4 35 00 E3 27 B4 05 41 28 58 2C 59 29 B2 |.1.5..'..A(X,Y).|
00001FD0: B5 28 4E 28 58 29 AD B5 28 31 30 AE 28 35 AB 59 |.(N(X)..(10.(5.Y|
00001FE0: 29 29 29 00 F7 27 BE 05 42 28 58 2C 59 29 B2 41 |)))..'..B(X,Y).A|
00001FF0: 28 58 2C 59 AB 31 29 00 37 28 C8 05 43 28 58 2C |(X,Y.1).7(..C(X,|
00002000: 59 29 B2 41 28 58 2C 59 29 AB 31 30 AC 42 28 58 |Y).A(X,Y).10.B(X|
00002010: 2C 59 29 3A 45 24 28 58 2C 59 29 B2 CA 28 46 24 |,Y):E$(X,Y)..(F$|
00002020: 2C 43 28 58 2C 59 29 AA 31 2C 31 29 3A 43 B2 43 |,C(X,Y).1,1):C.C|
00002030: AA 43 28 58 2C 59 29 00 4B 28 D2 05 8B 43 B2 30 |.C(X,Y).K(...C.0|
00002040: A7 45 24 28 58 2C 59 29 B2 22 22 00 63 28 DC 05 |.E$(X,Y)."".c(..|
00002050: 82 3A 4C 28 58 29 B2 C3 28 C4 28 4E 28 58 29 29 |.:L(X)..(.(N(X))|
00002060: 29 3A 82 00 81 28 E6 05 99 22 13 52 45 4B 45 4E |):...(...".REKEN|
00002070: 47 41 4C 47 20 20 20 20 20 20 20 11 2A 91 9D 22 |GALG .*.."|
00002080: 3B 00 98 28 F0 05 81 58 B2 30 A4 34 3A 81 59 B2 |;..(...X.0.4:.Y.|
00002090: 31 A4 35 3A 54 B2 32 30 00 A6 28 FA 05 8B 58 B2 |1.5:T.20..(...X.|
000020A0: 33 A7 54 B2 31 38 00 C1 28 04 06 99 A3 54 AB 4C |3.T.18..(....T.L|
000020B0: 28 58 29 29 3B 45 24 28 58 2C 59 29 3B 22 20 22 |(X));E$(X,Y);" "|
000020C0: 3B 00 E7 28 0E 06 82 3A 8B 58 B2 31 B0 58 B2 33 |;..(...:.X.1.X.3|
000020D0: A7 99 3A 99 A3 31 33 29 3B 22 C0 C0 C0 C0 C0 C0 |..:..13);"......|
000020E0: C0 C0 C0 C0 C0 91 22 00 0B 29 18 06 99 3A 82 3A |......"..)...:.:|
000020F0: 99 3A 99 3A 99 3A 99 22 54 4F 45 54 53 20 3C 4D |.:.:.:."TOETS <M|
00002100: 3E 20 56 4F 4F 52 20 4D 45 4E 55 00 1A 29 22 06 |> VOOR MENU..)".|
00002110: 8B 57 B2 30 A7 8D 32 36 39 30 00 45 29 2C 06 54 |.W.0..2690.E),.T|
00002120: B2 31 3A 8D 32 34 32 30 3A 8B 46 A7 99 22 12 53 |.1:.2420:.F..".S|
00002130: 54 4F 50 22 3A 57 B2 31 32 3A 8D 32 36 39 30 3A |TOP":W.12:.2690:|
00002140: 89 31 38 38 30 00 84 29 36 06 81 4A B2 30 A4 31 |.1880..)6..J.0.1|
00002150: 30 3A 8B 5A 24 B2 43 4B 24 28 4A 29 A7 4D 24 B2 |0:.Z$.CK$(J).M$.|
00002160: 5A 24 AA 22 20 3D 22 AA C4 28 4A 29 AA 22 2C 20 |Z$." ="..(J).", |
00002170: 53 4C 49 4D 4D 45 21 22 3A 8D 32 36 32 30 3A 89 |SLIMME!":.2620:.|
00002180: 31 35 38 30 00 C0 29 40 06 82 3A 8B 4E B2 4B 28 |1580..)@..:.N.K(|
00002190: 4E 29 A7 4D 24 B2 CA 28 46 24 2C 4E AA 31 2C 31 |N).M$..(F$,N.1,1|
000021A0: 29 AA 22 20 3D 22 AA C4 28 4E 29 AA 22 2C 20 4F |)." ="..(N).", O|
000021B0: 45 4E 21 22 3A 8D 32 36 32 30 3A 89 31 35 38 30 |EN!":.2620:.1580|
000021C0: 00 F7 29 4A 06 8B 5A 24 B2 51 24 28 4E 29 A7 4D |..)J..Z$.Q$(N).M|
000021D0: 24 B2 22 44 41 54 20 44 41 43 48 54 20 4A 45 20 |$."DAT DACHT JE |
000021E0: 5A 4F 4E 45 54 20 4F 4F 4B 21 22 3A 8D 32 36 32 |ZONET OOK!":.262|
000021F0: 30 3A 89 31 35 38 30 00 10 2A 54 06 8B 5A 24 B2 |0:.1580..*T..Z$.|
00002200: CA 28 46 24 2C 4E AA 31 2C 31 29 A7 31 36 38 30 |.(F$,N.1,1).1680|
00002210: 00 29 2A 5E 06 57 B2 57 AA 31 3A 51 24 28 4E 29 |.)*^.W.W.1:Q$(N)|
00002220: B2 5A 24 3A 8D 32 36 39 30 00 6E 2A 68 06 8B 57 |.Z$:.2690.n*h..W|
00002230: B2 31 A7 99 22 91 91 20 20 20 20 20 20 20 20 20 |.1..".. |
00002240: 20 20 48 41 44 20 4A 45 20 47 45 44 41 43 48 54 | HAD JE GEDACHT|
00002250: 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D A3 |................|
00002260: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 88 |............."..|
00002270: 2A 72 06 99 A3 57 AC 31 30 AB 31 30 29 3B 5A 24 |*r...W.10.10);Z$|
00002280: 3B 22 20 3D 22 3B 4E 3B 00 97 2A 7C 06 8B 57 B2 |;" =";N;..*|..W.|
00002290: 31 32 A7 31 38 38 30 00 A1 2A 86 06 89 31 35 38 |12.1880..*...158|
000022A0: 30 00 B9 2A 90 06 4E 31 B2 35 30 3A 81 58 B2 30 |0..*..N1.50:.X.0|
000022B0: A4 34 3A 81 59 B2 31 A4 35 00 EB 2A 9A 06 8B 45 |.4:.Y.1.5..*...E|
000022C0: 24 28 58 2C 59 29 B2 5A 24 A7 45 24 28 58 2C 59 |$(X,Y).Z$.E$(X,Y|
000022D0: 29 B2 22 9D 22 AA C4 28 4E 29 3A 43 4B 24 28 4E |)."."..(N):CK$(N|
000022E0: 29 B2 5A 24 3A 4B 28 4E 29 B2 4E 00 00 2B A4 06 |).Z$:K(N).N..+..|
000022F0: 8B 45 24 28 58 2C 59 29 B2 22 22 A7 31 37 34 30 |.E$(X,Y)."".1740|
00002300: 00 11 2B AE 06 4D B2 C6 28 45 24 28 58 2C 59 29 |..+..M..(E$(X,Y)|
00002310: 29 00 20 2B B8 06 8B 4D B2 31 35 37 A7 4D B2 30 |). +...M.157.M.0|
00002320: 00 2F 2B C2 06 8B 4D B1 4E 31 A7 4E 31 B2 4D 00 |./+...M.N1.N1.M.|
00002330: 39 2B CC 06 82 59 3A 82 58 00 49 2B D6 06 8B 4E |9+...Y:.X.I+...N|
00002340: 31 B3 36 30 A7 31 37 37 30 00 55 2B E0 06 99 3A |1.60.1770.U+...:|
00002350: 89 31 35 31 30 00 85 2B EA 06 99 22 11 20 20 20 |.1510..+...". |
00002360: 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A | *****|
00002370: 2A 2A 2A 2A 2A 20 20 20 20 20 20 20 20 20 20 20 |***** |
00002380: 20 20 20 1D 22 00 B9 2B F4 06 99 22 20 20 20 20 | ."..+..." |
00002390: 20 20 20 20 4A 45 20 48 45 42 54 20 48 45 54 20 | JE HEBT HET |
000023A0: 47 45 52 41 44 45 4E 20 20 20 20 20 20 20 20 20 |GERADEN |
000023B0: 20 20 22 3A 89 32 30 33 30 00 E8 2B FE 06 99 22 | ":.2030..+..."|
000023C0: 91 20 20 20 20 20 20 20 20 20 20 4A 45 20 48 41 |. JE HA|
000023D0: 44 20 22 57 22 20 46 4F 55 54 45 4E 20 20 20 20 |D "W" FOUTEN |
000023E0: 20 20 20 20 20 20 20 22 00 04 2C 08 07 54 31 B2 | "..,..T1.|
000023F0: 54 31 AA 57 3A 55 B2 55 AA 31 3A 54 32 B2 54 32 |T1.W:U.U.1:T2.T2|
00002400: AA 57 AC 57 00 45 2C 12 07 99 22 11 20 20 20 47 |.W.W.E,...". G|
00002410: 45 4D 49 44 44 45 4C 44 45 20 49 4E 20 22 55 22 |EMIDDELDE IN "U"|
00002420: 20 53 50 45 4C 28 4C 45 4E 29 20 49 53 22 B5 28 | SPEL(LEN) IS".(|
00002430: 28 54 31 AD 55 29 AA 2E 35 29 22 9D 20 20 20 11 |(T1.U)..5)". .|
00002440: 22 3B 58 58 24 00 4B 2C 1C 07 8F 00 6E 2C 26 07 |";XX$.K,....n,&.|
00002450: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 4E 4F |." NO|
00002460: 47 20 45 45 4E 20 53 50 45 4C 3F 20 22 3B 00 8B |G EEN SPEL? ";..|
00002470: 2C 30 07 55 4C B2 31 3A 55 53 24 B2 22 4A 4E 22 |,0.UL.1:US$."JN"|
00002480: 3A 8D 33 35 3A 41 24 B2 55 52 24 00 9C 2C 3A 07 |:.35:A$.UR$..,:.|
00002490: 8B 41 24 B2 22 4A 22 A7 31 32 37 30 00 AE 2C 44 |.A$."J".1270..,D|
000024A0: 07 8B 41 24 B3 B1 22 4E 22 A7 31 38 34 30 00 D0 |..A$.."N".1840..|
000024B0: 2C 4E 07 99 53 24 3B 22 11 54 4F 54 20 5A 49 45 |,N..S$;".TOT ZIE|
000024C0: 4E 53 20 21 21 20 20 20 20 20 20 20 20 22 3A 8E |NS !! ":.|
000024D0: 00 E7 2C 58 07 8F 20 53 4F 4C 55 54 49 4F 4E 20 |..,X.. SOLUTION |
000024E0: 52 4F 55 54 49 4E 45 00 03 2D 62 07 99 22 13 12 |ROUTINE..-b.."..|
000024F0: 4F 50 4C 4F 53 53 49 4E 47 92 20 20 20 20 20 1D |OPLOSSING. .|
00002500: 1D 22 3B 00 1A 2D 6C 07 81 58 B2 30 A4 34 3A 81 |.";..-l..X.0.4:.|
00002510: 59 B2 31 A4 35 3A 54 B2 32 30 00 28 2D 76 07 8B |Y.1.5:T.20.(-v..|
00002520: 58 B2 33 A7 54 B2 31 38 00 42 2D 80 07 45 24 28 |X.3.T.18.B-..E$(|
00002530: 58 2C 59 29 B2 22 9D 22 AA C4 28 43 28 58 2C 59 |X,Y)."."..(C(X,Y|
00002540: 29 29 00 63 2D 8A 07 8B 43 28 58 2C 59 29 B2 30 |)).c-...C(X,Y).0|
00002550: AF 58 B3 32 AF 59 B3 34 A7 45 24 28 58 2C 59 29 |.X.2.Y.4.E$(X,Y)|
00002560: B2 22 22 00 84 2D 94 07 8B 43 28 58 2C 59 29 B2 |.""..-...C(X,Y).|
00002570: 30 AF 58 B2 32 AF 59 B3 33 A7 45 24 28 58 2C 59 |0.X.2.Y.3.E$(X,Y|
00002580: 29 B2 22 22 00 A5 2D 9E 07 8B 43 28 58 2C 59 29 |).""..-...C(X,Y)|
00002590: B2 30 AF 58 B2 33 AF 59 B3 33 A7 45 24 28 58 2C |.0.X.3.Y.3.E$(X,|
000025A0: 59 29 B2 22 22 00 C6 2D A8 07 8B 43 28 58 2C 59 |Y).""..-...C(X,Y|
000025B0: 29 B2 30 AF 58 B2 34 AF 59 B2 31 A7 45 24 28 58 |).0.X.4.Y.1.E$(X|
000025C0: 2C 59 29 B2 22 22 00 E1 2D B2 07 99 A3 54 AB 4C |,Y).""..-....T.L|
000025D0: 28 58 29 29 3B 45 24 28 58 2C 59 29 3B 22 20 22 |(X));E$(X,Y);" "|
000025E0: 3B 00 06 2E BC 07 82 3A 8B 58 B2 31 B0 58 B2 33 |;......:.X.1.X.3|
000025F0: A7 99 3A 99 A3 31 33 29 22 C0 C0 C0 C0 C0 C0 C0 |..:..13)".......|
00002600: C0 C0 C0 C0 91 22 00 10 2E C6 07 99 3A 82 3A 99 |....."......:.:.|
00002610: 00 2C 2E D0 07 99 22 13 11 11 11 11 11 11 11 11 |.,....".........|
00002620: 11 11 11 11 11 11 20 20 20 20 22 3B 00 75 2E DA |...... ";.u..|
00002630: 07 99 22 23 23 23 23 23 23 23 23 23 23 23 23 23 |.."#############|
00002640: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00002650: 23 23 23 20 20 20 20 20 20 20 20 20 20 20 20 20 |### |
00002660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002670: 20 20 20 20 22 00 A3 2E E4 07 99 22 20 20 20 20 | "......" |
00002680: 20 20 20 20 20 20 20 20 20 4E 49 45 54 20 47 45 | NIET GE|
00002690: 52 41 44 45 4E 21 20 20 20 20 20 20 20 20 20 20 |RADEN! |
000026A0: 20 20 22 00 C1 2E EE 07 81 4A B2 31 A4 34 3A 99 | "......J.1.4:.|
000026B0: 22 11 22 3B 58 58 24 3B 3A 82 3A 99 22 91 91 91 |".";XX$;:.:."...|
000026C0: 22 00 CB 2E F8 07 89 31 37 39 30 00 DD 2E 74 09 |"......1790...t.|
000026D0: 8F 20 47 55 45 53 53 20 45 4E 54 52 59 00 E5 2E |. GUESS ENTRY...|
000026E0: 7E 09 99 53 24 00 F9 2E 88 09 46 B2 30 3A 5A 24 |~..S$.....F.0:Z$|
000026F0: B2 22 40 22 3A 4E B2 AB 31 00 1D 2F 92 09 99 22 |."@":N..1../..."|
00002700: 4A 4F 55 57 20 47 4F 4B 20 3A 20 20 20 20 20 20 |JOUW GOK : |
00002710: 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 46 2F | ........";.F/|
00002720: 9C 09 55 4C B2 32 3A 55 53 24 B2 22 30 31 32 33 |..UL.2:US$."0123|
00002730: 34 35 36 37 38 39 41 42 43 44 45 46 47 48 49 4A |456789ABCDEFGHIJ|
00002740: 4D 22 3A 8D 33 35 00 62 2F A6 09 41 24 B2 C8 28 |M":.35.b/..A$..(|
00002750: 55 52 24 2C 31 29 3A 42 24 B2 C9 28 55 52 24 2C |UR$,1):B$..(UR$,|
00002760: 31 29 00 92 2F A8 09 8B C5 28 41 24 29 B2 30 AF |1)../....(A$).0.|
00002770: 42 24 B3 B1 22 30 22 AF 41 24 B2 22 30 22 A7 5A |B$.."0".A$."0".Z|
00002780: 24 B2 42 24 3A 4E B2 C5 28 41 24 29 3A 89 32 34 |$.B$:N..(A$):.24|
00002790: 39 30 00 C2 2F A9 09 8B C5 28 42 24 29 B2 30 AF |90../....(B$).0.|
000027A0: 41 24 B3 B1 22 30 22 AF 42 24 B2 22 30 22 A7 5A |A$.."0".B$."0".Z|
000027B0: 24 B2 41 24 3A 4E B2 C5 28 42 24 29 3A 89 32 34 |$.A$:N..(B$):.24|
000027C0: 39 30 00 F3 2F AB 09 8B C5 28 41 24 29 B2 30 AF |90../....(A$).0.|
000027D0: 41 24 B3 B1 22 30 22 AF C5 28 42 24 29 B1 30 A7 |A$.."0"..(B$).0.|
000027E0: 5A 24 B2 41 24 3A 4E B2 C5 28 42 24 29 3A 89 32 |Z$.A$:N..(B$):.2|
000027F0: 34 39 30 00 24 30 B0 09 8B C5 28 42 24 29 B2 30 |490.$0....(B$).0|
00002800: AF 42 24 B3 B1 22 30 22 AF C5 28 41 24 29 B1 30 |.B$.."0"..(A$).0|
00002810: A7 5A 24 B2 42 24 3A 4E B2 C5 28 41 24 29 3A 89 |.Z$.B$:N..(A$):.|
00002820: 32 34 39 30 00 36 30 B4 09 8B 41 24 B2 22 4D 22 |2490.60...A$."M"|
00002830: A7 46 B2 31 3A 8E 00 7C 30 B5 09 99 22 4E 49 45 |.F.1:..|0..."NIE|
00002840: 54 20 4D 4F 47 45 4C 49 4A 4B 22 3A 81 5A 5A B2 |T MOGELIJK":.ZZ.|
00002850: 31 A4 39 39 39 3A 82 3A 99 22 91 20 20 20 20 20 |1.999:.:.". |
00002860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
00002870: 99 22 91 91 22 3B 3A 89 32 34 35 30 00 82 30 BA |."..";:.2450..0.|
00002880: 09 8F 00 88 30 C4 09 8E 00 8E 30 3C 0A 8F 00 9F |....0.....0<....|
00002890: 30 50 0A 99 53 24 3B 22 11 11 11 22 3B 4D 24 00 |0P..S$;"...";M$.|
000028A0: B1 30 5A 0A 81 4A B2 31 A4 54 AC 31 30 30 30 3A |.0Z..J.1.T.1000:|
000028B0: 82 00 BA 30 64 0A 99 58 58 24 00 C4 30 6E 0A 99 |...0d..XX$..0n..|
000028C0: 22 11 11 22 00 CA 30 78 0A 8E 00 E0 30 82 0A 8F |".."..0x....0...|
000028D0: 20 4D 49 53 53 20 53 55 42 52 4F 55 54 49 4E 45 | MISS SUBROUTINE|
000028E0: 00 F0 30 8C 0A 8B 57 B3 B1 31 32 A7 32 37 34 30 |..0...W..12.2740|
000028F0: 00 F9 30 96 0A 99 53 24 3B 00 25 31 A0 0A 81 4A |..0...S$;.%1...J|
00002900: B2 31 A4 33 3A 99 50 24 28 31 33 29 3B 22 11 22 |.1.3:.P$(13);"."|
00002910: 3B 3A 99 50 24 28 31 32 29 3B 3A 81 4B B2 31 A4 |;:.P$(12);:.K.1.|
00002920: 32 35 3A 82 4B 00 3F 31 AA 0A 82 3A 54 B2 35 3A |25:.K.?1...:T.5:|
00002930: 4D 24 B2 48 4D 24 28 57 29 3A 89 32 37 37 30 00 |M$.HM$(W):.2770.|
00002940: 51 31 B4 0A 99 53 24 3B 50 24 28 57 29 3A 54 B2 |Q1...S$;P$(W):T.|
00002950: 33 00 5C 31 BE 0A 8B 57 B2 30 A7 8E 00 87 31 C8 |3.\1...W.0....1.|
00002960: 0A 4D 24 B2 22 2A 2A 20 46 4F 55 54 20 2A 2A 20 |.M$."** FOUT ** |
00002970: 49 4B 20 54 45 4B 45 4E 20 45 52 42 49 4A 3A 22 |IK TEKEN ERBIJ:"|
00002980: AA 48 4D 24 28 57 29 00 93 31 D2 0A 8D 32 36 32 |.HM$(W)..1...262|
00002990: 30 3A 8E 00 00 00 53 5C 31 FF |0:....S\1. |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(.UR$."":UI$."":.UO,0...*..UL.0.UL.80
.".-..UC,0.6.2..UI$:.UI$."".50.`.7..UI$.
G(13).C(UR$)..1..UC,1:." .";:.85.S.<..UI
$.G(20).105...>.. C(UR$)..UL.50...A..120
:. CHECK FOR VALID CHARACTER...F.UR$.UR$
.UI$.F.K..UI$;.N.P..50...U.. +++ CHECK F
OR HELP REQUEST +++...Z..UR$.UX$.195:. E
XIT TO HELP ROUTINE.*._..UF.1..240.7.D.U
F.0:.:..P.F.. ++ CHECK DELETE ++.A.I..C(
UR$).1.50.Y.N.UR$.H(UR$,C(UR$).1)...S.."
. ..";:.50...X.. ++ CHECK FOR VALID CHA
RACTERS ++.D.}..C(US$).0.150.U....US.1.C
(US$)......UI$.J(US$,US,1).............U
I$."":....... ** STANDARD INPUT **.+....
F(UI$).46...<....UI$.G(32)...Y. ..F(UI$)
.48.F(UI$).57.170._.....|....F(UI$).65.F
(UI$).90.180............F(UI$).193.F(UI$
).218.UI$."":..I....B(UT).UU%.UI$.G(F(UI
$).128):..O.........UI$."":....C.UF.1:.
+++ HELP ROUTINE EXIT +++...E..250...H..
245.2.M..UQ.UB.(U2%.256.U1%.U3%.2).N.R.U
Q%(UQ.UB).B(UQ):.:.".".A.W.UZ.1:UV%.B(UT
).J.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:UP.U
J:UL.UK:.B(50003).0..53281,6:.53280,14..
...UT$.UL$:.".";:.UT,UV%:.UQ.UB.(U2%.256
.U1%.U3%.3)......UQ,UQ%(UQ.UB):.......U1
,U1%......U2,U2%......U4,U4%.*....U3,U3%
.1.2....35.D...UD%.((U2%.256.U1%.U3%).UB
).40:.H(UD$,UD%.1):.......H(UD$,24);"
. HELP COMING . ":..
K...U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(
U4).....UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK
.UL.........,.. ** MENU **...-.:.?....".
":.UT,UU%:.B(50003).0..53281,9:.53280,8.
E./.:.B.1..". MENU"...6..
" --------------------------------------
"...;..".. 1. BEGIN REKENGALG"..
.@..".. 2. LEERLING INSTRUCTIES"
...E..".. 3. LEERKRACHT INSTRUCT
IES".(.O..".. 4. STOP..".W.T.."
--------------------------------------".
..Y..".. TOETS EEN NUMMER (1-4) "
;...^.UL.1:US$."1234":.35:. INPUT ROUTIN
E...`.US$."".Q.C..E(UR$).1000,400,500,39
6.Z.H..300...... ** RE-ENABLE STOP KEY A
ND END **.0....B(50003)..1.B(50003)..160
.B(50003)..0.399.Z....UU.71:.B(50003).0.
.53281,6:.53280,14.F...."..":..Q....875:
....... ** STUDENT INSTRUCTIONS **.A....
".":.UT,UL%:.B(50003).0..53281,0:.53280,
0.....UP.0:UG$."LEERLING INST":.850.....
." REKENGALG LAAT JE EEN VERMENIG-".6.
..."..VULDIGING ZIEN WAARIN DE CIJFERS.\
...."..ZIJN VERVANGEN DOOR LETTERS.".T..
.."..BIJVOORBEELD:."......" A B F
4 5 6"... .." * E D
* 3 2"......" ......
......"......" H C D
9 1 2".+...." C E F I 1 3 6
8".P...." ......... ........."
.U...." C A B H D 1 4 5 9 2"...
...". HIER IS DE LETTER 'A' HET CIJFE
R 4,".R...."..DE LETTER 'H' IS HET CIJFE
R 9 ENZO-......"..VOORT.":.835......850
......". ALS JIJ DENKT DAT DE LETTER '
A'".I...."..EEN 4 IS, TYP DAN: 'A4' + <
RETURN>.".A...."..('4A' MAG OOK)"......"
. JE KRIJGT 12 KANSEN OM DE PUZZEL OP"
.M...."..TE LOSSEN VOORDAT IK HET ANTWOO
RD .LAAT ZIEN."......". ALS JE D
E 'O' INTYPT, ZAL IK DE OP- ..LOSSING G
EVEN.":.......835.-....UZ.1..UP%:.217.3.
....T.... ** TEACHER INSTRUCTIONS **....
..".":.UT,UL%:.B(50003).0..53281,2:.5328
0,10.....UP.0:UG$."TEACHER INST":.850.S.
...".. TO THE BEST OF OUR KNOWLEDGE
,."......" THIS PROGRAM IS IN THE PUBL
IC.".(...." DOMAIN. IF THIS IS NOT TH
E CASE.".E...." PLEASE CONTACT:...".O.
..." COMMODORE BUSINESS MACHINES.".
....." 3370 PHARMACY AVE.......
" AGINCOURT, ONTARIO".X...."
CANADA M1W 2K4"......"
(416) 499-4292".....UP.1:. 835:. 850:.;
....".. ORIGINAL PROGRAM NAME: HANGMA
TH..]...." WRITTEN BY : UNKNOWN....
..." VERTAALD DOOR : A.V/D NIEUWENHUIZ
EN"......" .THIS PROGRAM WILL RUN ON
ANY........" BASIC 2.0 PET COMP
UTER......." BASIC 4.0 PET COMPU
TER..&...." 8032 CBM COMPUTER..K
...." COMMODORE 64 COMPUTER.T...
.835.H.N..UZ.1..UP%:.217.N.W.....X.. **
PROGRAM MODIFICATION INST **...Y..".":.U
T,UL%.E.].UP.0:UG$."PROGRAM MOD":.850.N.
...835......UZ.1..UP%:.217............ *
* TO USE 8032 LOAD CBM4032 **.C.F.."....
.BEFORE RUNNING THIS PROGRAM ON AN 8032
...Y.P.." LOAD THE 'CBM 4032' PROG
RAM............."...Z..UU.71............
** TO USE 8032 LOAD CBM4032 **......"..
..BEFORE RUNNING THIS PROGRAM ON AN 8032
..LOAD CBM 4032 PROGRAM"......1093:..&
. .. ** T I T L E P A G E **.Z.".."...
.";:.UT,UU%:.B(50003).0..53280,14:.53281
,6.P.$..I.1.38:."...";:....&..I.1.22:.".
....";:.. .(..I.1.37:.".....";:....*..I.
1.22:.".....";:....,..".................
.......... ......."...................
. . ... .0.."................... . ...
.>.2..".................... ..F.4.."...
...........C O M M O D O R E.....6.."...
............EDUCATIONAL.....8.."........
........SOFTWARE.C.:.. ** COMMODORE LOGO
**...;..H(UD$,24);".........TOETS SPATI
EBALK OF WACHT.":I.0...<..A$:.A$.." ".I.
I.1:.I.250.828.B.>.T1$."":T2$."":T3$."":
T4$."":I.0.K.@..300.G.C.. ** SPACE BAR P
RESS **...H..H(UD$,24);"......TOETS SPAT
IEBALK VOOR VERVOLG.":.UO,0...L..UI$:.UI
$.." ".844...N.....R.. ** PAGE DESIGN RO
UTINE **...T.UP.UP.1...W.."."H(UT$.UP$,2
1);I(UP$.UG$.D(UP),18).E.\.." ----------
----------------------------".T.`..UH..0
.870...A..H(UD$,24);H(UP$,7);"VOOR MENU
: M <RETURN>"...F.UH.0:."..":....K.. **
PLEASE WAIT REMARK **...P..H(UD$,24);"
MOMENTJE A.U.B.... "...U...
..... ** SET UP VARIABLES **.W...UX$."H"
:.UQ%(1000):UB.32768:U1.196:U2.197:U3.19
8:U4.216:UC.167:UU.1024.....UT.59468:UU%
.12:UL%.14:UP%.1146:UM.32768:. 50003,0:U
O.158.X....B(50003).0.UB.1024:U1.209:U2.
210:U3.211:U4.214:UC.204:UU.2048......B(
50003).0.UT.53272:UU%.21:UL%.23:UP%.2139
:UM.1024:UO.198.;...UD$."...............
..........".M...UP$."
".....UT$." REKENGAL
G ":. PLACE PROGRAM TITLE HERE !!
!!!!!!!!!!!!!!!***.......Z.... ** SET VA
RIABLES **......900...... A(4,5),B(4,5),
C(4,5),E$(4,5),HM$(12),P$(13).+....J.1.1
2:.HM$(J):..F.... ** CHECK FOR 8032 **.O
....PRINT".":PRINT" ":REM SHIFTED SPACE.
.....IFPEEK(UB+40)<>96THENGOSUB700......
** MEMORY CHECK **...... .(0).2000.937.
....."....THIS MACHINE DOES NOT HAVE ENO
UGH.".. ..."MEMORY TO RUN THIS PROGRAM !
".. ...UU.71." ....< ..."..":.B(50003).0
.962.K ... ** BASIC 2.0 OR 4.0 OR C-
64 SETUP **.. ...1075,133:.1076,144:.107
7,234:.1079,4:.1080,133:.1081,145.. ...1
091,155:.1098,133:.1099,144:.1100,234:.1
103,133..!...1104,145:.1105,234:.1082,23
4..!...B(50003)..160.955.G!...1093,88:.1
094,228:.1097,85:.1102,228:.965.\!...B(5
0003)..1.990..!...1093,49:.1094,230:.109
7,46:.1102,230:.965.E!B..2099,141:.2100,
20:.2101,3:.2103,8:.2104,141:.2105,21.."
C..2106,3:.2115,145:.2117,52:.2118,234:.
2121,49:.2122,141.;"D..2123,20:.2124,3:.
2126,234:.2127,141:.2128,21:.2129,3.Y"E.
.UU.48:. DISABLE STOP KEY.J"J..800:. TIT
LE.Z"T..300:. MENU.."...PRINT".THE PGM W
ILL NOT WORK ON THIS MACHINE!":END.."...
UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM STARTS
HERE **..#..."..";:.:.B(50003).0..53281,
6:.53280,6.D#..XX$.".
".Y#$.S$."...........
"..#B.. HOOFD,BOVENLIJF,ONDERLIJF,LINKER
ARM,RECHTERARM,LINKERBEEN.Y#L.. RECHTERB
EEN,LINKERHAND,RECHTERHAND,LINKERVOET,RE
CHTERVOET..$V.. " ***** JE HANGT
!! *****".K$`.P$(0)."..................
.................... REKENGALG ........
.."..$J.P$(0).P$(0)."...................
................"..$T.P$(1)."...........
W"..$~.P$(2)."...........".I$..P$(3)."..
........"..$..P$(4)."............"..$..P
$(5).".........."..%..P$(6)."..........U
".'%..P$(7)."........I".A%..P$(8).".....
........".Y%D.P$(9)."...........".Q%N.P$
(10).".........."..%X.P$(11)."........".
.%..P$(12).".........................U.I
..... ......"..&..P$(13)."............ .
.... . .... .... .... .....":.UT,
UU%..&...". EVEN REKENEN...".E&...B.0.10
:K(B)..1:Q$(B)."":CK$(B)."":..V&...S$;".
.....".N&..W.0:F$."":R1..(.TI)..&..C$."A
BCDEFGHIJ"..&(.R..(C(C$)..(1).1)..&2.N$.
J(C$,R,1):F$.F$.N$.N&<..R.1.T$.H(C$,R.1)
:.1360.X&F.T$.""..&P.C$.T$.J(C$,R.1)..&Z
..C(C$).0.1320..'D..C(F$)..10.1300.+'N.N
(0).100..(.(1).900).B'X.N(1).10..(.(1).9
0).E'..N(2).N(0).(N(1).10..(N(1).10)).~'
..N(3).N(0)..(N(1).10)..'..N(4).N(0).N(1
)..' ..10..(N(1).10).N(1).1400.D'...X.0.
4:C.0:.Y.1.5..'..A(X,Y)..(N(X)..(10.(5.Y
)))..'..B(X,Y).A(X,Y.1).7(H.C(X,Y).A(X,Y
).10.B(X,Y):E$(X,Y).J(F$,C(X,Y).1,1):C.C
.C(X,Y).K(R..C.0.E$(X,Y)."".C(...:L(X).C
(D(N(X))):...(...".REKENGALG .*.."
;..(...X.0.4:.Y.1.5:T.20..(...X.3.T.18.A
(....T.L(X));E$(X,Y);" ";..(...:.X.1.X.3
..:..13);"............"..)...:.:.:.:.:."
TOETS <M> VOOR MENU..)"..W.0..2690.E),.T
.1:.2420:.F..".STOP":W.12:.2690:.1880..)
6..J.0.10:.Z$.CK$(J).M$.Z$." =".D(J).",
SLIMME!":.2620:.1580..)@..:.N.K(N).M$.J(
F$,N.1,1)." =".D(N).", OEN!":.2620:.1580
..)J..Z$.Q$(N).M$."DAT DACHT JE ZONET OO
K!":.2620:.1580..*T..Z$.J(F$,N.1,1).1680
.)*^.W.W.1:Q$(N).Z$:.2690.N*H..W.1.."..
HAD JE GEDACHT................
............."..*R...W.10.10);Z$;" =";N;
..*|..W.12.1880..*...1580..*..N1.50:.X.0
.4:.Y.1.5..*...E$(X,Y).Z$.E$(X,Y).".".D(
N):CK$(N).Z$:K(N).N..+...E$(X,Y)."".1740
..+..M.F(E$(X,Y)). +...M.157.M.0./+B..M.
N1.N1.M.9+L..Y:.X.I+V..N1.60.1770.U+...:
.1510..+...". **********
."..+..." JE HEBT HET
GERADEN ":.2030..+...".
JE HAD "W" FOUTEN "..,..T1.
T1.W:U.U.1:T2.T2.W.W.E,...". GEMIDDELD
E IN "U" SPEL(LEN) IS".((T1.U)..5)". .
";XX$.K,....N,&.." NOG EEN SP
EL? ";..,0.UL.1:US$."JN":.35:A$.UR$..,:.
.A$."J".1270..,D..A$.."N".1840.P,N..S$;"
.TOT ZIENS !! ":...,X.. SOLUTION
ROUTINE..-B.."..OPLOSSING. ..";..-L.
.X.0.4:.Y.1.5:T.20.(-V..X.3.T.18.B-..E$(
X,Y).".".D(C(X,Y)).C-...C(X,Y).0.X.2.Y.4
.E$(X,Y).""..-...C(X,Y).0.X.2.Y.3.E$(X,Y
).""..-...C(X,Y).0.X.3.Y.3.E$(X,Y)."".F-
...C(X,Y).0.X.4.Y.1.E$(X,Y).""..-....T.L
(X));E$(X,Y);" ";......:.X.1.X.3..:..13)
"............"...F..:.:..,.P..".........
...... ";.U.Z.."#####################
###########
"......" NIET GERADEN!
".A....J.1.4:.".";XX$;:.:."...
".K....1790...T.. GUESS ENTRY...~..S$...
..F.0:Z$."@":N..1../..."JOUW GOK :
........";.F/..UL.2:US$."0123456789AB
CDEFGHIJM":.35.B/..A$.H(UR$,1):B$.I(UR$,
1)../...E(A$).0.B$.."0".A$."0".Z$.B$:N.E
(A$):.2490.B/...E(B$).0.A$.."0".B$."0".Z
$.A$:N.E(B$):.2490../...E(A$).0.A$.."0".
E(B$).0.Z$.A$:N.E(B$):.2490.$0...E(B$).0
.B$.."0".E(A$).0.Z$.B$:N.E(A$):.2490.60.
..A$."M".F.1:..|0..."NIET MOGELIJK":.ZZ.
1.999:.:.". ":."..";:.
2450..0.....0D....0<....0P..S$;"...";M$.
.0Z..J.1.T.1000:...0D..XX$.D0N.."..".J0X
....0... MISS SUBROUTINE..0...W..12.2740
..0...S$;.%1 ..J.1.3:.P$(13);".";:.P$(12
);:.K.1.25:.K.?1...:T.5:M$.HM$(W):.2770.
Q1...S$;P$(W):T.3.\1...W.0....1H.M$."**
FOUT ** IK TEKEN ERBIJ:".HM$(W)..1R..262
0:....S\1.
> CLICK IMAGE PREVIEW FOR FULL MODAL