BL 7.1
FILE INFORMATION
FILENAME(S): BL 7.1
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 21:05:49
APPEARS ON: 1 disk(s)
FILE HASH
ad5c8cf678f47d20e24e1a5de028030d513800a8fc0698bd81a54952a522c64f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LESSEN | BL 7.1 | PRG | DuncanTwain | 5 | 7 | 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 37 2E 31 20 |....... +++ 7.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 39 08 6E 00 97 35 33 32 38 31 |(142).9.n..53281|
00000030: 2C 37 3A 97 36 34 36 2C 32 00 5E 08 78 00 51 24 |,7:.646,2.^.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 91 91 91 22 3A 89 32 32 30 00 8F | ...":.220..|
00000060: 08 82 00 99 22 93 22 3A 81 49 B2 31 A4 33 39 3A |....".":.I.1.39:|
00000070: 99 43 24 3B 3A 82 3A 81 49 B2 31 A4 32 32 3A 99 |.C$;:.:.I.1.22:.|
00000080: 22 9D 11 22 43 24 3B 3A 82 3A 99 22 9D 22 3B 00 |".."C$;:.:.".";.|
00000090: AC 08 8C 00 81 49 B2 31 A4 33 38 3A 99 22 9D 22 |.....I.1.38:."."|
000000A0: 43 24 22 9D 22 3B 3A 82 3A 99 43 24 00 C7 08 96 |C$".";:.:.C$....|
000000B0: 00 81 49 B2 31 A4 32 33 3A 99 22 91 22 43 24 22 |..I.1.23:."."C$"|
000000C0: 9D 22 3B 3A 82 3A 8E 00 DC 08 A0 00 97 41 2C 30 |.";:.:.......A,0|
000000D0: 3A 92 41 2C 32 35 35 3A 97 41 2C 30 00 E4 08 AA |:.A,255:.A,0....|
000000E0: 00 99 3A 8E 00 07 09 B4 00 99 22 13 22 3A 81 49 |..:.......".":.I|
000000F0: B2 30 A4 59 AB 31 3A 99 22 11 22 3B 3A 82 3A 99 |.0.Y.1:.".";:.:.|
00000100: 22 91 91 22 3B 3A 8E 00 40 09 BE 00 81 4A B2 31 |"..";:..@....J.1|
00000110: A4 31 35 3A 99 22 3E 22 3B 3A 81 49 B2 31 A4 34 |.15:.">";:.I.1.4|
00000120: 30 3A 82 3A 99 22 9D 12 3E 92 9D 22 3B 3A 81 4B |0:.:."..>..";:.K|
00000130: B2 31 A4 32 30 3A 82 3A 82 3A 99 22 20 22 3A 8E |.1.20:.:.:." ":.|
00000140: 00 84 09 C8 00 59 B2 59 31 3A 8D 31 38 30 3A 81 |.....Y.Y1:.180:.|
00000150: 49 B2 30 A4 59 32 AB 59 31 3A 99 22 20 20 20 20 |I.0.Y2.Y1:." |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000180: 20 20 20 22 00 91 09 D2 00 82 3A 8D 31 38 30 3A | "......:.180:|
00000190: 8E 00 AA 09 DC 00 5A 24 B2 C7 28 33 34 29 3A 43 |......Z$..(34):C|
000001A0: 24 B2 22 A6 22 3A 8D 31 33 30 00 C3 09 E6 00 99 |$.".":.130......|
000001B0: 22 13 11 11 11 11 11 11 22 A3 31 33 29 22 4C 45 |".......".13)"LE|
000001C0: 53 20 37 00 DB 09 F0 00 99 22 11 11 22 A3 31 30 |S 7......"..".10|
000001D0: 29 22 31 2E 20 4C 55 53 53 45 4E 00 FC 09 FA 00 |)"1. LUSSEN.....|
000001E0: 99 A3 31 30 29 22 32 2E 20 46 4F 52 2F 4E 45 58 |..10)"2. FOR/NEX|
000001F0: 54 20 49 4E 53 54 52 55 4B 54 49 45 00 18 0A 04 |T INSTRUKTIE....|
00000200: 01 99 A3 31 30 29 22 33 2E 20 52 45 4D 20 49 4E |...10)"3. REM IN|
00000210: 53 54 52 55 4B 54 49 45 00 35 0A 0E 01 99 A3 31 |STRUKTIE.5.....1|
00000220: 30 29 22 34 2E 20 48 55 49 53 57 45 52 4B 20 4F |0)"4. HUISWERK O|
00000230: 50 47 41 56 45 00 3E 0A 18 01 8D 31 36 30 00 53 |PGAVE.>....160.S|
00000240: 0A 22 01 99 22 93 11 22 A3 31 30 29 22 4C 55 53 |.".."..".10)"LUS|
00000250: 53 45 4E 00 7C 0A 2C 01 99 22 11 45 45 4E 20 4B |SEN.|.,..".EEN K|
00000260: 52 41 43 48 54 49 47 20 4F 4E 44 45 52 44 45 45 |RACHTIG ONDERDEE|
00000270: 4C 20 56 41 4E 20 49 45 44 45 52 45 00 A3 0A 36 |L VAN IEDERE...6|
00000280: 01 99 22 43 4F 4D 50 55 54 45 52 20 49 53 20 5A |.."COMPUTER IS Z|
00000290: 49 4A 4E 20 4D 4F 47 45 4C 49 4A 4B 48 45 49 44 |IJN MOGELIJKHEID|
000002A0: 20 4F 4D 00 CB 0A 40 01 99 22 48 45 52 48 41 41 | OM...@.."HERHAA|
000002B0: 4C 44 45 20 44 41 54 41 20 4F 50 44 52 41 43 48 |LDE DATA OPDRACH|
000002C0: 54 45 4E 20 53 4E 45 4C 20 45 4E 00 F2 0A 4A 01 |TEN SNEL EN...J.|
000002D0: 99 22 47 45 4D 41 4B 4B 45 4C 49 4A 4B 20 55 49 |."GEMAKKELIJK UI|
000002E0: 54 20 54 45 20 56 4F 45 52 45 4E 2E 22 3A 8D 31 |T TE VOEREN.":.1|
000002F0: 36 30 00 18 0B 54 01 99 22 93 45 45 4E 20 50 52 |60...T..".EEN PR|
00000300: 4F 47 52 41 4D 4D 41 20 4F 4D 20 56 45 52 53 43 |OGRAMMA OM VERSC|
00000310: 48 49 4C 4C 45 4E 44 45 00 3F 0B 5E 01 99 22 53 |HILLENDE.?.^.."S|
00000320: 41 4C 41 52 49 53 53 45 4E 20 54 45 20 42 45 52 |ALARISSEN TE BER|
00000330: 45 4B 45 4E 45 4E 20 4C 41 41 54 20 48 45 54 00 |EKENEN LAAT HET.|
00000340: 5E 0B 68 01 99 22 47 45 42 52 55 49 4B 20 56 41 |^.h.."GEBRUIK VA|
00000350: 4E 20 4C 55 53 53 45 4E 20 5A 49 45 4E 3A 00 9B |N LUSSEN ZIEN:..|
00000360: 0B 72 01 99 22 11 20 39 35 20 20 52 45 41 44 20 |.r..". 95 READ |
00000370: 4E 24 2C 52 2C 48 22 3A 99 22 20 31 30 30 20 49 |N$,R,H":." 100 I|
00000380: 46 20 4E 24 3D 22 5A 24 22 45 49 4E 44 45 22 5A |F N$="Z$"EINDE"Z|
00000390: 24 22 20 54 48 45 4E 20 37 35 35 00 E3 0B 7C 01 |$" THEN 755...|.|
000003A0: 99 22 1D 31 31 30 20 50 52 49 4E 54 20 22 5A 24 |.".110 PRINT "Z$|
000003B0: 22 53 41 4C 41 52 49 53 20 56 4F 4F 52 20 22 5A |"SALARIS VOOR "Z|
000003C0: 24 22 4E 24 22 5A 24 22 20 49 53 20 22 5A 24 22 |$"N$"Z$" IS "Z$"|
000003D0: 52 2A 48 22 3A 99 22 20 31 31 35 20 47 4F 54 4F |R*H":." 115 GOTO|
000003E0: 20 39 35 00 2A 0C 86 01 99 22 20 31 32 30 20 44 | 95.*...." 120 D|
000003F0: 41 54 41 20 22 5A 24 22 42 4F 42 20 53 4D 49 54 |ATA "Z$"BOB SMIT|
00000400: 22 5A 24 22 2C 20 33 2E 35 30 2C 20 34 30 22 3A |"Z$", 3.50, 40":|
00000410: 99 22 20 31 32 35 20 44 41 54 41 20 22 5A 24 22 |." 125 DATA "Z$"|
00000420: 4A 4F 20 42 4F 4B 22 5A 24 3B 00 67 0C 90 01 99 |JO BOK"Z$;.g....|
00000430: 22 20 2C 20 33 2E 37 35 2C 20 32 30 22 3A 99 22 |" , 3.75, 20":."|
00000440: 20 31 33 30 20 44 41 54 41 20 22 5A 24 22 4A 41 | 130 DATA "Z$"JA|
00000450: 4E 45 54 20 56 52 49 45 53 22 5A 24 22 2C 20 34 |NET VRIES"Z$", 4|
00000460: 2E 30 30 2C 20 33 38 00 B0 0C 9A 01 99 22 20 31 |.00, 38......" 1|
00000470: 34 30 20 44 41 54 41 20 22 5A 24 22 4A 41 4E 20 |40 DATA "Z$"JAN |
00000480: 44 4F 45 22 5A 24 22 2C 20 34 2E 31 30 2C 20 34 |DOE"Z$", 4.10, 4|
00000490: 30 22 3A 99 22 20 31 39 39 20 44 41 54 41 20 22 |0":." 199 DATA "|
000004A0: 5A 24 22 45 49 4E 44 45 22 5A 24 22 2C 30 2C 30 |Z$"EINDE"Z$",0,0|
000004B0: 00 EF 0C A4 01 99 22 20 37 35 35 20 45 4E 44 22 |......" 755 END"|
000004C0: 3A 8D 31 36 30 3A 99 22 44 49 54 20 50 52 4F 47 |:.160:."DIT PROG|
000004D0: 52 41 4D 4D 41 20 5A 41 4C 20 44 45 20 49 4E 53 |RAMMA ZAL DE INS|
000004E0: 54 52 55 4B 54 49 45 53 20 39 35 20 54 4F 54 00 |TRUKTIES 95 TOT.|
000004F0: 27 0D AE 01 99 22 31 31 35 20 48 45 52 48 41 4C |'...."115 HERHAL|
00000500: 45 4E 2C 20 22 3A 8D 31 36 30 3A 81 59 B2 35 A4 |EN, ":.160:.Y.5.|
00000510: 38 3A 8D 31 38 30 3A 8D 31 39 30 3A 82 3A 59 B2 |8:.180:.190:.:Y.|
00000520: 31 36 3A 8D 31 38 30 00 4E 0D B8 01 8D 31 36 30 |16:.180.N....160|
00000530: 3A 99 A3 31 35 29 22 54 4F 54 44 41 54 20 44 45 |:..15)"TOTDAT DE|
00000540: 20 12 45 49 4E 44 45 92 20 45 4E 20 44 45 00 7B | .EINDE. EN DE.{|
00000550: 0D C2 01 99 22 12 30 92 20 57 41 41 52 44 45 4E |....".0. WAARDEN|
00000560: 20 49 4E 20 52 45 47 45 4C 20 31 39 39 20 47 45 | IN REGEL 199 GE|
00000570: 4C 45 5A 45 4E 20 5A 49 4A 4E 2E 00 A2 0D CC 01 |LEZEN ZIJN......|
00000580: 8D 31 36 30 3A 59 B2 31 33 3A 8D 31 38 30 3A 8D |.160:Y.13:.180:.|
00000590: 31 39 30 3A 8D 31 36 30 3A 59 B2 32 30 3A 8D 31 |190:.160:Y.20:.1|
000005A0: 38 30 00 CC 0D D6 01 99 22 44 45 20 4C 55 53 20 |80......"DE LUS |
000005B0: 57 4F 52 44 54 20 47 45 4D 41 41 4B 54 20 44 4F |WORDT GEMAAKT DO|
000005C0: 4F 52 20 44 45 20 12 47 4F 54 4F 92 00 04 0E E0 |OR DE .GOTO.....|
000005D0: 01 99 22 49 4E 53 54 52 55 4B 54 49 45 20 49 4E |.."INSTRUKTIE IN|
000005E0: 20 52 45 47 45 4C 20 31 31 35 2E 22 3A 8D 31 36 | REGEL 115.":.16|
000005F0: 30 3A 59 B2 38 3A 8D 31 38 30 3A 8D 31 39 30 3A |0:Y.8:.180:.190:|
00000600: 8D 31 36 30 00 23 0E EA 01 59 31 B2 31 36 3A 59 |.160.#...Y1.16:Y|
00000610: 32 B2 32 32 3A 8D 32 30 30 3A 59 B2 31 36 3A 8D |2.22:.200:Y.16:.|
00000620: 31 38 30 00 4E 0E F4 01 99 22 44 45 20 49 46 20 |180.N...."DE IF |
00000630: 49 4E 53 54 52 55 4B 54 49 45 20 49 4E 20 52 45 |INSTRUKTIE IN RE|
00000640: 47 45 4C 20 31 30 30 20 5A 41 4C 20 44 45 00 79 |GEL 100 ZAL DE.y|
00000650: 0E FE 01 99 22 4C 55 53 20 42 45 45 49 4E 44 49 |...."LUS BEEINDI|
00000660: 47 45 4E 20 41 4C 53 20 44 45 20 53 54 52 49 4E |GEN ALS DE STRIN|
00000670: 47 20 12 45 49 4E 44 45 92 00 B1 0E 08 02 99 22 |G .EINDE......."|
00000680: 47 45 4C 45 5A 45 4E 20 57 4F 52 44 54 2E 22 3A |GELEZEN WORDT.":|
00000690: 8D 31 36 30 3A 59 B2 36 3A 8D 31 38 30 3A 8D 31 |.160:Y.6:.180:.1|
000006A0: 39 30 3A 8D 31 36 30 3A 59 B2 32 30 3A 8D 31 38 |90:.160:Y.20:.18|
000006B0: 30 00 DE 0E 12 02 99 22 44 45 20 57 45 52 4B 45 |0......"DE WERKE|
000006C0: 4C 49 4A 4B 45 20 57 41 41 52 44 45 20 56 41 4E |LIJKE WAARDE VAN|
000006D0: 20 44 45 20 4C 55 53 20 49 4E 20 44 49 54 00 09 | DE LUS IN DIT..|
000006E0: 0F 1C 02 99 22 50 52 4F 47 52 41 4D 4D 41 20 57 |...."PROGRAMMA W|
000006F0: 4F 52 44 54 20 50 41 53 20 44 55 49 44 45 4C 49 |ORDT PAS DUIDELI|
00000700: 4A 4B 20 41 4C 53 20 45 52 00 3B 0F 26 02 99 22 |JK ALS ER.;.&.."|
00000710: 56 45 45 4C 20 57 45 52 4B 4E 45 4D 45 52 53 20 |VEEL WERKNEMERS |
00000720: 5A 49 4A 4E 2E 22 3A 8D 31 36 30 3A 59 32 B2 32 |ZIJN.":.160:Y2.2|
00000730: 34 3A 8D 32 30 30 3A 8D 31 38 30 00 66 0F 30 02 |4:.200:.180.f.0.|
00000740: 99 22 44 45 20 45 4E 49 47 45 20 56 45 52 41 4E |."DE ENIGE VERAN|
00000750: 44 45 52 49 4E 47 20 44 49 45 20 4E 4F 44 49 47 |DERING DIE NODIG|
00000760: 20 49 53 20 4F 4D 00 92 0F 3A 02 99 22 4D 45 45 | IS OM...:.."MEE|
00000770: 52 20 57 45 52 4B 4E 45 4D 45 52 53 20 54 4F 45 |R WERKNEMERS TOE|
00000780: 20 54 45 20 56 4F 45 47 45 4E 2C 20 49 53 20 48 | TE VOEGEN, IS H|
00000790: 45 54 00 BC 0F 44 02 99 22 54 4F 45 56 4F 45 47 |ET...D.."TOEVOEG|
000007A0: 45 4E 20 56 41 4E 20 4D 45 45 52 20 44 41 54 41 |EN VAN MEER DATA|
000007B0: 20 49 4E 53 54 52 55 4B 54 49 45 53 00 E5 0F 4E | INSTRUKTIES...N|
000007C0: 02 99 22 28 45 45 4E 20 56 4F 4F 52 20 49 45 44 |.."(EEN VOOR IED|
000007D0: 45 52 45 20 57 45 52 4B 4E 45 4D 45 52 29 2E 22 |ERE WERKNEMER)."|
000007E0: 3A 8D 31 36 30 00 0F 10 58 02 99 22 48 45 54 20 |:.160...X.."HET |
000007F0: 49 53 20 4F 4E 4E 4F 44 49 47 20 4F 4D 20 44 45 |IS ONNODIG OM DE|
00000800: 20 4C 4F 47 49 43 41 20 56 41 4E 20 48 45 54 00 | LOGICA VAN HET.|
00000810: 39 10 62 02 99 22 50 52 4F 47 52 41 4D 4D 41 20 |9.b.."PROGRAMMA |
00000820: 54 45 20 56 45 52 41 4E 44 45 52 45 4E 20 41 4C |TE VERANDEREN AL|
00000830: 53 20 45 52 20 4D 45 45 52 00 55 10 6C 02 99 22 |S ER MEER.U.l.."|
00000840: 44 41 54 41 20 42 49 4A 20 4B 4F 4D 54 2E 91 22 |DATA BIJ KOMT.."|
00000850: 3A 8D 31 36 30 00 7A 10 76 02 8D 32 30 30 3A 8D |:.160.z.v..200:.|
00000860: 31 38 30 3A 99 22 4B 57 49 53 20 54 49 4A 44 21 |180:."KWIS TIJD!|
00000870: 22 3A 8D 31 36 30 3A 43 B2 30 00 BE 10 80 02 99 |":.160:C.0......|
00000880: 22 48 4F 45 56 45 45 4C 20 4B 45 45 52 20 5A 41 |"HOEVEEL KEER ZA|
00000890: 4C 20 44 45 20 43 4F 4D 50 55 54 45 52 20 49 4E |L DE COMPUTER IN|
000008A0: 53 54 52 55 4B 54 49 45 22 3A 99 22 39 35 20 55 |STRUKTIE":."95 U|
000008B0: 49 54 56 4F 45 52 45 4E 3A 22 3A 59 B2 35 00 EB |ITVOEREN:":Y.5..|
000008C0: 10 8A 02 8D 31 38 30 3A 8D 31 39 30 3A 59 B2 31 |....180:.190:Y.1|
000008D0: 39 3A 8D 31 38 30 3A 99 22 11 28 31 2C 20 34 20 |9:.180:.".(1, 4 |
000008E0: 4F 46 20 35 29 22 3B 3A 85 41 24 00 11 11 94 02 |OF 5)";:.A$.....|
000008F0: 8B 41 24 B3 B1 22 31 22 AF 41 24 B3 B1 22 34 22 |.A$.."1".A$.."4"|
00000900: AF 41 24 B3 B1 22 35 22 A7 99 51 24 3A 89 36 34 |.A$.."5"..Q$:.64|
00000910: 30 00 34 11 9E 02 8D 32 30 30 3A 59 B2 31 36 3A |0.4....200:Y.16:|
00000920: 8D 31 38 30 3A 8B 41 24 B2 22 35 22 AF 43 B2 30 |.180:.A$."5".C.0|
00000930: A7 38 33 30 00 48 11 A8 02 8B 41 24 B2 22 35 22 |.830.H....A$."5"|
00000940: AF 43 B2 31 A7 38 34 30 00 58 11 B2 02 8B 41 24 |.C.1.840.X....A$|
00000950: B2 22 35 22 A7 38 35 30 00 68 11 BC 02 8B 41 24 |."5".850.h....A$|
00000960: B2 22 34 22 A7 37 38 30 00 99 11 C6 02 43 B2 43 |."4".780.....C.C|
00000970: AA 31 3A 99 22 44 45 4E 4B 20 45 52 41 41 4E 20 |.1:."DENK ERAAN |
00000980: 44 41 54 20 44 45 20 47 4F 54 4F 20 49 4E 53 54 |DAT DE GOTO INST|
00000990: 52 55 4B 54 49 45 20 44 45 00 CB 11 D0 02 99 22 |RUKTIE DE......"|
000009A0: 43 4F 4D 50 55 54 45 52 20 54 45 52 55 47 20 4C |COMPUTER TERUG L|
000009B0: 41 41 54 20 53 50 52 49 4E 47 45 4E 20 4E 41 41 |AAT SPRINGEN NAA|
000009C0: 52 20 39 35 2E 22 3A 8D 31 36 30 00 FF 11 DA 02 |R 95.":.160.....|
000009D0: 99 22 44 41 4E 20 57 4F 52 44 54 20 52 45 47 45 |."DAN WORDT REGE|
000009E0: 4C 20 39 35 20 44 55 53 20 57 45 45 52 20 55 49 |L 95 DUS WEER UI|
000009F0: 54 47 45 56 4F 45 52 44 2E 22 3A 8D 31 36 30 00 |TGEVOERD.":.160.|
00000A00: 23 12 E4 02 99 22 44 45 20 49 46 20 49 4E 53 54 |#...."DE IF INST|
00000A10: 52 55 4B 54 49 45 20 5A 41 4C 20 44 45 5A 45 20 |RUKTIE ZAL DEZE |
00000A20: 4C 55 53 00 4D 12 EE 02 99 22 44 4F 4F 52 42 52 |LUS.M...."DOORBR|
00000A30: 45 4B 45 4E 20 41 4C 53 20 12 45 49 4E 44 45 92 |EKEN ALS .EINDE.|
00000A40: 20 49 4E 20 52 45 47 45 4C 20 31 39 39 00 7D 12 | IN REGEL 199.}.|
00000A50: F8 02 99 22 47 45 4C 45 5A 45 4E 20 57 4F 52 44 |..."GELEZEN WORD|
00000A60: 54 2E 91 22 3A 59 B2 31 33 3A 8D 31 38 30 3A 8D |T..":Y.13:.180:.|
00000A70: 31 39 30 3A 8D 31 36 30 3A 8D 32 30 30 00 BD 12 |190:.160:.200...|
00000A80: 02 03 59 B2 31 36 3A 8D 31 38 30 3A 99 22 50 52 |..Y.16:.180:."PR|
00000A90: 4F 42 45 45 52 20 48 45 54 20 4E 4F 47 20 45 45 |OBEER HET NOG EE|
00000AA0: 4E 53 21 22 3A 8D 31 36 30 3A 8D 32 30 30 3A 59 |NS!":.160:.200:Y|
00000AB0: B2 31 38 3A 8D 31 38 30 3A 89 36 34 30 00 E0 12 |.18:.180:.640...|
00000AC0: 0C 03 99 22 4E 45 45 2C 20 34 20 4B 45 45 52 20 |..."NEE, 4 KEER |
00000AD0: 49 53 20 4E 49 45 54 20 43 4F 52 52 45 43 54 2E |IS NIET CORRECT.|
00000AE0: 00 0C 13 16 03 99 22 4D 45 52 4B 20 4F 50 20 44 |......"MERK OP D|
00000AF0: 41 54 20 52 45 47 45 4C 20 39 35 20 56 4F 4F 52 |AT REGEL 95 VOOR|
00000B00: 20 49 45 44 45 52 45 20 44 41 54 41 00 38 13 20 | IEDERE DATA.8. |
00000B10: 03 99 22 49 4E 53 54 52 55 4B 54 49 45 20 45 45 |.."INSTRUKTIE EE|
00000B20: 4E 20 4B 45 45 52 20 55 49 54 47 45 56 4F 45 52 |N KEER UITGEVOER|
00000B30: 44 20 57 4F 52 44 54 2C 00 79 13 2A 03 99 22 4D |D WORDT,.y.*.."M|
00000B40: 45 54 20 49 4E 42 45 47 52 49 50 20 56 41 4E 20 |ET INBEGRIP VAN |
00000B50: 52 45 47 45 4C 20 31 39 39 2E 22 3A 8D 31 36 30 |REGEL 199.":.160|
00000B60: 3A 99 22 50 52 4F 42 45 45 52 20 48 45 54 20 4E |:."PROBEER HET N|
00000B70: 4F 47 20 45 45 4E 53 21 22 00 9C 13 34 03 43 B2 |OG EENS!"...4.C.|
00000B80: 43 AA 31 3A 8D 31 36 30 3A 8D 32 30 30 3A 59 B2 |C.1:.160:.200:Y.|
00000B90: 31 38 3A 8D 31 38 30 3A 89 36 34 30 00 C3 13 3E |18:.180:.640...>|
00000BA0: 03 99 22 44 45 20 45 45 52 53 54 45 20 4B 45 45 |.."DE EERSTE KEE|
00000BB0: 52 20 47 4F 45 44 21 21 22 3A 8D 31 36 30 3A 89 |R GOED!!":.160:.|
00000BC0: 38 36 30 00 F7 13 48 03 99 22 44 45 20 54 57 45 |860...H.."DE TWE|
00000BD0: 45 44 45 20 4B 45 45 52 20 47 4F 45 44 20 2D 20 |EDE KEER GOED - |
00000BE0: 4E 49 45 54 20 53 4C 45 43 48 54 21 22 3A 8D 31 |NIET SLECHT!":.1|
00000BF0: 36 30 3A 89 38 36 30 00 08 14 52 03 99 22 44 41 |60:.860...R.."DA|
00000C00: 54 20 4B 4C 4F 50 54 2C 00 2F 14 5C 03 99 22 11 |T KLOPT,./.\..".|
00000C10: 44 45 20 52 45 41 44 20 49 4E 53 54 52 55 4B 54 |DE READ INSTRUKT|
00000C20: 49 45 20 57 4F 52 44 54 20 35 20 4B 45 45 52 00 |IE WORDT 5 KEER.|
00000C30: 5B 14 66 03 99 22 55 49 54 47 45 56 4F 45 52 44 |[.f.."UITGEVOERD|
00000C40: 2C 20 45 45 4E 20 4B 45 45 52 20 56 4F 4F 52 20 |, EEN KEER VOOR |
00000C50: 49 45 44 45 52 45 20 44 41 54 41 00 73 14 70 03 |IEDERE DATA.s.p.|
00000C60: 99 22 49 4E 53 54 52 55 4B 54 49 45 2E 22 3A 8D |."INSTRUKTIE.":.|
00000C70: 31 36 30 00 7C 14 7A 03 8D 31 36 30 00 8C 14 84 |160.|.z..160....|
00000C80: 03 43 24 B2 22 A6 22 3A 8D 31 33 30 00 B7 14 8E |.C$.".":.130....|
00000C90: 03 99 22 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |..".............|
00000CA0: 1D 45 49 4E 44 45 20 56 41 4E 20 4C 45 53 20 37 |.EINDE VAN LES 7|
00000CB0: 20 44 45 45 4C 20 31 00 DF 14 98 03 99 22 11 11 | DEEL 1......"..|
00000CC0: 11 11 1D 1D 1D 1D 1D 1D 1D 56 45 52 56 4F 4C 47 |.........VERVOLG|
00000CD0: 20 57 4F 52 44 54 20 47 45 4C 41 44 45 4E 22 00 | WORDT GELADEN".|
00000CE0: EE 14 A2 03 99 22 11 11 11 11 11 11 11 11 00 F4 |....."..........|
00000CF0: 14 AC 03 80 00 00 00 |....... |
....... +++ 7.1 +++.%.D.A.198:.G(142).9.
N..53281,7:.646,2.^.X.Q$.".
...":.220......".":.I.1.39:.C$;:.:.
I.1.22:.".."C$;:.:.".";......I.1.38:."."
C$".";:.:.C$.G....I.1.23:."."C$".";:.:..
.. ..A,0:.A,255:.A,0......:.......".":.I
.0.Y.1:.".";:.:."..";:..@....J.1.15:.">"
;:.I.1.40:.:."..>..";:.K.1.20:.:.:." ":.
...H.Y.Y1:.180:.I.0.Y2.Y1:."
"...R..:.180:
......Z$.G(34):C$.".":.130.C....".......
".13)"LES 7......"..".10)"1. LUSSEN.....
..10)"2. FOR/NEXT INSTRUKTIE.......10)"3
. REM INSTRUKTIE.5.....10)"4. HUISWERK O
PGAVE.>....160.S.".."..".10)"LUSSEN.|.,.
.".EEN KRACHTIG ONDERDEEL VAN IEDERE...6
.."COMPUTER IS ZIJN MOGELIJKHEID OM.K.@.
."HERHAALDE DATA OPDRACHTEN SNEL EN...J.
."GEMAKKELIJK UIT TE VOEREN.":.160...T..
".EEN PROGRAMMA OM VERSCHILLENDE.?.^.."S
ALARISSEN TE BEREKENEN LAAT HET.^.H.."GE
BRUIK VAN LUSSEN ZIEN:...R..". 95 READ
N$,R,H":." 100 IF N$="Z$"EINDE"Z$" THEN
755...|..".110 PRINT "Z$"SALARIS VOOR "Z
$"N$"Z$" IS "Z$"R*H":." 115 GOTO 95.*...
." 120 DATA "Z$"BOB SMIT"Z$", 3.50, 40":
." 125 DATA "Z$"JO BOK"Z$;.G...." , 3.75
, 20":." 130 DATA "Z$"JANET VRIES"Z$", 4
.00, 38......" 140 DATA "Z$"JAN DOE"Z$",
4.10, 40":." 199 DATA "Z$"EINDE"Z$",0,0
......" 755 END":.160:."DIT PROGRAMMA ZA
L DE INSTRUKTIES 95 TOT.'...."115 HERHAL
EN, ":.160:.Y.5.8:.180:.190:.:Y.16:.180.
N....160:..15)"TOTDAT DE .EINDE. EN DE.{
.B..".0. WAARDEN IN REGEL 199 GELEZEN ZI
JN....L..160:Y.13:.180:.190:.160:Y.20:.1
80.L.V.."DE LUS WORDT GEMAAKT DOOR DE .G
OTO......."INSTRUKTIE IN REGEL 115.":.16
0:Y.8:.180:.190:.160.#...Y1.16:Y2.22:.20
0:Y.16:.180.N...."DE IF INSTRUKTIE IN RE
GEL 100 ZAL DE.Y...."LUS BEEINDIGEN ALS
DE STRING .EINDE......."GELEZEN WORDT.":
.160:Y.6:.180:.190:.160:Y.20:.180......"
DE WERKELIJKE WAARDE VAN DE LUS IN DIT..
...."PROGRAMMA WORDT PAS DUIDELIJK ALS E
R.;.&.."VEEL WERKNEMERS ZIJN.":.160:Y2.2
4:.200:.180.F.0.."DE ENIGE VERANDERING D
IE NODIG IS OM...:.."MEER WERKNEMERS TOE
TE VOEGEN, IS HET...D.."TOEVOEGEN VAN M
EER DATA INSTRUKTIES...N.."(EEN VOOR IED
ERE WERKNEMER).":.160...X.."HET IS ONNOD
IG OM DE LOGICA VAN HET.9.B.."PROGRAMMA
TE VERANDEREN ALS ER MEER.U.L.."DATA BIJ
KOMT..":.160.Z.V..200:.180:."KWIS TIJD!
":.160:C.0......"HOEVEEL KEER ZAL DE COM
PUTER INSTRUKTIE":."95 UITVOEREN:":Y.5..
....180:.190:Y.19:.180:.".(1, 4 OF 5)";:
.A$......A$.."1".A$.."4".A$.."5"..Q$:.64
0.4....200:Y.16:.180:.A$."5".C.0.830.H..
..A$."5".C.1.840.X....A$."5".850.H....A$
."4".780...F.C.C.1:."DENK ERAAN DAT DE G
OTO INSTRUKTIE DE.K.P.."COMPUTER TERUG L
AAT SPRINGEN NAAR 95.":.160...Z.."DAN WO
RDT REGEL 95 DUS WEER UITGEVOERD.":.160.
#...."DE IF INSTRUKTIE ZAL DEZE LUS.M...
."DOORBREKEN ALS .EINDE. IN REGEL 199.}.
..."GELEZEN WORDT..":Y.13:.180:.190:.160
:.200.....Y.16:.180:."PROBEER HET NOG EE
NS!":.160:.200:Y.18:.180:.640......"NEE,
4 KEER IS NIET CORRECT......."MERK OP D
AT REGEL 95 VOOR IEDERE DATA.8. .."INSTR
UKTIE EEN KEER UITGEVOERD WORDT,.Y.*.."M
ET INBEGRIP VAN REGEL 199.":.160:."PROBE
ER HET NOG EENS!"...4.C.C.1:.160:.200:Y.
18:.180:.640.C.>.."DE EERSTE KEER GOED!!
":.160:.860...H.."DE TWEEDE KEER GOED -
NIET SLECHT!":.160:.860...R.."DAT KLOPT,
./.\..".DE READ INSTRUKTIE WORDT 5 KEER.
[.F.."UITGEVOERD, EEN KEER VOOR IEDERE D
ATA.S.P.."INSTRUKTIE.":.160.|.Z..160....
.C$.".":.130......"..............EINDE V
AN LES 7 DEEL 1......"...........VERVOLG
WORDT GELADEN"......".................
> CLICK IMAGE PREVIEW FOR FULL MODAL