BASIC LES 3
FILE INFORMATION
FILENAME(S): BASIC LES 3
FILE TYPE(S): PRG
FILE SIZE: 6.1K
FIRST SEEN: 2025-11-30 21:06:18
APPEARS ON: 1 disk(s)
FILE HASH
14adacc2a94b4e4c11223434f154145a1c5be4733e920ca94e9515ac2da8d6d0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TBM | BASIC LES 3 | PRG | DuncanTwain | 20 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 64 00 99 C7 28 31 34 32 29 00 2B 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 31 30 00 5C 08 78 00 |2:.53281,10.\.x.| 00000030: 99 22 93 11 1C 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 |."... ********* | 00000040: 42 41 53 49 43 20 43 55 52 53 55 53 20 4C 45 53 |BASIC CURSUS LES| 00000050: 20 33 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 6C 08 8C | 3 *********.l..| 00000060: 00 81 43 B2 31 A4 31 33 30 30 3A 82 00 95 08 96 |..C.1.1300:.....| 00000070: 00 99 22 93 11 1C 20 48 45 54 20 42 45 4B 45 4E |.."... HET BEKEN| 00000080: 44 45 20 27 44 4F 4B 54 45 52 27 20 50 52 4F 47 |DE 'DOKTER' PROG| 00000090: 52 41 4D 4D 41 00 C0 08 A0 00 99 22 11 20 53 49 |RAMMA......". SI| 000000A0: 4D 55 4C 45 45 52 54 20 27 4E 20 50 53 59 43 48 |MULEERT 'N PSYCH| 000000B0: 49 41 54 45 52 20 49 4E 20 47 45 53 50 52 45 4B |IATER IN GESPREK| 000000C0: 00 E4 08 AA 00 99 22 11 20 4D 45 54 20 45 45 4E |......". MET EEN| 000000D0: 20 50 41 54 49 45 4E 54 20 4F 50 20 44 45 20 42 | PATIENT OP DE B| 000000E0: 41 4E 4B 2E 00 14 09 B4 00 99 22 11 11 20 4D 45 |ANK.......".. ME| 000000F0: 4E 49 47 45 45 4E 20 49 53 20 4E 49 45 54 20 49 |NIGEEN IS NIET I| 00000100: 4E 20 53 54 41 41 54 20 48 45 54 20 56 45 52 53 |N STAAT HET VERS| 00000110: 43 48 49 4C 00 3B 09 BE 00 99 22 11 20 4F 50 20 |CHIL.;....". OP | 00000120: 54 45 20 4D 45 52 4B 45 4E 2C 20 4F 46 20 5A 45 |TE MERKEN, OF ZE| 00000130: 20 4E 55 20 4D 45 54 20 45 45 4E 00 69 09 C8 00 | NU MET EEN.i...| 00000140: 99 22 11 20 45 43 48 54 45 20 41 52 54 53 20 4F |.". ECHTE ARTS O| 00000150: 46 20 4D 45 54 20 27 4E 20 43 4F 4D 50 55 54 45 |F MET 'N COMPUTE| 00000160: 52 20 50 52 41 54 45 4E 21 00 99 09 D2 00 99 22 |R PRATEN!......"| 00000170: 11 11 11 05 20 48 45 54 20 50 52 4F 47 52 41 4D |.... HET PROGRAM| 00000180: 4D 41 20 4C 49 4A 4B 54 20 45 52 47 20 49 4E 47 |MA LIJKT ERG ING| 00000190: 45 57 49 4B 4B 45 4C 44 2C 00 C3 09 DC 00 99 22 |EWIKKELD,......"| 000001A0: 11 20 4D 41 41 52 20 49 53 20 49 4E 20 42 45 47 |. MAAR IS IN BEG| 000001B0: 49 4E 53 45 4C 20 45 52 47 20 45 45 4E 56 4F 55 |INSEL ERG EENVOU| 000001C0: 44 49 47 00 DD 09 E6 00 99 22 11 20 56 41 4E 20 |DIG......". VAN | 000001D0: 4F 50 5A 45 54 2E 22 3A 8D 31 34 38 30 00 0C 0A |OPZET.":.1480...| 000001E0: F0 00 8D 31 35 31 30 3A 99 22 11 11 11 90 20 49 |...1510:.".... I| 000001F0: 4E 20 44 49 54 20 44 45 45 4C 20 56 41 4E 20 48 |N DIT DEEL VAN H| 00000200: 45 54 20 50 52 4F 47 52 41 4D 4D 41 00 37 0A FA |ET PROGRAMMA.7..| 00000210: 00 99 22 11 20 47 45 42 52 55 49 4B 20 49 4B 20 |..". GEBRUIK IK | 00000220: 52 45 47 45 4C 20 32 30 20 4F 4D 20 27 4E 20 56 |REGEL 20 OM 'N V| 00000230: 52 41 41 47 20 54 45 00 5E 0A 04 01 99 22 11 20 |RAAG TE.^....". | 00000240: 50 52 49 4E 54 45 4E 20 54 45 4E 45 49 4E 44 45 |PRINTEN TENEINDE| 00000250: 20 45 45 4E 20 41 4E 54 57 4F 4F 52 44 2C 00 94 | EEN ANTWOORD,..| 00000260: 0A 0E 01 99 22 11 20 27 4E 20 1C 12 49 4E 50 55 |....". 'N ..INPU| 00000270: 54 92 90 20 53 54 41 54 45 4D 45 4E 54 2C 20 54 |T.. STATEMENT, T| 00000280: 45 20 56 45 52 4B 52 49 4A 47 45 4E 2E 22 3A 8D |E VERKRIJGEN.":.| 00000290: 31 34 38 30 00 CA 0A 18 01 8D 31 35 31 30 3A 99 |1480......1510:.| 000002A0: 22 11 11 11 1C 20 41 4C 53 20 49 4B 20 05 12 49 |".... ALS IK ..I| 000002B0: 4E 50 55 54 92 20 1C 5A 49 45 20 57 41 43 48 54 |NPUT. .ZIE WACHT| 000002C0: 20 49 4B 20 54 4F 54 20 45 52 00 F7 0A 22 01 99 | IK TOT ER..."..| 000002D0: 22 11 20 45 45 4E 20 41 4E 54 57 4F 4F 52 44 20 |". EEN ANTWOORD | 000002E0: 49 4E 47 45 54 59 50 54 20 49 53 20 45 4E 20 42 |INGETYPT IS EN B| 000002F0: 45 52 47 20 44 41 54 00 32 0B 2C 01 99 22 11 20 |ERG DAT.2.,..". | 00000300: 4F 50 20 4F 4E 44 45 52 20 44 45 20 4E 4F 45 4D |OP ONDER DE NOEM| 00000310: 45 52 20 27 41 27 20 49 4E 20 4D 49 4A 4E 20 20 |ER 'A' IN MIJN | 00000320: 20 20 20 20 20 20 11 20 20 47 45 48 45 55 47 45 | . GEHEUGE| 00000330: 4E 2E 00 5E 0B 36 01 99 22 11 1F 20 41 4C 53 20 |N..^.6..".. ALS | 00000340: 54 45 4B 45 4E 20 44 41 54 20 49 4B 20 4F 50 20 |TEKEN DAT IK OP | 00000350: 41 4E 54 57 4F 4F 52 44 20 57 41 43 48 54 00 8F |ANTWOORD WACHT..| 00000360: 0B 40 01 99 22 11 20 4C 41 41 54 20 49 4B 20 27 |.@..". LAAT IK '| 00000370: 3F 27 20 5A 49 45 4E 20 41 43 48 54 45 52 20 44 |?' ZIEN ACHTER D| 00000380: 45 20 56 52 41 41 47 2E 22 3A 8D 31 34 38 30 00 |E VRAAG.":.1480.| 00000390: C2 0B 4A 01 8D 31 35 31 30 3A 99 22 11 11 90 20 |..J..1510:."... | 000003A0: 5A 4F 20 41 4C 53 20 49 4B 20 52 45 45 44 53 20 |ZO ALS IK REEDS | 000003B0: 56 45 52 54 45 4C 44 45 20 4B 55 4E 4E 45 4E 20 |VERTELDE KUNNEN | 000003C0: 57 45 00 E6 0B 54 01 99 22 11 20 44 49 54 20 4E |WE...T..". DIT N| 000003D0: 4F 47 20 4B 4F 52 54 45 52 20 4F 50 53 43 48 52 |OG KORTER OPSCHR| 000003E0: 49 4A 56 45 4E 21 00 12 0C 5E 01 99 22 11 11 20 |IJVEN!...^..".. | 000003F0: 48 45 54 20 42 45 53 50 41 41 52 44 45 20 4F 4E |HET BESPAARDE ON| 00000400: 53 20 49 4D 4D 45 52 53 20 52 55 49 4D 54 45 20 |S IMMERS RUIMTE | 00000410: 49 4E 00 33 0C 68 01 99 22 11 20 49 4E 20 4D 49 |IN.3.h..". IN MI| 00000420: 4A 4E 20 47 45 48 45 55 47 45 4E 21 22 3A 8D 31 |JN GEHEUGEN!":.1| 00000430: 34 38 30 00 5E 0C 72 01 99 22 93 11 1C 20 4C 41 |480.^.r.."... LA| 00000440: 54 45 4E 20 57 45 20 44 55 53 20 41 46 53 50 52 |TEN WE DUS AFSPR| 00000450: 45 4B 45 4E 20 44 41 54 20 57 45 20 49 4E 00 87 |EKEN DAT WE IN..| 00000460: 0C 7C 01 99 22 11 20 56 45 52 56 4F 4C 47 20 41 |.|..". VERVOLG A| 00000470: 4C 54 49 4A 44 20 27 4E 20 50 52 49 4E 54 20 45 |LTIJD 'N PRINT E| 00000480: 4E 20 49 4E 50 55 54 00 B0 0C 86 01 99 22 11 20 |N INPUT......". | 00000490: 53 41 4D 45 4E 56 4F 45 47 45 4E 20 41 4C 53 20 |SAMENVOEGEN ALS | 000004A0: 48 45 54 20 56 4F 4F 52 4B 4F 4D 54 21 2E 2E 2E |HET VOORKOMT!...| 000004B0: 00 E7 0C 90 01 99 22 11 11 90 20 20 20 20 32 30 |......"... 20| 000004C0: 20 49 4E 50 55 54 20 22 C7 28 33 34 29 22 48 4F | INPUT ".(34)"HO| 000004D0: 45 20 4F 55 44 20 42 45 4E 20 4A 49 4A 20 22 C7 |E OUD BEN JIJ ".| 000004E0: 28 33 34 29 22 3B 41 00 11 0D 9A 01 99 22 11 20 |(34)";A......". | 000004F0: 20 20 20 33 30 20 50 52 49 4E 54 20 41 20 22 C7 | 30 PRINT A ".| 00000500: 28 33 34 29 22 49 53 20 4E 49 45 54 20 4F 55 44 |(34)"IS NIET OUD| 00000510: 2E 00 40 0D A4 01 99 22 11 11 1C 20 56 45 52 47 |..@...."... VERG| 00000520: 45 45 54 20 45 43 48 54 45 52 20 4E 49 45 54 20 |EET ECHTER NIET | 00000530: 44 45 20 50 55 4E 54 2D 4B 4F 4D 4D 41 20 45 4E |DE PUNT-KOMMA EN| 00000540: 00 68 0D AE 01 99 22 11 20 45 4E 20 44 45 20 41 |.h....". EN DE A| 00000550: 41 4E 48 41 4C 49 4E 47 53 54 45 4B 45 4E 53 21 |ANHALINGSTEKENS!| 00000560: 21 22 3A 8D 31 34 38 30 00 99 0D B8 01 99 22 93 |!":.1480......".| 00000570: 11 1F 20 54 59 50 20 27 52 55 4E 27 20 45 4E 20 |.. TYP 'RUN' EN | 00000580: 44 52 55 4B 20 4F 50 20 90 12 52 45 54 55 52 4E |DRUK OP ..RETURN| 00000590: 92 1F 20 4F 4D 20 44 49 54 00 C1 0D C2 01 85 22 |.. OM DIT......"| 000005A0: 11 20 50 52 4F 47 52 41 4D 4D 41 20 55 49 54 20 |. PROGRAMMA UIT | 000005B0: 54 45 20 50 52 4F 42 45 52 45 4E 20 1C 22 3B 41 |TE PROBEREN .";A| 000005C0: 24 00 D4 0D CC 01 8B 41 24 B3 B1 22 52 55 4E 22 |$......A$.."RUN"| 000005D0: 89 34 34 30 00 F4 0D D6 01 85 22 90 11 11 11 11 |.440......".....| 000005E0: 11 20 48 4F 45 20 4F 55 44 20 42 45 4E 20 4A 49 |. HOE OUD BEN JI| 000005F0: 4A 22 3B 41 00 12 0E E0 01 99 41 20 22 49 53 20 |J";A......A "IS | 00000600: 4E 49 45 54 20 4F 55 44 11 11 11 22 3A 8D 31 34 |NIET OUD...":.14| 00000610: 38 30 00 3F 0E EA 01 99 22 93 11 1C 20 27 49 4E |80.?...."... 'IN| 00000620: 50 55 54 27 20 4B 41 4E 20 4F 4F 4B 20 47 45 42 |PUT' KAN OOK GEB| 00000630: 52 55 49 4B 54 20 57 4F 52 44 45 4E 20 4F 4D 00 |RUIKT WORDEN OM.| 00000640: 6D 0E F4 01 99 22 11 20 45 45 4E 20 57 4F 4F 52 |m....". EEN WOOR| 00000650: 44 20 54 45 20 56 52 41 47 45 4E 20 49 2E 50 2E |D TE VRAGEN I.P.| 00000660: 56 2E 20 45 45 4E 20 47 45 54 41 4C 2E 00 99 0E |V. EEN GETAL....| 00000670: FE 01 99 22 11 11 1F 20 44 41 41 52 56 4F 4F 52 |..."... DAARVOOR| 00000680: 20 4D 4F 45 54 20 4A 45 20 48 45 54 20 44 4F 4C | MOET JE HET DOL| 00000690: 4C 41 52 20 54 45 4B 45 4E 00 C2 0E 08 02 99 22 |LAR TEKEN......"| 000006A0: 11 20 41 43 48 54 45 52 20 44 45 20 56 41 52 49 |. ACHTER DE VARI| 000006B0: 41 42 45 4C 45 20 27 41 27 20 50 4C 41 41 54 53 |ABELE 'A' PLAATS| 000006C0: 45 4E 00 EE 0E 12 02 99 22 11 20 5A 4F 44 41 54 |EN......". ZODAT| 000006D0: 20 49 4B 20 57 45 45 54 20 44 41 54 20 45 52 20 | IK WEET DAT ER | 000006E0: 4C 45 54 54 45 52 53 20 4B 4F 4D 45 4E 3A 00 25 |LETTERS KOMEN:.%| 000006F0: 0F 1C 02 99 22 90 11 11 20 20 20 20 35 30 20 49 |...."... 50 I| 00000700: 4E 50 55 54 20 22 C7 28 33 34 29 22 42 45 5A 49 |NPUT ".(34)"BEZI| 00000710: 54 20 4A 49 4A 20 27 4E 20 36 34 22 C7 28 33 34 |T JIJ 'N 64".(34| 00000720: 29 22 3B 41 24 00 53 0F 26 02 99 22 11 11 1C 20 |)";A$.S.&.."... | 00000730: 48 45 54 20 41 4E 54 57 4F 4F 52 44 20 57 4F 52 |HET ANTWOORD WOR| 00000740: 44 54 20 4F 50 47 45 42 4F 52 47 45 4E 20 49 4E |DT OPGEBORGEN IN| 00000750: 20 44 45 00 8C 0F 30 02 99 22 11 20 53 54 52 49 | DE...0..". STRI| 00000760: 4E 47 20 56 41 52 49 41 42 4C 45 20 27 41 24 27 |NG VARIABLE 'A$'| 00000770: 2E 22 3A 99 22 20 C4 C4 C4 C4 C4 C4 20 C4 C4 C4 |.":." ...... ...| 00000780: C4 C4 C4 C4 C4 22 3A 8D 31 34 38 30 00 BC 0F 3A |.....":.1480...:| 00000790: 02 99 22 93 11 90 20 44 45 20 4D 4F 47 45 4C 49 |.."... DE MOGELI| 000007A0: 4A 4B 48 45 49 44 20 57 4F 4F 52 44 45 4E 20 49 |JKHEID WOORDEN I| 000007B0: 4E 20 53 54 52 49 4E 47 53 20 54 45 00 E8 0F 44 |N STRINGS TE...D| 000007C0: 02 99 22 11 20 42 45 52 47 45 4E 20 4B 41 4E 20 |..". BERGEN KAN | 000007D0: 47 45 42 52 55 49 4B 54 20 57 4F 52 44 45 4E 20 |GEBRUIKT WORDEN | 000007E0: 56 4F 4F 52 20 5A 27 4E 00 16 10 4E 02 99 22 11 |VOOR Z'N...N..".| 000007F0: 20 50 52 4F 47 52 41 4D 4D 41 2C 20 41 4C 53 20 | PROGRAMMA, ALS | 00000800: 27 44 4F 4B 54 45 52 27 2C 20 5A 4F 44 41 54 20 |'DOKTER', ZODAT | 00000810: 45 52 20 45 45 4E 00 3A 10 58 02 99 22 11 20 53 |ER EEN.:.X..". S| 00000820: 4F 4F 52 54 A0 43 4F 4E 56 45 52 53 41 54 49 45 |OORT.CONVERSATIE| 00000830: 20 4F 4E 54 53 54 41 41 54 2E 00 72 10 62 02 99 | ONTSTAAT..r.b..| 00000840: 22 1C 11 11 11 20 20 20 20 35 30 20 49 4E 50 55 |".... 50 INPU| 00000850: 54 20 22 C7 28 33 34 29 22 42 45 5A 49 54 20 4A |T ".(34)"BEZIT J| 00000860: 49 4A 20 27 4E 20 36 34 22 C7 28 33 34 29 22 3B |IJ 'N 64".(34)";| 00000870: 41 24 00 A1 10 6C 02 99 22 11 20 20 20 20 36 30 |A$...l..". 60| 00000880: 20 49 46 20 41 24 20 3D 20 22 C7 28 33 34 29 22 | IF A$ = ".(34)"| 00000890: 4A 41 22 C7 28 33 34 29 22 20 47 4F 54 4F 20 39 |JA".(34)" GOTO 9| 000008A0: 30 00 CC 10 76 02 99 22 11 20 20 20 20 37 30 20 |0...v..". 70 | 000008B0: 50 52 49 4E 54 20 22 C7 28 33 34 29 22 4F 4E 42 |PRINT ".(34)"ONB| 000008C0: 45 47 52 49 4A 50 45 4C 49 4A 4B 21 00 DE 10 80 |EGRIJPELIJK!....| 000008D0: 02 99 22 11 20 20 20 20 38 30 20 45 4E 44 00 0B |..". 80 END..| 000008E0: 11 8A 02 99 22 11 20 20 20 20 39 30 20 50 52 49 |....". 90 PRI| 000008F0: 4E 54 20 22 C7 28 33 34 29 22 4D 41 5A 5A 45 4C |NT ".(34)"MAZZEL| 00000900: 41 41 52 21 22 3A 8D 31 34 38 30 00 3A 11 94 02 |AAR!":.1480.:...| 00000910: 99 22 91 1F 20 49 4E 20 52 45 47 45 4C 20 36 30 |.".. IN REGEL 60| 00000920: 20 4B 49 4A 4B 20 49 4B 20 4F 4D 20 54 45 20 5A | KIJK IK OM TE Z| 00000930: 49 45 4E 20 4F 46 20 48 45 54 00 69 11 9E 02 99 |IEN OF HET.i....| 00000940: 22 11 20 41 4E 54 57 4F 4F 52 44 20 4F 50 20 44 |". ANTWOORD OP D| 00000950: 45 20 56 52 41 41 47 2C 20 4F 50 47 45 42 4F 52 |E VRAAG, OPGEBOR| 00000960: 47 45 4E 20 49 4E 20 41 24 00 96 11 A8 02 99 22 |GEN IN A$......"| 00000970: 11 20 47 45 4C 49 4A 4B 20 49 53 20 41 41 4E 20 |. GELIJK IS AAN | 00000980: 27 4A 41 27 2E 20 49 53 20 44 49 54 20 57 41 41 |'JA'. IS DIT WAA| 00000990: 52 2C 20 44 41 4E 00 C2 11 B2 02 99 22 11 20 53 |R, DAN......". S| 000009A0: 50 52 49 4E 47 20 49 4B 20 4E 41 41 52 20 52 45 |PRING IK NAAR RE| 000009B0: 47 45 4C 20 39 30 20 45 4E 20 50 52 49 4E 54 20 |GEL 90 EN PRINT | 000009C0: 49 4B 00 EC 11 BC 02 99 22 20 11 22 C7 28 33 34 |IK......" .".(34| 000009D0: 29 22 4D 41 5A 5A 45 4C 41 41 52 21 22 C7 28 33 |)"MAZZELAAR!".(3| 000009E0: 34 29 3A 99 3A 99 3A 8D 31 34 38 30 00 27 12 C6 |4):.:.:.1480.'..| 000009F0: 02 99 22 90 20 91 91 91 91 91 91 91 91 91 91 91 |..". ...........| 00000A00: 49 53 20 48 45 54 20 41 4E 54 57 4F 4F 52 44 20 |IS HET ANTWOORD | 00000A10: 47 45 45 4E 20 27 4A 41 27 20 44 41 4E 20 20 20 |GEEN 'JA' DAN | 00000A20: 20 20 20 20 20 20 22 00 57 12 D0 02 99 22 11 20 | ".W....". | 00000A30: 53 4C 41 20 49 4B 20 52 45 47 45 4C 20 36 30 20 |SLA IK REGEL 60 | 00000A40: 4F 56 45 52 20 45 4E 20 47 41 20 49 4B 20 4E 41 |OVER EN GA IK NA| 00000A50: 41 52 20 44 45 20 22 00 87 12 DA 02 99 22 11 20 |AR DE "......". | 00000A60: 45 45 52 53 54 20 56 4F 4C 47 45 4E 44 45 2C 20 |EERST VOLGENDE, | 00000A70: 48 49 45 52 20 37 30 2C 20 45 4E 20 50 52 49 4E |HIER 70, EN PRIN| 00000A80: 54 20 20 20 20 20 11 00 C8 12 E4 02 99 22 20 22 |T ......." "| 00000A90: C7 28 33 34 29 22 4F 4E 42 45 47 52 49 4A 50 45 |.(34)"ONBEGRIJPE| 00000AA0: 4C 49 4A 4B 22 C7 28 33 34 29 22 20 20 20 20 20 |LIJK".(34)" | 00000AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000AC0: 20 20 20 20 20 20 20 22 00 EA 12 EE 02 99 22 20 | "......" | 00000AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000AE0: 20 20 20 22 3A 8D 31 34 38 30 00 19 13 F8 02 99 | ":.1480......| 00000AF0: 22 93 11 9E 20 27 49 46 A4 47 4F 54 4F 27 20 47 |"... 'IF.GOTO' G| 00000B00: 45 42 52 55 49 4B 20 4A 45 20 41 4C 53 20 49 4B |EBRUIK JE ALS IK| 00000B10: 20 4E 41 41 52 20 45 45 4E 00 49 13 02 03 99 22 | NAAR EEN.I...."| 00000B20: 11 20 48 45 45 4C 20 41 4E 44 45 52 20 44 45 45 |. HEEL ANDER DEE| 00000B30: 4C 20 56 41 4E 20 48 45 54 20 50 52 4F 47 52 41 |L VAN HET PROGRA| 00000B40: 4D 4D 41 20 4D 4F 45 54 2E 00 75 13 0C 03 99 22 |MMA MOET..u...."| 00000B50: 11 1F 20 41 4C 53 20 45 45 4E 20 42 45 50 41 41 |.. ALS EEN BEPAA| 00000B60: 4C 44 45 20 43 4F 4E 44 49 54 49 45 20 57 41 41 |LDE CONDITIE WAA| 00000B70: 52 20 49 53 2C 00 A0 13 16 03 99 22 11 20 53 50 |R IS,......". SP| 00000B80: 52 49 4E 47 20 49 4B 20 4E 41 41 52 20 44 45 20 |RING IK NAAR DE | 00000B90: 52 45 47 45 4C 20 44 49 45 20 41 43 48 54 45 52 |REGEL DIE ACHTER| 00000BA0: 00 C3 13 20 03 99 22 11 20 48 45 54 20 43 4F 4D |... ..". HET COM| 00000BB0: 4D 41 4E 44 4F 20 27 47 4F 54 4F 27 20 53 54 41 |MANDO 'GOTO' STA| 00000BC0: 41 54 2E 00 F6 13 2A 03 99 22 11 11 11 9E 20 27 |AT....*..".... '| 00000BD0: 47 4F 54 4F 27 20 4B 55 4E 20 4A 45 20 4F 4F 4B |GOTO' KUN JE OOK| 00000BE0: 20 47 45 42 52 55 49 4B 45 4E 20 5A 4F 4E 44 45 | GEBRUIKEN ZONDE| 00000BF0: 52 20 27 49 46 27 00 1F 14 34 03 99 22 20 5A 4F |R 'IF'...4.." ZO| 00000C00: 44 41 54 20 49 4B 20 5A 4F 4E 44 45 52 20 43 4F |DAT IK ZONDER CO| 00000C10: 4E 44 49 54 49 45 53 20 4E 41 41 52 20 44 45 00 |NDITIES NAAR DE.| 00000C20: 54 14 3E 03 99 22 11 20 52 45 47 45 4C 20 53 50 |T.>..". REGEL SP| 00000C30: 52 49 4E 47 20 44 49 45 20 41 43 48 54 45 52 20 |RING DIE ACHTER | 00000C40: 27 47 4F 54 4F 27 20 53 54 41 41 54 2E 22 3A 8D |'GOTO' STAAT.":.| 00000C50: 31 34 38 30 00 86 14 48 03 99 22 93 11 1C 20 45 |1480...H.."... E| 00000C60: 45 4E 20 41 4E 44 45 52 20 48 41 4E 44 49 47 20 |EN ANDER HANDIG | 00000C70: 05 27 43 4F 4E 44 49 54 49 4F 4E 41 4C 20 43 4F |.'CONDITIONAL CO| 00000C80: 4D 4D 41 4E 44 27 00 A1 14 52 03 99 22 11 1C 20 |MMAND'...R..".. | 00000C90: 49 53 3A 20 20 20 20 90 27 49 46 A4 54 48 45 4E |IS: .'IF.THEN| 00000CA0: 27 00 D8 14 5C 03 99 22 11 11 11 1C 20 20 34 30 |'...\..".... 40| 00000CB0: 20 49 4E 50 55 54 20 22 C7 28 33 34 29 22 47 45 | INPUT ".(34)"GE| 00000CC0: 45 46 20 45 45 4E 20 47 45 54 41 4C 20 4F 50 22 |EF EEN GETAL OP"| 00000CD0: C7 28 33 34 29 22 3B 4E 00 0C 15 66 03 99 22 11 |.(34)";N...f..".| 00000CE0: 20 20 35 30 20 49 46 20 4E 3E 31 30 20 54 48 45 | 50 IF N>10 THE| 00000CF0: 4E 20 50 52 49 4E 54 20 22 C7 28 33 34 29 22 47 |N PRINT ".(34)"G| 00000D00: 52 4F 54 45 52 20 44 41 4E 20 31 30 00 42 15 70 |ROTER DAN 10.B.p| 00000D10: 03 99 22 11 20 20 36 30 20 49 46 20 41 3C 3D 31 |..". 60 IF A<=1| 00000D20: 30 20 54 48 45 4E 20 50 52 49 4E 54 20 22 C7 28 |0 THEN PRINT ".(| 00000D30: 33 34 29 22 4B 4C 45 49 4E 45 52 20 44 41 4E 20 |34)"KLEINER DAN | 00000D40: 31 30 00 5E 15 7A 03 99 22 20 20 20 20 20 4F 46 |10.^.z.." OF| 00000D50: 20 47 45 4C 49 4A 4B 20 41 41 4E 20 31 30 00 90 | GELIJK AAN 10..| 00000D60: 15 84 03 99 22 11 11 11 9E 20 52 45 47 45 4C 20 |....".... REGEL | 00000D70: 35 30 20 4C 41 41 54 20 49 4B 20 41 4C 4C 45 4E |50 LAAT IK ALLEN| 00000D80: 20 50 52 49 4E 54 45 4E 20 41 4C 53 20 44 45 11 | PRINTEN ALS DE.| 00000D90: 00 BE 15 8E 03 99 22 20 43 4F 4E 44 49 54 49 45 |......" CONDITIE| 00000DA0: 20 57 41 41 52 20 49 53 2C 20 44 55 53 20 41 4C | WAAR IS, DUS AL| 00000DB0: 53 20 44 45 20 56 41 52 49 41 42 45 4C 45 00 E3 |S DE VARIABELE..| 00000DC0: 15 98 03 99 22 11 20 27 4E 27 20 47 52 4F 54 45 |....". 'N' GROTE| 00000DD0: 52 20 49 53 20 44 41 4E 20 31 30 2E 22 3A 8D 31 |R IS DAN 10.":.1| 00000DE0: 34 38 30 00 0A 16 A2 03 99 22 93 11 90 20 48 49 |480......"... HI| 00000DF0: 45 52 20 49 53 20 45 45 4E 20 56 4F 4F 52 42 45 |ER IS EEN VOORBE| 00000E00: 45 4C 44 20 56 41 4E 20 27 4E 00 2E 16 AC 03 99 |ELD VAN 'N......| 00000E10: 22 11 20 27 49 46 A4 47 4F 54 4F 27 20 49 4E 20 |". 'IF.GOTO' IN | 00000E20: 57 45 52 4B 45 4C 49 4A 4B 48 45 49 44 3A 00 5D |WERKELIJKHEID:.]| 00000E30: 16 B6 03 85 20 22 11 11 11 1C 20 57 49 4C 20 4A |.... ".... WIL J| 00000E40: 45 20 44 45 5A 45 20 4C 45 53 20 4E 4F 47 20 45 |E DEZE LES NOG E| 00000E50: 45 4E 53 20 5A 49 45 4E 20 22 3B 41 24 00 71 16 |ENS ZIEN ";A$.q.| 00000E60: C0 03 8B 20 41 24 B2 22 4A 41 22 20 89 20 32 34 |... A$."JA" . 24| 00000E70: 30 00 B9 16 CA 03 99 20 22 93 1C 11 20 4C 41 41 |0...... "... LAA| 00000E80: 54 20 4F 4E 53 20 27 54 20 4C 41 41 54 53 54 45 |T ONS 'T LAATSTE| 00000E90: 20 44 45 45 4C 20 56 41 4E 20 44 49 54 22 3A 99 | DEEL VAN DIT":.| 00000EA0: 22 11 20 50 52 4F 47 52 41 4D 4D 41 20 45 45 4E |". PROGRAMMA EEN| 00000EB0: 53 20 4C 49 53 54 45 4E 2E 00 C2 16 D4 03 54 B2 |S LISTEN......T.| 00000EC0: 54 49 00 DD 16 DE 03 8B 20 54 49 AB 54 20 B3 20 |TI...... TI.T . | 00000ED0: 31 38 30 A7 A1 41 24 3A 89 20 39 39 30 00 1C 17 |180..A$:. 990...| 00000EE0: E8 03 99 22 90 11 11 11 11 11 11 11 11 11 11 11 |..."............| 00000EF0: 11 11 11 11 52 55 4E 20 31 30 32 30 22 3A 99 22 |....RUN 1020":."| 00000F00: 11 44 52 55 4B 20 4F 50 20 1C 12 52 45 54 55 52 |.DRUK OP ..RETUR| 00000F10: 4E 91 91 91 91 91 91 91 91 91 91 91 00 2A 17 F2 |N............*..| 00000F20: 03 9B 20 39 35 30 AB 39 37 30 00 42 17 FC 03 99 |.. 950.970.B....| 00000F30: 22 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. | 00000F40: 20 22 00 6F 17 06 04 99 22 05 20 49 4E 20 52 45 | ".o....". IN RE| 00000F50: 47 45 4C 20 39 36 30 20 4B 49 4A 4B 20 49 4B 20 |GEL 960 KIJK IK | 00000F60: 4F 46 20 48 45 54 20 41 4E 54 57 4F 4F 52 44 00 |OF HET ANTWOORD.| 00000F70: 9F 17 10 04 99 22 20 20 20 20 20 20 20 20 20 20 |....." | 00000F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".| 00000FA0: CA 17 1A 04 99 22 91 20 4F 50 20 44 45 20 56 52 |.....". OP DE VR| 00000FB0: 41 41 47 20 28 44 41 54 20 49 53 20 4F 50 47 45 |AAG (DAT IS OPGE| 00000FC0: 53 4C 41 47 45 4E 20 41 4C 53 00 EB 17 24 04 99 |SLAGEN ALS...$..| 00000FD0: 22 11 20 44 45 20 56 41 52 49 41 42 4C 45 20 41 |". DE VARIABLE A| 00000FE0: 24 29 20 27 4A 41 27 20 49 53 2E 00 18 18 2E 04 |$) 'JA' IS......| 00000FF0: 99 22 11 90 20 49 53 20 44 41 54 20 5A 4F 2C 20 |.".. IS DAT ZO, | 00001000: 44 41 4E 20 53 50 52 49 4E 47 20 49 4B 20 54 45 |DAN SPRING IK TE| 00001010: 52 55 47 20 4E 41 41 52 00 4F 18 38 04 99 22 11 |RUG NAAR.O.8..".| 00001020: 20 32 34 30 20 45 4E 20 53 54 41 52 54 20 4E 4F | 240 EN START NO| 00001030: 47 20 45 45 4E 53 20 4D 45 54 20 44 45 5A 45 20 |G EENS MET DEZE | 00001040: 4C 45 53 2E 22 3A 99 3A 99 3A 8D 31 34 38 30 00 |LES.":.:.:.1480.| 00001050: 8A 18 42 04 99 22 91 91 91 91 91 91 91 91 91 91 |..B.."..........| 00001060: 91 1F 20 41 4C 53 20 41 24 20 47 45 45 4E 20 27 |.. ALS A$ GEEN '| 00001070: 4A 41 27 20 49 53 2C 20 47 41 20 49 4B 20 4E 41 |JA' IS, GA IK NA| 00001080: 41 52 20 44 45 20 20 20 20 22 00 C2 18 4C 04 99 |AR DE "...L..| 00001090: 22 11 20 56 4F 4C 47 45 4E 44 45 20 52 45 47 45 |". VOLGENDE REGE| 000010A0: 4C 20 45 4E 20 50 52 49 4E 54 20 22 C7 28 33 34 |L EN PRINT ".(34| 000010B0: 29 22 4C 41 41 54 20 4F 4E 53 20 27 54 20 20 20 |)"LAAT ONS 'T | 000010C0: 20 22 00 02 19 56 04 99 22 20 4C 41 41 54 53 54 | "...V.." LAATST| 000010D0: 45 20 44 45 45 4C 20 56 41 4E 20 44 49 54 20 50 |E DEEL VAN DIT P| 000010E0: 52 4F 47 52 41 4D 4D 41 2E 2E 2E 22 C7 28 33 34 |ROGRAMMA...".(34| 000010F0: 29 22 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |)". | 00001100: 20 22 00 32 19 60 04 99 22 1C 20 27 54 20 43 4F | ".2.`..". 'T CO| 00001110: 4D 4D 41 4E 44 4F 20 27 4C 49 53 54 27 20 4B 41 |MMANDO 'LIST' KA| 00001120: 4E 20 49 4E 20 48 45 54 20 50 52 4F 47 52 41 4D |N IN HET PROGRAM| 00001130: 4D 41 00 67 19 6A 04 99 22 20 47 45 42 52 55 49 |MA.g.j.." GEBRUI| 00001140: 4B 54 20 57 4F 52 44 45 4E 20 4F 4D 20 45 45 4E |KT WORDEN OM EEN| 00001150: 20 53 54 55 4B 20 54 45 20 4C 49 53 54 45 4E 2E | STUK TE LISTEN.| 00001160: 22 3A 8D 31 34 38 30 00 96 19 74 04 99 22 93 11 |":.1480...t.."..| 00001170: 90 20 4F 4F 4B 20 56 41 4E 55 49 54 20 44 45 20 |. OOK VANUIT DE | 00001180: 27 52 45 41 44 59 2E 27 20 4B 55 4E 20 4A 45 20 |'READY.' KUN JE | 00001190: 4C 49 53 54 45 4E 00 BA 19 7E 04 99 22 11 20 44 |LISTEN...~..". D| 000011A0: 4F 4F 52 20 47 45 57 4F 4F 4E 20 27 4C 49 53 54 |OOR GEWOON 'LIST| 000011B0: 27 20 54 45 20 54 59 50 45 4E 00 DF 19 88 04 99 |' TE TYPEN......| 000011C0: 22 11 20 45 4E 20 4F 50 20 1C 12 52 45 54 55 52 |". EN OP ..RETUR| 000011D0: 4E 92 90 20 54 45 20 44 52 55 4B 4B 45 4E 2E 00 |N.. TE DRUKKEN..| 000011E0: 13 1A 92 04 99 22 11 11 1C 20 4D 45 54 20 27 4C |....."... MET 'L| 000011F0: 49 53 54 20 33 30 27 20 20 20 20 5A 49 45 20 4A |IST 30' ZIE J| 00001200: 45 20 41 4C 4C 45 45 4E 20 52 45 47 45 4C 20 33 |E ALLEEN REGEL 3| 00001210: 30 22 3B 00 3E 1A 9C 04 99 22 20 4D 45 54 20 27 |0";.>...." MET '| 00001220: 4C 49 53 54 20 2D 33 30 27 20 20 20 41 4C 4C 45 |LIST -30' ALLE| 00001230: 20 52 45 47 45 4C 53 20 54 2F 4D 20 33 30 00 6B | REGELS T/M 30.k| 00001240: 1A A6 04 99 22 20 4D 45 54 20 27 4C 49 53 54 20 |...." MET 'LIST | 00001250: 33 30 2D 27 20 20 20 41 4C 4C 45 20 52 45 47 45 |30-' ALLE REGE| 00001260: 4C 53 20 56 41 4E 41 46 20 33 30 00 97 1A B0 04 |LS VANAF 30.....| 00001270: 99 22 20 4D 45 54 20 27 4C 49 53 54 20 31 30 2D |." MET 'LIST 10-| 00001280: 33 30 27 20 44 45 20 52 45 47 45 4C 53 20 31 30 |30' DE REGELS 10| 00001290: 20 54 2F 4D 20 33 30 00 C3 1A BA 04 99 22 11 90 | T/M 30......"..| 000012A0: 20 41 4C 53 20 48 45 54 20 53 43 48 45 52 4D 20 | ALS HET SCHERM | 000012B0: 56 4F 4C 20 49 53 2C 20 44 41 4E 20 42 4C 49 4A |VOL IS, DAN BLIJ| 000012C0: 56 45 4E 00 EC 1A C4 04 99 22 11 20 44 45 20 52 |VEN......". DE R| 000012D0: 45 47 45 4C 53 20 41 41 4E 20 44 45 20 4F 4E 44 |EGELS AAN DE OND| 000012E0: 45 52 4B 41 4E 54 20 4B 4F 4D 45 4E 00 15 1B CE |ERKANT KOMEN....| 000012F0: 04 99 22 11 20 45 4E 20 56 45 52 44 57 49 4A 4E |..". EN VERDWIJN| 00001300: 45 4E 20 5A 45 20 42 4F 56 45 4E 20 28 53 43 52 |EN ZE BOVEN (SCR| 00001310: 4F 4C 4C 29 2E 00 3F 1B D8 04 99 22 11 20 44 45 |OLL)..?....". DE| 00001320: 20 53 4E 45 4C 48 45 49 44 20 57 4F 52 44 54 20 | SNELHEID WORDT | 00001330: 47 45 48 41 4C 56 45 45 52 44 20 44 4F 4F 52 00 |GEHALVEERD DOOR.| 00001340: 6E 1B E2 04 99 22 11 20 44 45 20 54 4F 45 54 53 |n....". DE TOETS| 00001350: 20 27 05 43 54 52 4C 90 27 20 49 4E 47 45 44 52 | '.CTRL.' INGEDR| 00001360: 55 4B 54 20 54 45 20 48 4F 55 44 45 4E 2E 00 79 |UKT TE HOUDEN..y| 00001370: 1B EC 04 3A 8D 31 34 38 30 00 A9 1B F6 04 99 22 |...:.1480......"| 00001380: 93 11 1C 20 4E 41 41 53 54 20 48 45 54 20 42 45 |... NAAST HET BE| 00001390: 53 50 52 4F 4B 45 4E 20 27 49 4E 50 55 54 27 20 |SPROKEN 'INPUT' | 000013A0: 49 53 20 45 52 20 4E 4F 47 00 D7 1B 00 05 99 22 |IS ER NOG......"| 000013B0: 11 20 27 4E 20 4D 45 54 48 4F 44 45 20 4F 4D 20 |. 'N METHODE OM | 000013C0: 49 4E 46 4F 52 4D 41 54 49 45 20 54 45 20 4B 52 |INFORMATIE TE KR| 000013D0: 49 4A 47 45 4E 2E 2E 00 04 1C 0A 05 99 22 11 11 |IJGEN........"..| 000013E0: 90 20 48 45 54 20 12 47 45 54 92 20 43 4F 4D 4D |. HET .GET. COMM| 000013F0: 41 4E 44 4F 20 47 45 56 4F 4C 47 44 20 44 4F 4F |ANDO GEVOLGD DOO| 00001400: 52 20 27 4E 00 2D 1C 14 05 99 22 11 20 53 54 52 |R 'N.-....". STR| 00001410: 49 4E 47 2D 56 41 52 49 41 42 45 4C 45 2C 20 41 |ING-VARIABELE, A| 00001420: 43 43 45 50 54 45 45 52 54 20 45 45 4E 00 5B 1C |CCEPTEERT EEN.[.| 00001430: 1E 05 99 22 11 20 4B 41 52 41 4B 54 45 52 20 56 |...". KARAKTER V| 00001440: 41 4E 20 48 45 54 20 54 4F 45 54 53 45 4E 42 4F |AN HET TOETSENBO| 00001450: 52 44 20 45 4E 20 57 4F 52 44 54 00 7C 1C 28 05 |RD EN WORDT.|.(.| 00001460: 99 22 11 20 56 41 41 4B 20 41 4C 53 20 56 4F 4C |.". VAAK ALS VOL| 00001470: 47 54 20 47 45 42 52 55 49 4B 54 3A 00 A9 1C 32 |GT GEBRUIKT:...2| 00001480: 05 99 22 11 11 1F 20 20 20 31 30 20 50 52 49 4E |.."... 10 PRIN| 00001490: 54 20 22 C7 28 33 34 29 22 48 45 42 20 4A 45 3A |T ".(34)"HEB JE:| 000014A0: 20 41 2E 20 27 4E 20 36 34 00 D6 1C 3C 05 99 22 | A. 'N 64...<.."| 000014B0: 11 20 20 20 32 30 20 50 52 49 4E 54 20 22 C7 28 |. 20 PRINT ".(| 000014C0: 33 34 29 22 20 20 20 20 20 20 20 20 42 2E 20 47 |34)" B. G| 000014D0: 45 45 4E 20 36 34 00 07 1D 46 05 99 22 11 20 20 |EEN 64...F..". | 000014E0: 20 33 30 20 50 52 49 4E 54 20 22 C7 28 33 34 29 | 30 PRINT ".(34)| 000014F0: 22 20 20 20 20 20 20 20 20 43 2E 20 42 49 4A 4E |" C. BIJN| 00001500: 41 20 27 4E 20 36 34 00 40 1D 50 05 99 22 11 20 |A 'N 64.@.P..". | 00001510: 20 20 34 30 20 47 45 54 20 41 24 20 3A 20 49 46 | 40 GET A$ : IF| 00001520: 20 41 24 3D 22 C7 28 33 34 29 3B C7 28 33 34 29 | A$=".(34);.(34)| 00001530: 22 20 47 4F 54 4F 20 34 30 22 3A 8D 31 34 38 30 |" GOTO 40":.1480| 00001540: 00 6F 1D 5A 05 99 22 91 20 20 20 20 20 20 20 20 |.o.Z..". | 00001550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".| 00001570: 99 1D 64 05 99 22 11 1C 20 4F 50 20 52 45 47 45 |..d..".. OP REGE| 00001580: 4C 20 34 30 20 42 4C 49 4A 46 20 49 4B 20 54 45 |L 40 BLIJF IK TE| 00001590: 52 55 47 20 4B 4F 4D 45 4E 00 C7 1D 6E 05 99 22 |RUG KOMEN...n.."| 000015A0: 11 20 5A 4F 4C 41 4E 47 20 45 52 20 4E 4F 47 20 |. ZOLANG ER NOG | 000015B0: 47 45 45 4E 20 54 4F 45 54 53 20 49 53 20 49 4E |GEEN TOETS IS IN| 000015C0: 47 45 44 52 55 4B 54 00 00 1E 78 05 99 22 11 90 |GEDRUKT...x.."..| 000015D0: 20 27 49 46 20 41 24 3D 22 C7 28 33 34 29 C7 28 | 'IF A$=".(34).(| 000015E0: 33 34 29 22 27 20 42 45 54 45 4B 45 4E 54 20 05 |34)"' BETEKENT .| 000015F0: 27 41 4C 53 20 41 24 20 4C 45 45 47 20 49 53 27 |'ALS A$ LEEG IS'| 00001600: 00 30 1E 82 05 99 22 11 90 20 49 53 20 44 45 20 |.0....".. IS DE | 00001610: 43 4F 4E 44 49 54 49 45 20 57 41 41 52 2C 20 44 |CONDITIE WAAR, D| 00001620: 41 4E 20 47 41 20 49 4B 20 4E 41 41 52 20 34 30 |AN GA IK NAAR 40| 00001630: 00 66 1E 8C 05 99 22 11 1F 20 44 49 54 20 49 53 |.f....".. DIT IS| 00001640: 20 45 45 4E 20 54 52 55 55 4B 4A 45 20 4F 4D 20 | EEN TRUUKJE OM | 00001650: 54 45 20 4E 4F 54 45 52 45 4E 21 22 3A 99 3A 99 |TE NOTEREN!":.:.| 00001660: 3A 8D 31 34 38 30 00 9A 1E 96 05 99 22 93 11 1C |:.1480......"...| 00001670: 20 57 49 4C 20 4A 45 20 4E 4F 47 20 45 45 4E 53 | WIL JE NOG EENS| 00001680: 20 44 45 5A 45 20 4C 45 53 20 44 4F 4F 52 4E 45 | DEZE LES DOORNE| 00001690: 4D 45 4E 22 3A 8D 31 34 39 30 00 AB 1E A0 05 8B |MEN":.1490......| 000016A0: 41 24 B2 22 4A 41 22 89 31 35 30 00 D6 1E AA 05 |A$."JA".150.....| 000016B0: 99 22 93 11 20 20 20 20 20 20 90 44 49 54 20 49 |.".. .DIT I| 000016C0: 53 20 48 45 54 20 45 49 4E 44 45 20 56 41 4E 20 |S HET EINDE VAN | 000016D0: 4C 45 53 20 33 22 00 11 1F AF 05 99 22 05 11 11 |LES 3"......"...| 000016E0: 11 11 11 11 11 11 11 11 57 49 4C 54 20 55 20 44 |........WILT U D| 000016F0: 45 20 56 4F 4C 47 45 4E 44 45 20 4C 45 53 20 28 |E VOLGENDE LES (| 00001700: 34 29 20 4C 41 44 45 4E 20 3C 4A 2F 4E 3E 20 3F |4) LADEN <J/N> ?| 00001710: 22 00 25 1F B4 05 A1 56 24 3A 8B 56 24 B2 22 22 |".%....V$:.V$.""| 00001720: A7 31 34 36 30 00 42 1F B9 05 8B 56 24 B2 22 4A |.1460.B....V$."J| 00001730: 22 A7 93 22 42 41 53 49 43 20 4C 45 53 20 34 22 |".."BASIC LES 4"| 00001740: 2C 38 00 48 1F BE 05 80 00 8B 1F C8 05 99 22 1C |,8.H..........".| 00001750: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001760: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 12 56 |........ .V| 00001770: 4F 4F 52 20 56 45 52 44 45 52 3A 20 44 52 55 4B |OOR VERDER: DRUK| 00001780: 20 4F 50 20 27 53 50 41 43 45 27 00 9F 1F D2 05 | OP 'SPACE'.....| 00001790: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 34 39 30 00 |.A$:.A$."".1490.| 000017A0: A5 1F DC 05 8E 00 D0 1F E6 05 99 22 93 11 1F 20 |..........."... | 000017B0: 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 | ..............| 000017C0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 000017D0: 00 03 20 F0 05 99 22 20 20 20 20 32 30 20 50 52 |.. ..." 20 PR| 000017E0: 49 4E 54 20 22 C7 28 33 34 29 22 20 48 4F 45 20 |INT ".(34)" HOE | 000017F0: 4F 55 44 20 42 45 4E 20 4A 49 4A 20 22 C7 28 33 |OUD BEN JIJ ".(3| 00001800: 34 29 22 00 19 20 FA 05 99 22 11 20 20 20 20 33 |4)".. ...". 3| 00001810: 30 20 49 4E 50 55 54 20 41 00 4A 20 04 06 99 22 |0 INPUT A.J ..."| 00001820: 11 20 20 20 20 34 30 20 50 52 49 4E 54 20 41 20 |. 40 PRINT A | 00001830: 22 C7 28 33 34 29 22 20 49 53 20 4E 49 45 54 20 |".(34)" IS NIET | 00001840: 4F 55 44 2E 22 C7 28 33 34 29 00 75 20 0E 06 99 |OUD.".(34).u ...| 00001850: 22 20 20 20 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |" ............| 00001860: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................| 00001870: D2 D2 22 3A 8E 00 00 00 32 |..":....2 |
....D..G(142).+.N.Q1.198:.53280,2:.53281
,10.\.X.."... ********* BASIC CURSUS LES
3 *********.L....C.1.1300:......."... H
ET BEKENDE 'DOKTER' PROGRAMMA... ..". SI
MULEERT 'N PSYCHIATER IN GESPREK......".
MET EEN PATIENT OP DE BANK.......".. ME
NIGEEN IS NIET IN STAAT HET VERSCHIL.;..
..". OP TE MERKEN, OF ZE NU MET EEN.I.H.
.". ECHTE ARTS OF MET 'N COMPUTER PRATEN
!...R..".... HET PROGRAMMA LIJKT ERG ING
EWIKKELD,.C....". MAAR IS IN BEGINSEL ER
G EENVOUDIG......". VAN OPZET.":.1480...
...1510:.".... IN DIT DEEL VAN HET PROGR
AMMA.7....". GEBRUIK IK REGEL 20 OM 'N V
RAAG TE.^....". PRINTEN TENEINDE EEN ANT
WOORD,......". 'N ..INPUT.. STATEMENT, T
E VERKRIJGEN.":.1480.J....1510:.".... AL
S IK ..INPUT. .ZIE WACHT IK TOT ER..."..
". EEN ANTWOORD INGETYPT IS EN BERG DAT.
2.,..". OP ONDER DE NOEMER 'A' IN MIJN
. GEHEUGEN..^.6..".. ALS TEKEN DA
T IK OP ANTWOORD WACHT...@..". LAAT IK '
?' ZIEN ACHTER DE VRAAG.":.1480.B.J..151
0:."... ZO ALS IK REEDS VERTELDE KUNNEN
WE...T..". DIT NOG KORTER OPSCHRIJVEN!..
.^..".. HET BESPAARDE ONS IMMERS RUIMTE
IN.3.H..". IN MIJN GEHEUGEN!":.1480.^.R.
."... LATEN WE DUS AFSPREKEN DAT WE IN..
.|..". VERVOLG ALTIJD 'N PRINT EN INPUT.
.....". SAMENVOEGEN ALS HET VOORKOMT!...
......"... 20 INPUT "G(34)"HOE OUD BE
N JIJ "G(34)";A......". 30 PRINT A "G
(34)"IS NIET OUD..@...."... VERGEET ECHT
ER NIET DE PUNT-KOMMA EN.H....". EN DE A
ANHALINGSTEKENS!!":.1480......"... TYP '
RUN' EN DRUK OP ..RETURN.. OM DIT.A.B.."
. PROGRAMMA UIT TE PROBEREN .";A$.T.L..A
$.."RUN".440...V.."...... HOE OUD BEN JI
J";A......A "IS NIET OUD...":.1480.?....
"... 'INPUT' KAN OOK GEBRUIKT WORDEN OM.
M....". EEN WOORD TE VRAGEN I.P.V. EEN G
ETAL......."... DAARVOOR MOET JE HET DOL
LAR TEKEN.B....". ACHTER DE VARIABELE 'A
' PLAATSEN......". ZODAT IK WEET DAT ER
LETTERS KOMEN:.%...."... 50 INPUT "G(
34)"BEZIT JIJ 'N 64"G(34)";A$.S.&.."...
HET ANTWOORD WORDT OPGEBORGEN IN DE...0.
.". STRING VARIABLE 'A$'.":." DDDDDD DDD
DDDDD":.1480...:.."... DE MOGELIJKHEID W
OORDEN IN STRINGS TE...D..". BERGEN KAN
GEBRUIKT WORDEN VOOR Z'N...N..". PROGRAM
MA, ALS 'DOKTER', ZODAT ER EEN.:.X..". S
OORT CONVERSATIE ONTSTAAT..R.B.."....
50 INPUT "G(34)"BEZIT JIJ 'N 64"G(34)";
A$...L..". 60 IF A$ = "G(34)"JA"G(34)
" GOTO 90.L.V..". 70 PRINT "G(34)"ONB
EGRIJPELIJK!......". 80 END......".
90 PRINT "G(34)"MAZZELAAR!":.1480.:...
.".. IN REGEL 60 KIJK IK OM TE ZIEN OF H
ET.I....". ANTWOORD OP DE VRAAG, OPGEBOR
GEN IN A$......". GELIJK IS AAN 'JA'. IS
DIT WAAR, DAN.B....". SPRING IK NAAR RE
GEL 90 EN PRINT IK......" ."G(34)"MAZZEL
AAR!"G(34):.:.:.1480.'.F..". ...........
IS HET ANTWOORD GEEN 'JA' DAN ".
W.P..". SLA IK REGEL 60 OVER EN GA IK NA
AR DE "...Z..". EERST VOLGENDE, HIER 70,
EN PRINT ..H...." "G(34)"ONBEGRIJPE
LIJK"G(34)" "
......" ":.1480......
"... 'IF.GOTO' GEBRUIK JE ALS IK NAAR EE
N.I....". HEEL ANDER DEEL VAN HET PROGRA
MMA MOET..U....".. ALS EEN BEPAALDE COND
ITIE WAAR IS,. ....". SPRING IK NAAR DE
REGEL DIE ACHTER.C. ..". HET COMMANDO 'G
OTO' STAAT....*..".... 'GOTO' KUN JE OOK
GEBRUIKEN ZONDER 'IF'...4.." ZODAT IK Z
ONDER CONDITIES NAAR DE.T.>..". REGEL SP
RING DIE ACHTER 'GOTO' STAAT.":.1480...H
.."... EEN ANDER HANDIG .'CONDITIONAL CO
MMAND'...R..".. IS: .'IF.THEN'.X.\.."
.... 40 INPUT "G(34)"GEEF EEN GETAL OP"
G(34)";N...F..". 50 IF N>10 THEN PRINT
"G(34)"GROTER DAN 10.B.P..". 60 IF A<=1
0 THEN PRINT "G(34)"KLEINER DAN 10.^.Z..
" OF GELIJK AAN 10......".... REGEL
50 LAAT IK ALLEN PRINTEN ALS DE......."
CONDITIE WAAR IS, DUS ALS DE VARIABELE..
....". 'N' GROTER IS DAN 10.":.1480.....
."... HIER IS EEN VOORBEELD VAN 'N......
". 'IF.GOTO' IN WERKELIJKHEID:.].... "..
.. WIL JE DEZE LES NOG EENS ZIEN ";A$.Q.
... A$."JA" . 240...J.. "... LAAT ONS 'T
LAATSTE DEEL VAN DIT":.". PROGRAMMA EEN
S LISTEN..B.T.T.TI...... TI.T . 180..A$:
. 990......"................RUN 1020":."
.DRUK OP ..RETURN............*.... 950.9
70.B....".. ".O....". IN RE
GEL 960 KIJK IK OF HET ANTWOORD......"
".
J....". OP DE VRAAG (DAT IS OPGESLAGEN A
LS...$..". DE VARIABLE A$) 'JA' IS......
.".. IS DAT ZO, DAN SPRING IK TERUG NAAR
.O.8..". 240 EN START NOG EENS MET DEZE
LES.":.:.:.1480...B.."............ ALS A
$ GEEN 'JA' IS, GA IK NAAR DE ".B.L..
". VOLGENDE REGEL EN PRINT "G(34)"LAAT O
NS 'T "...V.." LAATSTE DEEL VAN DIT P
ROGRAMMA..."G(34)". ".2.`..
". 'T COMMANDO 'LIST' KAN IN HET PROGRAM
MA.G.J.." GEBRUIKT WORDEN OM EEN STUK TE
LISTEN.":.1480...T.."... OOK VANUIT DE
'READY.' KUN JE LISTEN...~..". DOOR GEWO
ON 'LIST' TE TYPEN......". EN OP ..RETUR
N.. TE DRUKKEN......."... MET 'LIST 30'
ZIE JE ALLEEN REGEL 30";.>...." MET '
LIST -30' ALLE REGELS T/M 30.K...." ME
T 'LIST 30-' ALLE REGELS VANAF 30.....
." MET 'LIST 10-30' DE REGELS 10 T/M 30.
C....".. ALS HET SCHERM VOL IS, DAN BLIJ
VEN...D..". DE REGELS AAN DE ONDERKANT K
OMEN...N..". EN VERDWIJNEN ZE BOVEN (SCR
OLL)..?.X..". DE SNELHEID WORDT GEHALVEE
RD DOOR.N....". DE TOETS '.CTRL.' INGEDR
UKT TE HOUDEN..Y...:.1480......"... NAAS
T HET BESPROKEN 'INPUT' IS ER NOG.W...."
. 'N METHODE OM INFORMATIE TE KRIJGEN...
....."... HET .GET. COMMANDO GEVOLGD DOO
R 'N.-....". STRING-VARIABELE, ACCEPTEER
T EEN.[....". KARAKTER VAN HET TOETSENBO
RD EN WORDT.|.(..". VAAK ALS VOLGT GEBRU
IKT:...2.."... 10 PRINT "G(34)"HEB JE:
A. 'N 64.V.<..". 20 PRINT "G(34)"
B. GEEN 64...F..". 30 PRINT "G(34)
" C. BIJNA 'N 64.@.P..". 40 GET
A$ : IF A$="G(34);G(34)" GOTO 40":.1480
.O.Z..".
"...D..".. OP REGEL 40 BLIJF IK TE
RUG KOMEN.G.N..". ZOLANG ER NOG GEEN TOE
TS IS INGEDRUKT...X..".. 'IF A$="G(34)G(
34)"' BETEKENT .'ALS A$ LEEG IS'.0....".
. IS DE CONDITIE WAAR, DAN GA IK NAAR 40
.F....".. DIT IS EEN TRUUKJE OM TE NOTER
EN!":.:.:.1480......"... WIL JE NOG EENS
DEZE LES DOORNEMEN":.1490... ..A$."JA".
150.V....".. .DIT IS HET EINDE VAN
LES 3"......"...........WILT U DE VOLGEN
DE LES (4) LADEN <J/N> ?".%....V$:.V$.""
.1460.B....V$."J".."BASIC LES 4",8.H....
...H.."......................... .V
OOR VERDER: DRUK OP 'SPACE'...R..A$:.A$.
"".1490.......P...."... EEEEEEEEEEEEEE
EEEEEEEEEEEEEEEE.. ..." 20 PRINT "G(3
4)" HOE OUD BEN JIJ "G(34)".. ...". 3
0 INPUT A.J ...". 40 PRINT A "G(34)"
IS NIET OUD."G(34).U ..." RRRRRRRRRRRR
RRRRRRRRRRRRRRRRRR":....2
> CLICK IMAGE PREVIEW FOR FULL MODAL