BASIC LES 5
FILE INFORMATION
FILENAME(S): BASIC LES 5
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 15:51:47
APPEARS ON: 1 disk(s)
FILE HASH
7993aa3bf3dbaa4f7f7acc0dde1a62ad49c14500193d8c6c08d31715f4d36a7f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCCL 20 05 89 | BASIC LES 5 | PRG | Belgium | 5 | 6 | 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 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 E2 16 |00:.P,X:.". "...|
00000EC0: 49 54 20 43 4F 4D 4D 41 4E 44 4F 20 4B 55 4E 20 |IT COMMANDO KUN |
00000ED0: 4A 45 20 52 45 47 45 4C 20 31 30 20 4C 49 53 54 |JE REGEL 10 LIST|
00000EE0: 45 4E 00 27 17 4C 04 99 22 11 20 4C 49 53 54 20 |EN.'.L..". LIST |
00000EF0: 31 30 2D 22 3A 99 22 20 C5 C5 C5 C5 C5 C5 C5 C5 |10-":." ........|
00000F00: 22 3A 99 22 20 48 49 45 52 4D 45 45 20 4B 55 4E |":." HIERMEE KUN|
00000F10: 20 4A 45 20 45 45 4E 20 4C 49 53 54 49 4E 47 20 | JE EEN LISTING |
00000F20: 4B 52 49 4A 47 45 4E 00 3E 17 56 04 99 22 11 20 |KRIJGEN.>.V..". |
00000F30: 56 41 4E 41 46 20 52 45 47 45 4C 20 31 30 00 86 |VANAF REGEL 10..|
00000F40: 17 60 04 99 22 11 11 20 4C 49 53 54 20 2D 31 30 |.`..".. LIST -10|
00000F50: 22 3A 99 22 20 C5 C5 C5 C5 C5 C5 C5 C5 22 3A 99 |":." ........":.|
00000F60: 22 20 4E 55 20 4C 49 53 54 20 49 4B 20 41 4C 4C |" NU LIST IK ALL|
00000F70: 45 20 52 45 47 45 4C 53 20 54 4F 54 20 45 4E 20 |E REGELS TOT EN |
00000F80: 4D 45 54 20 31 30 00 D1 17 6A 04 99 22 11 11 20 |MET 10...j..".. |
00000F90: 4C 49 53 54 20 31 30 2D 32 30 22 3A 99 22 20 C5 |LIST 10-20":." .|
00000FA0: C5 C5 C5 C5 C5 C5 C5 C5 C5 22 3A 99 22 20 44 49 |.........":." DI|
00000FB0: 54 20 47 45 45 46 54 20 45 45 4E 20 4C 49 53 54 |T GEEFT EEN LIST|
00000FC0: 49 4E 47 20 56 41 4E 20 31 30 20 54 2F 4D 20 32 |ING VAN 10 T/M 2|
00000FD0: 30 00 DA 17 74 04 8D 31 35 30 00 F6 17 7E 04 99 |0...t..150...~..|
00000FE0: 22 93 1E 20 52 55 4E 20 31 30 22 3A 99 22 20 C5 |".. RUN 10":." .|
00000FF0: C5 C5 C5 C5 C5 22 00 25 18 88 04 99 22 11 20 41 |.....".%....". A|
00001000: 4C 53 20 4A 45 20 4D 49 4A 20 4E 49 45 54 20 4F |LS JE MIJ NIET O|
00001010: 50 20 44 45 20 45 45 52 53 54 45 20 52 45 47 45 |P DE EERSTE REGE|
00001020: 4C 20 56 41 4E 00 53 18 92 04 99 22 11 20 45 45 |L VAN.S....". EE|
00001030: 4E 20 50 52 4F 47 52 41 4D 4D 41 20 57 49 4C 54 |N PROGRAMMA WILT|
00001040: 20 4C 41 54 45 4E 20 42 45 47 49 4E 4E 45 4E 2C | LATEN BEGINNEN,|
00001050: 44 41 4E 00 83 18 9C 04 99 22 11 20 4B 55 4E 20 |DAN......". KUN |
00001060: 4A 45 20 4D 49 4A 20 4F 50 20 42 4F 56 45 4E 53 |JE MIJ OP BOVENS|
00001070: 54 41 41 4E 44 45 20 57 49 4A 5A 45 20 4F 50 20 |TAANDE WIJZE OP |
00001080: 45 4C 4B 00 AF 18 A6 04 99 22 20 42 45 53 54 41 |ELK......" BESTA|
00001090: 41 4E 44 20 52 45 47 45 4C 4E 55 4D 4D 45 52 20 |AND REGELNUMMER |
000010A0: 4C 41 54 45 4E 20 42 45 47 49 4E 4E 45 4E 2E 00 |LATEN BEGINNEN..|
000010B0: DF 18 B0 04 99 22 11 90 20 45 45 4E 20 4E 49 45 |.....".. EEN NIE|
000010C0: 54 20 42 45 53 54 41 41 4E 44 20 52 45 47 45 4C |T BESTAAND REGEL|
000010D0: 4E 55 4D 4D 45 52 20 47 45 45 46 54 20 44 45 00 |NUMMER GEEFT DE.|
000010E0: FD 18 BA 04 99 22 11 20 56 4F 4C 47 45 4E 44 45 |.....". VOLGENDE|
000010F0: 20 46 4F 55 54 4D 45 4C 44 49 4E 47 3A 00 0D 19 | FOUTMELDING:...|
00001100: C4 04 81 4E B2 31 A4 54 32 AC 32 3A 82 00 3D 19 |...N.1.T2.2:..=.|
00001110: CE 04 99 22 11 05 3F 55 4E 44 45 46 27 44 20 53 |..."..?UNDEF'D S|
00001120: 54 41 54 45 4D 45 4E 54 20 45 52 52 4F 52 22 3A |TATEMENT ERROR":|
00001130: 99 22 52 45 41 44 59 22 3A 8D 31 39 30 00 69 19 |."READY":.190.i.|
00001140: D8 04 99 22 11 1E 20 44 45 5A 45 20 46 4F 55 54 |...".. DEZE FOUT|
00001150: 4D 45 4C 44 49 4E 47 20 47 45 4C 44 54 20 56 4F |MELDING GELDT VO|
00001160: 4F 52 20 49 45 44 45 52 45 00 A3 19 E2 04 99 22 |OR IEDERE......"|
00001170: 11 20 56 45 52 57 49 4A 5A 49 4E 47 20 4E 41 41 |. VERWIJZING NAA|
00001180: 52 20 45 45 4E 20 4E 49 45 54 20 42 45 53 54 41 |R EEN NIET BESTA|
00001190: 41 4E 44 45 20 20 20 20 20 20 11 52 45 47 45 4C |ANDE .REGEL|
000011A0: 2E 22 3B 00 B1 19 EC 04 99 22 13 22 3A 8D 31 35 |.";......".":.15|
000011B0: 30 00 E5 19 F6 04 99 22 90 93 11 11 11 11 11 11 |0......"........|
000011C0: 20 57 49 4C 20 4A 45 20 44 45 5A 45 20 4C 45 53 | WIL JE DEZE LES|
000011D0: 20 4E 4F 47 20 45 45 4E 53 20 44 4F 4F 52 4E 45 | NOG EENS DOORNE|
000011E0: 4D 45 4E 20 3F 00 F9 19 00 05 A1 41 24 3A 8B 41 |MEN ?......A$:.A|
000011F0: 24 B2 22 22 A7 31 32 38 30 00 08 1A 01 05 8B 41 |$."".1280......A|
00001200: 24 B3 B1 22 4E 22 A7 8A 00 27 1A 0A 05 99 22 11 |$.."N"...'....".|
00001210: 99 20 49 4B 20 4C 41 41 44 20 44 41 4E 20 4E 55 |. IK LAAD DAN NU|
00001220: 20 4C 45 53 20 36 2E 00 3D 1A 14 05 97 31 39 38 | LES 6..=....198|
00001230: 2C 31 3A 97 36 33 31 2C 31 33 31 3A 80 00 00 00 |,1:.631,131:....|
00001240: FF A6 |.. |
....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:.". "...IT COMMANDO KUN JE REGEL
10 LISTEN.'.L..". LIST 10-":." EEEEEEEE
":." HIERMEE KUN JE EEN LISTING KRIJGEN.
>.V..". VANAF REGEL 10...`..".. LIST -10
":." EEEEEEEE":." NU LIST IK ALLE REGELS
TOT EN MET 10.Q.J..".. LIST 10-20":." E
EEEEEEEEE":." DIT GEEFT EEN LISTING VAN
10 T/M 20.Z.T..150...~..".. RUN 10":." E
EEEEE".%....". ALS JE MIJ NIET OP DE EER
STE REGEL VAN.S....". EEN PROGRAMMA WILT
LATEN BEGINNEN,DAN......". KUN JE MIJ O
P BOVENSTAANDE WIJZE OP ELK......" BESTA
AND REGELNUMMER LATEN BEGINNEN......."..
EEN NIET BESTAAND REGELNUMMER GEEFT DE.
.....". VOLGENDE FOUTMELDING:...D..N.1.T
2.2:..=.N.."..?UNDEF'D STATEMENT ERROR":
."READY":.190.I.X..".. DEZE FOUTMELDING
GELDT VOOR IEDERE......". VERWIJZING NAA
R EEN NIET BESTAANDE .REGEL.";.....
.".":.150......"........ WIL JE DEZE LES
NOG EENS DOORNEMEN ?......A$:.A$."".128
0......A$.."N"...'....".. IK LAAD DAN NU
LES 6..=....198,1:.631,131:......
> CLICK IMAGE PREVIEW FOR FULL MODAL