WIS-FORMULE

00000000: 01 08 17 08 00 00 97 35  33 32 38 30 2C 30 3A 97  |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 00  3D 08 64 00 86 20 41 24  |53281,0.=.d.. A$|
00000020: 28 32 29 2C 42 24 28 31  33 29 2C 43 24 28 33 29  |(2),B$(13),C$(3)|
00000030: 2C 52 24 28 31 35 29 2C  4D 28 32 30 29 00 5E 08  |,R$(15),M(20).^.|
00000040: 96 00 8F 20 2A 2A 2A 43  41 4C 4C 20 49 4E 49 54  |... ***CALL INIT|
00000050: 49 41 4C 49 5A 41 54 49  4F 4E 53 2A 2A 2A 00 69  |IALIZATIONS***.i|
00000060: 08 A0 00 8D 20 35 30 30  30 00 8A 08 86 01 8F 20  |.... 5000...... |
00000070: 2A 2A 2A 2A 2A 2A 2A 49  4E 53 54 52 55 43 54 49  |*******INSTRUCTI|
00000080: 4F 4E 53 2A 2A 2A 2A 2A  2A 2A 00 95 08 90 01 99  |ONS*******......|
00000090: C7 28 31 34 29 00 C6 08  9A 01 99 22 93 05 2A 2A  |.(14)......"..**|
000000A0: 2A 20 C3 CF CD CD CF C4  CF D2 C5 20 36 34 20 2A  |* ......... 64 *|
000000B0: 2A 2A 2A 2A 20 D2 C5 CB  C5 CE A0 CD C1 C3 C8 C9  |**** ...........|
000000C0: CE C5 20 2A 2A 2A 00 F6  08 A4 01 99 22 99 C1 4C  |.. ***......"..L|
000000D0: 53 20 4A 45 20 4D 49 4A  20 45 45 4E 20 47 45 54  |S JE MIJ EEN GET|
000000E0: 41 4C 20 47 45 45 46 54  2C 20 5A 41 4C 20 49 4B  |AL GEEFT, ZAL IK|
000000F0: 20 4D 49 4A 4E 22 00 25  09 AE 01 99 22 11 4D 41  | MIJN".%....".MA|
00000100: 43 48 49 4E 45 20 4D 45  54 20 27 4E 20 12 C7 C5  |CHINE MET 'N ...|
00000110: C8 C5 C9 CD C5 20 C3 CF  C4 C5 92 20 48 45 54 20  |..... ..... HET |
00000120: 47 45 54 41 4C 00 4E 09  B8 01 99 22 20 11 20 56  |GETAL.N...." . V|
00000130: 45 52 41 4E 44 45 52 45  4E 20 49 4E 20 45 45 4E  |ERANDEREN IN EEN|
00000140: 20 41 4E 44 45 52 20 47  45 54 41 4C 2E 22 00 79  | ANDER GETAL.".y|
00000150: 09 C2 01 99 22 11 05 11  D0 52 4F 42 45 45 52 20  |...."....ROBEER |
00000160: 44 45 20 C7 C5 C8 C5 C9  CD C5 20 C3 CF C4 C5 20  |DE ....... .... |
00000170: 54 45 20 52 41 44 45 4E  21 00 A8 09 CC 01 99 22  |TE RADEN!......"|
00000180: 11 99 11 C8 4F 45 20 4D  4F 45 49 4C 49 4A 4B 20  |....OE MOEILIJK |
00000190: 5A 41 4C 20 49 4B 20 44  45 20 12 C3 CF C4 C5 92  |ZAL IK DE ......|
000001A0: 20 4D 41 4B 45 4E 20 3F  00 E5 09 D6 01 99 22 11  | MAKEN ?......".|
000001B0: 20 20 28 D4 59 50 45 20  31 2C 32 2C 33 2C 34 20  |  (.YPE 1,2,3,4 |
000001C0: 4F 46 20 35 22 3A 99 22  20 20 31 3D CD 41 4B 4B  |OF 5":."  1=.AKK|
000001D0: 45 4C 49 4A 4B 2E 2E 2E  2E 35 3D 4D 4F 45 49 4C  |ELIJK....5=MOEIL|
000001E0: 49 4A 4B 29 11 00 1B 0A  E0 01 99 22 11 11 11 20  |IJK)......."... |
000001F0: 28 D6 45 52 47 45 45 54  20 4E 49 45 54 20 4F 50  |(.ERGEET NIET OP|
00000200: 20 12 D2 C5 D4 D5 D2 CE  92 20 54 45 20 44 52 55  | ........ TE DRU|
00000210: 4B 4B 45 4E 21 29 91 91  05 91 22 00 4A 0A F4 01  |KKEN!)....".J...|
00000220: 99 22 91 91 22 3A 99 22  20 20 20 20 20 20 20 20  |."..":."        |
00000230: 20 20 20 20 20 20 20 20  3F 20 20 20 20 20 20 20  |        ?       |
00000240: 9D 9D 9D 9D 9D 9D 9D 9D  22 3B 00 74 0A FE 01 8D  |........";.t....|
00000250: 32 35 30 30 3A 56 B2 C5  28 4E 24 29 AB 31 3A 8D  |2500:V..(N$).1:.|
00000260: 31 30 30 30 30 3A 8F 20  55 49 54 4C 45 47 20 50  |10000:. UITLEG P|
00000270: 41 47 2E 32 00 9A 0A 08  02 8B 56 AC 28 56 AB 31  |AG.2......V.(V.1|
00000280: 29 AC 28 56 AB 32 29 AC  28 56 AB 33 29 AC 28 56  |).(V.2).(V.3).(V|
00000290: AB 34 29 B3 B1 30 A7 35  30 30 00 BB 0A 12 02 41  |.4)..0.500.....A|
000002A0: B2 B5 28 33 AC BB 28 31  29 AA 32 29 3A 42 B2 B5  |..(3..(1).2):B..|
000002B0: 28 31 30 AC BB 28 31 29  AA 33 29 00 DA 0A 17 02  |(10..(1).3).....|
000002C0: 58 B2 33 AC 56 AA B5 28  33 AC BB 28 31 29 29 AA  |X.3.V..(3..(1)).|
000002D0: 31 3A 8B 56 B2 58 A7 35  33 35 00 E2 0A 1C 02 56  |1:.V.X.535.....V|
000002E0: B2 58 00 16 0B 21 02 91  56 8D 34 30 30 30 2C 34  |.X...!..V.4000,4|
000002F0: 30 31 30 2C 34 30 32 30  2C 34 30 33 30 2C 34 30  |010,4020,4030,40|
00000300: 34 30 2C 34 30 35 30 2C  34 30 36 30 2C 34 30 37  |40,4050,4060,407|
00000310: 30 2C 34 30 38 30 00 44  0B 26 02 8B 56 B1 39 A7  |0,4080.D.&..V.9.|
00000320: 91 28 56 AB 39 29 8D 34  30 39 30 2C 34 31 30 30  |.(V.9).4090,4100|
00000330: 2C 34 31 31 30 2C 34 31  32 30 2C 34 31 33 30 2C  |,4110,4120,4130,|
00000340: 34 31 34 30 00 50 0B 2B  02 99 C7 28 31 34 32 29  |4140.P.+...(142)|
00000350: 00 71 0B 30 02 8F 20 2A  2A 2A 2A 2A 44 52 41 57  |.q.0.. *****DRAW|
00000360: 20 54 48 45 20 4D 41 43  48 49 4E 45 2A 2A 2A 2A  | THE MACHINE****|
00000370: 2A 00 96 0B 3A 02 99 22  93 1C 11 11 11 11 11 1D  |*...:.."........|
00000380: 1D 1D 12 20 20 20 92 9D  9D 9D 11 DF 12 20 92 A9  |...   ....... ..|
00000390: 9D 9D 9D 11 22 3B 00 BA  0B 44 02 99 22 A7 12 20  |....";...D..".. |
000003A0: 92 A5 9D 9D 9D 11 A7 12  20 92 A5 9D 9D 9D 11 A7  |........ .......|
000003B0: 12 A0 92 A5 9D 9D 9D 11  22 3B 00 DE 0B 4E 02 99  |........";...N..|
000003C0: 22 A7 12 20 92 A5 9D 9D  9D 11 A7 12 20 92 CC 9D  |".. ........ ...|
000003D0: 9D 9D 11 A7 12 20 20 92  9D 9D 11 A3 22 3B 00 00  |.....  .....";..|
000003E0: 0C 58 02 99 22 A3 91 91  A4 9D 11 12 20 92 9D 11  |.X.."....... ...|
000003F0: A3 91 91 A4 9D 11 12 20  92 9D 11 A3 91 91 22 3B  |....... ......";|
00000400: 00 1C 0C 62 02 99 22 A4  9D 11 12 20 92 9D 11 A3  |...b..".... ....|
00000410: 91 91 05 BA 1C 9D 11 12  20 92 22 3B 00 41 0C 6C  |........ .";.A.l|
00000420: 02 99 22 05 9D 11 D0 9D  91 91 91 A7 91 A4 A4 81  |..".............|
00000430: BA CC 9D 9D 91 A7 A5 9D  9D 91 A7 A5 9D 9D 91 22  |..............."|
00000440: 3B 00 67 0C 76 02 99 22  9C CE CD 9D 9D 9D 11 CE  |;.g.v.."........|
00000450: 1D 1D CD 9D 9D 9D 9D 9D  11 D7 1D 1D 1D 1D D1 9D  |................|
00000460: 05 9D 11 A4 A4 22 3B 00  98 0C 80 02 99 22 05 A4  |.....";......"..|
00000470: A4 1F BA A6 CC 9D 9D 9D  91 1F A7 A6 A5 9D 9D 9D  |................|
00000480: 91 A7 A6 A5 9D 9D 9D 91  A7 A6 A5 05 11 11 11 11  |................|
00000490: A5 9D 11 A5 9D 11 22 3B  00 BC 0C 8A 02 99 22 12  |......";......".|
000004A0: 20 92 A1 9D 91 D5 C0 C9  9D 11 DD 9D 11 CB 9D 9D  | ...............|
000004B0: C0 9D 9D CA 9D 9D A5 9D  11 A5 22 3B 00 E2 0C 94  |..........";....|
000004C0: 02 99 22 1C 9D 11 12 DF  9D 11 20 DF 9D 9D 11 92  |.."....... .....|
000004D0: DF 12 20 DF 9D 9D 11 92  DF 12 20 DF 9D 9D 11 92  |.. ....... .....|
000004E0: 22 3B 00 09 0D 9E 02 99  22 DF A9 9D 9D 9D 9D 91  |";......".......|
000004F0: A5 9D 9D 11 05 A3 9D 9D  A3 9D 9D A3 9D 9D A3 9D  |................|
00000500: 9D A3 9D 9D A3 9D 9D 22  3B 00 30 0D A8 02 99 22  |.......";.0...."|
00000510: A3 9D 9D A3 9D 9D A3 9D  9D A3 9D 9D A3 9D 9D 91  |................|
00000520: A7 9D 91 A7 9D 91 A7 9D  91 A7 9D 91 A7 1C 22 3B  |..............";|
00000530: 00 54 0D B2 02 99 22 1D  1D 91 91 99 D5 C9 D5 C0  |.T....".........|
00000540: C9 D5 C9 9D 9D 9D 9D 9D  9D 9D 11 CA CB CA C0 CB  |................|
00000550: CA CB 22 3B 00 78 0D BC  02 99 22 05 9D 9D 9D 9D  |..";.x....".....|
00000560: 9D 9D 9D 11 11 11 41 41  4E 20 12 55 49 54 92 1D  |......AAN .UIT..|
00000570: 1D 1D 1D 1D 1D 1D 22 3B  00 9D 0D C6 02 99 22 9A  |......";......".|
00000580: 1D 1D 1D 1D 91 91 91 91  91 91 91 91 91 91 91 91  |................|
00000590: 91 91 91 49 4E 20 DD 20  55 49 54 22 3B 00 C6 0D  |...IN . UIT";...|
000005A0: D0 02 99 22 9D 9D 9D 9D  9D 9D 9D 9D 9D 11 C0 C0  |..."............|
000005B0: C0 C0 DB C0 C0 C0 C0 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
000005C0: 9D 9D 9D 11 22 3B 00 FC  0D DA 02 81 4A B2 31 A4  |....";......J.1.|
000005D0: 31 37 3A 99 22 20 20 20  20 20 20 20 DD A0 20 20  |17:."       ..  |
000005E0: 20 20 20 20 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |    ............|
000005F0: 9D 9D 9D 11 22 3B 3A 82  3A 57 B2 31 00 0B 0E DF  |....";:.:W.1....|
00000600: 02 99 22 13 22 3B 46 24  3B 53 24 00 2D 0E E4 02  |..".";F$;S$.-...|
00000610: 8F 20 2A 2A 2A 2A 2A 2A  2A 4D 41 43 48 49 4E 45  |. *******MACHINE|
00000620: 20 49 4E 50 55 54 2A 2A  2A 2A 2A 2A 2A 00 4D 0E  | INPUT*******.M.|
00000630: E9 02 99 22 13 12 57 45  4C 4B 20 47 45 54 41 4C  |..."..WELK GETAL|
00000640: 20 4D 4F 45 54 20 45 52  49 4E 3F 11 22 00 6E 0E  | MOET ERIN?.".n.|
00000650: EE 02 99 22 13 11 1D 2D  3E 20 20 20 20 20 20 20  |..."...->       |
00000660: 9D 9D 9D 9D 9D 9D 22 3B  3A 8D 32 35 30 30 00 82  |......";:.2500..|
00000670: 0E F8 02 8B 57 B3 32 AF  4E 24 B2 22 43 22 A7 37  |....W.2.N$."C".7|
00000680: 35 30 00 8C 0E FD 02 99  22 13 11 22 00 9D 0E 02  |50......".."....|
00000690: 03 8B 4E 24 B2 22 43 22  A7 33 34 39 35 00 AB 0E  |..N$."C".3495...|
000006A0: 07 03 8B 4E 24 B2 22 53  22 A7 8A 00 CC 0E 0C 03  |...N$."S".......|
000006B0: 4C B2 C3 28 4E 24 29 3A  58 B2 C5 28 4E 24 29 3A  |L..(N$):X..(N$):|
000006C0: 59 31 B2 31 45 39 3A 48  24 B2 4E 24 00 D9 0E 16  |Y1.1E9:H$.N$....|
000006D0: 03 8B 57 B2 31 A7 39 30  30 00 F2 0E 20 03 81 4A  |..W.1.900... ..J|
000006E0: B2 31 A4 57 AB 31 3A 8B  58 B2 4D 28 4A 29 A7 38  |.1.W.1:.X.M(J).8|
000006F0: 32 30 00 FD 0E 2A 03 82  3A 89 38 36 35 00 22 0F  |20...*..:.865.".|
00000700: 2F 03 8F 20 48 41 53 20  48 45 20 50 49 43 4B 45  |/.. HAS HE PICKE|
00000710: 44 20 54 48 41 54 20 4E  4F 2E 20 42 45 46 4F 52  |D THAT NO. BEFOR|
00000720: 45 3F 00 3C 0F 34 03 48  B2 31 31 33 30 AA 34 30  |E?.<.4.H.1130.40|
00000730: AC 4A 3A 81 4A B2 48 A4  48 AA 31 33 00 53 0F 3E  |.J:.J.H.H.13.S.>|
00000740: 03 97 4A 2C C2 28 4A 29  AA 31 32 38 3A 82 3A 54  |..J,.(J).128:.:T|
00000750: B2 54 49 00 65 0F 48 03  8B 54 49 AB 54 B3 31 35  |.TI.e.H..TI.T.15|
00000760: 30 A7 38 34 30 00 7F 0F  52 03 81 4A B2 48 A4 48  |0.840...R..J.H.H|
00000770: AA 31 33 3A 97 4A 2C C2  28 4A 29 AB 31 32 38 00  |.13:.J,.(J).128.|
00000780: 8A 0F 5C 03 82 3A 89 37  34 35 00 97 0F 61 03 8B  |..\..:.745...a..|
00000790: 57 B3 32 A7 39 30 30 00  CB 0F 66 03 99 22 13 22  |W.2.900...f.."."|
000007A0: 46 24 22 91 22 47 24 3A  99 22 05 12 52 41 41 44  |F$"."G$:."..RAAD|
000007B0: 20 27 4E 53 20 57 41 54  20 45 52 55 49 54 20 4B  | 'NS WAT ERUIT K|
000007C0: 4F 4D 54 3F 92 20 2D 3E  20 22 3B 00 E2 0F 70 03  |OMT?. -> ";...p.|
000007D0: 8D 32 35 30 30 3A 8B 4E  24 B2 22 43 22 A7 33 34  |.2500:.N$."C".34|
000007E0: 39 30 00 EF 0F 7A 03 59  31 B2 C5 28 4E 24 29 00  |90...z.Y1..(N$).|
000007F0: 11 10 7F 03 8F 20 2A 2A  2A 2A 2A 53 54 41 52 54  |..... *****START|
00000800: 20 54 48 45 20 4D 41 43  48 49 4E 45 2A 2A 2A 2A  | THE MACHINE****|
00000810: 2A 00 2D 10 84 03 99 44  24 3B 22 1D 1D 1D 11 05  |*.-....D$;".....|
00000820: 11 11 11 12 41 41 4E 92  20 55 49 54 22 00 48 10  |....AAN. UIT".H.|
00000830: 8E 03 52 B2 30 3A 43 B2  AB 31 3A 51 B2 31 3A 50  |..R.0:C..1:Q.1:P|
00000840: B2 30 3A 4E 24 B2 48 24  00 66 10 98 03 99 22 05  |.0:N$.H$.f....".|
00000850: 13 11 11 22 3B C8 28 46  24 2C 57 29 3B A6 33 32  |...";.(F$,W);.32|
00000860: AB 4C 29 3B 4E 24 00 7C  10 E8 03 43 B2 43 AA 31  |.L);N$.|...C.C.1|
00000870: AA 28 28 43 B2 38 29 AC  34 29 AC 51 00 96 10 F2  |.((C.8).4).Q....|
00000880: 03 46 B2 31 AB 46 3A 52  B2 28 52 AA 31 29 AC AB  |.F.1.F:R.(R.1)..|
00000890: 28 52 B3 B1 32 29 00 CB  10 10 04 99 22 13 11 11  |(R..2)......"...|
000008A0: 11 11 1D 1D 1D 1D 1D 1D  1D 1D 1D 22 3B 41 24 28  |...........";A$(|
000008B0: 52 29 3B 22 1D 1D 91 91  91 91 91 91 22 3B 42 24  |R);"........";B$|
000008C0: 28 43 29 3B 22 9D 9D 9D  11 22 3B 00 E6 10 1A 04  |(C);"....";.....|
000008D0: 8B 46 B2 30 A7 99 22 20  20 20 11 11 11 11 11 11  |.F.0.."   ......|
000008E0: 11 1D 1D 20 22 3B 00 02  11 24 04 8B 46 B2 31 A7  |... ";...$..F.1.|
000008F0: 99 22 1F A7 A6 A5 11 11  11 11 11 11 11 1D 1D 2A  |.".............*|
00000900: 22 3B 00 1C 11 2E 04 8B  50 B1 31 34 A7 99 22 9D  |";......P.14..".|
00000910: 9D 9D 9D 9D 22 3B 43 24  28 52 29 3B 00 2B 11 38  |....";C$(R);.+.8|
00000920: 04 8B 43 B2 31 33 A7 32  30 30 30 00 3C 11 42 04  |..C.13.2000.<.B.|
00000930: 8B 43 B1 38 AF 52 B2 30  A7 52 B2 32 00 4C 11 4C  |.C.8.R.0.R.2.L.L|
00000940: 04 8B 50 B3 B1 31 39 A7  31 31 38 30 00 68 11 56  |..P..19.1180.h.V|
00000950: 04 59 B2 A5 41 28 58 29  3A 4E 24 B2 C4 28 59 29  |.Y..A(X):N$..(Y)|
00000960: 3A 4C B2 C3 28 4E 24 29  00 87 11 60 04 81 4A B2  |:L..(N$)...`..J.|
00000970: 31 A4 4C 3A 8B CA 28 4E  24 2C 4A 2C 31 29 B2 22  |1.L:..(N$,J,1)."|
00000980: 45 22 A7 31 31 35 30 00  98 11 6A 04 82 4A 3A 8B  |E".1150...j..J:.|
00000990: 4C B3 37 A7 31 31 38 30  00 BA 11 74 04 8B B6 28  |L.7.1180...t...(|
000009A0: 59 29 B3 B2 39 39 39 39  39 A7 4E 24 B2 C8 28 4E  |Y)..99999.N$..(N|
000009B0: 24 2C 36 29 3A 89 31 31  37 30 00 C9 11 7E 04 4E  |$,6):.1170...~.N|
000009C0: 24 B2 22 2B 56 45 45 4C  22 00 DD 11 88 04 8B 59  |$."+VEEL"......Y|
000009D0: B3 30 A7 4E 24 B2 22 2D  56 45 45 4C 22 00 E5 11  |.0.N$."-VEEL"...|
000009E0: 92 04 4C B2 36 00 0E 12  9C 04 8B 50 AB 4C B2 31  |..L.6......P.L.1|
000009F0: 39 A7 51 B2 30 3A 99 44  24 3B 22 1D 1D 1D 05 11  |9.Q.0:.D$;".....|
00000A00: 11 11 11 41 41 4E 20 12  55 49 54 92 22 3B 00 26  |...AAN .UIT.";.&|
00000A10: 12 A6 04 8B 50 B3 4C AA  32 A7 97 31 31 34 36 AA  |....P.L.2..1146.|
00000A20: 4C AB 50 2C 33 32 00 40  12 B0 04 50 B2 50 AA 31  |L.P,32.@...P.P.1|
00000A30: 3A 99 C8 28 44 24 2C 50  AA 39 29 3B 22 12 22 3B  |:..(D$,P.9);".";|
00000A40: 00 59 12 B5 04 8B 50 B1  32 30 A7 99 C8 28 45 24  |.Y....P.20...(E$|
00000A50: 2C 32 AC 50 AB 32 36 29  3B 00 74 12 B9 04 8F 20  |,2.P.26);.t.... |
00000A60: 4E 4F 2E 53 20 54 48 52  55 20 54 48 45 20 54 55  |NO.S THRU THE TU|
00000A70: 42 45 53 3A 00 96 12 BA  04 81 4A B2 31 A4 4C 3A  |BES:......J.1.L:|
00000A80: 49 B2 50 AB 4A 3A 49 24  B2 CA 28 4E 24 2C 4C AB  |I.P.J:I$..(N$,L.|
00000A90: 4A AA 31 2C 31 29 00 B7  12 C4 04 8B 28 49 B3 30  |J.1,1)......(I.0|
00000AA0: B0 49 B1 32 33 29 B0 28  49 B1 31 32 AF 49 B3 32  |.I.23).(I.12.I.2|
00000AB0: 31 29 A7 31 32 36 30 00  C4 12 CE 04 99 22 1C 22  |1).1260......"."|
00000AC0: 3B 49 24 3B 00 D4 12 D8  04 8B 49 B3 38 A7 99 22  |;I$;......I.8.."|
00000AD0: 91 9D 22 3B 00 E4 12 E2  04 8B 49 B1 37 A7 99 22  |..";......I.7.."|
00000AE0: 9D 9D 22 3B 00 F4 12 E7  04 8B 49 B1 32 31 A7 99  |..";......I.21..|
00000AF0: 22 91 22 3B 00 1A 13 EC  04 8B 49 B2 32 34 A7 48  |".";......I.24.H|
00000B00: B2 C6 28 49 24 29 3A 97  31 38 39 31 AB 4A 2C 48  |..(I$):.1891.J,H|
00000B10: AA 36 34 AC 28 48 B1 36  34 29 00 20 13 F1 04 82  |.64.(H.64). ....|
00000B20: 00 3A 13 F6 04 8B 49 B1  30 AF 49 B3 31 35 B0 49  |.:....I.0.I.15.I|
00000B30: B1 32 31 A7 99 22 1C 20  22 3B 00 4A 13 00 05 99  |.21..". ";.J....|
00000B40: 22 92 22 3B 3A 89 31 30  30 30 00 65 13 D0 07 99  |".";:.1000.e....|
00000B50: 44 24 3B 22 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 22 3B  |D$;"..........";|
00000B60: 43 24 28 33 29 00 7E 13  DA 07 81 4A B2 31 38 38  |C$(3).~....J.188|
00000B70: 32 A4 31 38 39 30 3A 97  4A 2C 33 32 3A 82 00 99  |2.1890:.J,32:...|
00000B80: 13 E4 07 99 22 13 11 11  22 3B C8 28 46 24 2C 57  |...."...";.(F$,W|
00000B90: 29 3B A6 33 34 29 3B 4E  24 00 BA 13 E9 07 49 24  |);.34);N$.....I$|
00000BA0: B2 C4 28 59 31 29 3A 8B  C3 28 49 24 29 B1 36 A7  |..(Y1):..(I$).6.|
00000BB0: 49 24 B2 C8 28 49 24 2C  36 29 00 CF 13 EE 07 8B  |I$..(I$,6)......|
00000BC0: 49 24 B3 B1 4E 24 B0 57  B2 31 A7 32 31 30 30 00  |I$..N$.W.1.2100.|
00000BD0: E4 13 F8 07 4E B2 36 30  3A 81 4A B2 30 A4 35 3A  |....N.60:.J.0.5:|
00000BE0: 54 B2 54 49 00 F6 13 02  08 8B 54 49 AB 54 B3 31  |T.TI......TI.T.1|
00000BF0: 38 A7 32 30 35 30 00 04  14 0C 08 4E B2 31 31 33  |8.2050.....N.113|
00000C00: AB 4E 3A 82 00 30 14 16  08 99 22 13 22 3B 46 24  |.N:..0....".";F$|
00000C10: 3B 22 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |;"..............|
00000C20: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 20 20 22 3B  |............  ";|
00000C30: 00 47 14 20 08 99 22 05  12 47 45 52 41 44 45 4E  |.G. .."..GERADEN|
00000C40: 21 22 3A 54 B2 54 49 00  5A 14 2A 08 8B 54 49 AB  |!":T.TI.Z.*..TI.|
00000C50: 54 B3 31 34 30 A7 32 30  39 30 00 7C 14 34 08 99  |T.140.2090.|.4..|
00000C60: 22 13 22 3B 46 24 22 91  22 53 24 3A 99 53 24 3A  |".";F$"."S$:.S$:|
00000C70: 4D 28 57 29 B2 58 3A 57  B2 57 AA 31 00 9B 14 3E  |M(W).X:W.W.1...>|
00000C80: 08 8B 57 B3 31 37 A7 99  22 13 11 05 11 11 11 22  |..W.17.."......"|
00000C90: 3B A6 33 31 29 3B 3A 89  37 34 35 00 A5 14 48 08  |;.31);:.745...H.|
00000CA0: 89 33 35 30 30 00 C7 14  BA 09 8F 20 47 45 4E 45  |.3500...... GENE|
00000CB0: 52 41 4C 49 5A 45 44 20  49 4E 50 55 54 20 55 53  |RALIZED INPUT US|
00000CC0: 49 4E 47 20 47 45 54 00  E4 14 C4 09 99 22 05 22  |ING GET......"."|
00000CD0: 3B 3A 85 4E 24 3A 8B C8  28 4E 24 2C 31 29 B2 22  |;:.N$:..(N$,1)."|
00000CE0: 53 22 A7 8A 00 FE 14 C5  09 8B C8 28 4E 24 2C 31  |S".........(N$,1|
00000CF0: 29 B2 22 43 22 A7 4E 24  B2 22 43 22 3A 8E 00 14  |)."C".N$."C":...|
00000D00: 15 C6 09 4E B2 C5 28 4E  24 29 3A 4E 24 B2 C4 28  |...N..(N$):N$..(|
00000D10: 4E 29 3A 8E 00 2A 15 98  0D 8F 20 4F 55 54 50 55  |N):..*.... OUTPU|
00000D20: 54 20 54 48 45 20 52 55  4C 45 00 40 15 A2 0D 99  |T THE RULE.@....|
00000D30: 22 13 11 11 11 1D 20 20  20 20 20 20 20 20 22 3B  |".....        ";|
00000D40: 00 57 15 A7 0D 99 22 9D  9D 9D 9D 20 20 20 20 20  |.W...."....     |
00000D50: 20 20 20 20 20 22 3B 00  79 15 AC 0D 99 22 13 22  |     ";.y...."."|
00000D60: 3B 46 24 3B 22 91 22 53  24 22 91 20 12 44 45 20  |;F$;"."S$". .DE |
00000D70: 43 4F 44 45 20 49 53 3A  22 00 8A 15 B6 0D 49 24  |CODE IS:".....I$|
00000D80: B2 52 24 28 56 29 3A 4A  B2 31 00 AA 15 C0 0D 8B  |.R$(V):J.1......|
00000D90: 20 CA 28 49 24 2C 4A 2C  31 29 B2 22 58 22 A7 20  | .(I$,J,1)."X". |
00000DA0: 4E B2 41 3A 89 20 33 35  35 30 00 C5 15 CA 0D 8B  |N.A:. 3550......|
00000DB0: 20 CA 28 49 24 2C 4A 2C  31 29 B3 B1 22 59 22 A7  | .(I$,J,1).."Y".|
00000DC0: 20 33 35 36 30 00 CD 15  D4 0D 4E B2 42 00 F1 15  | 3560.....N.B...|
00000DD0: DE 0D 49 24 B2 C8 28 49  24 2C 4A AB 31 29 AA C4  |..I$..(I$,J.1)..|
00000DE0: 28 4E 29 AA C9 28 49 24  2C C3 28 49 24 29 AB 4A  |(N)..(I$,.(I$).J|
00000DF0: 29 00 0D 16 E8 0D 4A B2  4A AA 31 3A 8B 20 4A B3  |).....J.J.1:. J.|
00000E00: B2 C3 28 49 24 29 20 A7  20 33 35 32 30 00 24 16  |..(I$) . 3520.$.|
00000E10: F2 0D 99 20 53 24 3B 22  9D 91 22 3A 99 49 24 3A  |... S$;"..":.I$:|
00000E20: 54 B2 54 49 00 3D 16 FC  0D A1 20 49 24 3A 8B 20  |T.TI.=.... I$:. |
00000E30: 49 24 B3 B1 22 22 20 A7  20 33 35 38 30 00 60 16  |I$.."" . 3580.`.|
00000E40: 06 0E A1 20 49 24 3A 8B  20 49 24 B2 22 22 20 AF  |... I$:. I$."" .|
00000E50: 20 54 49 AB 54 B3 39 30  30 20 A7 20 33 35 39 30  | TI.T.900 . 3590|
00000E60: 00 73 16 10 0E 99 22 13  22 3B 46 24 3B 22 91 22  |.s....".";F$;"."|
00000E70: 3B 53 24 00 8D 16 1A 0E  99 22 13 11 11 22 3B 53  |;S$......"...";S|
00000E80: 24 3B 22 9D 91 22 3B 3A  89 20 34 30 30 00 A7 16  |$;"..";:. 400...|
00000E90: 96 0F 8F 20 46 55 4E 43  54 49 4F 4E 20 44 45 46  |... FUNCTION DEF|
00000EA0: 49 4E 49 54 49 4F 4E 00  B9 16 A0 0F 96 20 A5 41  |INITION...... .A|
00000EB0: 28 58 29 B2 58 AA 41 3A  8E 00 CB 16 AA 0F 96 20  |(X).X.A:....... |
00000EC0: A5 41 28 58 29 B2 58 AA  42 3A 8E 00 DD 16 B4 0F  |.A(X).X.B:......|
00000ED0: 96 20 A5 41 28 58 29 B2  41 AC 58 3A 8E 00 EF 16  |. .A(X).A.X:....|
00000EE0: BE 0F 96 20 A5 41 28 58  29 B2 42 AC 58 3A 8E 00  |... .A(X).B.X:..|
00000EF0: 03 17 C8 0F 96 20 A5 41  28 58 29 B2 42 AC 58 AA  |..... .A(X).B.X.|
00000F00: 41 3A 8E 00 17 17 D2 0F  96 20 A5 41 28 58 29 B2  |A:....... .A(X).|
00000F10: 42 AC 58 AB 41 3A 8E 00  2B 17 DC 0F 96 20 A5 41  |B.X.A:..+.... .A|
00000F20: 28 58 29 B2 58 AC 58 AA  42 3A 8E 00 3F 17 E6 0F  |(X).X.X.B:..?...|
00000F30: 96 20 A5 41 28 58 29 B2  58 AC 58 AB 42 3A 8E 00  |. .A(X).X.X.B:..|
00000F40: 53 17 F0 0F 96 20 A5 41  28 58 29 B2 58 AC 58 AA  |S.... .A(X).X.X.|
00000F50: 58 3A 8E 00 69 17 FA 0F  96 20 A5 41 28 58 29 B2  |X:..i.... .A(X).|
00000F60: 41 AC 58 AC 58 AA 42 3A  8E 00 7F 17 04 10 96 20  |A.X.X.B:....... |
00000F70: A5 41 28 58 29 B2 41 AC  58 AC 58 AB 42 3A 8E 00  |.A(X).A.X.X.B:..|
00000F80: 95 17 0E 10 96 20 A5 41  28 58 29 B2 41 AC 58 AC  |..... .A(X).A.X.|
00000F90: 58 AA 58 3A 8E 00 AB 17  18 10 96 20 A5 41 28 58  |X.X:....... .A(X|
00000FA0: 29 B2 28 58 AB 31 29 AD  41 3A 8E 00 C1 17 22 10  |).(X.1).A:....".|
00000FB0: 96 20 A5 41 28 58 29 B2  42 AC 28 58 AD 41 29 3A  |. .A(X).B.(X.A):|
00000FC0: 8E 00 D7 17 2C 10 96 20  A5 41 28 58 29 B2 28 58  |....,.. .A(X).(X|
00000FD0: AD 41 29 AB 42 3A 8E 00  FB 17 7E 13 8F 20 52 55  |.A).B:....~.. RU|
00000FE0: 4C 45 20 54 45 58 54 20  46 4F 52 20 54 48 45 20  |LE TEXT FOR THE |
00000FF0: 46 4E 41 27 53 20 41 42  4F 56 45 00 15 18 88 13  |FNA'S ABOVE.....|
00001000: 52 24 28 31 29 B2 22 47  45 54 41 4C 20 20 50 4C  |R$(1)."GETAL  PL|
00001010: 55 53 58 20 22 00 2F 18  92 13 52 24 28 32 29 B2  |USX "./...R$(2).|
00001020: 22 47 45 54 41 4C 20 20  50 4C 55 53 59 20 22 00  |"GETAL  PLUSY ".|
00001030: 4A 18 9C 13 52 24 28 33  29 B2 22 20 58 20 4B 45  |J...R$(3)." X KE|
00001040: 45 52 20 47 45 54 41 4C  20 22 00 65 18 A6 13 52  |ER GETAL ".e...R|
00001050: 24 28 34 29 B2 22 20 59  20 4B 45 45 52 20 47 45  |$(4)." Y KEER GE|
00001060: 54 41 4C 20 22 00 7F 18  B0 13 52 24 28 35 29 B2  |TAL ".....R$(5).|
00001070: 52 24 28 34 29 AA 22 20  50 4C 55 53 58 20 22 00  |R$(4)." PLUSX ".|
00001080: 98 18 BA 13 52 24 28 36  29 B2 52 24 28 34 29 AA  |....R$(6).R$(4).|
00001090: 22 20 4D 49 4E 58 20 22  00 BE 18 C4 13 52 24 28  |" MINX ".....R$(|
000010A0: 37 29 B2 22 47 45 54 41  4C 20 20 4B 45 45 52 20  |7)."GETAL  KEER |
000010B0: 47 45 54 41 4C 20 20 50  4C 55 53 59 20 22 00 E3  |GETAL  PLUSY "..|
000010C0: 18 CE 13 52 24 28 38 29  B2 22 47 45 54 41 4C 20  |...R$(8)."GETAL |
000010D0: 20 4B 45 45 52 20 47 45  54 41 4C 20 20 4D 49 4E  | KEER GETAL  MIN|
000010E0: 59 20 22 00 0E 19 D8 13  52 24 28 39 29 B2 22 47  |Y ".....R$(9)."G|
000010F0: 45 54 41 4C 20 20 4B 45  45 52 20 47 45 54 41 4C  |ETAL  KEER GETAL|
00001100: 20 20 50 4C 55 53 20 47  45 54 41 4C 20 22 00 34  |  PLUS GETAL ".4|
00001110: 19 E2 13 52 24 28 31 30  29 B2 22 20 58 20 2A 20  |...R$(10)." X * |
00001120: 47 45 54 41 4C 20 20 2A  20 47 45 54 41 4C 20 20  |GETAL  * GETAL  |
00001130: 2B 59 20 22 00 5A 19 EC  13 52 24 28 31 31 29 B2  |+Y ".Z...R$(11).|
00001140: 22 20 58 20 2A 20 47 45  54 41 4C 20 20 2A 20 47  |" X * GETAL  * G|
00001150: 45 54 41 4C 20 20 2D 59  20 22 00 85 19 F6 13 52  |ETAL  -Y ".....R|
00001160: 24 28 31 32 29 B2 22 20  58 20 2A 20 47 45 54 41  |$(12)." X * GETA|
00001170: 4C 20 20 2A 20 47 45 54  41 4C 20 20 2B 20 47 45  |L  * GETAL  + GE|
00001180: 54 41 4C 20 22 00 A3 19  00 14 52 24 28 31 33 29  |TAL ".....R$(13)|
00001190: B2 22 28 47 45 54 41 4C  20 20 2D 20 31 29 20 2F  |."(GETAL  - 1) /|
000011A0: 58 20 22 00 C3 19 0A 14  52 24 28 31 34 29 B2 22  |X ".....R$(14)."|
000011B0: 20 59 20 2A 20 28 47 45  54 41 4C 20 20 2F 58 20  | Y * (GETAL  /X |
000011C0: 29 20 22 00 E0 19 14 14  52 24 28 31 35 29 B2 22  |) ".....R$(15)."|
000011D0: 28 47 45 54 41 4C 20 20  2F 58 29 20 2D 59 20 22  |(GETAL  /X) -Y "|
000011E0: 00 FF 19 70 17 8F 20 49  4E 49 54 49 41 4C 49 5A  |...p.. INITIALIZ|
000011F0: 45 20 53 54 52 49 4E 47  20 41 52 52 41 59 53 00  |E STRING ARRAYS.|
00001200: 2D 1A 7A 17 41 24 28 30  29 B2 22 9C 1D 20 11 20  |-.z.A$(0).".. . |
00001210: 1D 1D 20 91 20 9D 9D 9D  9D 9D 9D 11 11 11 11 D1  |.. . ...........|
00001220: 91 CE 91 CE CD 11 CD 11  D7 1D 91 91 22 00 59 1A  |............".Y.|
00001230: 84 17 41 24 28 31 29 B2  22 9C 1D 11 11 11 11 20  |..A$(1)."...... |
00001240: 91 20 1D 1D 20 11 20 91  91 9D 9D 9D 9D 9D 9D 9D  |. .. . .........|
00001250: D7 C0 C0 AE B0 C0 C0 D1  22 00 87 1A 8E 17 41 24  |........".....A$|
00001260: 28 32 29 B2 22 9C 11 11  20 20 20 1D 1D 20 20 20  |(2)."...   ..   |
00001270: 9D 9D 9D 9D 9D 9D 9D 91  91 D1 11 CD 11 CD CE 91  |................|
00001280: CE 91 D7 1D 11 11 22 00  A7 1A 98 17 44 24 B2 22  |......".....D$."|
00001290: 13 1D 1D 1D 1D 11 11 11  11 11 11 11 11 11 11 11  |................|
000012A0: 11 1D 1D 1D 1D 1D 22 00  C5 1A A2 17 45 24 B2 22  |......".....E$."|
000012B0: 11 11 11 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 11  |................|
000012C0: 1D 11 1D 11 22 00 E6 1A  AC 17 46 24 B2 22 11 11  |....".....F$."..|
000012D0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000012E0: 11 11 11 11 11 22 00 17  1B B1 17 47 24 B2 22 54  |.....".....G$."T|
000012F0: 59 50 20 27 43 27 20 56  4F 4F 52 20 43 4F 44 45  |YP 'C' VOOR CODE|
00001300: 3B 20 54 59 50 20 27 53  27 20 56 4F 4F 52 20 53  |; TYP 'S' VOOR S|
00001310: 54 4F 50 50 45 4E 22 00  3B 1B B6 17 42 24 28 30  |TOPPEN".;...B$(0|
00001320: 29 B2 22 1F 20 20 9D 9D  11 20 20 9D 9D 11 20 20  |).".  ...  ...  |
00001330: 9D 9D 11 20 20 9D 9D 11  20 D7 22 00 5F 1B C0 17  |...  ... ."._...|
00001340: 42 24 28 31 29 B2 22 1F  20 20 9D 9D 11 20 20 9D  |B$(1).".  ...  .|
00001350: 9D 11 20 20 9D 9D 11 20  D7 9D 9D 11 D5 C9 22 00  |..  ... ......".|
00001360: 83 1B CA 17 42 24 28 32  29 B2 22 20 20 1F 9D 9D  |....B$(2)."  ...|
00001370: 11 20 20 9D 9D 11 20 D7  9D 9D 11 D5 C9 9D 9D 11  |.  ... .........|
00001380: CA CB 22 00 A7 1B D4 17  42 24 28 33 29 B2 22 1F  |..".....B$(3).".|
00001390: 20 20 9D 9D 11 20 D7 9D  9D 11 D5 C9 9D 9D 11 CA  |  ... ..........|
000013A0: CB 9D 9D 11 D7 20 22 00  CB 1B DE 17 42 24 28 34  |..... ".....B$(4|
000013B0: 29 B2 22 1F 20 D7 9D 9D  11 D5 C9 9D 9D 11 CA CB  |).". ...........|
000013C0: 9D 9D 11 D7 20 9D 9D 11  20 D7 22 00 EF 1B E8 17  |.... ... .".....|
000013D0: 42 24 28 35 29 B2 22 1F  D5 C9 9D 9D 11 CA CB 9D  |B$(5).".........|
000013E0: 9D 11 D7 20 9D 9D 11 20  D7 9D 9D 11 D5 C9 22 00  |... ... ......".|
000013F0: 13 1C F2 17 42 24 28 36  29 B2 22 1F CA CB 9D 9D  |....B$(6).".....|
00001400: 11 D7 20 9D 9D 11 20 D7  9D 9D 11 D5 C9 9D 9D 11  |.. ... .........|
00001410: CA CB 22 00 37 1C FC 17  42 24 28 37 29 B2 22 1F  |..".7...B$(7).".|
00001420: D7 20 9D 9D 11 20 D7 9D  9D 11 D5 C9 9D 9D 11 CA  |. ... ..........|
00001430: CB 9D 9D 11 D7 20 22 00  5B 1C 06 18 42 24 28 38  |..... ".[...B$(8|
00001440: 29 B2 22 1F 20 D7 9D 9D  11 D5 C9 9D 9D 11 CA CB  |).". ...........|
00001450: 9D 9D 11 D7 20 9D 9D 11  20 D7 22 00 7F 1C 10 18  |.... ... .".....|
00001460: 42 24 28 39 29 B2 22 1F  D5 C9 9D 9D 11 CA CB 9D  |B$(9).".........|
00001470: 9D 11 D7 20 9D 9D 11 20  D7 9D 9D 11 20 20 22 00  |... ... ....  ".|
00001480: A4 1C 1A 18 42 24 28 31  30 29 B2 22 1F CA CB 9D  |....B$(10)."....|
00001490: 9D 11 D7 20 9D 9D 11 20  D7 9D 9D 11 20 20 9D 9D  |... ... ....  ..|
000014A0: 11 20 20 22 00 C9 1C 24  18 42 24 28 31 31 29 B2  |.  "...$.B$(11).|
000014B0: 22 1F D7 20 9D 9D 11 20  D7 9D 9D 11 20 20 9D 9D  |".. ... ....  ..|
000014C0: 11 20 20 9D 9D 11 20 20  22 00 EE 1C 2E 18 42 24  |.  ...  ".....B$|
000014D0: 28 31 32 29 B2 22 1F 20  D7 9D 9D 11 20 20 9D 9D  |(12).". ....  ..|
000014E0: 11 20 20 9D 9D 11 20 20  9D 9D 11 20 20 22 00 13  |.  ...  ...  "..|
000014F0: 1D 38 18 42 24 28 31 33  29 B2 22 1F 20 20 9D 9D  |.8.B$(13).".  ..|
00001500: 11 20 20 9D 9D 11 20 20  9D 9D 11 20 20 9D 9D 11  |.  ...  ...  ...|
00001510: 20 20 22 00 4A 1D 42 18  43 24 28 30 29 B2 22 95  |  ".J.B.C$(0).".|
00001520: 20 9D 11 BE 9D 9D 11 BE  9D 9D 20 9D 9D BC 9D 9D  | ......... .....|
00001530: BE 9D 9D 20 9D 9D BC 9D  9D BE 9D 9D 91 20 9D 91  |... ......... ..|
00001540: AC 91 AC 20 BB AC 20 BB  AC 22 00 81 1D 4C 18 43  |... .. .."...L.C|
00001550: 24 28 31 29 B2 22 95 BE  9D 11 BB 9D 9D 11 20 9D  |$(1)."........ .|
00001560: 9D BC 9D 9D BE 9D 9D 20  9D 9D BC 9D 9D BE 9D 9D  |....... ........|
00001570: 20 9D 9D 91 AC 9D 91 BC  91 20 BB AC 20 BB AC 20  | ........ .. .. |
00001580: 22 00 B8 1D 56 18 43 24  28 32 29 B2 22 95 BB 9D  |"...V.C$(2)."...|
00001590: 11 20 9D 9D 11 BC 9D 9D  BE 9D 9D 20 9D 9D BC 9D  |. ......... ....|
000015A0: 9D BE 9D 9D 20 9D 9D BC  9D 9D 91 BC 9D 91 20 91  |.... ......... .|
000015B0: BB AC 20 BB AC 20 BB 22  00 EF 1D 60 18 43 24 28  |.. .. ."...`.C$(|
000015C0: 33 29 B2 22 95 20 9D 11  20 9D 9D 11 20 9D 9D 20  |3).". .. ... .. |
000015D0: 9D 9D 20 9D 9D 20 9D 9D  20 9D 9D 20 9D 9D 20 9D  |.. .. .. .. .. .|
000015E0: 9D 91 20 9D 91 20 91 20  20 20 20 20 20 20 22 00  |.. .. .       ".|
000015F0: 01 1E 6A 18 46 B2 31 3A  5A B2 30 3A 56 4C B2 AB  |..j.F.1:Z.0:VL..|
00001600: 31 00 1F 1E 74 18 45 24  B2 22 11 11 11 1D 1D 1D  |1...t.E$."......|
00001610: 1D 1D 1D 1D 1D 1D 1D 1D  1D 11 1D 11 1D 11 22 00  |..............".|
00001620: 40 1E 7E 18 46 24 B2 22  11 11 11 11 11 11 11 11  |@.~.F$."........|
00001630: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 22  |..............."|
00001640: 00 58 1E 88 18 81 4A B2  31 A4 33 39 3A 53 24 B2  |.X....J.1.39:S$.|
00001650: 53 24 AA 22 20 22 3A 82  00 5E 1E 92 18 8E 00 85  |S$." ":..^......|
00001660: 1E 10 27 8F 20 2A 2A 2A  2A 2A 2A 2A 49 4E 53 54  |..'. *******INST|
00001670: 52 55 43 54 49 4F 4E 53  20 50 41 47 2E 32 2A 2A  |RUCTIONS PAG.2**|
00001680: 2A 2A 2A 2A 2A 00 90 1E  1A 27 99 C7 28 31 34 29  |*****....'..(14)|
00001690: 00 C1 1E 24 27 99 22 93  05 2A 2A 2A 20 C3 CF CD  |...$'."..*** ...|
000016A0: CD CF C4 CF D2 C5 20 36  34 20 2A 2A 2A 2A 2A 20  |...... 64 ***** |
000016B0: D2 C5 CB C5 CE A0 CD C1  C3 C8 C9 CE C5 20 2A 2A  |............. **|
000016C0: 2A 00 F3 1E 2E 27 99 22  99 C1 4C 53 20 4A 45 20  |*....'."..LS JE |
000016D0: 57 49 4C 54 20 53 54 4F  50 50 45 4E 20 4D 4F 45  |WILT STOPPEN MOE|
000016E0: 54 20 4A 45 20 27 4E 20  12 53 92 20 54 59 50 45  |T JE 'N .S. TYPE|
000016F0: 4E 2E 22 00 23 1F 38 27  99 22 11 C1 4C 53 20 4A  |N.".#.8'."..LS J|
00001700: 45 20 44 45 4E 4B 54 20  44 45 20 43 4F 44 45 20  |E DENKT DE CODE |
00001710: 54 45 20 57 45 54 45 4E  20 4F 46 20 4A 45 20 4B  |TE WETEN OF JE K|
00001720: 4F 4D 54 00 51 1F 42 27  99 22 45 52 20 4E 49 45  |OMT.Q.B'."ER NIE|
00001730: 54 20 4D 45 45 52 20 55  49 54 20 4D 4F 45 54 20  |T MEER UIT MOET |
00001740: 4A 45 20 27 4E 20 12 43  92 20 54 59 50 45 4E 2E  |JE 'N .C. TYPEN.|
00001750: 22 00 82 1F 4C 27 99 22  11 C4 45 20 4D 41 43 48  |"...L'."..E MACH|
00001760: 49 4E 45 20 5A 41 4C 20  4A 45 20 44 41 4E 20 44  |INE ZAL JE DAN D|
00001770: 45 20 43 4F 44 45 20 56  45 52 54 45 4C 4C 45 4E  |E CODE VERTELLEN|
00001780: 2E 22 00 AC 1F 56 27 99  22 11 11 11 CB 4C 41 41  |."...V'."....LAA|
00001790: 52 3F 20 C4 52 55 4B 20  44 41 4E 20 45 45 4E 20  |R? .RUK DAN EEN |
000017A0: 54 4F 45 54 53 20 49 4E  2E 2E 2E 22 00 C3 1F 60  |TOETS IN..."...`|
000017B0: 27 A1 49 4E 24 3A 8B 49  4E 24 B2 22 22 A7 31 30  |'.IN$:.IN$."".10|
000017C0: 30 38 30 00 C9 1F 6A 27  8E 00 E9 1F 20 4E 8F 2A  |080...j'.... N.*|
000017D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000017E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 09 20 2A 4E 8F 2A  |*********.. *N.*|
000017F0: 2A 20 20 50 52 4F 47 52  41 4D 4D 41 20 56 45 52  |*  PROGRAMMA VER|
00001800: 54 41 41 4C 44 20 20 2A  2A 00 29 20 34 4E 8F 2A  |TAALD  **.) 4N.*|
00001810: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00001820: 20 20 20 20 20 20 20 2A  2A 00 49 20 3E 4E 8F 2A  |       **.I >N.*|
00001830: 2A 20 20 45 4E 20 41 41  4E 47 45 50 41 53 54 20  |*  EN AANGEPAST |
00001840: 44 4F 4F 52 3A 20 20 2A  2A 00 69 20 48 4E 8F 2A  |DOOR:  **.i HN.*|
00001850: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00001860: 20 20 20 20 20 20 20 2A  2A 00 89 20 52 4E 8F 2A  |       **.. RN.*|
00001870: 2A 20 20 41 2E 56 2F 44  20 4E 49 45 55 57 45 4E  |*  A.V/D NIEUWEN|
00001880: 48 55 49 5A 45 4E 20 2A  2A 00 A9 20 5C 4E 8F 2A  |HUIZEN **.. \N.*|
00001890: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
000018A0: 20 20 20 20 20 20 20 2A  2A 00 C9 20 66 4E 8F 2A  |       **.. fN.*|
000018B0: 2A 20 20 20 20 54 45 4C  3A 4F 31 30 2D 32 32 31  |*    TEL:O10-221|
000018C0: 33 36 33 20 20 20 20 2A  2A 00 E9 20 70 4E 8F 2A  |363    **.. pN.*|
000018D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000018E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 00 00 F4 00        |*********.....  |

.......53280,0:.53281,0.=.D.. A$(2),B$(1
3),C$(3),R$(15),M(20).^.... ***CALL INIT
IALIZATIONS***.I. .. 5000...... *******I
NSTRUCTIONS*******......G(14).F...."..**
* COMMODORE 64 ***** REKEN MACHINE ***..
....".ALS JE MIJ EEN GETAL GEEFT, ZAL IK
 MIJN".%....".MACHINE MET 'N .GEHEIME CO
DE. HET GETAL.N...." . VERANDEREN IN EEN
 ANDER GETAL.".Y.B.."...PROBEER DE GEHEI
ME CODE TE RADEN!...L.."...HOE MOEILIJK 
ZAL IK DE .CODE. MAKEN ?...V..".  (TYPE 
1,2,3,4 OF 5":."  1=MAKKELIJK....5=MOEIL
IJK)......."... (VERGEET NIET OP .RETURN
. TE DRUKKEN!)....".J...."..":."        
        ?       ........";.T....2500:V.E
(N$).1:.10000:. UITLEG PAG.2......V.(V.1
).(V.2).(V.3).(V.4)..0.500.....A..(3..(1
).2):B..(10..(1).3).Z...X.3.V..(3..(1)).
1:.V.X.535.....V.X...!..V.4000,4010,4020
,4030,4040,4050,4060,4070,4080.D.&..V.9.
.(V.9).4090,4100,4110,4120,4130,4140.P.+
..G(142).Q.0.. *****DRAW THE MACHINE****
*...:.."...........   ....... ......";..
.D..".. ........ ........ ......";...N..
".. ........ .L......  .....";...X.."...
.... .......... ......";...B..".... ....
........ .";.A.L.."...P..........L......
.......";.G.V..".NM....N..M......W....Q.
.....";......"......L...................
..............";......". ....U.I.....K..
...J......";......"....... ....... .....
.. .....";......".......................
.......";.0...."........................
......";.T....".....UIU.IUI........JKJ.K
JK";.X...."...........AAN .UIT........";
...F.."....................IN . UIT";.F.
P.."................................";..
.Z..J.1.17:."       .       ............
....";:.:W.1......".";F$;S$.-.... ******
*MACHINE INPUT*******.M...."..WELK GETAL
 MOET ERIN?.".N...."...->       ......";
:.2500......W.2.N$."C".750......".."....
..N$."C".3495......N$."S"...L...L.C(N$):
X.E(N$):Y1.1E9:H$.N$.Y....W.1.900... ..J
.1.W.1:.X.M(J).820...*..:.865."./.. HAS 
HE PICKED THAT NO. BEFORE?.<.4.H.1130.40
.J:.J.H.H.13.S.>..J,B(J).128:.:T.TI.E.H.
.TI.T.150.840..R..J.H.H.13:.J,B(J).128.
..\..:.745...A..W.2.900.K.F.."."F$"."G$:
."..RAAD 'NS WAT ERUIT KOMT?. -> ";...P.
.2500:.N$."C".3490...Z.Y1.E(N$)..... **
***START THE MACHINE*****.-....D$;".....
....AAN. UIT".H...R.0:C..1:Q.1:P.0:N$.H$
.F...."....";H(F$,W);.32.L);N$.|...C.C.1
.((C.8).4).Q.....F.1.F:R.(R.1)..(R..2).K
...."..............";A$(R);"........";B$
(C);"....";......F.0.."   ......... ";..
.$..F.1..".............*";......P.14..".
....";C$(R);.+.8..C.13.2000.<.B..C.8.R.0
.R.2.L.L..P..19.1180.H.V.Y..A(X):N$.D(Y)
:L.C(N$)...`..J.1.L:.J(N$,J,1)."E".1150.
..J..J:.L.7.1180...T...(Y)..99999.N$.H(N
$,6):.1170.I.~.N$."+VEEL"......Y.0.N$."-
VEEL".....L.6......P.L.19.Q.0:.D$;".....
...AAN .UIT.";.&....P.L.2..1146.L.P,32.@
...P.P.1:.H(D$,P.9);".";.Y....P.20..H(E$
,2.P.26);.T.... NO.S THRU THE TUBES:....
..J.1.L:I.P.J:I$.J(N$,L.J.1,1)...D..(I.0
.I.23).(I.12.I.21).1260.D.N..".";I$;.T.X
..I.8.."..";......I.7.."..";......I.21..
".";......I.24.H.F(I$):.1891.J,H.64.(H.6
4). .....:....I.0.I.15.I.21..". ";.J....
".";:.1000.E.P..D$;"..........";C$(3).~.
Z..J.1882.1890:.J,32:......."...";H(F$,W
);.34);N$.....I$.D(Y1):.C(I$).6.I$.H(I$,
6).O....I$..N$.W.1.2100.....N.60:.J.0.5:
T.TI......TI.T.18.2050.....N.113.N:..0..
..".";F$;"..........................  ";
.G. .."..GERADEN!":T.TI.Z.*..TI.T.140.20
90.|.4..".";F$"."S$:.S$:M(W).X:W.W.1...>
..W.17.."......";.31);:.745...H..3500.G.
... GENERALIZED INPUT USING GET...D.."."
;:.N$:.H(N$,1)."S".....E..H(N$,1)."C".N$
."C":....F.N.E(N$):N$.D(N):..*.... OUTPU
T THE RULE.@....".....        ";.W....".
...          ";.Y....".";F$;"."S$". .DE 
CODE IS:".....I$.R$(V):J.1...... J(I$,J,
1)."X". N.A:. 3550.E.J.. J(I$,J,1).."Y".
 3560.M.T.N.B.....I$.H(I$,J.1).D(N).I(I$
,C(I$).J).....J.J.1:. J..C(I$) . 3520.$.
... S$;"..":.I$:T.TI.=.... I$:. I$.."" .
 3580.`.... I$:. I$."" . TI.T.900 . 3590
.S....".";F$;".";S$......"...";S$;"..";:
. 400...... FUNCTION DEFINITION... .. .A
(X).X.A:..K.... .A(X).X.B:....... .A(X).
A.X:....... .A(X).B.X:....H.. .A(X).B.X.
A:....R.. .A(X).B.X.A:..+.... .A(X).X.X.
B:..?.... .A(X).X.X.B:..S.... .A(X).X.X.
X:..I.... .A(X).A.X.X.B:...... .A(X).A.
X.X.B:....... .A(X).A.X.X.X:....... .A(X
).(X.1).A:..A.".. .A(X).B.(X.A):..W.,.. 
.A(X).(X.A).B:....~.. RULE TEXT FOR THE 
FNA'S ABOVE.....R$(1)."GETAL  PLUSX "./.
..R$(2)."GETAL  PLUSY ".J...R$(3)." X KE
ER GETAL ".E...R$(4)." Y KEER GETAL "..
..R$(5).R$(4)." PLUSX ".....R$(6).R$(4).
" MINX "...D.R$(7)."GETAL  KEER GETAL  P
LUSY "...N.R$(8)."GETAL  KEER GETAL  MIN
Y "...X.R$(9)."GETAL  KEER GETAL  PLUS G
ETAL ".4...R$(10)." X * GETAL  * GETAL  
+Y ".Z...R$(11)." X * GETAL  * GETAL  -Y
 ".....R$(12)." X * GETAL  * GETAL  + GE
TAL ".....R$(13)."(GETAL  - 1) /X ".C...
R$(14)." Y * (GETAL  /X ) ".....R$(15)."
(GETAL  /X) -Y "...P.. INITIALIZE STRING
 ARRAYS.-.Z.A$(0).".. . .. . ..........Q
.N.NM.M.W...".Y...A$(1)."...... . .. . .
........W......Q".....A$(2)."...   ..   
.........Q.M.MN.N.W...".....D$."........
..............".E...E$."................
....".....F$."......................."..
...G$."TYP 'C' VOOR CODE; TYP 'S' VOOR S
TOPPEN".;...B$(0).".  ...  ...  ...  ...
 W"._...B$(1).".  ...  ...  ... W...UI".
..J.B$(2)."  ....  ... W...UI...JK"...T.
B$(3).".  ... W...UI...JK...W ".K...B$(4
).". W...UI...JK...W ... W".....B$(5).".
UI...JK...W ... W...UI".....B$(6).".JK..
.W ... W...UI...JK".7...B$(7).".W ... W.
..UI...JK...W ".[...B$(8).". W...UI...JK
...W ... W"....B$(9).".UI...JK...W ... 
W...  ".....B$(10).".JK...W ... W...  ..
.  ".I.$.B$(11).".W ... W...  ...  ...  
".....B$(12).". W...  ...  ...  ...  "..
.8.B$(13).".  ...  ...  ...  ...  ".J.B.
C$(0).". ......... ........ ......... ..
... .. .."...L.C$(1)."........ ........ 
........ ........ .. .. "...V.C$(2)."...
. ......... ........ ......... ... .. ."
...`.C$(3).". .. ... .. .. .. .. .. .. .
.. .. .       "...J.F.1:Z.0:VL..1...T.E$
."....................".@.~.F$."........
...............".X....J.1.39:S$.S$." ":.
.^........'. *******INSTRUCTIONS PAG.2**
*****....'.G(14).A.$'."..*** COMMODORE 6
4 ***** REKEN MACHINE ***....'.".ALS JE 
WILT STOPPEN MOET JE 'N .S. TYPEN.".#.8'
.".ALS JE DENKT DE CODE TE WETEN OF JE K
OMT.Q.B'."ER NIET MEER UIT MOET JE 'N .C
. TYPEN."...L'.".DE MACHINE ZAL JE DAN D
E CODE VERTELLEN."...V'."...KLAAR? DRUK 
DAN EEN TOETS IN...".C.`'.IN$:.IN$."".10
080.I.J'.... N.*************************
*.. *N.**  PROGRAMMA VERTAALD  **.) 4N.*
*                      **.I >N.**  EN AA
NGEPAST DOOR:  **.I HN.**               
       **.. RN.**  A.V/D NIEUWENHUIZEN *
*.. \N.**                      **.I FN.*
*    TEL:O10-221363    **.. PN.*********
*****************.....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL