BL 5.3
FILE INFORMATION
FILENAME(S): BL 5.3
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 21:05:49
APPEARS ON: 1 disk(s)
FILE HASH
7b91c31b993d9e67505f99a319a5c937d3ae54881fc30dab74a72df37d4a7a42
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LESSEN | BL 5.3 | PRG | DuncanTwain | 30 | 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 33 20 |....... +++ 5.3 | 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 39 08 6E 00 97 35 33 32 38 31 |(142).9.n..53281| 00000030: 2C 35 3A 97 36 34 36 2C 30 00 6B 08 78 00 51 24 |,5:.646,0.k.x.Q$| 00000040: B2 22 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000060: 20 20 20 20 20 20 20 20 20 91 22 00 7D 08 82 00 | .".}...| 00000070: 5A 24 B2 C7 28 33 34 29 3A 89 31 38 30 00 AF 08 |Z$..(34):.180...| 00000080: 8C 00 99 22 93 22 3B 3A 81 49 B2 31 A4 33 39 3A |...".";:.I.1.39:| 00000090: 99 43 24 3B 3A 82 3A 81 49 B2 31 A4 32 32 3A 99 |.C$;:.:.I.1.22:.| 000000A0: 22 9D 11 22 43 24 3B 3A 82 3A 99 22 9D 22 3B 00 |".."C$;:.:.".";.| 000000B0: CC 08 96 00 81 49 B2 31 A4 33 38 3A 99 22 9D 22 |.....I.1.38:."."| 000000C0: 43 24 22 9D 22 3B 3A 82 3A 99 43 24 00 E7 08 A0 |C$".";:.:.C$....| 000000D0: 00 81 49 B2 31 A4 32 33 3A 99 22 91 22 43 24 22 |..I.1.23:."."C$"| 000000E0: 9D 22 3B 3A 82 3A 8E 00 FE 08 AA 00 97 41 2C 30 |.";:.:.......A,0| 000000F0: 3A 92 41 2C 32 35 35 3A 97 41 2C 30 3A 8E 00 11 |:.A,255:.A,0:...| 00000100: 09 B4 00 99 22 93 11 22 A3 31 35 29 22 47 4F 54 |...."..".15)"GOT| 00000110: 4F 00 3F 09 BE 00 99 22 11 48 45 54 20 47 4F 54 |O.?....".HET GOT| 00000120: 4F 20 43 4F 4D 4D 41 4E 44 4F 20 57 4F 52 44 54 |O COMMANDO WORDT| 00000130: 20 47 45 42 52 55 49 4B 54 20 41 4C 53 20 55 00 | GEBRUIKT ALS U.| 00000140: 6A 09 C8 00 99 22 44 45 20 43 4F 4D 50 55 54 45 |j...."DE COMPUTE| 00000150: 52 20 57 49 4C 54 20 4C 41 54 45 4E 20 53 50 52 |R WILT LATEN SPR| 00000160: 49 4E 47 45 4E 20 4E 41 41 52 00 98 09 D2 00 99 |INGEN NAAR......| 00000170: 22 45 45 4E 20 41 4E 44 45 52 45 20 52 45 47 45 |"EEN ANDERE REGE| 00000180: 4C 20 44 41 4E 20 44 45 20 56 4F 4C 47 45 4E 44 |L DAN DE VOLGEND| 00000190: 45 20 41 41 4E 20 44 45 00 C3 09 DC 00 99 22 42 |E AAN DE......"B| 000001A0: 45 55 52 54 20 5A 49 4A 4E 44 45 20 52 45 47 45 |EURT ZIJNDE REGE| 000001B0: 4C 20 49 4E 20 48 45 54 20 50 52 4F 47 52 41 4D |L IN HET PROGRAM| 000001C0: 4D 41 2E 00 F2 09 E6 00 99 22 11 48 45 54 20 49 |MA.......".HET I| 000001D0: 53 20 4D 4F 47 45 4C 49 4A 4B 20 4F 4D 20 56 4F |S MOGELIJK OM VO| 000001E0: 4F 52 55 49 54 20 4F 46 20 41 43 48 54 45 52 55 |ORUIT OF ACHTERU| 000001F0: 49 54 00 16 0A F0 00 99 22 54 45 20 53 50 52 49 |IT......"TE SPRI| 00000200: 4E 47 45 4E 20 49 4E 20 45 45 4E 20 50 52 4F 47 |NGEN IN EEN PROG| 00000210: 52 41 4D 4D 41 2E 00 41 0A FA 00 99 22 11 42 45 |RAMMA..A....".BE| 00000220: 4B 49 4A 4B 20 48 45 54 20 56 4F 4C 47 45 4E 44 |KIJK HET VOLGEND| 00000230: 45 20 56 4F 4F 52 42 45 45 4C 44 20 45 45 4E 53 |E VOORBEELD EENS| 00000240: 3A 00 4A 0A 04 01 8D 31 37 30 00 6F 0A 0E 01 99 |:.J....170.o....| 00000250: 22 93 36 20 50 52 49 4E 54 22 5A 24 22 54 59 50 |".6 PRINT"Z$"TYP| 00000260: 20 55 57 20 4C 45 45 46 54 49 4A 44 22 5A 24 00 | UW LEEFTIJD"Z$.| 00000270: 7F 0A 18 01 99 22 37 20 49 4E 50 55 54 20 4C 00 |....."7 INPUT L.| 00000280: B0 0A 22 01 99 22 38 20 50 52 49 4E 54 22 5A 24 |..".."8 PRINT"Z$| 00000290: 22 4C 45 45 46 54 49 4A 44 20 49 4E 20 44 41 47 |"LEEFTIJD IN DAG| 000002A0: 45 4E 20 4F 46 20 4D 41 41 4E 44 45 4E 22 5A 24 |EN OF MAANDEN"Z$| 000002B0: 00 C2 0A 2C 01 99 22 31 30 20 49 4E 50 55 54 20 |...,.."10 INPUT | 000002C0: 42 24 00 E7 0A 36 01 99 22 31 32 20 49 46 20 42 |B$...6.."12 IF B| 000002D0: 24 3D 22 5A 24 22 44 41 47 45 4E 22 5A 24 22 20 |$="Z$"DAGEN"Z$" | 000002E0: 54 48 45 4E 20 31 38 00 1E 0B 40 01 99 22 31 34 |THEN 18...@.."14| 000002F0: 20 50 52 49 4E 54 22 5A 24 22 55 57 20 4C 45 45 | PRINT"Z$"UW LEE| 00000300: 46 54 49 4A 44 20 49 53 22 5A 24 22 31 32 2A 4C |FTIJD IS"Z$"12*L| 00000310: 22 5A 24 22 4D 41 41 4E 44 45 4E 22 5A 24 00 2F |"Z$"MAANDEN"Z$./| 00000320: 0B 4A 01 99 22 31 36 20 47 4F 54 4F 20 32 30 00 |.J.."16 GOTO 20.| 00000330: 65 0B 54 01 99 22 31 38 20 50 52 49 4E 54 22 5A |e.T.."18 PRINT"Z| 00000340: 24 22 55 57 20 4C 45 45 46 54 49 4A 44 20 49 53 |$"UW LEEFTIJD IS| 00000350: 22 5A 24 22 33 36 35 2A 4C 22 5A 24 22 44 41 47 |"Z$"365*L"Z$"DAG| 00000360: 45 4E 22 5A 24 00 72 0B 5E 01 99 22 32 30 20 45 |EN"Z$.r.^.."20 E| 00000370: 4E 44 00 9F 0B 68 01 99 22 11 44 49 54 20 50 52 |ND...h..".DIT PR| 00000380: 4F 47 52 41 4D 4D 41 20 4C 41 41 54 20 44 45 20 |OGRAMMA LAAT DE | 00000390: 47 45 42 52 55 49 4B 45 52 20 44 41 47 45 4E 00 |GEBRUIKER DAGEN.| 000003A0: CB 0B 72 01 99 22 4F 46 20 4D 41 41 4E 44 45 4E |..r.."OF MAANDEN| 000003B0: 20 4B 49 45 5A 45 4E 2C 20 4D 41 41 52 20 4E 49 | KIEZEN, MAAR NI| 000003C0: 45 54 20 41 4C 4C 45 42 45 49 2E 00 FA 0B 7C 01 |ET ALLEBEI....|.| 000003D0: 99 22 11 41 4C 53 20 44 45 20 47 45 42 52 55 49 |.".ALS DE GEBRUI| 000003E0: 4B 45 52 20 12 44 41 47 45 4E 92 20 41 4E 54 57 |KER .DAGEN. ANTW| 000003F0: 4F 4F 52 44 54 2C 20 5A 41 4C 00 24 0C 86 01 99 |OORDT, ZAL.$....| 00000400: 22 44 45 20 43 4F 4D 50 55 54 45 52 20 4F 56 45 |"DE COMPUTER OVE| 00000410: 52 20 44 45 20 52 45 47 45 4C 53 20 31 34 20 45 |R DE REGELS 14 E| 00000420: 4E 20 31 36 00 39 0C 90 01 99 22 48 45 45 4E 20 |N 16.9...."HEEN | 00000430: 53 50 52 49 4E 47 45 4E 2E 00 66 0C 9A 01 99 22 |SPRINGEN..f...."| 00000440: 11 41 4C 53 20 44 45 20 47 45 42 52 55 49 4B 45 |.ALS DE GEBRUIKE| 00000450: 52 20 12 4D 41 41 4E 44 45 4E 92 20 41 4E 54 57 |R .MAANDEN. ANTW| 00000460: 4F 4F 52 44 54 2C 00 92 0C A4 01 99 22 57 4F 52 |OORDT,......"WOR| 00000470: 44 54 20 52 45 47 45 4C 20 31 34 20 55 49 54 47 |DT REGEL 14 UITG| 00000480: 45 56 4F 45 52 44 20 45 4E 20 52 45 47 45 4C 20 |EVOERD EN REGEL | 00000490: 31 36 00 BC 0C AE 01 99 22 4C 41 41 54 20 44 45 |16......"LAAT DE| 000004A0: 20 43 4F 4D 50 55 54 45 52 20 4F 56 45 52 20 52 | COMPUTER OVER R| 000004B0: 45 47 45 4C 20 31 38 20 48 45 45 4E 00 CC 0C B8 |EGEL 18 HEEN....| 000004C0: 01 99 22 53 50 52 49 4E 47 45 4E 2E 00 F6 0C C2 |.."SPRINGEN.....| 000004D0: 01 99 22 11 4D 45 52 4B 20 4F 50 20 44 41 54 20 |..".MERK OP DAT | 000004E0: 44 45 20 12 45 4E 44 92 20 49 4E 53 54 52 55 4B |DE .END. INSTRUK| 000004F0: 54 49 45 20 49 4E 00 1F 0D CC 01 99 22 41 4C 4C |TIE IN......"ALL| 00000500: 45 42 45 49 20 44 45 20 47 45 56 41 4C 4C 45 4E |EBEI DE GEVALLEN| 00000510: 20 47 45 42 52 55 49 4B 54 20 57 4F 52 44 54 00 | GEBRUIKT WORDT.| 00000520: 46 0D D6 01 99 22 4F 4D 20 48 45 54 20 50 52 4F |F...."OM HET PRO| 00000530: 47 52 41 4D 4D 41 20 54 45 20 42 45 45 49 4E 44 |GRAMMA TE BEEIND| 00000540: 49 47 45 4E 2E 91 00 4F 0D E0 01 8D 31 37 30 00 |IGEN...O....170.| 00000550: 7C 0D EA 01 99 22 93 11 41 4C 53 20 44 45 20 47 ||...."..ALS DE G| 00000560: 45 42 52 55 49 4B 45 52 20 44 45 20 57 41 41 52 |EBRUIKER DE WAAR| 00000570: 44 45 20 32 35 20 56 4F 4F 52 20 58 00 A4 0D F4 |DE 25 VOOR X....| 00000580: 01 99 22 49 4E 54 59 50 54 20 49 4E 20 48 45 54 |.."INTYPT IN HET| 00000590: 20 56 4F 4C 47 45 4E 44 45 20 50 52 4F 47 52 41 | VOLGENDE PROGRA| 000005A0: 4D 4D 41 3A 00 B7 0D FE 01 99 22 11 1D 20 35 20 |MMA:......".. 5 | 000005B0: 49 4E 50 55 54 20 58 00 D2 0D 08 02 99 22 1D 31 |INPUT X......".1| 000005C0: 30 20 49 46 20 58 3E 3D 35 30 20 54 48 45 4E 20 |0 IF X>=50 THEN | 000005D0: 35 30 00 E4 0D 12 02 99 22 1D 32 30 20 47 4F 54 |50......".20 GOT| 000005E0: 4F 20 34 30 00 0D 0E 1C 02 99 22 1D 33 30 20 50 |O 40......".30 P| 000005F0: 52 49 4E 54 20 22 5A 24 22 44 45 20 57 41 41 52 |RINT "Z$"DE WAAR| 00000600: 44 45 20 49 53 22 5A 24 22 58 2A 31 30 00 1F 0E |DE IS"Z$"X*10...| 00000610: 26 02 99 22 1D 34 30 20 47 4F 54 4F 20 36 30 00 |&..".40 GOTO 60.| 00000620: 45 0E 30 02 99 22 1D 35 30 20 50 52 49 4E 54 20 |E.0..".50 PRINT | 00000630: 22 5A 24 22 44 45 20 57 41 41 52 44 45 20 49 53 |"Z$"DE WAARDE IS| 00000640: 22 5A 24 22 58 00 68 0E 3A 02 99 22 11 57 41 54 |"Z$"X.h.:..".WAT| 00000650: 20 57 4F 52 44 54 20 45 52 20 44 41 4E 20 41 46 | WORDT ER DAN AF| 00000660: 47 45 44 52 55 4B 54 3A 00 78 0E 44 02 99 22 11 |GEDRUKT:.x.D..".| 00000670: 12 31 2E 92 20 32 35 30 00 86 0E 4E 02 99 22 12 |.1.. 250...N..".| 00000680: 32 2E 92 20 32 35 00 AB 0E 58 02 99 22 12 33 2E |2.. 25...X..".3.| 00000690: 92 20 45 52 20 57 4F 52 44 54 20 4E 49 45 54 53 |. ER WORDT NIETS| 000006A0: 20 41 46 47 45 44 52 55 4B 54 11 00 BF 0E 62 02 | AFGEDRUKT....b.| 000006B0: 99 22 28 31 2C 32 20 4F 46 20 33 29 20 22 3B 00 |."(1,2 OF 3) ";.| 000006C0: E9 0E 6C 02 85 41 24 3A 8B 41 24 B3 B1 22 31 22 |..l..A$:.A$.."1"| 000006D0: AF 41 24 B3 B1 22 32 22 AF 41 24 B3 B1 22 33 22 |.A$.."2".A$.."3"| 000006E0: A7 99 51 24 3A 89 36 31 30 00 F9 0E 76 02 8B 41 |..Q$:.610...v..A| 000006F0: 24 B2 22 33 22 89 36 38 30 00 23 0F 80 02 99 22 |$."3".680.#...."| 00000700: 11 4E 45 45 2C 20 4F 4D 44 41 54 20 44 45 20 43 |.NEE, OMDAT DE C| 00000710: 4F 4E 44 49 54 49 45 20 49 4E 20 52 45 47 45 4C |ONDITIE IN REGEL| 00000720: 20 31 30 00 50 0F 8A 02 99 22 4F 4E 57 41 41 52 | 10.P...."ONWAAR| 00000730: 20 49 53 20 41 4C 53 20 58 20 32 35 20 49 53 2C | IS ALS X 25 IS,| 00000740: 20 5A 41 4C 20 44 45 20 43 4F 4D 50 55 54 45 52 | ZAL DE COMPUTER| 00000750: 00 71 0F 94 02 99 22 56 45 52 44 45 52 20 47 41 |.q...."VERDER GA| 00000760: 41 4E 20 4E 41 41 52 20 52 45 47 45 4C 20 32 30 |AN NAAR REGEL 20| 00000770: 2E 00 9A 0F 9E 02 99 22 11 50 52 4F 42 45 45 52 |.......".PROBEER| 00000780: 20 48 45 54 20 4E 4F 47 20 45 45 4E 53 21 91 22 | HET NOG EENS!."| 00000790: 3A 8D 31 37 30 3A 89 34 39 30 00 C6 0F A8 02 99 |:.170:.490......| 000007A0: 22 11 11 44 41 54 20 4B 4C 4F 50 54 21 20 45 52 |"..DAT KLOPT! ER| 000007B0: 20 57 4F 52 44 54 20 4E 49 45 54 53 20 41 46 47 | WORDT NIETS AFG| 000007C0: 45 44 52 55 4B 54 00 F2 0F B2 02 99 22 41 4C 53 |EDRUKT......"ALS| 000007D0: 20 58 20 32 35 20 49 53 2C 20 4F 4D 44 41 54 20 | X 25 IS, OMDAT | 000007E0: 44 45 20 52 45 47 45 4C 53 20 32 30 20 45 4E 20 |DE REGELS 20 EN | 000007F0: 34 30 00 1E 10 BC 02 99 22 44 45 20 43 4F 4D 50 |40......"DE COMP| 00000800: 55 54 45 52 20 4F 56 45 52 20 44 45 20 50 52 49 |UTER OVER DE PRI| 00000810: 4E 54 20 49 4E 53 54 52 55 4B 54 49 45 53 00 3F |NT INSTRUKTIES.?| 00000820: 10 C6 02 99 22 48 45 45 4E 20 4C 41 54 45 4E 20 |...."HEEN LATEN | 00000830: 53 50 52 49 4E 47 45 4E 2E 22 3A 8D 31 37 30 00 |SPRINGEN.":.170.| 00000840: 5D 10 D0 02 99 22 93 11 22 A3 31 30 29 22 48 55 |]...."..".10)"HU| 00000850: 49 53 57 45 52 4B 20 4F 50 47 41 56 45 00 86 10 |ISWERK OPGAVE...| 00000860: DA 02 99 22 11 56 4F 4F 52 44 41 54 20 57 45 20 |...".VOORDAT WE | 00000870: 56 45 52 44 45 52 20 47 41 41 4E 20 4D 45 54 20 |VERDER GAAN MET | 00000880: 4C 45 53 20 36 2C 00 B2 10 E4 02 99 22 53 43 48 |LES 6,......"SCH| 00000890: 52 49 4A 56 45 4E 20 45 4E 20 52 55 4E 4E 45 4E |RIJVEN EN RUNNEN| 000008A0: 20 57 45 20 45 45 4E 20 50 52 4F 47 52 41 4D 4D | WE EEN PROGRAMM| 000008B0: 41 2C 00 BD 10 EE 02 99 22 44 41 54 3A 00 EC 10 |A,......"DAT:...| 000008C0: F8 02 99 22 11 48 45 54 20 53 41 4C 41 52 49 53 |...".HET SALARIS| 000008D0: 20 56 41 4E 20 45 45 4E 20 41 52 42 45 49 44 45 | VAN EEN ARBEIDE| 000008E0: 52 20 55 49 54 52 45 4B 45 4E 54 2C 00 1A 11 02 |R UITREKENT,....| 000008F0: 03 99 22 41 4C 53 20 48 45 54 20 41 41 4E 54 41 |.."ALS HET AANTA| 00000900: 4C 20 57 45 52 4B 55 52 45 4E 20 49 4E 47 45 54 |L WERKUREN INGET| 00000910: 59 50 54 20 57 4F 52 44 54 2E 00 48 11 0C 03 99 |YPT WORDT..H....| 00000920: 22 11 48 49 4A 20 56 45 52 44 49 45 4E 54 20 46 |".HIJ VERDIENT F| 00000930: 20 31 32 2E 35 30 20 50 45 52 20 55 55 52 20 45 | 12.50 PER UUR E| 00000940: 4E 20 4B 52 49 4A 47 54 00 73 11 16 03 99 22 56 |N KRIJGT.s...."V| 00000950: 4F 4F 52 20 49 45 44 45 52 20 55 55 52 20 4D 45 |OOR IEDER UUR ME| 00000960: 45 52 20 44 41 4E 20 34 30 20 41 4E 44 45 52 48 |ER DAN 40 ANDERH| 00000970: 41 4C 46 00 91 11 20 03 99 22 55 55 52 20 53 41 |ALF... .."UUR SA| 00000980: 4C 41 52 49 53 20 55 49 54 42 45 54 41 41 4C 44 |LARIS UITBETAALD| 00000990: 2E 00 C1 11 2A 03 99 22 11 12 20 20 20 20 20 20 |....*..".. | 000009A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009C0: 22 00 F0 11 34 03 99 22 12 20 48 45 54 20 49 53 |"...4..". HET IS| 000009D0: 20 45 45 4E 20 47 4F 45 44 20 49 44 45 45 20 4F | EEN GOED IDEE O| 000009E0: 4D 20 44 49 54 20 4F 56 45 52 20 54 45 20 20 22 |M DIT OVER TE "| 000009F0: 00 1F 12 3E 03 99 22 12 20 54 45 20 53 43 48 52 |...>..". TE SCHR| 00000A00: 49 4A 56 45 4E 2C 20 56 4F 4F 52 44 41 54 20 55 |IJVEN, VOORDAT U| 00000A10: 20 4F 50 20 53 50 41 43 45 20 44 55 57 54 22 00 | OP SPACE DUWT".| 00000A20: 4E 12 48 03 99 22 12 20 20 20 20 20 20 20 20 20 |N.H..". | 00000A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 57 | ".W| 00000A50: 12 52 03 8D 31 37 30 00 67 12 5C 03 43 24 B2 22 |.R..170.g.\.C$."| 00000A60: A6 22 3A 8D 31 34 30 00 8B 12 66 03 99 22 13 11 |.":.140...f.."..| 00000A70: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 45 49 4E 44 |............EIND| 00000A80: 45 20 56 41 4E 20 4C 45 53 20 35 00 B4 12 70 03 |E VAN LES 5...p.| 00000A90: 99 22 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 4D 41 41 |."...........MAA| 00000AA0: 4B 20 45 45 52 53 54 20 55 57 20 48 55 49 53 57 |K EERST UW HUISW| 00000AB0: 45 52 4B 22 00 BA 12 7A 03 80 00 00 00 |ERK"...z..... |
....... +++ 5.3 +++.%.D.A.198:.G(142).9.
N..53281,5:.646,0.K.X.Q$.".
.".}...Z$.G(34)
:.180......".";:.I.1.39:.C$;:.:.I.1.22:.
".."C$;:.:.".";.L....I.1.38:."."C$".";:.
:.C$... ..I.1.23:."."C$".";:.:.......A,0
:.A,255:.A,0:......."..".15)"GOTO.?...."
.HET GOTO COMMANDO WORDT GEBRUIKT ALS U.
J.H.."DE COMPUTER WILT LATEN SPRINGEN NA
AR...R.."EEN ANDERE REGEL DAN DE VOLGEND
E AAN DE.C...."BEURT ZIJNDE REGEL IN HET
PROGRAMMA.......".HET IS MOGELIJK OM VO
ORUIT OF ACHTERUIT......"TE SPRINGEN IN
EEN PROGRAMMA..A....".BEKIJK HET VOLGEND
E VOORBEELD EENS:.J....170.O....".6 PRIN
T"Z$"TYP UW LEEFTIJD"Z$....."7 INPUT L.
..".."8 PRINT"Z$"LEEFTIJD IN DAGEN OF MA
ANDEN"Z$.B.,.."10 INPUT B$...6.."12 IF B
$="Z$"DAGEN"Z$" THEN 18...@.."14 PRINT"Z
$"UW LEEFTIJD IS"Z$"12*L"Z$"MAANDEN"Z$./
.J.."16 GOTO 20.E.T.."18 PRINT"Z$"UW LEE
FTIJD IS"Z$"365*L"Z$"DAGEN"Z$.R.^.."20 E
ND...H..".DIT PROGRAMMA LAAT DE GEBRUIKE
R DAGEN.K.R.."OF MAANDEN KIEZEN, MAAR NI
ET ALLEBEI....|..".ALS DE GEBRUIKER .DAG
EN. ANTWOORDT, ZAL.$...."DE COMPUTER OVE
R DE REGELS 14 EN 16.9...."HEEN SPRINGEN
..F....".ALS DE GEBRUIKER .MAANDEN. ANTW
OORDT,......"WORDT REGEL 14 UITGEVOERD E
N REGEL 16......"LAAT DE COMPUTER OVER R
EGEL 18 HEEN.L...."SPRINGEN....B..".MERK
OP DAT DE .END. INSTRUKTIE IN...L.."ALL
EBEI DE GEVALLEN GEBRUIKT WORDT.F.V.."OM
HET PROGRAMMA TE BEEINDIGEN...O....170.
|...."..ALS DE GEBRUIKER DE WAARDE 25 VO
OR X......"INTYPT IN HET VOLGENDE PROGRA
MMA:......".. 5 INPUT X.R....".10 IF X>=
50 THEN 50......".20 GOTO 40......".30 P
RINT "Z$"DE WAARDE IS"Z$"X*10...&..".40
GOTO 60.E.0..".50 PRINT "Z$"DE WAARDE IS
"Z$"X.H.:..".WAT WORDT ER DAN AFGEDRUKT:
.X.D.."..1.. 250...N..".2.. 25...X..".3.
. ER WORDT NIETS AFGEDRUKT....B.."(1,2 O
F 3) ";...L..A$:.A$.."1".A$.."2".A$.."3"
..Q$:.610...V..A$."3".680.#....".NEE, OM
DAT DE CONDITIE IN REGEL 10.P...."ONWAAR
IS ALS X 25 IS, ZAL DE COMPUTER.Q...."V
ERDER GAAN NAAR REGEL 20.......".PROBEER
HET NOG EENS!.":.170:.490.F...."..DAT K
LOPT! ER WORDT NIETS AFGEDRUKT......"ALS
X 25 IS, OMDAT DE REGELS 20 EN 40......
"DE COMPUTER OVER DE PRINT INSTRUKTIES.?
.F.."HEEN LATEN SPRINGEN.":.170.].P.."..
".10)"HUISWERK OPGAVE...Z..".VOORDAT WE
VERDER GAAN MET LES 6,......"SCHRIJVEN E
N RUNNEN WE EEN PROGRAMMA,......"DAT:...
...".HET SALARIS VAN EEN ARBEIDER UITREK
ENT,......"ALS HET AANTAL WERKUREN INGET
YPT WORDT..H....".HIJ VERDIENT F 12.50 P
ER UUR EN KRIJGT.S...."VOOR IEDER UUR ME
ER DAN 40 ANDERHALF... .."UUR SALARIS UI
TBETAALD..A.*.."..
"...4..". HET IS EEN GOE
D IDEE OM DIT OVER TE "...>..". TE SCHR
IJVEN, VOORDAT U OP SPACE DUWT".N.H..".
".W
.R..170.G.\.C$.".":.140...F.."..........
....EINDE VAN LES 5...P.."...........MAA
K EERST UW HUISWERK"...Z.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL