BL 5.1
FILE INFORMATION
FILENAME(S): BL 5.1
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 21:05:49
APPEARS ON: 1 disk(s)
FILE HASH
969b116dcb0c62aa1f37c6ff6a7139d1dc8524ceff6afdd6c6eb0206d59b841f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LESSEN | BL 5.1 | PRG | DuncanTwain | 6 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 01 00 8F 20 2B 2B 2B 20 35 2E 31 20 |....... +++ 5.1 | 00000010: 2B 2B 2B 00 25 08 64 00 41 B2 31 39 38 3A 99 C7 |+++.%.d.A.198:..| 00000020: 28 31 34 32 29 00 3A 08 6E 00 97 35 33 32 38 31 |(142).:.n..53281| 00000030: 2C 31 35 3A 97 36 34 36 2C 36 00 4C 08 78 00 5A |,15:.646,6.L.x.Z| 00000040: 24 B2 C7 28 33 34 29 3A 89 31 37 30 00 7D 08 82 |$..(34):.170.}..| 00000050: 00 99 22 93 22 3A 81 49 B2 31 A4 33 39 3A 99 43 |..".":.I.1.39:.C| 00000060: 24 3B 3A 82 3A 81 49 B2 31 A4 32 32 3A 99 22 9D |$;:.:.I.1.22:.".| 00000070: 11 22 43 24 3B 3A 82 3A 99 22 9D 22 3B 00 9A 08 |."C$;:.:.".";...| 00000080: 8C 00 81 49 B2 31 A4 33 38 3A 99 22 9D 22 43 24 |...I.1.38:."."C$| 00000090: 22 9D 22 3B 3A 82 3A 99 43 24 00 B5 08 96 00 81 |".";:.:.C$......| 000000A0: 49 B2 31 A4 32 33 3A 99 22 91 22 43 24 22 9D 22 |I.1.23:."."C$"."| 000000B0: 3B 3A 82 3A 8E 00 CC 08 A0 00 97 41 2C 30 3A 92 |;:.:.......A,0:.| 000000C0: 41 2C 32 35 35 3A 97 41 2C 30 3A 8E 00 DC 08 AA |A,255:.A,0:.....| 000000D0: 00 43 24 B2 22 A6 22 3A 8D 31 33 30 00 F6 08 B4 |.C$.".":.130....| 000000E0: 00 99 22 13 11 11 11 11 11 11 11 22 A3 31 35 29 |.."........".15)| 000000F0: 22 4C 45 53 20 35 00 19 09 BE 00 99 22 11 11 22 |"LES 5......".."| 00000100: A3 38 29 22 31 2E 20 48 55 49 53 57 45 52 4B 20 |.8)"1. HUISWERK | 00000110: 4F 50 4C 4F 53 53 49 4E 47 00 38 09 C8 00 99 A3 |OPLOSSING.8.....| 00000120: 38 29 22 32 2E 20 49 46 2F 54 48 45 4E 20 49 4E |8)"2. IF/THEN IN| 00000130: 53 54 52 55 4B 54 49 45 00 54 09 D2 00 99 A3 38 |STRUKTIE.T.....8| 00000140: 29 22 33 2E 20 47 4F 54 4F 20 49 4E 53 54 52 55 |)"3. GOTO INSTRU| 00000150: 4B 54 49 45 00 70 09 DC 00 99 A3 38 29 22 34 2E |KTIE.p.....8)"4.| 00000160: 20 48 55 49 53 57 45 52 4B 20 4F 50 47 41 56 45 | HUISWERK OPGAVE| 00000170: 00 79 09 E6 00 8D 31 36 30 00 A8 09 F0 00 99 22 |.y....160......"| 00000180: 93 11 41 41 4E 20 48 45 54 20 45 49 4E 44 20 56 |..AAN HET EIND V| 00000190: 41 4E 20 4C 45 53 20 34 20 57 45 52 44 20 55 20 |AN LES 4 WERD U | 000001A0: 47 45 56 52 41 41 47 44 00 D1 09 FA 00 99 22 45 |GEVRAAGD......"E| 000001B0: 45 4E 20 50 52 4F 47 52 41 4D 4D 41 20 54 45 20 |EN PROGRAMMA TE | 000001C0: 53 43 48 52 49 4A 56 45 4E 20 44 41 54 20 48 45 |SCHRIJVEN DAT HE| 000001D0: 54 00 FC 09 04 01 99 22 53 4C 41 47 47 45 4D 49 |T......"SLAGGEMI| 000001E0: 44 44 45 4C 44 45 20 56 41 4E 20 45 45 4E 20 48 |DDELDE VAN EEN H| 000001F0: 4F 4E 4B 42 41 4C 53 50 45 4C 45 52 00 0D 0A 0E |ONKBALSPELER....| 00000200: 01 99 22 55 49 54 52 45 4B 45 4E 54 2E 00 39 0A |.."UITREKENT..9.| 00000210: 18 01 99 22 11 45 52 20 5A 49 4A 4E 20 56 45 52 |...".ER ZIJN VER| 00000220: 53 43 48 45 49 44 45 4E 45 20 4A 55 49 53 54 45 |SCHEIDENE JUISTE| 00000230: 20 4D 41 4E 49 45 52 45 4E 00 53 0A 22 01 99 22 | MANIEREN.S.".."| 00000240: 4F 4D 20 44 49 54 20 54 45 20 42 45 52 45 49 4B |OM DIT TE BEREIK| 00000250: 45 4E 2E 00 6E 0A 2C 01 99 22 11 48 49 45 52 20 |EN..n.,..".HIER | 00000260: 49 53 20 45 45 4E 20 4D 41 4E 49 45 52 3A 00 77 |IS EEN MANIER:.w| 00000270: 0A 36 01 8D 31 36 30 00 AC 0A 40 01 99 22 93 11 |.6..160...@.."..| 00000280: 32 20 50 52 49 4E 54 20 22 5A 24 22 54 59 50 20 |2 PRINT "Z$"TYP | 00000290: 44 45 20 4E 41 41 4D 2C 54 52 45 46 46 45 52 53 |DE NAAM,TREFFERS| 000002A0: 2C 50 4F 47 49 4E 47 45 4E 22 5A 24 00 C1 0A 4A |,POGINGEN"Z$...J| 000002B0: 01 99 22 34 20 49 4E 50 55 54 20 4E 24 2C 54 2C |.."4 INPUT N$,T,| 000002C0: 50 00 D6 0A 54 01 99 22 36 20 47 20 3D 20 31 30 |P...T.."6 G = 10| 000002D0: 30 30 2A 54 2F 50 00 00 0B 5E 01 99 22 38 20 50 |00*T/P...^.."8 P| 000002E0: 52 49 4E 54 20 4E 24 22 5A 24 22 20 53 4C 41 47 |RINT N$"Z$" SLAG| 000002F0: 47 45 4D 49 44 44 45 4C 44 45 20 22 5A 24 22 47 |GEMIDDELDE "Z$"G| 00000300: 00 2F 0B 68 01 99 22 11 B8 B8 B8 B8 B8 B8 B8 B8 |./.h..".........| 00000310: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................| 00000320: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 |................| 00000330: 59 0B 72 01 99 22 4C 41 54 45 4E 20 57 45 20 45 |Y.r.."LATEN WE E| 00000340: 45 4E 53 20 4B 49 4A 4B 45 4E 20 57 41 54 20 45 |ENS KIJKEN WAT E| 00000350: 52 20 47 45 42 45 55 52 54 00 7C 0B 7C 01 99 22 |R GEBEURT.|.|.."| 00000360: 41 4C 53 20 57 45 20 44 49 54 20 50 52 4F 47 52 |ALS WE DIT PROGR| 00000370: 41 4D 4D 41 20 52 55 4E 4E 45 4E 2E 00 A6 0B 86 |AMMA RUNNEN.....| 00000380: 01 99 22 1D 11 12 54 59 50 20 45 45 4E 20 4E 41 |.."...TYP EEN NA| 00000390: 41 4D 20 45 4E 20 54 57 45 45 20 20 20 20 20 20 |AM EN TWEE | 000003A0: 20 20 20 20 20 22 00 CE 0B 90 01 99 22 1D 12 43 | "......"..C| 000003B0: 49 4A 46 45 52 53 20 41 4C 53 20 44 49 54 20 47 |IJFERS ALS DIT G| 000003C0: 45 56 52 41 41 47 44 20 57 4F 52 44 54 2E 00 D9 |EVRAAGD WORDT...| 000003D0: 0B 9A 01 99 22 11 52 55 4E 00 FD 0B A4 01 99 22 |....".RUN......"| 000003E0: 54 59 50 20 44 45 20 4E 41 41 4D 2C 54 52 45 46 |TYP DE NAAM,TREF| 000003F0: 46 45 52 53 2C 50 4F 47 49 4E 47 45 4E 00 09 0C |FERS,POGINGEN...| 00000400: AE 01 85 4E 24 2C 54 2C 50 00 18 0C B8 01 47 B2 |...N$,T,P.....G.| 00000410: 31 30 30 30 AC 54 AD 50 00 33 0C C2 01 99 4E 24 |1000.T.P.3....N$| 00000420: 22 20 53 4C 41 47 47 45 4D 49 44 44 45 4C 44 45 |" SLAGGEMIDDELDE| 00000430: 20 22 47 00 3C 0C CC 01 8D 31 36 30 00 52 0C D6 | "G.<....160.R..| 00000440: 01 99 22 93 11 22 A3 31 35 29 22 49 46 2F 54 48 |.."..".15)"IF/TH| 00000450: 45 4E 00 79 0C E0 01 99 22 11 43 4F 4D 50 55 54 |EN.y....".COMPUT| 00000460: 45 52 50 52 4F 47 52 41 4D 4D 41 27 53 20 4B 55 |ERPROGRAMMA'S KU| 00000470: 4E 4E 45 4E 20 56 45 45 4C 00 A7 0C EA 01 99 22 |NNEN VEEL......"| 00000480: 46 4C 45 58 49 42 45 4C 45 52 20 45 4E 20 4B 52 |FLEXIBELER EN KR| 00000490: 41 43 48 54 49 47 45 52 20 47 45 4D 41 41 4B 54 |ACHTIGER GEMAAKT| 000004A0: 20 57 4F 52 44 45 4E 00 CF 0C F4 01 99 22 44 4F | WORDEN......"DO| 000004B0: 4F 52 20 48 45 54 20 47 45 42 52 55 49 4B 20 56 |OR HET GEBRUIK V| 000004C0: 41 4E 20 41 46 48 41 4E 4B 45 4C 49 4A 4B 45 00 |AN AFHANKELIJKE.| 000004D0: E9 0C FE 01 99 22 53 50 52 4F 4E 47 20 49 4E 53 |....."SPRONG INS| 000004E0: 54 52 55 4B 54 49 45 53 2E 00 14 0D 08 02 99 22 |TRUKTIES......."| 000004F0: 11 42 45 4B 49 4A 4B 45 4E 20 57 45 20 48 45 54 |.BEKIJKEN WE HET| 00000500: 20 56 4F 4C 47 45 4E 44 45 20 56 4F 4F 52 42 45 | VOLGENDE VOORBE| 00000510: 45 4C 44 3A 00 1D 0D 12 02 8D 31 36 30 00 2B 0D |ELD:......160.+.| 00000520: 1C 02 8D 35 35 30 3A 89 36 33 30 00 52 0D 26 02 |...550:.630.R.&.| 00000530: 99 22 93 11 32 20 50 52 49 4E 54 20 22 5A 24 22 |."..2 PRINT "Z$"| 00000540: 54 59 50 20 55 57 20 4C 45 45 46 54 49 4A 44 22 |TYP UW LEEFTIJD"| 00000550: 5A 24 00 62 0D 30 02 99 22 34 20 49 4E 50 55 54 |Z$.b.0.."4 INPUT| 00000560: 20 4C 00 90 0D 3A 02 99 22 36 20 50 52 49 4E 54 | L...:.."6 PRINT| 00000570: 20 22 5A 24 22 57 49 4C 54 20 55 20 44 41 47 45 | "Z$"WILT U DAGE| 00000580: 4E 20 28 4A 41 20 4F 46 20 4E 45 45 29 22 5A 24 |N (JA OF NEE)"Z$| 00000590: 00 A1 0D 44 02 99 22 38 20 49 4E 50 55 54 20 42 |...D.."8 INPUT B| 000005A0: 24 00 C6 0D 4E 02 99 22 31 30 20 49 46 20 42 24 |$...N.."10 IF B$| 000005B0: 20 3D 20 22 5A 24 22 4E 45 45 22 5A 24 22 20 54 | = "Z$"NEE"Z$" T| 000005C0: 48 45 4E 20 31 34 00 FF 0D 58 02 99 22 31 32 20 |HEN 14...X.."12 | 000005D0: 50 52 49 4E 54 20 22 5A 24 22 55 57 20 4C 45 45 |PRINT "Z$"UW LEE| 000005E0: 46 54 49 4A 44 20 49 53 20 22 5A 24 22 33 36 35 |FTIJD IS "Z$"365| 000005F0: 2A 4C 22 5A 24 22 20 44 41 47 45 4E 22 5A 24 00 |*L"Z$" DAGEN"Z$.| 00000600: 39 0E 62 02 99 22 31 34 20 50 52 49 4E 54 20 22 |9.b.."14 PRINT "| 00000610: 5A 24 22 55 57 20 4C 45 45 46 54 49 4A 44 20 49 |Z$"UW LEEFTIJD I| 00000620: 53 20 22 5A 24 22 31 32 2A 4C 22 5A 24 22 20 4D |S "Z$"12*L"Z$" M| 00000630: 41 41 4E 44 45 4E 22 5A 24 00 6A 0E 6C 02 99 22 |AANDEN"Z$.j.l.."| 00000640: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................| 00000650: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................| 00000660: B8 B8 B8 B8 B8 B8 B8 22 3A 8E 00 98 0E 76 02 99 |.......":....v..| 00000670: 22 11 4C 41 54 45 4E 20 57 45 20 48 45 54 20 50 |".LATEN WE HET P| 00000680: 52 4F 47 52 41 4D 4D 41 20 45 45 4E 53 20 52 45 |ROGRAMMA EENS RE| 00000690: 47 45 4C 20 56 4F 4F 52 00 C4 0E 80 02 99 22 52 |GEL VOOR......"R| 000006A0: 45 47 45 4C 20 42 45 4B 49 4A 4B 45 4E 2C 20 5A |EGEL BEKIJKEN, Z| 000006B0: 4F 41 4C 53 20 44 45 20 43 4F 4D 50 55 54 45 52 |OALS DE COMPUTER| 000006C0: 20 44 41 54 00 D4 0E 8A 02 99 22 5A 4F 55 20 44 | DAT......"ZOU D| 000006D0: 4F 45 4E 2E 00 F7 0E 94 02 99 22 11 52 45 47 45 |OEN.......".REGE| 000006E0: 4C 20 32 20 5A 45 47 54 20 44 45 20 43 4F 4D 50 |L 2 ZEGT DE COMP| 000006F0: 55 54 45 52 20 4F 4D 00 1E 0F 9E 02 99 22 12 54 |UTER OM......".T| 00000700: 59 50 20 55 57 20 4C 45 45 46 54 49 4A 44 92 20 |YP UW LEEFTIJD. | 00000710: 41 46 20 54 45 20 44 52 55 4B 4B 45 4E 2E 00 49 |AF TE DRUKKEN..I| 00000720: 0F A8 02 99 22 11 52 45 47 45 4C 20 34 20 5A 45 |....".REGEL 4 ZE| 00000730: 47 54 20 44 45 20 43 4F 4D 50 55 54 45 52 20 4F |GT DE COMPUTER O| 00000740: 4D 20 45 45 4E 20 12 3F 92 00 73 0F B2 02 99 22 |M EEN .?..s...."| 00000750: 41 46 20 54 45 20 44 52 55 4B 4B 45 4E 2C 20 45 |AF TE DRUKKEN, E| 00000760: 4E 20 54 45 20 57 41 43 48 54 45 4E 20 54 4F 54 |N TE WACHTEN TOT| 00000770: 20 44 45 00 9E 0F BC 02 99 22 47 45 42 52 55 49 | DE......"GEBRUI| 00000780: 4B 45 52 20 45 45 4E 20 43 49 4A 46 45 52 20 28 |KER EEN CIJFER (| 00000790: 5A 49 4A 4E 20 4C 45 45 46 54 49 4A 44 29 00 C0 |ZIJN LEEFTIJD)..| 000007A0: 0F C6 02 99 22 49 4E 54 59 50 54 2C 20 42 49 4A |...."INTYPT, BIJ| 000007B0: 56 4F 4F 52 42 45 45 4C 44 3A 20 12 3F 20 32 31 |VOORBEELD: .? 21| 000007C0: 00 CE 0F D0 02 8D 31 36 30 3A 8D 35 35 30 00 F1 |......160:.550..| 000007D0: 0F DA 02 99 22 11 52 45 47 45 4C 20 36 20 5A 45 |....".REGEL 6 ZE| 000007E0: 47 54 20 44 45 20 43 4F 4D 50 55 54 45 52 20 4F |GT DE COMPUTER O| 000007F0: 4D 00 21 10 E4 02 99 22 12 57 49 4C 54 20 55 20 |M.!....".WILT U | 00000800: 44 41 47 45 4E 20 28 4A 41 20 4F 46 20 4E 45 45 |DAGEN (JA OF NEE| 00000810: 29 92 20 41 46 20 54 45 20 44 52 55 4B 4B 45 4E |). AF TE DRUKKEN| 00000820: 2E 00 4C 10 EE 02 99 22 11 52 45 47 45 4C 20 38 |..L....".REGEL 8| 00000830: 20 5A 45 47 54 20 44 45 20 43 4F 4D 50 55 54 45 | ZEGT DE COMPUTE| 00000840: 52 20 4F 4D 20 45 45 4E 20 12 3F 92 00 76 10 F8 |R OM EEN .?..v..| 00000850: 02 99 22 41 46 20 54 45 20 44 52 55 4B 4B 45 4E |.."AF TE DRUKKEN| 00000860: 2C 20 45 4E 20 54 45 20 57 41 43 48 54 45 4E 20 |, EN TE WACHTEN | 00000870: 54 4F 54 20 44 45 00 A5 10 02 03 99 22 47 45 42 |TOT DE......"GEB| 00000880: 52 55 49 4B 45 52 20 4A 41 20 4F 46 20 4E 45 45 |RUIKER JA OF NEE| 00000890: 20 49 4E 54 59 50 54 2C 20 42 49 4A 56 2E 3A 20 | INTYPT, BIJV.: | 000008A0: 12 3F 20 4A 41 00 B3 10 0C 03 8D 31 36 30 3A 8D |.? JA......160:.| 000008B0: 35 35 30 00 E2 10 16 03 99 22 11 52 45 47 45 4C |550......".REGEL| 000008C0: 20 31 30 20 5A 45 47 54 20 44 45 20 43 4F 4D 50 | 10 ZEGT DE COMP| 000008D0: 55 54 45 52 20 4F 4D 20 44 45 20 53 54 52 49 4E |UTER OM DE STRIN| 000008E0: 47 2C 00 0D 11 20 03 99 22 4F 50 47 45 53 4C 41 |G,... .."OPGESLA| 000008F0: 47 45 4E 20 49 4E 20 42 24 20 54 45 20 42 45 4B |GEN IN B$ TE BEK| 00000900: 49 4A 4B 45 4E 20 45 4E 20 4E 41 41 52 00 37 11 |IJKEN EN NAAR.7.| 00000910: 2A 03 99 22 52 45 47 45 4C 20 31 34 20 54 45 20 |*.."REGEL 14 TE | 00000920: 53 50 52 49 4E 47 45 4E 20 28 52 45 47 45 4C 20 |SPRINGEN (REGEL | 00000930: 31 32 20 4F 56 45 52 00 5B 11 34 03 99 22 54 45 |12 OVER.[.4.."TE| 00000940: 20 53 4C 41 41 4E 29 20 41 4C 53 20 42 24 3D 22 | SLAAN) ALS B$="| 00000950: 5A 24 22 4E 45 45 22 5A 24 22 2E 00 86 11 3E 03 |Z$"NEE"Z$"....>.| 00000960: 99 22 11 41 4C 53 20 42 24 20 4F 4E 47 45 4C 49 |.".ALS B$ ONGELI| 00000970: 4A 4B 20 49 53 20 41 41 4E 20 22 5A 24 22 4E 45 |JK IS AAN "Z$"NE| 00000980: 45 22 5A 24 22 2C 00 B1 11 48 03 99 22 47 41 41 |E"Z$",...H.."GAA| 00000990: 54 20 44 45 20 43 4F 4D 50 55 54 45 52 20 4E 4F |T DE COMPUTER NO| 000009A0: 52 4D 41 41 4C 20 56 45 52 44 45 52 20 4E 41 41 |RMAAL VERDER NAA| 000009B0: 52 00 C0 11 52 03 99 22 52 45 47 45 4C 20 31 32 |R...R.."REGEL 12| 000009C0: 00 EC 11 5C 03 99 22 11 41 4C 53 20 52 45 47 45 |...\..".ALS REGE| 000009D0: 4C 20 31 34 20 41 41 4E 20 44 45 20 42 45 55 52 |L 14 AAN DE BEUR| 000009E0: 54 20 49 53 2C 20 5A 41 4C 20 44 45 00 18 12 66 |T IS, ZAL DE...f| 000009F0: 03 99 22 43 4F 4D 50 55 54 45 52 20 12 55 57 20 |.."COMPUTER .UW | 00000A00: 4C 45 45 46 54 49 4A 44 20 49 53 20 31 32 2A 4C |LEEFTIJD IS 12*L| 00000A10: 20 4D 41 41 4E 44 45 4E 00 29 12 70 03 99 22 41 | MAANDEN.).p.."A| 00000A20: 46 44 52 55 4B 4B 45 4E 2E 00 51 12 7A 03 99 22 |FDRUKKEN..Q.z.."| 00000A30: 11 44 41 41 52 4E 41 20 49 53 20 48 45 54 20 50 |.DAARNA IS HET P| 00000A40: 52 4F 47 52 41 4D 4D 41 20 4B 4C 41 41 52 2E 22 |ROGRAMMA KLAAR."| 00000A50: 3B 00 5F 12 84 03 8D 31 36 30 3A 8D 35 35 30 00 |;._....160:.550.| 00000A60: 8B 12 8E 03 99 22 11 41 4C 53 20 52 45 47 45 4C |.....".ALS REGEL| 00000A70: 20 31 32 20 41 41 4E 20 44 45 20 42 45 55 52 54 | 12 AAN DE BEURT| 00000A80: 20 49 53 2C 20 5A 41 4C 20 44 45 00 A0 12 98 03 | IS, ZAL DE.....| 00000A90: 99 22 43 4F 4D 50 55 54 45 52 20 45 45 52 53 54 |."COMPUTER EERST| 00000AA0: 00 CE 12 A2 03 99 22 12 55 57 20 4C 45 45 46 54 |......".UW LEEFT| 00000AB0: 49 4A 44 20 49 53 20 33 36 35 2A 4C 20 44 41 47 |IJD IS 365*L DAG| 00000AC0: 45 4E 92 20 41 46 44 52 55 4B 4B 45 4E 2E 00 FA |EN. AFDRUKKEN...| 00000AD0: 12 AC 03 99 22 11 44 41 41 52 4E 41 20 5A 41 4C |....".DAARNA ZAL| 00000AE0: 20 44 45 20 43 4F 4D 50 55 54 45 52 20 44 4F 4F | DE COMPUTER DOO| 00000AF0: 52 20 52 45 47 45 4C 20 31 34 00 29 13 B6 03 99 |R REGEL 14.)....| 00000B00: 22 12 55 57 20 4C 45 45 46 54 49 4A 44 20 49 53 |".UW LEEFTIJD IS| 00000B10: 20 31 32 2A 4C 20 4D 41 41 4E 44 45 4E 92 20 41 | 12*L MAANDEN. A| 00000B20: 46 44 52 55 4B 4B 45 4E 2E 00 51 13 C0 03 99 22 |FDRUKKEN..Q...."| 00000B30: 11 44 41 41 52 4E 41 20 49 53 20 48 45 54 20 50 |.DAARNA IS HET P| 00000B40: 52 4F 47 52 41 4D 4D 41 20 4B 4C 41 41 52 2E 22 |ROGRAMMA KLAAR."| 00000B50: 3B 00 5A 13 CA 03 8D 31 36 30 00 6A 13 D4 03 43 |;.Z....160.j...C| 00000B60: 24 B2 22 A6 22 3A 8D 31 33 30 00 97 13 DE 03 99 |$.".":.130......| 00000B70: 22 13 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |"...............| 00000B80: 1D 45 49 4E 44 45 20 56 41 4E 20 4C 45 53 20 35 |.EINDE VAN LES 5| 00000B90: 20 44 45 45 4C 20 31 00 BF 13 E8 03 99 22 11 11 | DEEL 1......"..| 00000BA0: 11 11 1D 1D 1D 1D 1D 1D 1D 56 45 52 56 4F 4C 47 |.........VERVOLG| 00000BB0: 20 57 4F 52 44 54 20 47 45 4C 41 44 45 4E 22 00 | WORDT GELADEN".| 00000BC0: CE 13 F2 03 99 22 11 11 11 11 11 11 11 11 00 D4 |....."..........| 00000BD0: 13 FC 03 80 00 00 00 |....... |
....... +++ 5.1 +++.%.D.A.198:.G(142).:. N..53281,15:.646,6.L.X.Z$.G(34):.170.}.. ..".":.I.1.39:.C$;:.:.I.1.22:.".."C$;:.: .".";......I.1.38:."."C$".";:.:.C$...... I.1.23:."."C$".";:.:..L. ..A,0:.A,255:.A ,0:......C$.".":.130......"........".15) "LES 5......"..".8)"1. HUISWERK OPLOSSIN G.8.H...8)"2. IF/THEN INSTRUKTIE.T.R...8 )"3. GOTO INSTRUKTIE.P.....8)"4. HUISWER K OPGAVE.Y....160......"..AAN HET EIND V AN LES 4 WERD U GEVRAAGD.Q...."EEN PROGR AMMA TE SCHRIJVEN DAT HET......"SLAGGEMI DDELDE VAN EEN HONKBALSPELER......"UITRE KENT..9....".ER ZIJN VERSCHEIDENE JUISTE MANIEREN.S.".."OM DIT TE BEREIKEN..N.,. .".HIER IS EEN MANIER:.W.6..160...@..".. 2 PRINT "Z$"TYP DE NAAM,TREFFERS,POGINGE N"Z$.A.J.."4 INPUT N$,T,P.V.T.."6 G = 10 00*T/P...^.."8 PRINT N$"Z$" SLAGGEMIDDEL DE "Z$"G./.H.."......................... ................Y.R.."LATEN WE EENS KIJK EN WAT ER GEBEURT.|.|.."ALS WE DIT PROGR AMMA RUNNEN......."...TYP EEN NAAM EN TW EE ".N...."..CIJFERS ALS DIT G EVRAAGD WORDT..Y....".RUN......"TYP DE N AAM,TREFFERS,POGINGEN......N$,T,P.....G. 1000.T.P.3.B..N$" SLAGGEMIDDELDE "G.<.L. .160.R.V.."..".15)"IF/THEN.Y....".COMPUT ERPROGRAMMA'S KUNNEN VEEL......"FLEXIBEL ER EN KRACHTIGER GEMAAKT WORDEN.O...."DO OR HET GEBRUIK VAN AFHANKELIJKE......"SP RONG INSTRUKTIES.......".BEKIJKEN WE HET VOLGENDE VOORBEELD:......160.+....550:. 630.R.&.."..2 PRINT "Z$"TYP UW LEEFTIJD" Z$.B.0.."4 INPUT L...:.."6 PRINT "Z$"WIL T U DAGEN (JA OF NEE)"Z$...D.."8 INPUT B $.F.N.."10 IF B$ = "Z$"NEE"Z$" THEN 14.. .X.."12 PRINT "Z$"UW LEEFTIJD IS "Z$"365 *L"Z$" DAGEN"Z$.9.B.."14 PRINT "Z$"UW LE EFTIJD IS "Z$"12*L"Z$" MAANDEN"Z$.J.L.." ......................................." :....V..".LATEN WE HET PROGRAMMA EENS RE GEL VOOR.D...."REGEL BEKIJKEN, ZOALS DE COMPUTER DAT.T...."ZOU DOEN.......".REGE L 2 ZEGT DE COMPUTER OM......".TYP UW LE EFTIJD. AF TE DRUKKEN..I....".REGEL 4 ZE GT DE COMPUTER OM EEN .?..S...."AF TE DR UKKEN, EN TE WACHTEN TOT DE......"GEBRUI KER EEN CIJFER (ZIJN LEEFTIJD)...F.."INT YPT, BIJVOORBEELD: .? 21.N.P..160:.550.. .Z..".REGEL 6 ZEGT DE COMPUTER OM.!...." .WILT U DAGEN (JA OF NEE). AF TE DRUKKEN ..L....".REGEL 8 ZEGT DE COMPUTER OM EEN .?..V...."AF TE DRUKKEN, EN TE WACHTEN TOT DE......"GEBRUIKER JA OF NEE INTYPT, BIJV.: .? JA......160:.550......".REGEL 10 ZEGT DE COMPUTER OM DE STRING,... .. "OPGESLAGEN IN B$ TE BEKIJKEN EN NAAR.7. *.."REGEL 14 TE SPRINGEN (REGEL 12 OVER. [.4.."TE SLAAN) ALS B$="Z$"NEE"Z$"....>. .".ALS B$ ONGELIJK IS AAN "Z$"NEE"Z$",.. .H.."GAAT DE COMPUTER NORMAAL VERDER NAA R...R.."REGEL 12...\..".ALS REGEL 14 AAN DE BEURT IS, ZAL DE...F.."COMPUTER .UW LEEFTIJD IS 12*L MAANDEN.).P.."AFDRUKKEN ..Q.Z..".DAARNA IS HET PROGRAMMA KLAAR." ;._....160:.550......".ALS REGEL 12 AAN DE BEURT IS, ZAL DE. ...."COMPUTER EERST .N....".UW LEEFTIJD IS 365*L DAGEN. AFDR UKKEN.......".DAARNA ZAL DE COMPUTER DOO R REGEL 14.)....".UW LEEFTIJD IS 12*L MA ANDEN. AFDRUKKEN..Q....".DAARNA IS HET P ROGRAMMA KLAAR.";.Z.J..160.J.T.C$.".":.1 30......"................EINDE VAN LES 5 DEEL 1......"...........VERVOLG WORDT G ELADEN".N....".........T.......
> CLICK IMAGE PREVIEW FOR FULL MODAL