BASIC 3
FILE INFORMATION
FILENAME(S): BASIC 3
FILE TYPE(S): PRG
FILE SIZE: 6K
FIRST SEEN: 2025-11-30 21:07:01
APPEARS ON: 1 disk(s)
FILE HASH
d397e82b891ff0843db86daf0290d5c5533f0e9cdbcc6d4a22db6ca67ebbbe17
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HBMD OSS 01 | BASIC 3 | PRG | DuncanTwain | 7 | 1 | 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 E9 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 4F 27 4E 00 16 10 4E 02 99 22 |VOOR ZO'N...N.."| 000007F0: 11 20 50 52 4F 47 52 41 4D 4D 41 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 1A 13 F8 02 99 | ":.1480......| 00000AF0: 22 93 11 9E 20 27 49 46 2E 2E 47 4F 54 4F 27 20 |"... 'IF..GOTO' | 00000B00: 47 45 42 52 55 49 4B 20 4A 45 20 41 4C 53 20 49 |GEBRUIK JE ALS I| 00000B10: 4B 20 4E 41 41 52 20 45 45 4E 00 4A 13 02 03 99 |K NAAR EEN.J....| 00000B20: 22 11 20 48 45 45 4C 20 41 4E 44 45 52 20 44 45 |". HEEL ANDER DE| 00000B30: 45 4C 20 56 41 4E 20 48 45 54 20 50 52 4F 47 52 |EL VAN HET PROGR| 00000B40: 41 4D 4D 41 20 4D 4F 45 54 2E 00 76 13 0C 03 99 |AMMA MOET..v....| 00000B50: 22 11 1F 20 41 4C 53 20 45 45 4E 20 42 45 50 41 |".. ALS EEN BEPA| 00000B60: 41 4C 44 45 20 43 4F 4E 44 49 54 49 45 20 57 41 |ALDE CONDITIE WA| 00000B70: 41 52 20 49 53 2C 00 A1 13 16 03 99 22 11 20 53 |AR IS,......". S| 00000B80: 50 52 49 4E 47 20 49 4B 20 4E 41 41 52 20 44 45 |PRING IK NAAR DE| 00000B90: 20 52 45 47 45 4C 20 44 49 45 20 41 43 48 54 45 | REGEL DIE ACHTE| 00000BA0: 52 00 C4 13 20 03 99 22 11 20 48 45 54 20 43 4F |R... ..". HET CO| 00000BB0: 4D 4D 41 4E 44 4F 20 27 47 4F 54 4F 27 20 53 54 |MMANDO 'GOTO' ST| 00000BC0: 41 41 54 2E 00 F7 13 2A 03 99 22 11 11 11 9E 20 |AAT....*..".... | 00000BD0: 27 47 4F 54 4F 27 20 4B 55 4E 20 4A 45 20 4F 4F |'GOTO' KUN JE OO| 00000BE0: 4B 20 47 45 42 52 55 49 4B 45 4E 20 5A 4F 4E 44 |K GEBRUIKEN ZOND| 00000BF0: 45 52 20 27 49 46 27 00 20 14 34 03 99 22 20 5A |ER 'IF'. .4.." Z| 00000C00: 4F 44 41 54 20 49 4B 20 5A 4F 4E 44 45 52 20 43 |ODAT IK ZONDER C| 00000C10: 4F 4E 44 49 54 49 45 53 20 4E 41 41 52 20 44 45 |ONDITIES NAAR DE| 00000C20: 00 55 14 3E 03 99 22 11 20 52 45 47 45 4C 20 53 |.U.>..". REGEL S| 00000C30: 50 52 49 4E 47 20 44 49 45 20 41 43 48 54 45 52 |PRING DIE ACHTER| 00000C40: 20 27 47 4F 54 4F 27 20 53 54 41 41 54 2E 22 3A | 'GOTO' STAAT.":| 00000C50: 8D 31 34 38 30 00 87 14 48 03 99 22 93 11 1C 20 |.1480...H.."... | 00000C60: 45 45 4E 20 41 4E 44 45 52 20 48 41 4E 44 49 47 |EEN ANDER HANDIG| 00000C70: 20 05 27 43 4F 4E 44 49 54 49 4F 4E 41 4C 20 43 | .'CONDITIONAL C| 00000C80: 4F 4D 4D 41 4E 44 27 00 A3 14 52 03 99 22 11 1C |OMMAND'...R.."..| 00000C90: 20 49 53 3A 20 20 20 20 90 27 49 46 2E 2E 54 48 | IS: .'IF..TH| 00000CA0: 45 4E 27 00 DA 14 5C 03 99 22 11 11 11 1C 20 20 |EN'...\..".... | 00000CB0: 34 30 20 49 4E 50 55 54 20 22 C7 28 33 34 29 22 |40 INPUT ".(34)"| 00000CC0: 47 45 45 46 20 45 45 4E 20 47 45 54 41 4C 20 4F |GEEF EEN GETAL O| 00000CD0: 50 22 C7 28 33 34 29 22 3B 4E 00 0E 15 66 03 99 |P".(34)";N...f..| 00000CE0: 22 11 20 20 35 30 20 49 46 20 4E 3E 31 30 20 54 |". 50 IF N>10 T| 00000CF0: 48 45 4E 20 50 52 49 4E 54 20 22 C7 28 33 34 29 |HEN PRINT ".(34)| 00000D00: 22 47 52 4F 54 45 52 20 44 41 4E 20 31 30 00 44 |"GROTER DAN 10.D| 00000D10: 15 70 03 99 22 11 20 20 36 30 20 49 46 20 41 3C |.p..". 60 IF A<| 00000D20: 3D 31 30 20 54 48 45 4E 20 50 52 49 4E 54 20 22 |=10 THEN PRINT "| 00000D30: C7 28 33 34 29 22 4B 4C 45 49 4E 45 52 20 44 41 |.(34)"KLEINER DA| 00000D40: 4E 20 31 30 00 60 15 7A 03 99 22 20 20 20 20 20 |N 10.`.z.." | 00000D50: 4F 46 20 47 45 4C 49 4A 4B 20 41 41 4E 20 31 30 |OF GELIJK AAN 10| 00000D60: 00 92 15 84 03 99 22 11 11 11 9E 20 52 45 47 45 |......".... REGE| 00000D70: 4C 20 35 30 20 4C 41 41 54 20 49 4B 20 41 4C 4C |L 50 LAAT IK ALL| 00000D80: 45 4E 20 50 52 49 4E 54 45 4E 20 41 4C 53 20 44 |EN PRINTEN ALS D| 00000D90: 45 11 00 C0 15 8E 03 99 22 20 43 4F 4E 44 49 54 |E......." CONDIT| 00000DA0: 49 45 20 57 41 41 52 20 49 53 2C 20 44 55 53 20 |IE WAAR IS, DUS | 00000DB0: 41 4C 53 20 44 45 20 56 41 52 49 41 42 45 4C 45 |ALS DE VARIABELE| 00000DC0: 00 E5 15 98 03 99 22 11 20 27 4E 27 20 47 52 4F |......". 'N' GRO| 00000DD0: 54 45 52 20 49 53 20 44 41 4E 20 31 30 2E 22 3A |TER IS DAN 10.":| 00000DE0: 8D 31 34 38 30 00 0C 16 A2 03 99 22 93 11 90 20 |.1480......"... | 00000DF0: 48 49 45 52 20 49 53 20 45 45 4E 20 56 4F 4F 52 |HIER IS EEN VOOR| 00000E00: 42 45 45 4C 44 20 56 41 4E 20 27 4E 00 31 16 AC |BEELD VAN 'N.1..| 00000E10: 03 99 22 11 20 27 49 46 2E 2E 47 4F 54 4F 27 20 |..". 'IF..GOTO' | 00000E20: 49 4E 20 57 45 52 4B 45 4C 49 4A 4B 48 45 49 44 |IN WERKELIJKHEID| 00000E30: 3A 00 60 16 B6 03 85 20 22 11 11 11 1C 20 57 49 |:.`.... ".... WI| 00000E40: 4C 20 4A 45 20 44 45 5A 45 20 4C 45 53 20 4E 4F |L JE DEZE LES NO| 00000E50: 47 20 45 45 4E 53 20 5A 49 45 4E 20 22 3B 41 24 |G EENS ZIEN ";A$| 00000E60: 00 74 16 C0 03 8B 20 41 24 B2 22 4A 41 22 20 89 |.t.... A$."JA" .| 00000E70: 20 32 34 30 00 BC 16 CA 03 99 20 22 93 1C 11 20 | 240...... "... | 00000E80: 4C 41 41 54 20 4F 4E 53 20 27 54 20 4C 41 41 54 |LAAT ONS 'T LAAT| 00000E90: 53 54 45 20 44 45 45 4C 20 56 41 4E 20 44 49 54 |STE DEEL VAN DIT| 00000EA0: 22 3A 99 22 11 20 50 52 4F 47 52 41 4D 4D 41 20 |":.". PROGRAMMA | 00000EB0: 45 45 4E 53 20 4C 49 53 54 45 4E 2E 00 C5 16 D4 |EENS LISTEN.....| 00000EC0: 03 54 B2 54 49 00 E0 16 DE 03 8B 20 54 49 AB 54 |.T.TI...... TI.T| 00000ED0: 20 B3 20 31 38 30 A7 A1 41 24 3A 89 20 39 39 30 | . 180..A$:. 990| 00000EE0: 00 1F 17 E8 03 99 22 90 11 11 11 11 11 11 11 11 |......".........| 00000EF0: 11 11 11 11 11 11 11 52 55 4E 20 31 30 32 30 22 |.......RUN 1020"| 00000F00: 3A 99 22 11 44 52 55 4B 20 4F 50 20 1C 12 52 45 |:.".DRUK OP ..RE| 00000F10: 54 55 52 4E 91 91 91 91 91 91 91 91 91 91 91 00 |TURN............| 00000F20: 2D 17 F2 03 9B 20 39 35 30 AB 39 37 30 00 45 17 |-.... 950.970.E.| 00000F30: FC 03 99 22 91 91 20 20 20 20 20 20 20 20 20 20 |...".. | 00000F40: 20 20 20 20 22 00 72 17 06 04 99 22 05 20 49 4E | ".r....". IN| 00000F50: 20 52 45 47 45 4C 20 39 36 30 20 4B 49 4A 4B 20 | REGEL 960 KIJK | 00000F60: 49 4B 20 4F 46 20 48 45 54 20 41 4E 54 57 4F 4F |IK OF HET ANTWOO| 00000F70: 52 44 00 A2 17 10 04 99 22 20 20 20 20 20 20 20 |RD......" | 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 20 20 | | 00000FA0: 20 22 00 CD 17 1A 04 99 22 91 20 4F 50 20 44 45 | "......". OP DE| 00000FB0: 20 56 52 41 41 47 20 28 44 41 54 20 49 53 20 4F | VRAAG (DAT IS O| 00000FC0: 50 47 45 53 4C 41 47 45 4E 20 41 4C 53 00 EE 17 |PGESLAGEN ALS...| 00000FD0: 24 04 99 22 11 20 44 45 20 56 41 52 49 41 42 4C |$..". DE VARIABL| 00000FE0: 45 20 41 24 29 20 27 4A 41 27 20 49 53 2E 00 1B |E A$) 'JA' IS...| 00000FF0: 18 2E 04 99 22 11 90 20 49 53 20 44 41 54 20 5A |....".. IS DAT Z| 00001000: 4F 2C 20 44 41 4E 20 53 50 52 49 4E 47 20 49 4B |O, DAN SPRING IK| 00001010: 20 54 45 52 55 47 20 4E 41 41 52 00 52 18 38 04 | TERUG NAAR.R.8.| 00001020: 99 22 11 20 32 34 30 20 45 4E 20 53 54 41 52 54 |.". 240 EN START| 00001030: 20 4E 4F 47 20 45 45 4E 53 20 4D 45 54 20 44 45 | NOG EENS MET DE| 00001040: 5A 45 20 4C 45 53 2E 22 3A 99 3A 99 3A 8D 31 34 |ZE LES.":.:.:.14| 00001050: 38 30 00 8D 18 42 04 99 22 91 91 91 91 91 91 91 |80...B..".......| 00001060: 91 91 91 91 1F 20 41 4C 53 20 41 24 20 47 45 45 |..... ALS A$ GEE| 00001070: 4E 20 27 4A 41 27 20 49 53 2C 20 47 41 20 49 4B |N 'JA' IS, GA IK| 00001080: 20 4E 41 41 52 20 44 45 20 20 20 20 22 00 C5 18 | NAAR DE "...| 00001090: 4C 04 99 22 11 20 56 4F 4C 47 45 4E 44 45 20 52 |L..". VOLGENDE R| 000010A0: 45 47 45 4C 20 45 4E 20 50 52 49 4E 54 20 22 C7 |EGEL EN PRINT ".| 000010B0: 28 33 34 29 22 4C 41 41 54 20 4F 4E 53 20 27 54 |(34)"LAAT ONS 'T| 000010C0: 20 20 20 20 22 00 05 19 56 04 99 22 20 4C 41 41 | "...V.." LAA| 000010D0: 54 53 54 45 20 44 45 45 4C 20 56 41 4E 20 44 49 |TSTE DEEL VAN DI| 000010E0: 54 20 50 52 4F 47 52 41 4D 4D 41 2E 2E 2E 22 C7 |T PROGRAMMA...".| 000010F0: 28 33 34 29 22 2E 20 20 20 20 20 20 20 20 20 20 |(34)". | 00001100: 20 20 20 20 22 00 35 19 60 04 99 22 1C 20 27 54 | ".5.`..". 'T| 00001110: 20 43 4F 4D 4D 41 4E 44 4F 20 27 4C 49 53 54 27 | COMMANDO 'LIST'| 00001120: 20 4B 41 4E 20 49 4E 20 48 45 54 20 50 52 4F 47 | KAN IN HET PROG| 00001130: 52 41 4D 4D 41 00 6A 19 6A 04 99 22 20 47 45 42 |RAMMA.j.j.." GEB| 00001140: 52 55 49 4B 54 20 57 4F 52 44 45 4E 20 4F 4D 20 |RUIKT WORDEN OM | 00001150: 45 45 4E 20 53 54 55 4B 20 54 45 20 4C 49 53 54 |EEN STUK TE LIST| 00001160: 45 4E 2E 22 3A 8D 31 34 38 30 00 99 19 74 04 99 |EN.":.1480...t..| 00001170: 22 93 11 90 20 4F 4F 4B 20 56 41 4E 55 49 54 20 |"... OOK VANUIT | 00001180: 44 45 20 27 52 45 41 44 59 2E 27 20 4B 55 4E 20 |DE 'READY.' KUN | 00001190: 4A 45 20 4C 49 53 54 45 4E 00 BD 19 7E 04 99 22 |JE LISTEN...~.."| 000011A0: 11 20 44 4F 4F 52 20 47 45 57 4F 4F 4E 20 27 4C |. DOOR GEWOON 'L| 000011B0: 49 53 54 27 20 54 45 20 54 59 50 45 4E 00 E2 19 |IST' TE TYPEN...| 000011C0: 88 04 99 22 11 20 45 4E 20 4F 50 20 1C 12 52 45 |...". EN OP ..RE| 000011D0: 54 55 52 4E 92 90 20 54 45 20 44 52 55 4B 4B 45 |TURN.. TE DRUKKE| 000011E0: 4E 2E 00 16 1A 92 04 99 22 11 11 1C 20 4D 45 54 |N......."... MET| 000011F0: 20 27 4C 49 53 54 20 33 30 27 20 20 20 20 5A 49 | 'LIST 30' ZI| 00001200: 45 20 4A 45 20 41 4C 4C 45 45 4E 20 52 45 47 45 |E JE ALLEEN REGE| 00001210: 4C 20 33 30 22 3B 00 41 1A 9C 04 99 22 20 4D 45 |L 30";.A...." ME| 00001220: 54 20 27 4C 49 53 54 20 2D 33 30 27 20 20 20 41 |T 'LIST -30' A| 00001230: 4C 4C 45 20 52 45 47 45 4C 53 20 54 2F 4D 20 33 |LLE REGELS T/M 3| 00001240: 30 00 6E 1A A6 04 99 22 20 4D 45 54 20 27 4C 49 |0.n...." MET 'LI| 00001250: 53 54 20 33 30 2D 27 20 20 20 41 4C 4C 45 20 52 |ST 30-' ALLE R| 00001260: 45 47 45 4C 53 20 56 41 4E 41 46 20 33 30 00 9A |EGELS VANAF 30..| 00001270: 1A B0 04 99 22 20 4D 45 54 20 27 4C 49 53 54 20 |...." MET 'LIST | 00001280: 31 30 2D 33 30 27 20 44 45 20 52 45 47 45 4C 53 |10-30' DE REGELS| 00001290: 20 31 30 20 54 2F 4D 20 33 30 00 C6 1A BA 04 99 | 10 T/M 30......| 000012A0: 22 11 90 20 41 4C 53 20 48 45 54 20 53 43 48 45 |".. ALS HET SCHE| 000012B0: 52 4D 20 56 4F 4C 20 49 53 2C 20 44 41 4E 20 42 |RM VOL IS, DAN B| 000012C0: 4C 49 4A 56 45 4E 00 EF 1A C4 04 99 22 11 20 44 |LIJVEN......". D| 000012D0: 45 20 52 45 47 45 4C 53 20 41 41 4E 20 44 45 20 |E REGELS AAN DE | 000012E0: 4F 4E 44 45 52 4B 41 4E 54 20 4B 4F 4D 45 4E 00 |ONDERKANT KOMEN.| 000012F0: 18 1B CE 04 99 22 11 20 45 4E 20 56 45 52 44 57 |.....". EN VERDW| 00001300: 49 4A 4E 45 4E 20 5A 45 20 42 4F 56 45 4E 20 28 |IJNEN ZE BOVEN (| 00001310: 53 43 52 4F 4C 4C 29 2E 00 42 1B D8 04 99 22 11 |SCROLL)..B....".| 00001320: 20 44 45 20 53 4E 45 4C 48 45 49 44 20 57 4F 52 | DE SNELHEID WOR| 00001330: 44 54 20 47 45 48 41 4C 56 45 45 52 44 20 44 4F |DT GEHALVEERD DO| 00001340: 4F 52 00 71 1B E2 04 99 22 11 20 44 45 20 54 4F |OR.q....". DE TO| 00001350: 45 54 53 20 27 05 43 54 52 4C 90 27 20 49 4E 47 |ETS '.CTRL.' ING| 00001360: 45 44 52 55 4B 54 20 54 45 20 48 4F 55 44 45 4E |EDRUKT TE HOUDEN| 00001370: 2E 00 7C 1B EC 04 3A 8D 31 34 38 30 00 AC 1B F6 |..|...:.1480....| 00001380: 04 99 22 93 11 1C 20 4E 41 41 53 54 20 48 45 54 |.."... NAAST HET| 00001390: 20 42 45 53 50 52 4F 4B 45 4E 20 27 49 4E 50 55 | BESPROKEN 'INPU| 000013A0: 54 27 20 49 53 20 45 52 20 4E 4F 47 00 DA 1B 00 |T' IS ER NOG....| 000013B0: 05 99 22 11 20 27 4E 20 4D 45 54 48 4F 44 45 20 |..". 'N METHODE | 000013C0: 4F 4D 20 49 4E 46 4F 52 4D 41 54 49 45 20 54 45 |OM INFORMATIE TE| 000013D0: 20 4B 52 49 4A 47 45 4E 2E 2E 00 07 1C 0A 05 99 | KRIJGEN........| 000013E0: 22 11 11 90 20 48 45 54 20 12 47 45 54 92 20 43 |"... HET .GET. C| 000013F0: 4F 4D 4D 41 4E 44 4F 20 47 45 56 4F 4C 47 44 20 |OMMANDO GEVOLGD | 00001400: 44 4F 4F 52 20 27 4E 00 30 1C 14 05 99 22 11 20 |DOOR 'N.0....". | 00001410: 53 54 52 49 4E 47 2D 56 41 52 49 41 42 45 4C 45 |STRING-VARIABELE| 00001420: 2C 20 41 43 43 45 50 54 45 45 52 54 20 45 45 4E |, ACCEPTEERT EEN| 00001430: 00 5E 1C 1E 05 99 22 11 20 4B 41 52 41 4B 54 45 |.^....". KARAKTE| 00001440: 52 20 56 41 4E 20 48 45 54 20 54 4F 45 54 53 45 |R VAN HET TOETSE| 00001450: 4E 42 4F 52 44 20 45 4E 20 57 4F 52 44 54 00 7F |NBORD EN WORDT..| 00001460: 1C 28 05 99 22 11 20 56 41 41 4B 20 41 4C 53 20 |.(..". VAAK ALS | 00001470: 56 4F 4C 47 54 20 47 45 42 52 55 49 4B 54 3A 00 |VOLGT GEBRUIKT:.| 00001480: AC 1C 32 05 99 22 11 11 1F 20 20 20 31 30 20 50 |..2.."... 10 P| 00001490: 52 49 4E 54 20 22 C7 28 33 34 29 22 48 45 42 20 |RINT ".(34)"HEB | 000014A0: 4A 45 3A 20 41 2E 20 27 4E 20 36 34 00 D9 1C 3C |JE: A. 'N 64...<| 000014B0: 05 99 22 11 20 20 20 32 30 20 50 52 49 4E 54 20 |..". 20 PRINT | 000014C0: 22 C7 28 33 34 29 22 20 20 20 20 20 20 20 20 42 |".(34)" B| 000014D0: 2E 20 47 45 45 4E 20 36 34 00 0A 1D 46 05 99 22 |. GEEN 64...F.."| 000014E0: 11 20 20 20 33 30 20 50 52 49 4E 54 20 22 C7 28 |. 30 PRINT ".(| 000014F0: 33 34 29 22 20 20 20 20 20 20 20 20 43 2E 20 42 |34)" C. B| 00001500: 49 4A 4E 41 20 27 4E 20 36 34 00 43 1D 50 05 99 |IJNA 'N 64.C.P..| 00001510: 22 11 20 20 20 34 30 20 47 45 54 20 41 24 20 3A |". 40 GET A$ :| 00001520: 20 49 46 20 41 24 3D 22 C7 28 33 34 29 3B C7 28 | IF A$=".(34);.(| 00001530: 33 34 29 22 20 47 4F 54 4F 20 34 30 22 3A 8D 31 |34)" GOTO 40":.1| 00001540: 34 38 30 00 72 1D 5A 05 99 22 91 20 20 20 20 20 |480.r.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 20 20 | | 00001570: 20 22 00 9C 1D 64 05 99 22 11 1C 20 4F 50 20 52 | "...d..".. OP R| 00001580: 45 47 45 4C 20 34 30 20 42 4C 49 4A 46 20 49 4B |EGEL 40 BLIJF IK| 00001590: 20 54 45 52 55 47 20 4B 4F 4D 45 4E 00 CA 1D 6E | TERUG KOMEN...n| 000015A0: 05 99 22 11 20 5A 4F 4C 41 4E 47 20 45 52 20 4E |..". ZOLANG ER N| 000015B0: 4F 47 20 47 45 45 4E 20 54 4F 45 54 53 20 49 53 |OG GEEN TOETS IS| 000015C0: 20 49 4E 47 45 44 52 55 4B 54 00 03 1E 78 05 99 | INGEDRUKT...x..| 000015D0: 22 11 90 20 27 49 46 20 41 24 3D 22 C7 28 33 34 |".. 'IF A$=".(34| 000015E0: 29 C7 28 33 34 29 22 27 20 42 45 54 45 4B 45 4E |).(34)"' BETEKEN| 000015F0: 54 20 05 27 41 4C 53 20 41 24 20 4C 45 45 47 20 |T .'ALS A$ LEEG | 00001600: 49 53 27 00 33 1E 82 05 99 22 11 90 20 49 53 20 |IS'.3....".. IS | 00001610: 44 45 20 43 4F 4E 44 49 54 49 45 20 57 41 41 52 |DE CONDITIE WAAR| 00001620: 2C 20 44 41 4E 20 47 41 20 49 4B 20 4E 41 41 52 |, DAN GA IK NAAR| 00001630: 20 34 30 00 6B 1E 8C 05 99 22 11 1F 20 44 49 54 | 40.k....".. DIT| 00001640: 20 49 53 20 45 45 4E 20 54 52 55 55 4B 4A 45 20 | IS EEN TRUUKJE | 00001650: 4F 4D 20 54 45 20 4E 4F 54 45 52 45 4E 21 11 11 |OM TE NOTEREN!..| 00001660: 22 3A 99 3A 99 3A 8D 31 34 38 30 00 A1 1E 96 05 |":.:.:.1480.....| 00001670: 99 22 93 11 1C 20 57 49 4C 20 4A 45 20 4E 4F 47 |."... WIL JE NOG| 00001680: 20 45 45 4E 53 20 44 45 5A 45 20 4C 45 53 20 44 | EENS DEZE LES D| 00001690: 4F 4F 52 4E 45 4D 45 4E 20 3F 22 3A 8D 31 34 39 |OORNEMEN ?":.149| 000016A0: 30 00 B2 1E A0 05 8B 41 24 B2 22 4A 41 22 89 31 |0......A$."JA".1| 000016B0: 35 30 00 E3 1E AA 05 99 22 11 11 11 90 20 4F 4B |50......".... OK| 000016C0: 20 54 4F 54 20 44 45 20 56 4F 4C 47 45 4E 44 45 | TOT DE VOLGENDE| 000016D0: 20 4C 45 53 21 21 22 3A 81 49 B2 31 A4 37 30 30 | LES!!":.I.1.700| 000016E0: 30 3A 82 00 EE 1E B4 05 99 22 93 22 3A 80 00 37 |0:.......".":..7| 000016F0: 1F C8 05 97 51 31 2C 30 3A 99 22 1C 13 11 11 11 |....Q1,0:.".....| 00001700: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001710: 11 11 11 11 20 20 20 20 20 20 12 56 4F 4F 52 20 |.... .VOOR | 00001720: 56 45 52 44 45 52 3A 20 44 52 55 4B 20 4F 50 20 |VERDER: DRUK OP | 00001730: 27 53 50 41 43 45 27 00 4B 1F D2 05 A1 41 24 3A |'SPACE'.K....A$:| 00001740: 8B 41 24 B2 22 22 A7 31 34 39 30 00 51 1F DC 05 |.A$."".1490.Q...| 00001750: 8E 00 7C 1F E6 05 99 22 93 11 1F 20 20 20 C5 C5 |..|...."... ..| 00001760: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 00001770: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 00 AF 1F F0 |................| 00001780: 05 99 22 20 20 20 20 32 30 20 50 52 49 4E 54 20 |.." 20 PRINT | 00001790: 22 C7 28 33 34 29 22 20 48 4F 45 20 4F 55 44 20 |".(34)" HOE OUD | 000017A0: 42 45 4E 20 4A 49 4A 20 22 C7 28 33 34 29 22 00 |BEN JIJ ".(34)".| 000017B0: C5 1F FA 05 99 22 11 20 20 20 20 33 30 20 49 4E |.....". 30 IN| 000017C0: 50 55 54 20 41 00 F6 1F 04 06 99 22 11 20 20 20 |PUT A......". | 000017D0: 20 34 30 20 50 52 49 4E 54 20 41 20 22 C7 28 33 | 40 PRINT A ".(3| 000017E0: 34 29 22 20 49 53 20 4E 49 45 54 20 4F 55 44 2E |4)" IS NIET OUD.| 000017F0: 22 C7 28 33 34 29 00 21 20 0E 06 99 22 20 20 20 |".(34).! ..." | 00001800: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................| 00001810: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 22 3A |..............":| 00001820: 8E 00 00 00 2B |....+ |
....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 ZO'N...N..". PROGRA
MMA 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 E
EN.J....". HEEL ANDER DEEL VAN HET PROGR
AMMA MOET..V....".. ALS EEN BEPAALDE CON
DITIE WAAR IS,......". SPRING IK NAAR DE
REGEL DIE ACHTER.D. ..". HET COMMANDO '
GOTO' STAAT....*..".... 'GOTO' KUN JE OO
K GEBRUIKEN ZONDER 'IF'. .4.." ZODAT IK
ZONDER CONDITIES NAAR DE.U.>..". REGEL S
PRING DIE ACHTER 'GOTO' STAAT.":.1480...
H.."... EEN ANDER HANDIG .'CONDITIONAL C
OMMAND'...R..".. IS: .'IF..THEN'.Z.\.
.".... 40 INPUT "G(34)"GEEF EEN GETAL O
P"G(34)";N...F..". 50 IF N>10 THEN PRIN
T "G(34)"GROTER DAN 10.D.P..". 60 IF A<
=10 THEN PRINT "G(34)"KLEINER DAN 10.`.Z
.." OF GELIJK AAN 10......".... REGE
L 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.1..
..". 'IF..GOTO' IN WERKELIJKHEID:.`....
".... WIL JE DEZE LES NOG EENS ZIEN ";A$
.T.... A$."JA" . 240...J.. "... LAAT ONS
'T LAATSTE DEEL VAN DIT":.". PROGRAMMA
EENS LISTEN..E.T.T.TI...... TI.T . 180..
A$:. 990......"................RUN 1020"
:.".DRUK OP ..RETURN............-.... 95
0.970.E....".. ".R....". IN
REGEL 960 KIJK IK OF HET ANTWOORD......
"
".M....". OP DE VRAAG (DAT IS OPGESLAGE
N ALS...$..". DE VARIABLE A$) 'JA' IS...
....".. IS DAT ZO, DAN SPRING IK TERUG N
AAR.R.8..". 240 EN START NOG EENS MET DE
ZE LES.":.:.:.1480...B.."............ AL
S A$ GEEN 'JA' IS, GA IK NAAR DE ".E.
L..". VOLGENDE REGEL EN PRINT "G(34)"LAA
T ONS 'T "...V.." LAATSTE DEEL VAN DI
T PROGRAMMA..."G(34)". ".5.
`..". 'T COMMANDO 'LIST' KAN IN HET PROG
RAMMA.J.J.." GEBRUIKT WORDEN OM EEN STUK
TE LISTEN.":.1480...T.."... OOK VANUIT
DE 'READY.' KUN JE LISTEN...~..". DOOR G
EWOON 'LIST' TE TYPEN......". EN OP ..RE
TURN.. TE DRUKKEN......."... MET 'LIST 3
0' ZIE JE ALLEEN REGEL 30";.A...." ME
T 'LIST -30' ALLE REGELS T/M 30.N...."
MET 'LIST 30-' ALLE REGELS VANAF 30..
...." MET 'LIST 10-30' DE REGELS 10 T/M
30.F....".. ALS HET SCHERM VOL IS, DAN B
LIJVEN...D..". DE REGELS AAN DE ONDERKAN
T KOMEN...N..". EN VERDWIJNEN ZE BOVEN (
SCROLL)..B.X..". DE SNELHEID WORDT GEHAL
VEERD DOOR.Q....". DE TOETS '.CTRL.' ING
EDRUKT TE HOUDEN..|...:.1480......"... N
AAST HET BESPROKEN 'INPUT' IS ER NOG.Z..
..". 'N METHODE OM INFORMATIE TE KRIJGEN
........"... HET .GET. COMMANDO GEVOLGD
DOOR 'N.0....". STRING-VARIABELE, ACCEPT
EERT EEN.^....". KARAKTER VAN HET TOETSE
NBORD EN WORDT..(..". VAAK ALS VOLGT GE
BRUIKT:...2.."... 10 PRINT "G(34)"HEB
JE: A. 'N 64.Y.<..". 20 PRINT "G(34)"
B. GEEN 64...F..". 30 PRINT "G(
34)" C. BIJNA 'N 64.C.P..". 40
GET A$ : IF A$="G(34);G(34)" GOTO 40":.1
480.R.Z..".
"...D..".. OP REGEL 40 BLIJF IK
TERUG KOMEN.J.N..". ZOLANG ER NOG GEEN
TOETS IS INGEDRUKT...X..".. 'IF A$="G(34
)G(34)"' BETEKENT .'ALS A$ LEEG IS'.3...
.".. IS DE CONDITIE WAAR, DAN GA IK NAAR
40.K....".. DIT IS EEN TRUUKJE OM TE NO
TEREN!..":.:.:.1480......"... WIL JE NOG
EENS DEZE LES DOORNEMEN ?":.1490... ..A
$."JA".150......".... OK TOT DE VOLGENDE
LES!!":.I.1.7000:.......".":..7.H..Q1,0
:."......................... .VOOR
VERDER: DRUK OP 'SPACE'.K.R..A$:.A$."".1
490.Q.....|...."... EEEEEEEEEEEEEEEEEE
EEEEEEEEEEEE......" 20 PRINT "G(34)"
HOE OUD BEN JIJ "G(34)".E....". 30 IN
PUT A......". 40 PRINT A "G(34)" IS N
IET OUD."G(34).! ..." RRRRRRRRRRRRRRRR
RRRRRRRRRRRRRR":....+
> CLICK IMAGE PREVIEW FOR FULL MODAL