BASIC LES 4

00000000: 01 08 0D 08 64 00 99 C7  28 31 34 32 29 00 2A 08  |....d...(142).*.|
00000010: 6E 00 51 31 B2 31 39 38  3A 97 35 33 32 38 30 2C  |n.Q1.198:.53280,|
00000020: 32 3A 97 35 33 32 38 31  2C 32 00 5D 08 78 00 99  |2:.53281,2.].x..|
00000030: 22 05 93 20 2A 2A 2A 20  56 41 52 49 41 42 45 4C  |".. *** VARIABEL|
00000040: 45 4E 20 2A 2A 2A 22 3A  99 22 20 2A 2A 2A 20 2D  |EN ***":." *** -|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D  2D 20 2A 2A 2A 00 8C 08  |--------- ***...|
00000060: 82 00 99 22 11 11 90 20  56 41 52 49 41 42 45 4C  |..."... VARIABEL|
00000070: 45 4E 20 5A 49 4A 4E 20  41 2E 48 2E 57 20 4B 4C  |EN ZIJN A.H.W KL|
00000080: 45 49 4E 45 20 44 4F 4F  53 4A 45 53 00 BA 08 8C  |EINE DOOSJES....|
00000090: 00 99 22 11 20 57 41 41  52 49 4E 20 57 45 20 47  |..". WAARIN WE G|
000000A0: 45 54 41 4C 4C 45 4E 20  5A 4F 57 45 4C 20 41 4C  |ETALLEN ZOWEL AL|
000000B0: 53 20 57 4F 4F 52 44 45  4E 2C 00 E3 08 96 00 99  |S WOORDEN,......|
000000C0: 22 11 20 4D 41 41 52 20  4F 4F 4B 20 45 45 4E 20  |". MAAR OOK EEN |
000000D0: 43 4F 4D 42 49 4E 41 54  49 45 20 44 41 41 52 56  |COMBINATIE DAARV|
000000E0: 41 4E 2C 00 12 09 A0 00  99 22 11 20 54 49 4A 44  |AN,......". TIJD|
000000F0: 45 4C 49 4A 4B 20 4B 55  4E 4E 45 4E 20 4F 50 42  |ELIJK KUNNEN OPB|
00000100: 45 52 47 45 4E 2C 20 4F  4D 20 5A 45 20 4C 41 54  |ERGEN, OM ZE LAT|
00000110: 45 52 00 47 09 AA 00 99  22 11 20 45 52 20 57 45  |ER.G....". ER WE|
00000120: 45 52 20 55 49 54 20 54  45 20 48 41 4C 45 4E 20  |ER UIT TE HALEN |
00000130: 45 4E 20 54 45 20 56 45  52 57 45 52 4B 45 4E 2E  |EN TE VERWERKEN.|
00000140: 22 3A 8D 31 37 36 30 00  6C 09 B4 00 99 22 93 22  |":.1760.l...."."|
00000150: 3B 3A 53 B2 34 3A 8D 31  37 32 30 3A 99 22 37 39  |;:S.4:.1720:."79|
00000160: 11 11 11 9D 9D 9D 12 41  92 11 11 11 00 92 09 BE  |.......A........|
00000170: 00 99 22 13 22 3B 3A 53  B2 31 35 3A 8D 31 37 32  |..".";:S.15:.172|
00000180: 30 3A 99 22 31 31 11 11  11 9D 9D 9D 12 50 92 11  |0:."11.......P..|
00000190: 11 11 00 B8 09 C8 00 99  22 13 22 3B 3A 53 B2 32  |........".";:S.2|
000001A0: 35 3A 8D 31 37 32 30 3A  99 22 35 35 11 11 11 9D  |5:.1720:."55....|
000001B0: 9D 9D 12 47 92 11 11 11  00 E5 09 D2 00 99 22 11  |...G..........".|
000001C0: 9A 20 44 45 20 56 41 52  49 41 42 45 4C 45 4E 2C  |. DE VARIABELEN,|
000001D0: 20 48 49 45 52 20 27 41  27 20 27 50 27 20 45 4E  | HIER 'A' 'P' EN|
000001E0: 20 27 47 27 2C 00 13 0A  DC 00 99 22 11 20 49 44  | 'G',......". ID|
000001F0: 45 4E 54 49 46 49 43 45  52 45 4E 20 48 45 54 20  |ENTIFICEREN HET |
00000200: 27 44 4F 4F 53 4A 45 27  2C 20 57 41 41 52 49 4E  |'DOOSJE', WAARIN|
00000210: 20 57 45 00 38 0A E6 00  99 22 11 20 45 45 4E 20  | WE.8....". EEN |
00000220: 47 45 54 41 4C 20 48 45  42 42 45 4E 20 4F 50 47  |GETAL HEBBEN OPG|
00000230: 45 42 4F 52 47 45 4E 2E  00 6B 0A F0 00 99 22 11  |EBORGEN..k....".|
00000240: 90 20 4D 45 54 3A 20 12  4C 45 54 20 41 3D 37 39  |. MET: .LET A=79|
00000250: 92 20 28 4C 45 54 20 4D  41 47 20 4A 45 20 4F 4F  |. (LET MAG JE OO|
00000260: 4B 20 57 45 47 4C 41 54  45 4E 29 00 98 0A FA 00  |K WEGLATEN).....|
00000270: 99 22 20 53 54 4F 50 50  45 4E 20 57 45 20 48 45  |." STOPPEN WE HE|
00000280: 54 20 47 45 54 41 4C 20  37 39 20 49 4E 20 44 45  |T GETAL 79 IN DE|
00000290: 20 27 44 4F 4F 53 27 2E  00 BF 0A 04 01 99 22 11  | 'DOOS'.......".|
000002A0: 05 20 4D 45 54 20 48 45  54 20 27 4C 41 42 45 4C  |. MET HET 'LABEL|
000002B0: 27 20 27 41 27 2E 2E 2E  22 3A 8D 31 37 36 30 00  |' 'A'...":.1760.|
000002C0: E5 0A 0E 01 99 22 93 22  3B 3A 53 B2 34 3A 8D 31  |.....".";:S.4:.1|
000002D0: 37 32 30 3A 99 22 37 39  11 11 11 9D 9D 9D 12 41  |720:."79.......A|
000002E0: 25 92 11 11 11 00 0C 0B  18 01 99 22 13 22 3B 3A  |%..........".";:|
000002F0: 53 B2 31 35 3A 8D 31 37  32 30 3A 99 22 31 31 11  |S.15:.1720:."11.|
00000300: 11 11 9D 9D 9D 12 50 25  92 11 11 11 00 33 0B 22  |......P%.....3."|
00000310: 01 99 22 13 22 3B 3A 53  B2 32 35 3A 8D 31 37 32  |..".";:S.25:.172|
00000320: 30 3A 99 22 35 35 11 11  11 9D 9D 9D 12 47 25 92  |0:."55.......G%.|
00000330: 11 11 11 00 64 0B 2C 01  99 22 9A 20 48 45 54 20  |....d.,..". HET |
00000340: 50 52 4F 43 45 4E 54 54  45 4B 45 4E 20 12 25 92  |PROCENTTEKEN .%.|
00000350: 20 41 43 48 54 45 52 20  27 4E 20 4E 55 4D 45 52  | ACHTER 'N NUMER|
00000360: 49 45 4B 45 00 91 0B 36  01 99 22 11 20 56 41 52  |IEKE...6..". VAR|
00000370: 49 41 42 45 4C 45 20 42  56 2E 20 41 25 3D 37 39  |IABELE BV. A%=79|
00000380: 2C 20 53 50 41 41 52 54  20 52 55 49 54 4D 54 45  |, SPAART RUITMTE|
00000390: 2C 00 B7 0B 40 01 99 22  11 20 4D 41 41 52 20 4C  |,...@..". MAAR L|
000003A0: 41 41 54 20 47 45 45 4E  20 44 45 43 49 4D 41 4C  |AAT GEEN DECIMAL|
000003B0: 45 4E 20 54 4F 45 21 00  E6 0B 4A 01 99 22 11 11  |EN TOE!...J.."..|
000003C0: 99 20 41 25 20 49 53 20  4E 49 45 54 20 48 45 54  |. A% IS NIET HET|
000003D0: 20 5A 45 4C 46 44 45 20  41 4C 53 20 41 20 45 4E  | ZELFDE ALS A EN|
000003E0: 20 4D 4F 47 45 4E 00 16  0C 54 01 99 22 11 20 42  | MOGEN...T..". B|
000003F0: 45 49 44 45 20 49 4E 20  48 45 54 20 5A 45 4C 46  |EIDE IN HET ZELF|
00000400: 44 45 20 50 52 4F 47 52  41 4D 4D 41 20 56 4F 4F  |DE PROGRAMMA VOO|
00000410: 52 4B 4F 4D 45 4E 00 4B  0C 5E 01 99 22 11 1E 20  |RKOMEN.K.^..".. |
00000420: 25 20 4E 4F 45 4D 45 4E  20 57 45 20 45 45 4E 20  |% NOEMEN WE EEN |
00000430: 27 49 4E 54 45 47 45 52  20 49 44 45 4E 54 49 46  |'INTEGER IDENTIF|
00000440: 49 45 52 27 22 3A 8D 31  37 36 30 00 7B 0C 68 01  |IER'":.1760.{.h.|
00000450: 99 22 93 90 20 41 4C 53  20 56 41 52 49 41 42 41  |.".. ALS VARIABA|
00000460: 4C 45 20 4D 41 47 20 4A  45 20 45 4C 4B 45 20 57  |LE MAG JE ELKE W|
00000470: 49 4C 4C 45 4B 45 55 52  49 47 45 00 A5 0C 72 01  |ILLEKEURIGE...r.|
00000480: 99 22 11 20 4C 45 54 54  45 52 20 55 49 54 20 48  |.". LETTER UIT H|
00000490: 45 54 20 41 4C 46 41 42  45 54 20 47 45 42 52 55  |ET ALFABET GEBRU|
000004A0: 49 4B 45 4E 2E 00 CF 0C  7C 01 99 22 11 99 20 12  |IKEN....|..".. .|
000004B0: 45 45 4E 20 43 49 4A 46  45 52 20 49 53 20 4E 49  |EEN CIJFER IS NI|
000004C0: 45 54 20 54 4F 45 4C 41  41 54 42 41 41 52 21 00  |ET TOELAATBAAR!.|
000004D0: F9 0C 86 01 99 22 11 20  12 27 28 4C 45 54 29 20  |.....". .'(LET) |
000004E0: 39 3D 38 31 27 20 49 53  20 44 55 53 20 47 52 4F  |9=81' IS DUS GRO|
000004F0: 54 45 20 4F 4E 5A 49 4E  21 00 26 0D 90 01 99 22  |TE ONZIN!.&...."|
00000500: 11 1E 20 56 41 52 49 41  42 45 4C 45 4E 20 4D 4F  |.. VARIABELEN MO|
00000510: 47 45 4E 20 57 45 4C 20  42 45 53 54 41 41 4E 20  |GEN WEL BESTAAN |
00000520: 55 49 54 20 27 4E 00 54  0D 9A 01 99 22 11 20 4C  |UIT 'N.T....". L|
00000530: 45 54 54 45 52 20 47 45  56 4F 4C 47 44 20 44 4F  |ETTER GEVOLGD DO|
00000540: 4F 52 20 27 4E 20 43 49  4A 46 45 52 20 42 56 3A  |OR 'N CIJFER BV:|
00000550: 20 12 41 31 00 7A 0D A4  01 99 22 11 20 4F 46 20  | .A1.z....". OF |
00000560: 55 49 54 20 54 57 45 45  20 4C 45 54 54 45 52 53  |UIT TWEE LETTERS|
00000570: 20 42 56 3A 20 12 50 45  92 2E 00 A6 0D AE 01 99  | BV: .PE........|
00000580: 22 11 90 20 4D 2E 55 2E  56 2E 20 44 45 20 43 4F  |".. M.U.V. DE CO|
00000590: 4D 42 49 4E 41 54 49 45  53 3A 20 54 49 20 45 4E  |MBINATIES: TI EN|
000005A0: 20 53 54 20 21 21 00 D0  0D B8 01 99 22 20 C5 C5  | ST !!......" ..|
000005B0: C5 C5 C5 C5 C5 C5 C5 C5  C5 C5 C5 C5 C5 C5 C5 C5  |................|
000005C0: C5 C5 C5 C5 C5 C5 C5 C5  C5 C5 C5 C5 C5 C5 C5 C5  |................|
000005D0: 00 FF 0D C2 01 99 22 05  20 4A 45 20 4D 41 47 20  |......". JE MAG |
000005E0: 45 52 20 57 45 4C 20 4D  45 45 52 20 4E 45 4D 45  |ER WEL MEER NEME|
000005F0: 4E 2C 20 4D 41 41 52 20  49 4B 20 4B 49 4A 4B 00  |N, MAAR IK KIJK.|
00000600: 28 0E CC 01 99 22 11 20  41 4C 4C 45 45 4E 20 4D  |(....". ALLEEN M|
00000610: 41 41 52 20 4E 41 41 52  20 44 45 20 45 45 52 53  |AAR NAAR DE EERS|
00000620: 54 45 20 54 57 45 45 21  00 5A 0E D6 01 99 22 11  |TE TWEE!.Z....".|
00000630: 90 20 44 55 53 20 27 43  42 4D 3D 36 34 27 20 4C  |. DUS 'CBM=64' L|
00000640: 45 45 53 20 49 4B 20 41  4C 53 20 27 43 42 3D 36  |EES IK ALS 'CB=6|
00000650: 34 27 2E 22 3A 8D 31 37  36 30 00 86 0E E0 01 99  |4'.":.1760......|
00000660: 22 93 9A 20 56 45 52 4D  49 4A 44 20 48 45 54 20  |".. VERMIJD HET |
00000670: 47 45 42 52 55 49 4B 20  56 41 4E 20 56 41 52 49  |GEBRUIK VAN VARI|
00000680: 41 42 45 4C 45 4E 00 B5  0E EA 01 99 22 11 20 57  |ABELEN......". W|
00000690: 41 41 52 56 41 4E 20 45  45 4E 20 44 45 45 4C 20  |AARVAN EEN DEEL |
000006A0: 45 45 4E 20 43 4F 4D 4D  41 4E 44 4F 57 4F 4F 52  |EEN COMMANDOWOOR|
000006B0: 44 20 49 53 21 00 E2 0E  F4 01 99 22 11 11 90 20  |D IS!......"... |
000006C0: 27 4B 4C 45 54 53 27 20  49 53 20 44 55 53 20 4F  |'KLETS' IS DUS O|
000006D0: 4E 54 4F 45 4C 41 41 54  42 41 41 52 20 4F 4D 44  |NTOELAATBAAR OMD|
000006E0: 41 54 00 0A 0F FE 01 99  22 11 20 44 41 41 52 20  |AT......". DAAR |
000006F0: 48 45 54 20 43 4F 4D 4D  41 4E 44 4F 20 27 4C 45  |HET COMMANDO 'LE|
00000700: 54 27 20 49 4E 20 5A 49  54 21 00 38 0F 08 02 99  |T' IN ZIT!.8....|
00000710: 22 11 11 9A 20 44 45 20  54 4F 54 41 4C 45 20 4C  |"... DE TOTALE L|
00000720: 49 4A 53 54 20 41 41 4E  20 43 4F 4D 4D 41 4E 44  |IJST AAN COMMAND|
00000730: 4F 57 4F 4F 52 44 45 4E  00 59 0F 12 02 99 22 11  |OWOORDEN.Y....".|
00000740: 20 53 54 41 41 54 20 49  4E 20 44 45 20 48 41 4E  | STAAT IN DE HAN|
00000750: 44 4C 45 49 44 49 4E 47  2E 00 88 0F 1C 02 99 22  |DLEIDING......."|
00000760: 11 11 9E 20 48 45 54 20  49 53 20 4F 56 45 52 49  |... HET IS OVERI|
00000770: 47 45 4E 53 2C 20 4F 4D  20 56 45 52 47 49 53 53  |GENS, OM VERGISS|
00000780: 49 4E 47 45 4E 20 54 45  00 B2 0F 26 02 99 22 11  |INGEN TE...&..".|
00000790: 20 56 4F 4F 52 4B 4F 4D  45 4E 2C 20 42 45 54 45  | VOORKOMEN, BETE|
000007A0: 52 20 4F 4D 20 56 41 52  49 41 42 45 4C 45 4E 20  |R OM VARIABELEN |
000007B0: 54 45 00 DE 0F 30 02 99  22 11 20 47 45 42 52 55  |TE...0..". GEBRU|
000007C0: 49 4B 45 4E 2C 20 44 49  45 20 4E 49 45 54 20 4C  |IKEN, DIE NIET L|
000007D0: 41 4E 47 45 52 20 5A 49  4A 4E 20 44 41 4E 00 00  |ANGER ZIJN DAN..|
000007E0: 10 3A 02 99 22 11 20 54  57 45 45 20 4C 45 54 54  |.:..". TWEE LETT|
000007F0: 45 52 54 45 4B 45 4E 53  2E 22 3A 8D 31 37 36 30  |ERTEKENS.":.1760|
00000800: 00 36 10 44 02 99 22 93  11 11 11 11 11 11 11 11  |.6.D..".........|
00000810: 90 20 45 45 4E 20 57 4F  4F 52 44 20 28 4B 45 54  |. EEN WOORD (KET|
00000820: 45 4E 20 56 41 4E 20 4C  45 54 54 45 52 53 29 20  |EN VAN LETTERS) |
00000830: 4B 55 4E 20 4A 45 00 62  10 4E 02 99 22 11 20 49  |KUN JE.b.N..". I|
00000840: 4E 20 45 45 4E 20 27 53  54 52 49 4E 47 20 56 41  |N EEN 'STRING VA|
00000850: 52 49 41 42 45 4C 45 27  20 4F 50 42 45 52 47 45  |RIABELE' OPBERGE|
00000860: 4E 2E 00 86 10 58 02 85  22 11 11 20 54 59 50 20  |N....X..".. TYP |
00000870: 45 45 4E 53 20 56 49 45  52 20 4C 45 54 54 45 52  |EENS VIER LETTER|
00000880: 53 20 22 3B 41 24 00 9C  10 59 02 41 24 B2 C8 28  |S ";A$...Y.A$..(|
00000890: 41 24 AA 22 20 20 20 20  22 2C 34 29 00 C7 10 62  |A$."    ",4)...b|
000008A0: 02 99 22 13 9E 22 3B 3A  53 B2 34 3A 8D 31 37 32  |.."..";:S.4:.172|
000008B0: 30 3A 99 22 9D 22 41 24  22 11 11 11 9D 9D 9D 9D  |0:."."A$".......|
000008C0: 12 41 24 92 11 11 11 00  ED 10 6C 02 99 22 13 22  |.A$.......l.."."|
000008D0: 3B 3A 53 B2 31 35 3A 8D  31 37 32 30 3A 99 22 31  |;:S.15:.1720:."1|
000008E0: 31 11 11 11 9D 9D 9D 12  50 92 11 11 11 00 13 11  |1.......P.......|
000008F0: 76 02 99 22 13 22 3B 3A  53 B2 32 35 3A 8D 31 37  |v..".";:S.25:.17|
00000900: 32 30 3A 99 22 35 35 11  11 11 9D 9D 9D 12 47 92  |20:."55.......G.|
00000910: 11 11 11 00 3E 11 80 02  99 22 11 11 11 11 11 11  |....>...."......|
00000920: 99 20 4A 45 20 5A 49 45  54 2C 20 44 41 54 20 49  |. JE ZIET, DAT I|
00000930: 4B 20 44 45 5A 45 20 4C  45 54 54 45 52 53 00 63  |K DEZE LETTERS.c|
00000940: 11 8A 02 99 22 11 20 48  45 42 20 4F 50 47 45 42  |....". HEB OPGEB|
00000950: 4F 52 47 45 4E 20 49 4E  20 27 44 4F 4F 53 27 20  |ORGEN IN 'DOOS' |
00000960: 41 24 2E 00 75 11 94 02  8B 4A A7 8D 31 37 36 30  |A$..u....J..1760|
00000970: 3A 89 39 33 30 00 A4 11  9E 02 99 22 11 11 05 20  |:.930......"... |
00000980: 4A 45 20 4D 4F 45 54 20  44 55 53 20 45 45 4E 20  |JE MOET DUS EEN |
00000990: 12 24 92 20 54 45 4B 45  4E 20 47 45 42 52 55 49  |.$. TEKEN GEBRUI|
000009A0: 4B 45 4E 2E 00 DD 11 A8  02 97 51 31 2C 30 3A 99  |KEN.......Q1,0:.|
000009B0: 22 11 90 20 12 57 49 4C  20 4A 45 20 44 49 54 20  |".. .WIL JE DIT |
000009C0: 4E 4F 47 20 45 45 4E 53  20 5A 49 45 4E 20 3F 92  |NOG EENS ZIEN ?.|
000009D0: 20 28 54 59 50 20 4A 20  4F 46 20 4E 29 00 F0 11  | (TYP J OF N)...|
000009E0: B2 02 A1 41 24 3A 8B 41  24 B2 22 22 89 36 39 30  |...A$:.A$."".690|
000009F0: 00 01 12 BC 02 8B 41 24  B3 B1 22 4E 22 89 31 32  |......A$.."N".12|
00000A00: 30 00 43 12 C6 02 99 22  93 1E 20 45 45 4E 20 50  |0.C....".. EEN P|
00000A10: 41 41 52 20 56 4F 4F 52  42 45 45 4C 44 45 4E 20  |AAR VOORBEELDEN |
00000A20: 56 41 4E 20 50 52 4F 47  52 41 4D 4D 41 27 53 20  |VAN PROGRAMMA'S |
00000A30: 20 20 20 11 4D 45 54 20  56 41 52 49 41 42 45 4C  |   .MET VARIABEL|
00000A40: 45 4E 3A 00 77 12 D0 02  99 22 11 11 20 20 31 31  |EN:.w...."..  11|
00000A50: 30 20 49 4E 50 55 54 20  22 C7 28 33 34 29 22 48  |0 INPUT ".(34)"H|
00000A60: 4F 45 20 4F 55 44 20 42  45 4E 20 4A 45 20 22 C7  |OE OUD BEN JE ".|
00000A70: 28 33 34 29 22 3B 4C 00  92 12 DA 02 99 22 11 20  |(34)";L......". |
00000A80: 20 31 32 30 20 28 4C 45  54 29 20 44 3D 4C 2A 33  | 120 (LET) D=L*3|
00000A90: 36 35 00 D1 12 E4 02 99  22 11 20 20 31 33 30 20  |65......".  130 |
00000AA0: 50 52 49 4E 54 20 22 C7  28 33 34 29 22 44 41 4E  |PRINT ".(34)"DAN|
00000AB0: 20 42 45 4E 20 4A 45 22  C7 28 33 34 29 22 20 44  | BEN JE".(34)" D|
00000AC0: 20 22 C7 28 33 34 29 22  44 41 47 45 4E 20 4F 55  | ".(34)"DAGEN OU|
00000AD0: 44 00 02 13 EE 02 99 22  11 11 90 20 49 4E 20 52  |D......"... IN R|
00000AE0: 45 47 45 4C 20 31 31 30  20 56 52 41 41 47 20 49  |EGEL 110 VRAAG I|
00000AF0: 4B 20 4F 4D 20 45 45 4E  20 4C 45 45 46 54 49 4A  |K OM EEN LEEFTIJ|
00000B00: 44 2C 00 2D 13 F8 02 99  22 11 20 44 49 45 20 49  |D,.-....". DIE I|
00000B10: 4B 20 49 4E 20 27 4C 27  20 53 54 4F 50 20 45 4E  |K IN 'L' STOP EN|
00000B20: 20 49 4E 20 52 45 47 45  4C 20 31 32 30 00 57 13  | IN REGEL 120.W.|
00000B30: 02 03 99 22 11 20 56 45  52 4D 45 4E 49 47 56 55  |...". VERMENIGVU|
00000B40: 4C 44 49 47 20 45 4E 20  44 49 45 20 55 49 54 4B  |LDIG EN DIE UITK|
00000B50: 4F 4D 53 54 20 49 4E 00  87 13 0C 03 99 22 11 20  |OMST IN......". |
00000B60: 27 44 27 20 53 54 4F 50  2E 20 9E 49 4E 20 52 45  |'D' STOP. .IN RE|
00000B70: 47 45 4C 20 31 33 30 20  50 52 49 4E 54 20 49 4B  |GEL 130 PRINT IK|
00000B80: 20 54 55 53 53 45 4E 00  B0 13 16 03 99 22 11 20  | TUSSEN......". |
00000B90: 44 45 20 54 45 4B 53 54  20 44 45 20 55 49 54 4B  |DE TEKST DE UITK|
00000BA0: 4F 4D 53 54 20 27 44 27  2E 22 3A 8D 31 37 36 30  |OMST 'D'.":.1760|
00000BB0: 00 DF 13 20 03 99 22 93  9A 20 48 45 54 20 53 54  |... ..".. HET ST|
00000BC0: 55 4B 4A 45 20 50 52 4F  47 52 41 4D 4D 41 20 56  |UKJE PROGRAMMA V|
00000BD0: 41 4E 20 44 41 41 52 4E  45 54 20 57 41 41 52 00  |AN DAARNET WAAR.|
00000BE0: 0D 14 2A 03 99 22 11 20  49 4B 20 4F 4D 20 56 49  |..*..". IK OM VI|
00000BF0: 45 52 20 4C 45 54 54 45  52 53 20 56 52 4F 45 47  |ER LETTERS VROEG|
00000C00: 20 5A 49 45 54 20 5A 4F  20 55 49 54 3A 00 47 14  | ZIET ZO UIT:.G.|
00000C10: 34 03 99 22 11 11 20 20  33 31 30 20 49 4E 50 55  |4.."..  310 INPU|
00000C20: 54 22 C7 28 33 34 29 22  54 59 50 20 45 45 4E 53  |T".(34)"TYP EENS|
00000C30: 20 56 49 45 52 20 4C 45  54 54 45 52 53 22 C7 28  | VIER LETTERS".(|
00000C40: 33 34 29 22 3B 41 24 00  7D 14 3E 03 99 22 11 20  |34)";A$.}.>..". |
00000C50: 20 33 33 30 20 50 52 49  4E 54 22 C7 28 33 34 29  | 330 PRINT".(34)|
00000C60: 22 4A 45 20 5A 49 45 54  2C 20 44 41 54 20 49 4B  |"JE ZIET, DAT IK|
00000C70: 20 44 45 5A 45 20 4C 45  54 54 45 52 53 00 B1 14  | DEZE LETTERS...|
00000C80: 48 03 99 22 20 20 33 34  30 20 50 52 49 4E 54 22  |H.."  340 PRINT"|
00000C90: C7 28 33 34 29 22 48 45  42 20 4F 50 47 45 42 4F  |.(34)"HEB OPGEBO|
00000CA0: 52 47 45 4E 20 49 4E 20  27 44 4F 4F 53 27 20 41  |RGEN IN 'DOOS' A|
00000CB0: 24 00 E1 14 52 03 99 22  11 11 90 20 52 45 47 45  |$...R.."... REGE|
00000CC0: 4C 20 33 31 30 20 50 52  49 4E 54 45 20 44 45 20  |L 310 PRINTE DE |
00000CD0: 56 52 41 41 47 20 45 4E  20 50 4C 41 41 54 53 54  |VRAAG EN PLAATST|
00000CE0: 45 00 0E 15 5C 03 99 22  11 20 27 54 20 41 4E 54  |E...\..". 'T ANT|
00000CF0: 57 4F 4F 52 44 20 49 4E  20 41 24 2E 20 49 4E 20  |WOORD IN A$. IN |
00000D00: 44 45 20 4F 4E 54 42 52  45 4B 45 4E 44 45 00 3B  |DE ONTBREKENDE.;|
00000D10: 15 66 03 99 22 11 20 52  45 47 45 4C 20 33 32 30  |.f..". REGEL 320|
00000D20: 20 57 45 52 44 20 48 45  54 20 50 4C 41 41 54 4A  | WERD HET PLAATJ|
00000D30: 45 20 47 45 54 45 4B 45  4E 44 2E 00 66 15 70 03  |E GETEKEND..f.p.|
00000D40: 99 22 11 9A 20 44 45 20  52 45 47 45 4C 53 20 33  |.".. DE REGELS 3|
00000D50: 33 30 20 45 4E 20 33 34  30 20 56 4F 4F 52 5A 41  |30 EN 340 VOORZA|
00000D60: 47 45 4E 20 4A 45 00 8D  15 7A 03 99 22 11 20 56  |GEN JE...z..". V|
00000D70: 41 4E 20 43 4F 4D 4D 45  4E 54 41 41 52 20 4E 41  |AN COMMENTAAR NA|
00000D80: 20 44 45 20 4F 50 44 52  41 43 48 54 2E 00 C4 15  | DE OPDRACHT....|
00000D90: 84 03 97 51 31 2C 30 3A  99 22 11 90 20 12 57 49  |...Q1,0:.".. .WI|
00000DA0: 4C 20 4A 45 20 44 41 54  20 4E 4F 47 20 45 45 4E  |L JE DAT NOG EEN|
00000DB0: 53 20 5A 49 45 4E 20 3F  92 20 28 4A 2F 4E 29 22  |S ZIEN ?. (J/N)"|
00000DC0: 3A 4A B2 31 00 D7 15 8E  03 A1 51 24 3A 8B 51 24  |:J.1......Q$:.Q$|
00000DD0: B2 22 22 89 39 31 30 00  E8 15 98 03 8B 51 24 B3  |."".910......Q$.|
00000DE0: B1 22 4E 22 A7 35 38 30  00 13 16 A2 03 99 22 93  |."N".580......".|
00000DF0: 9E 20 41 4C 53 20 4A 45  20 53 54 52 49 4E 47 20  |. ALS JE STRING |
00000E00: 56 41 52 49 41 42 45 4C  45 4E 20 47 45 42 52 55  |VARIABELEN GEBRU|
00000E10: 49 4B 54 00 3D 16 AC 03  99 22 11 20 56 45 52 47  |IKT.=....". VERG|
00000E20: 45 45 54 20 44 41 4E 20  4E 49 45 54 20 48 45 54  |EET DAN NIET HET|
00000E30: 20 27 24 27 20 54 45 4B  45 4E 20 45 52 00 62 16  | '$' TEKEN ER.b.|
00000E40: B6 03 99 22 11 20 41 43  48 54 45 52 20 57 41 4E  |...". ACHTER WAN|
00000E50: 54 20 41 4E 44 45 52 53  20 5A 49 45 20 4A 45 3A  |T ANDERS ZIE JE:|
00000E60: 11 11 00 82 16 C0 03 99  22 90 3F 52 45 44 4F 20  |........".?REDO |
00000E70: 46 52 4F 4D 20 53 54 41  52 54 22 3A 99 22 3F 20  |FROM START":."? |
00000E80: 22 3B 00 BD 16 CA 03 81  58 B2 31 A4 31 30 3A 99  |";......X.1.10:.|
00000E90: 22 12 20 92 22 3B 3A 81  50 B2 31 A4 32 30 30 3A  |". .";:.P.1.200:|
00000EA0: 82 3A 99 22 9D 20 9D 22  3B 3A 81 50 B2 31 A4 32  |.:.". .";:.P.1.2|
00000EB0: 30 30 3A 82 50 2C 58 3A  99 22 12 20 22 00 E5 16  |00:.P,X:.". "...|
00000EC0: D4 03 99 22 11 11 11 05  20 57 41 4E 54 20 49 4B  |...".... WANT IK|
00000ED0: 20 56 45 52 57 41 43 48  54 20 44 41 4E 20 43 49  | VERWACHT DAN CI|
00000EE0: 4A 46 45 52 53 00 04 17  DE 03 99 22 11 20 4D 41  |JFERS......". MA|
00000EF0: 41 52 20 49 4B 20 4B 52  49 4A 47 20 4C 45 54 54  |AR IK KRIJG LETT|
00000F00: 45 52 53 21 00 3A 17 E8  03 97 51 31 2C 30 3A 99  |ERS!.:....Q1,0:.|
00000F10: 22 11 11 90 20 12 48 45  42 20 4A 45 20 48 45 54  |"... .HEB JE HET|
00000F20: 20 54 4F 54 20 5A 4F 56  45 52 20 42 45 47 52 45  | TOT ZOVER BEGRE|
00000F30: 50 45 4E 92 20 28 4A 2F  4E 29 00 4E 17 F2 03 A1  |PEN. (J/N).N....|
00000F40: 51 24 3A 8B 51 24 B2 22  22 89 31 30 31 30 00 5F  |Q$:.Q$."".1010._|
00000F50: 17 FC 03 8B 51 24 B3 B1  22 4A 22 89 37 31 30 00  |....Q$.."J".710.|
00000F60: 8A 17 06 04 99 22 93 99  20 49 4E 20 45 45 4E 20  |.....".. IN EEN |
00000F70: 53 54 52 49 4E 47 20 50  41 53 53 45 4E 20 4D 41  |STRING PASSEN MA|
00000F80: 58 49 4D 41 41 4C 20 32  35 36 00 B8 17 10 04 99  |XIMAAL 256......|
00000F90: 22 11 20 54 45 4B 45 4E  53 20 49 4E 43 4C 55 53  |". TEKENS INCLUS|
00000FA0: 49 45 46 20 41 4C 4C 45  20 53 50 41 54 49 45 53  |IEF ALLE SPATIES|
00000FB0: 20 45 4E 20 41 4C 4C 45  00 E6 17 1A 04 99 22 11  | EN ALLE......".|
00000FC0: 20 4C 45 45 53 54 45 4B  45 4E 53 2E 20 20 44 45  | LEESTEKENS.  DE|
00000FD0: 20 49 4E 48 4F 55 44 20  56 41 4E 20 45 45 4E 20  | INHOUD VAN EEN |
00000FE0: 53 54 52 49 4E 47 00 12  18 24 04 99 22 11 20 4D  |STRING...$..". M|
00000FF0: 4F 45 54 20 41 4C 54 49  4A 44 20 54 55 53 53 45  |OET ALTIJD TUSSE|
00001000: 4E 20 41 41 4E 48 41 4C  49 4E 47 53 54 45 4B 45  |N AANHALINGSTEKE|
00001010: 4E 53 00 31 18 2E 04 99  22 11 20 57 4F 52 44 45  |NS.1....". WORDE|
00001020: 4E 20 47 45 50 4C 41 41  54 53 54 2C 20 44 55 53  |N GEPLAATST, DUS|
00001030: 3A 00 61 18 38 04 99 22  11 11 90 20 20 35 30 20  |:.a.8.."...  50 |
00001040: 57 24 20 3D 20 22 C7 28  33 34 29 22 57 4F 4F 52  |W$ = ".(34)"WOOR|
00001050: 44 22 C7 28 33 34 29 22  3A 50 52 49 4E 54 20 57  |D".(34)":PRINT W|
00001060: 24 00 8E 18 42 04 99 22  11 11 99 20 4B 4F 4D 54  |$...B.."... KOMT|
00001070: 20 45 52 20 4E 49 45 54  53 20 4D 45 45 52 20 41  | ER NIETS MEER A|
00001080: 43 48 54 45 52 2C 20 44  55 53 20 42 56 3A 00 AE  |CHTER, DUS BV:..|
00001090: 18 4C 04 99 22 11 11 90  20 20 38 30 20 57 24 20  |.L.."...  80 W$ |
000010A0: 3D 20 22 C7 28 33 34 29  22 57 4F 4F 52 44 00 EF  |= ".(34)"WOORD..|
000010B0: 18 56 04 99 22 11 11 99  20 44 41 4E 20 4D 41 47  |.V.."... DAN MAG|
000010C0: 20 48 45 54 20 4C 41 41  54 53 45 20 41 41 4E 48  | HET LAATSE AANH|
000010D0: 41 4C 49 4E 47 53 54 45  4B 45 4E 20 57 45 47 20  |ALINGSTEKEN WEG |
000010E0: 20 20 20 20 20 C5 C5 C5  22 3A 8D 31 37 36 30 00  |     ...":.1760.|
000010F0: 1D 19 60 04 99 22 93 9A  20 48 45 54 20 49 53 20  |..`..".. HET IS |
00001100: 45 43 48 54 45 52 20 4E  49 45 54 20 4E 4F 44 49  |ECHTER NIET NODI|
00001110: 47 20 41 41 4E 48 41 4C  49 4E 47 53 2D 00 4A 19  |G AANHALINGS-.J.|
00001120: 6A 04 99 22 11 20 54 45  4B 45 4E 53 20 54 45 20  |j..". TEKENS TE |
00001130: 54 59 50 45 4E 20 42 49  4A 20 48 45 54 20 42 45  |TYPEN BIJ HET BE|
00001140: 41 4E 54 57 4F 4F 52 44  45 4E 00 7F 19 74 04 99  |ANTWOORDEN...t..|
00001150: 22 11 20 56 41 4E 20 45  45 4E 20 56 52 41 41 47  |". VAN EEN VRAAG|
00001160: 2C 20 47 45 53 54 45 4C  44 20 44 4F 4F 52 20 27  |, GESTELD DOOR '|
00001170: 54 20 50 52 4F 47 52 41  4D 2D 11 20 4D 41 2E 00  |T PROGRAM-. MA..|
00001180: 96 19 7E 04 99 22 11 05  20 42 49 4A 56 4F 4F 52  |..~..".. BIJVOOR|
00001190: 42 45 45 4C 44 3A 00 AD  19 88 04 99 22 11 11 20  |BEELD:......".. |
000011A0: 20 48 4F 45 20 48 45 45  54 20 4A 49 4A 00 BE 19  | HOE HEET JIJ...|
000011B0: 92 04 99 22 20 20 3F 20  22 3B 3A 49 B2 35 00 F2  |..."  ? ";:I.5..|
000011C0: 19 9C 04 81 58 B2 31 A4  49 3A 99 22 12 20 92 22  |....X.1.I:.". ."|
000011D0: 3B 3A 81 50 B2 31 A4 32  30 30 3A 82 3A 99 22 9D  |;:.P.1.200:.:.".|
000011E0: 20 9D 22 3B 3A 81 50 B2  31 A4 32 30 30 3A 82 50  | .";:.P.1.200:.P|
000011F0: 2C 58 00 00 1A A6 04 4E  B2 4E AA 31 3A 49 B2 31  |,X.....N.N.1:I.1|
00001200: 00 20 1A B0 04 91 4E 89  31 32 31 30 2C 31 32 32  |. ....N.1210,122|
00001210: 30 2C 31 32 32 30 2C 31  32 33 30 2C 31 32 34 30  |0,1220,1230,1240|
00001220: 00 31 1A BA 04 99 22 9A  4E 22 3B 3A 89 31 31 38  |.1....".N";:.118|
00001230: 30 00 41 1A C4 04 99 22  41 22 3B 3A 89 31 31 38  |0.A...."A";:.118|
00001240: 30 00 51 1A CE 04 99 22  4D 22 3B 3A 89 31 31 38  |0.Q...."M";:.118|
00001250: 30 00 61 1A D8 04 99 22  11 11 22 3A 8D 31 37 36  |0.a...."..":.176|
00001260: 30 00 91 1A E2 04 99 22  93 9E 20 4D 45 54 20 53  |0......".. MET S|
00001270: 54 52 49 4E 47 53 20 4B  41 4E 20 49 4B 20 45 4E  |TRINGS KAN IK EN|
00001280: 4B 45 4C 45 20 46 41 4E  54 41 53 54 49 53 43 48  |KELE FANTASTISCH|
00001290: 45 00 AA 1A EC 04 99 22  11 20 44 49 4E 47 45 4E  |E......". DINGEN|
000012A0: 20 55 49 54 48 41 4C 45  4E 2E 00 D8 1A F6 04 99  | UITHALEN.......|
000012B0: 22 11 11 20 49 4B 20 4B  45 4E 20 45 52 20 53 50  |".. IK KEN ER SP|
000012C0: 45 43 49 41 4C 45 20 43  4F 4D 4D 41 4E 44 4F 27  |ECIALE COMMANDO'|
000012D0: 53 20 56 4F 4F 52 20 3A  00 0E 1B 00 05 99 22 11  |S VOOR :......".|
000012E0: 11 9A 20 12 4C 45 46 54  24 92 28 41 24 2C 58 29  |.. .LEFT$.(A$,X)|
000012F0: 20 20 12 4D 49 44 24 92  28 41 24 2C 58 2C 59 29  |  .MID$.(A$,X,Y)|
00001300: 2C 20 12 52 49 47 48 54  24 92 28 41 24 29 00 3F  |, .RIGHT$.(A$).?|
00001310: 1B 0A 05 99 22 11 20 12  4C 45 4E 92 28 41 24 29  |....". .LEN.(A$)|
00001320: 20 20 20 20 20 20 12 56  41 4C 92 28 41 24 29 20  |      .VAL.(A$) |
00001330: 20 20 20 20 20 20 12 53  54 52 24 92 28 41 29 00  |      .STR$.(A).|
00001340: 6F 1B 14 05 99 22 11 9E  20 4C 45 54 20 57 45 4C  |o....".. LET WEL|
00001350: 3A 20 42 49 4A 20 44 45  20 4C 41 41 54 53 54 45  |: BIJ DE LAATSTE|
00001360: 20 53 54 41 41 54 20 47  45 45 4E 20 24 20 21 00  | STAAT GEEN $ !.|
00001370: 9B 1B 1E 05 99 22 11 11  20 48 45 54 20 4C 49 4A  |.....".. HET LIJ|
00001380: 4B 54 20 45 52 47 20 49  4E 47 45 57 49 4B 4B 45  |KT ERG INGEWIKKE|
00001390: 4C 44 2C 20 4D 41 41 52  20 49 53 00 C7 1B 28 05  |LD, MAAR IS...(.|
000013A0: 99 22 11 20 54 4F 43 48  20 45 43 48 54 20 4E 49  |.". TOCH ECHT NI|
000013B0: 45 54 20 5A 4F 20 4D 4F  45 49 4C 49 4A 4B 2E 11  |ET ZO MOEILIJK..|
000013C0: 22 3A 8D 31 37 36 30 00  F3 1B 32 05 99 22 93 9A  |":.1760...2.."..|
000013D0: 20 4D 45 54 20 44 45 5A  45 20 43 4F 4D 4D 41 4E  | MET DEZE COMMAN|
000013E0: 44 4F 27 53 20 47 41 41  4E 20 57 45 20 4E 55 20  |DO'S GAAN WE NU |
000013F0: 57 41 54 00 20 1C 3C 05  99 22 20 4D 41 4E 49 50  |WAT. .<.." MANIP|
00001400: 55 4C 45 52 45 4E 3A 20  53 54 45 4C 20 4E 24 3D  |ULEREN: STEL N$=|
00001410: 22 C7 28 33 34 29 22 43  42 4D 22 C7 28 33 34 29  |".(34)"CBM".(34)|
00001420: 00 4A 1C 46 05 99 22 11  20 44 41 4E 20 5A 41 4C  |.J.F..". DAN ZAL|
00001430: 20 45 52 20 48 45 54 20  56 4F 4C 47 45 4E 44 45  | ER HET VOLGENDE|
00001440: 20 47 45 42 45 55 52 45  4E 3A 00 61 1C 50 05 99  | GEBEUREN:.a.P..|
00001450: 22 11 90 20 20 3F 4C 45  46 54 24 28 4E 24 2C 31  |"..  ?LEFT$(N$,1|
00001460: 29 00 90 1C 5A 05 99 22  11 20 49 4B 20 47 45 45  |)...Z..". IK GEE|
00001470: 46 20 12 31 92 20 4C 45  54 54 45 52 20 56 41 4E  |F .1. LETTER VAN|
00001480: 20 41 46 20 4C 49 4E 4B  53 20 44 55 53 20 12 43  | AF LINKS DUS .C|
00001490: 00 A8 1C 64 05 99 22 11  05 20 20 3F 52 49 47 48  |...d.."..  ?RIGH|
000014A0: 54 24 28 4E 24 2C 31 29  00 D8 1C 6E 05 99 22 11  |T$(N$,1)...n..".|
000014B0: 20 49 4B 20 47 45 45 46  20 12 31 92 20 4C 45 54  | IK GEEF .1. LET|
000014C0: 54 45 52 20 56 41 4E 20  41 46 20 52 45 43 48 54  |TER VAN AF RECHT|
000014D0: 53 20 44 55 53 20 12 4D  00 F0 1C 78 05 99 22 11  |S DUS .M...x..".|
000014E0: 90 20 20 3F 4D 49 44 24  28 4E 24 2C 32 2C 31 29  |.  ?MID$(N$,2,1)|
000014F0: 00 1D 1D 82 05 99 22 11  20 49 4B 20 47 45 45 46  |......". IK GEEF|
00001500: 20 12 31 92 20 4C 45 54  54 45 52 20 56 41 4E 20  | .1. LETTER VAN |
00001510: 41 46 20 12 44 45 20 54  57 45 45 44 45 00 38 1D  |AF .DE TWEEDE.8.|
00001520: 8C 05 99 22 11 20 12 56  41 4E 20 4C 49 4E 4B 53  |...". .VAN LINKS|
00001530: 92 20 44 55 53 20 12 42  00 4B 1D 96 05 99 22 11  |. DUS .B.K....".|
00001540: 05 20 20 3F 4C 45 4E 28  4E 24 29 00 7B 1D A0 05  |.  ?LEN(N$).{...|
00001550: 99 22 11 20 49 4B 20 47  45 45 46 20 48 45 54 20  |.". IK GEEF HET |
00001560: 41 41 4E 54 41 4C 20 4C  45 54 54 45 52 53 20 49  |AANTAL LETTERS I|
00001570: 4E 20 4E 24 20 44 55 53  20 12 33 00 86 1D AA 05  |N N$ DUS .3.....|
00001580: 3A 8D 31 37 36 30 00 B6  1D B4 05 99 22 93 9A 20  |:.1760......".. |
00001590: 4D 45 54 20 47 45 54 41  4C 4C 45 4E 20 49 4E 20  |MET GETALLEN IN |
000015A0: 45 45 4E 20 53 54 52 49  4E 47 20 4B 55 4E 20 4A  |EEN STRING KUN J|
000015B0: 45 20 4E 49 45 54 00 E2  1D BE 05 99 22 11 20 52  |E NIET......". R|
000015C0: 45 4B 45 4E 45 4E 3B 20  4A 45 20 4D 4F 45 54 20  |EKENEN; JE MOET |
000015D0: 45 52 20 45 45 52 53 54  20 44 45 20 57 41 41 52  |ER EERST DE WAAR|
000015E0: 44 45 00 0A 1E C8 05 99  22 11 20 55 49 54 48 41  |DE......". UITHA|
000015F0: 4C 45 4E 20 4D 45 54 3A  20 20 90 12 56 41 4C 28  |LEN MET:  ..VAL(|
00001600: 4E 24 29 92 9A 20 20 42  56 3A 00 2A 1E D2 05 99  |N$)..  BV:.*....|
00001610: 22 11 05 20 20 20 20 35  30 20 41 24 3D 22 31 32  |"..    50 A$="12|
00001620: 33 22 3A 42 24 3D 22 34  35 22 00 57 1E DC 05 99  |3":B$="45".W....|
00001630: 22 11 9A 20 57 49 4C 4C  45 4E 20 57 45 20 57 45  |".. WILLEN WE WE|
00001640: 54 45 4E 20 57 41 54 20  31 32 33 2B 34 35 20 49  |TEN WAT 123+45 I|
00001650: 53 2C 20 44 41 4E 3A 00  7A 1E E6 05 99 22 11 05  |S, DAN:.z...."..|
00001660: 20 20 20 20 36 30 20 41  3D 56 41 4C 28 41 24 29  |    60 A=VAL(A$)|
00001670: 3A 42 3D 56 41 4C 28 42  24 29 00 95 1E F0 05 99  |:B=VAL(B$)......|
00001680: 22 20 20 20 20 37 30 20  43 3D 41 2B 42 3A 50 52  |"    70 C=A+B:PR|
00001690: 49 4E 54 20 43 00 C0 1E  FA 05 99 22 11 9A 20 45  |INT C......".. E|
000016A0: 4E 20 4B 52 49 4A 47 45  4E 20 57 45 20 12 31 36  |N KRIJGEN WE .16|
000016B0: 38 92 20 41 4C 53 20 55  49 54 4B 4F 4D 53 54 2E  |8. ALS UITKOMST.|
000016C0: 00 D9 1E 04 06 99 22 11  11 20 44 4F 45 4E 20 57  |......".. DOEN W|
000016D0: 45 20 45 43 48 54 45 52  3A 00 FA 1E 0E 06 99 22  |E ECHTER:......"|
000016E0: 11 05 20 20 20 20 36 30  20 43 24 3D 41 24 2B 42  |..    60 C$=A$+B|
000016F0: 24 3A 50 52 49 4E 54 20  43 24 00 2A 1F 18 06 99  |$:PRINT C$.*....|
00001700: 22 11 9A 20 44 41 4E 20  4B 52 49 4A 47 45 4E 20  |".. DAN KRIJGEN |
00001710: 57 45 20 20 12 31 32 33  34 35 92 20 41 4C 53 20  |WE  .12345. ALS |
00001720: 55 49 54 4B 4F 4D 53 54  21 21 00 35 1F 22 06 3A  |UITKOMST!!.5.".:|
00001730: 8D 31 37 36 30 00 66 1F  2C 06 99 22 93 90 20 57  |.1760.f.,..".. W|
00001740: 49 4C 20 4A 45 20 44 45  20 48 45 4C 45 20 4C 45  |IL JE DE HELE LE|
00001750: 53 20 4E 4F 47 20 45 45  4E 53 20 44 4F 4F 52 4E  |S NOG EENS DOORN|
00001760: 45 4D 45 4E 20 3F 00 7A  1F 36 06 99 22 11 9A 20  |EMEN ?.z.6..".. |
00001770: 54 59 50 20 4A 20 4F 46  20 4E 00 8E 1F 40 06 A1  |TYP J OF N...@..|
00001780: 51 24 3A 8B 51 24 B2 22  22 89 31 36 30 30 00 A1  |Q$:.Q$."".1600..|
00001790: 1F 4A 06 8B 51 24 B2 C7  28 31 33 29 89 31 35 38  |.J..Q$..(13).158|
000017A0: 30 00 B1 1F 54 06 8B 51  24 B2 22 4A 22 89 31 32  |0...T..Q$."J".12|
000017B0: 30 00 E3 1F 5E 06 99 22  11 11 90 20 57 49 4C 20  |0...^.."... WIL |
000017C0: 4A 45 20 44 41 4E 20 48  45 54 20 4C 41 41 54 53  |JE DAN HET LAATS|
000017D0: 54 45 20 44 45 45 4C 20  4E 4F 47 20 54 45 52 55  |TE DEEL NOG TERU|
000017E0: 47 20 3F 00 F7 1F 68 06  99 22 11 9A 20 54 59 50  |G ?...h..".. TYP|
000017F0: 20 4A 20 4F 46 20 4E 00  0B 20 72 06 A1 51 24 3A  | J OF N.. r..Q$:|
00001800: 8B 51 24 B2 22 22 89 31  36 35 30 00 29 20 7C 06  |.Q$."".1650.) |.|
00001810: 8B 51 24 B2 C7 28 31 33  29 A7 99 22 91 91 91 91  |.Q$..(13).."....|
00001820: 91 91 22 3A 89 31 36 33  30 00 3A 20 86 06 8B 51  |..":.1630.: ...Q|
00001830: 24 B2 22 4A 22 89 31 32  35 30 00 64 20 90 06 99  |$."J".1250.d ...|
00001840: 22 11 11 05 20 4D 45 45  52 20 48 49 45 52 4F 56  |"... MEER HIEROV|
00001850: 45 52 20 49 4E 20 44 45  20 4C 41 41 54 53 54 45  |ER IN DE LAATSTE|
00001860: 20 4C 45 53 00 8F 20 9A  06 99 22 93 11 20 20 20  | LES.. ..."..   |
00001870: 20 20 20 90 44 49 54 20  49 53 20 48 45 54 20 45  |   .DIT IS HET E|
00001880: 49 4E 44 45 20 56 41 4E  20 4C 45 53 20 34 22 00  |INDE VAN LES 4".|
00001890: CA 20 9F 06 99 22 05 11  11 11 11 11 11 11 11 11  |. ..."..........|
000018A0: 11 57 49 4C 54 20 55 20  44 45 20 56 4F 4C 47 45  |.WILT U DE VOLGE|
000018B0: 4E 44 45 20 4C 45 53 20  28 35 29 20 4C 41 44 45  |NDE LES (5) LADE|
000018C0: 4E 20 3C 4A 2F 4E 3E 20  3F 22 00 DE 20 A4 06 A1  |N <J/N> ?".. ...|
000018D0: 56 24 3A 8B 56 24 B2 22  22 A7 31 37 30 30 00 FB  |V$:.V$."".1700..|
000018E0: 20 A9 06 8B 56 24 B2 22  4A 22 A7 93 22 42 41 53  | ...V$."J".."BAS|
000018F0: 49 43 20 4C 45 53 20 35  22 2C 38 00 01 21 AE 06  |IC LES 5",8..!..|
00001900: 80 00 34 21 B8 06 99 A6  53 AA 33 29 22 A4 A4 A4  |..4!....S.3)"...|
00001910: A4 A4 22 3A 99 A6 53 AA  32 29 22 CE 20 20 20 20  |..":..S.2)".    |
00001920: CE A5 22 3A 99 A6 53 AA  31 29 22 CE 20 20 20 20  |..":..S.1)".    |
00001930: CE 20 A5 22 00 66 21 C2  06 99 A6 53 29 22 CE 20  |. .".f!....S)". |
00001940: 20 20 20 CE 20 20 A5 22  3A 99 A6 53 29 22 CF A3  |   .  .":..S)"..|
00001950: A3 A3 D0 20 20 CE 22 3A  99 A6 53 29 22 A5 12 20  |...  .":..S)".. |
00001960: 20 20 92 A7 20 CE 00 81  21 CC 06 99 A6 53 29 22  |  .. ...!....S)"|
00001970: CC A4 A4 A4 BA CE 91 91  91 91 9D 9D 9D 22 3B 3A  |.............";:|
00001980: 8E 00 88 21 D6 06 85 41  00 D1 21 E0 06 97 51 31  |...!...A..!...Q1|
00001990: 2C 30 3A 99 22 13 11 11  11 11 11 11 11 11 11 11  |,0:."...........|
000019A0: 11 11 11 11 11 11 11 11  11 11 11 11 11 20 20 20  |.............   |
000019B0: 20 20 20 9E 12 56 4F 4F  52 20 56 45 52 44 45 52  |   ..VOOR VERDER|
000019C0: 3A 20 44 52 55 4B 20 4F  50 20 27 53 50 41 43 45  |: DRUK OP 'SPACE|
000019D0: 27 00 E5 21 EA 06 A1 41  24 3A 8B 41 24 B2 22 22  |'..!...A$:.A$.""|
000019E0: A7 31 37 37 30 00 EB 21  F4 06 8E 00 00 00        |.1770..!......  |

....D..G(142).*.N.Q1.198:.53280,2:.53281
,2.].X..".. *** VARIABELEN ***":." *** -
--------- ***......"... VARIABELEN ZIJN 
A.H.W KLEINE DOOSJES......". WAARIN WE G
ETALLEN ZOWEL ALS WOORDEN,......". MAAR 
OOK EEN COMBINATIE DAARVAN,... ..". TIJD
ELIJK KUNNEN OPBERGEN, OM ZE LATER.G....
". ER WEER UIT TE HALEN EN TE VERWERKEN.
":.1760.L....".";:S.4:.1720:."79.......A
..........".";:S.15:.1720:."11.......P..
.....H..".";:S.25:.1720:."55.......G....
...R..".. DE VARIABELEN, HIER 'A' 'P' EN
 'G',......". IDENTIFICEREN HET 'DOOSJE'
, WAARIN WE.8....". EEN GETAL HEBBEN OPG
EBORGEN..K....".. MET: .LET A=79. (LET M
AG JE OOK WEGLATEN)......" STOPPEN WE HE
T GETAL 79 IN DE 'DOOS'.......".. MET HE
T 'LABEL' 'A'...":.1760......".";:S.4:.1
720:."79.......A%..........".";:S.15:.17
20:."11.......P%.....3."..".";:S.25:.172
0:."55.......G%.....D.,..". HET PROCENTT
EKEN .%. ACHTER 'N NUMERIEKE...6..". VAR
IABELE BV. A%=79, SPAART RUITMTE,...@.."
. MAAR LAAT GEEN DECIMALEN TOE!...J.."..
. A% IS NIET HET ZELFDE ALS A EN MOGEN..
.T..". BEIDE IN HET ZELFDE PROGRAMMA VOO
RKOMEN.K.^..".. % NOEMEN WE EEN 'INTEGER
 IDENTIFIER'":.1760.{.H..".. ALS VARIABA
LE MAG JE ELKE WILLEKEURIGE...R..". LETT
ER UIT HET ALFABET GEBRUIKEN..O.|..".. .
EEN CIJFER IS NIET TOELAATBAAR!......". 
.'(LET) 9=81' IS DUS GROTE ONZIN!.&...."
.. VARIABELEN MOGEN WEL BESTAAN UIT 'N.T
....". LETTER GEVOLGD DOOR 'N CIJFER BV:
 .A1.Z....". OF UIT TWEE LETTERS BV: .PE
........".. M.U.V. DE COMBINATIES: TI EN
 ST !!.P...." EEEEEEEEEEEEEEEEEEEEEEEEEE
EEEEEEEE...B..". JE MAG ER WEL MEER NEME
N, MAAR IK KIJK.(.L..". ALLEEN MAAR NAAR
 DE EERSTE TWEE!.Z.V..".. DUS 'CBM=64' L
EES IK ALS 'CB=64'.":.1760......".. VERM
IJD HET GEBRUIK VAN VARIABELEN......". W
AARVAN EEN DEEL EEN COMMANDOWOORD IS!...
..."... 'KLETS' IS DUS ONTOELAATBAAR OMD
AT......". DAAR HET COMMANDO 'LET' IN ZI
T!.8...."... DE TOTALE LIJST AAN COMMAND
OWOORDEN.Y....". STAAT IN DE HANDLEIDING
......."... HET IS OVERIGENS, OM VERGISS
INGEN TE...&..". VOORKOMEN, BETER OM VAR
IABELEN TE...0..". GEBRUIKEN, DIE NIET L
ANGER ZIJN DAN...:..". TWEE LETTERTEKENS
.":.1760.6.D..".......... EEN WOORD (KET
EN VAN LETTERS) KUN JE.B.N..". IN EEN 'S
TRING VARIABELE' OPBERGEN....X..".. TYP 
EENS VIER LETTERS ";A$...Y.A$.H(A$."    
",4).G.B.."..";:S.4:.1720:."."A$".......
.A$.......L..".";:S.15:.1720:."11.......
P.......V..".";:S.25:.1720:."55.......G.
....>...."....... JE ZIET, DAT IK DEZE L
ETTERS.C....". HEB OPGEBORGEN IN 'DOOS' 
A$..U....J..1760:.930......"... JE MOET 
DUS EEN .$. TEKEN GEBRUIKEN.......Q1,0:.
".. .WIL JE DIT NOG EENS ZIEN ?. (TYP J 
OF N)......A$:.A$."".690......A$.."N".12
0.C.F..".. EEN PAAR VOORBEELDEN VAN PROG
RAMMA'S    .MET VARIABELEN:.W.P.."..  11
0 INPUT "G(34)"HOE OUD BEN JE "G(34)";L.
..Z..".  120 (LET) D=L*365.Q....".  130 
PRINT "G(34)"DAN BEN JE"G(34)" D "G(34)"
DAGEN OUD......"... IN REGEL 110 VRAAG I
K OM EEN LEEFTIJD,.-....". DIE IK IN 'L'
 STOP EN IN REGEL 120.W....". VERMENIGVU
LDIG EN DIE UITKOMST IN......". 'D' STOP
. .IN REGEL 130 PRINT IK TUSSEN......". 
DE TEKST DE UITKOMST 'D'.":.1760... ..".
. HET STUKJE PROGRAMMA VAN DAARNET WAAR.
..*..". IK OM VIER LETTERS VROEG ZIET ZO
 UIT:.G.4.."..  310 INPUT"G(34)"TYP EENS
 VIER LETTERS"G(34)";A$.}.>..".  330 PRI
NT"G(34)"JE ZIET, DAT IK DEZE LETTERS...
H.."  340 PRINT"G(34)"HEB OPGEBORGEN IN 
'DOOS' A$...R.."... REGEL 310 PRINTE DE 
VRAAG EN PLAATSTE...\..". 'T ANTWOORD IN
 A$. IN DE ONTBREKENDE.;.F..". REGEL 320
 WERD HET PLAATJE GETEKEND..F.P..".. DE 
REGELS 330 EN 340 VOORZAGEN JE...Z..". V
AN COMMENTAAR NA DE OPDRACHT..D....Q1,0:
.".. .WIL JE DAT NOG EENS ZIEN ?. (J/N)"
:J.1.W....Q$:.Q$."".910......Q$.."N".580
......".. ALS JE STRING VARIABELEN GEBRU
IKT.=....". VERGEET DAN NIET HET '$' TEK
EN ER.B....". ACHTER WANT ANDERS ZIE JE:
........".?REDO FROM START":."? ";...J..
X.1.10:.". .";:.P.1.200:.:.". .";:.P.1.2
00:.P,X:.". "...T..".... WANT IK VERWACH
T DAN CIJFERS......". MAAR IK KRIJG LETT
ERS!.:....Q1,0:."... .HEB JE HET TOT ZOV
ER BEGREPEN. (J/N).N....Q$:.Q$."".1010._
....Q$.."J".710......".. IN EEN STRING P
ASSEN MAXIMAAL 256......". TEKENS INCLUS
IEF ALLE SPATIES EN ALLE......". LEESTEK
ENS.  DE INHOUD VAN EEN STRING...$..". M
OET ALTIJD TUSSEN AANHALINGSTEKENS.1....
". WORDEN GEPLAATST, DUS:.A.8.."...  50 
W$ = "G(34)"WOORD"G(34)":PRINT W$...B.."
... KOMT ER NIETS MEER ACHTER, DUS BV:..
.L.."...  80 W$ = "G(34)"WOORD...V.."...
 DAN MAG HET LAATSE AANHALINGSTEKEN WEG 
     EEE":.1760...`..".. HET IS ECHTER N
IET NODIG AANHALINGS-.J.J..". TEKENS TE 
TYPEN BIJ HET BEANTWOORDEN..T..". VAN E
EN VRAAG, GESTELD DOOR 'T PROGRAM-. MA..
..~..".. BIJVOORBEELD:......"..  HOE HEE
T JIJ......"  ? ";:I.5......X.1.I:.". ."
;:.P.1.200:.:.". .";:.P.1.200:.P,X.....N
.N.1:I.1. ....N.1210,1220,1220,1230,1240
.1....".N";:.1180.A.D.."A";:.1180.Q.N.."
M";:.1180.A.X.."..":.1760......".. MET S
TRINGS KAN IK ENKELE FANTASTISCHE......"
. DINGEN UITHALEN..X....".. IK KEN ER SP
ECIALE COMMANDO'S VOOR :......"... .LEFT
$.(A$,X)  .MID$.(A$,X,Y), .RIGHT$.(A$).?
....". .LEN.(A$)      .VAL.(A$)       .S
TR$.(A).O....".. LET WEL: BIJ DE LAATSTE
 STAAT GEEN $ !......".. HET LIJKT ERG I
NGEWIKKELD, MAAR IS.G.(..". TOCH ECHT NI
ET ZO MOEILIJK..":.1760...2..".. MET DEZ
E COMMANDO'S GAAN WE NU WAT. .<.." MANIP
ULEREN: STEL N$="G(34)"CBM"G(34).J.F..".
 DAN ZAL ER HET VOLGENDE GEBEUREN:.A.P..
"..  ?LEFT$(N$,1)...Z..". IK GEEF .1. LE
TTER VAN AF LINKS DUS .C...D.."..  ?RIGH
T$(N$,1).X.N..". IK GEEF .1. LETTER VAN 
AF RECHTS DUS .M...X.."..  ?MID$(N$,2,1)
......". IK GEEF .1. LETTER VAN AF .DE T
WEEDE.8....". .VAN LINKS. DUS .B.K....".
.  ?LEN(N$).{. ..". IK GEEF HET AANTAL L
ETTERS IN N$ DUS .3.....:.1760......".. 
MET GETALLEN IN EEN STRING KUN JE NIET..
....". REKENEN; JE MOET ER EERST DE WAAR
DE...H..". UITHALEN MET:  ..VAL(N$)..  B
V:.*.R.."..    50 A$="123":B$="45".W....
".. WILLEN WE WETEN WAT 123+45 IS, DAN:.
Z...."..    60 A=VAL(A$):B=VAL(B$)......
"    70 C=A+B:PRINT C......".. EN KRIJGE
N WE .168. ALS UITKOMST..Y....".. DOEN W
E ECHTER:......"..    60 C$=A$+B$:PRINT 
C$.*....".. DAN KRIJGEN WE  .12345. ALS 
UITKOMST!!.5.".:.1760.F.,..".. WIL JE DE
 HELE LES NOG EENS DOORNEMEN ?.Z.6..".. 
TYP J OF N...@..Q$:.Q$."".1600...J..Q$.G
(13).1580...T..Q$."J".120...^.."... WIL 
JE DAN HET LAATSTE DEEL NOG TERUG ?...H.
.".. TYP J OF N.. R..Q$:.Q$."".1650.) |.
.Q$.G(13).."......":.1630.: ...Q$."J".12
50.D ..."... MEER HIEROVER IN DE LAATSTE
 LES.. ..."..      .DIT IS HET EINDE VAN
 LES 4".J ..."...........WILT U DE VOLGE
NDE LES (5) LADEN <J/N> ?".. ...V$:.V$."
".1700.. ...V$."J".."BASIC LES 5",8..!..
..4!....S.3)".....":..S.2)"N    N.":..S.
1)"N    N .".F!B...S)"N    N  .":..S)"O.
..P  N":..S)"..   .. N..!L...S)"L....N..
.....";:...!V..A.Q!...Q1,0:."...........
.............      ..VOOR VERDER: DRUK O
P 'SPACE'..!...A$:.A$."".1770..!......

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL