BL 7.2
FILE INFORMATION
FILENAME(S): BL 7.2
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 21:05:49
APPEARS ON: 1 disk(s)
FILE HASH
65626c30891707f9753f4b9e6537ec81d97bccc32cfc7afe062e8b491d22e2ca
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LESSEN | BL 7.2 | PRG | DuncanTwain | 31 | 1 | 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 32 20 |....... +++ 7.2 | 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 38 3A 97 36 34 36 2C 39 00 4B 08 78 00 5A 24 |,8:.646,9.K.x.Z$| 00000040: B2 C7 28 33 34 29 3A 89 32 32 30 00 7D 08 82 00 |..(34):.220.}...| 00000050: 99 22 93 22 3B 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 CA 08 A0 00 97 41 2C 30 3A 92 |;:.:.......A,0:.| 000000C0: 41 2C 32 35 35 3A 97 41 2C 30 00 D2 08 AA 00 99 |A,255:.A,0......| 000000D0: 3A 8E 00 F5 08 B4 00 99 22 13 22 3A 81 49 B2 30 |:.......".":.I.0| 000000E0: A4 59 AB 31 3A 99 22 11 22 3B 3A 82 3A 99 22 91 |.Y.1:.".";:.:.".| 000000F0: 91 22 3B 3A 8E 00 2E 09 BE 00 81 4A B2 31 A4 31 |.";:.......J.1.1| 00000100: 35 3A 99 22 3E 22 3B 3A 81 49 B2 31 A4 34 30 3A |5:.">";:.I.1.40:| 00000110: 82 3A 99 22 9D 12 3E 92 9D 22 3B 3A 81 4B B2 31 |.:."..>..";:.K.1| 00000120: A4 32 30 3A 82 3A 82 3A 99 22 20 22 3A 8E 00 74 |.20:.:.:." ":..t| 00000130: 09 C8 00 59 B2 59 31 3A 8D 31 38 30 3A 81 49 B2 |...Y.Y1:.180:.I.| 00000140: 30 A4 59 32 AB 59 31 3A 99 22 20 20 20 20 20 20 |0.Y2.Y1:." | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000170: 20 22 3A 82 00 7F 09 D2 00 8D 31 38 30 3A 8E 00 | ":.......180:..| 00000180: A7 09 DC 00 99 22 93 22 A3 31 30 29 22 46 4F 52 |.....".".10)"FOR| 00000190: CE 4E 45 58 54 20 49 4E 53 54 52 55 4B 54 49 45 |.NEXT INSTRUKTIE| 000001A0: 53 22 3A 8D 31 36 30 00 D3 09 E6 00 99 22 4C 55 |S":.160......"LU| 000001B0: 53 53 45 4E 20 4B 55 4E 4E 45 4E 20 4F 4F 4B 20 |SSEN KUNNEN OOK | 000001C0: 47 45 4D 41 41 4B 54 20 57 4F 52 44 45 4E 20 44 |GEMAAKT WORDEN D| 000001D0: 4F 4F 52 00 01 0A F0 00 99 22 48 45 54 20 47 45 |OOR......"HET GE| 000001E0: 42 52 55 49 4B 20 56 41 4E 20 12 46 4F 52 2F 4E |BRUIK VAN .FOR/N| 000001F0: 45 58 54 92 20 49 4E 53 54 52 55 4B 54 49 45 53 |EXT. INSTRUKTIES| 00000200: 2E 00 2B 0A FA 00 8D 31 36 30 3A 99 22 44 45 5A |..+....160:."DEZ| 00000210: 45 20 5A 49 4A 4E 20 4E 55 54 54 49 47 20 49 4E |E ZIJN NUTTIG IN| 00000220: 20 4C 55 53 53 45 4E 20 44 49 45 00 53 0A 04 01 | LUSSEN DIE.S...| 00000230: 99 22 47 45 43 4F 4E 54 52 4F 4C 45 45 52 44 20 |."GECONTROLEERD | 00000240: 57 4F 52 44 45 4E 20 44 4F 4F 52 20 54 45 4C 4C |WORDEN DOOR TELL| 00000250: 45 4E 2E 00 83 0A 0E 01 8D 31 36 30 3A 99 22 48 |EN.......160:."H| 00000260: 45 54 20 56 4F 4C 47 45 4E 44 45 20 50 52 4F 47 |ET VOLGENDE PROG| 00000270: 52 41 4D 4D 41 20 5A 41 4C 20 45 45 4E 20 4C 49 |RAMMA ZAL EEN LI| 00000280: 4A 53 54 00 C7 0A 18 01 99 22 4E 55 4D 4D 45 52 |JST......"NUMMER| 00000290: 53 20 49 4E 4C 45 5A 45 4E 20 45 4E 20 5A 45 20 |S INLEZEN EN ZE | 000002A0: 44 41 4E 20 41 46 44 52 55 4B 4B 45 4E 3A 22 3A |DAN AFDRUKKEN:":| 000002B0: 8D 31 36 30 3A 99 22 20 32 20 46 4F 52 20 49 3D |.160:." 2 FOR I=| 000002C0: 31 20 54 4F 20 31 30 00 F8 0A 22 01 99 22 20 34 |1 TO 10...".." 4| 000002D0: 20 52 45 41 44 20 41 28 49 29 22 3A 99 22 20 36 | READ A(I)":." 6| 000002E0: 20 50 52 49 4E 54 20 41 28 49 29 22 3A 99 22 20 | PRINT A(I)":." | 000002F0: 38 20 4E 45 58 54 20 49 00 30 0B 2C 01 99 22 20 |8 NEXT I.0.,.." | 00000300: 39 20 44 41 54 41 20 33 2E 31 2C 31 2E 34 2C 38 |9 DATA 3.1,1.4,8| 00000310: 2C 39 2E 34 2C 32 2C 35 2C 37 2C 38 2E 36 2C 33 |,9.4,2,5,7,8.6,3| 00000320: 2C 31 34 2E 37 22 3A 8D 31 36 30 3A 59 B2 31 32 |,14.7":.160:Y.12| 00000330: 00 4B 0B 36 01 99 22 44 45 20 12 46 4F 52 92 20 |.K.6.."DE .FOR. | 00000340: 49 4E 53 54 52 55 4B 54 49 45 22 00 68 0B 40 01 |INSTRUKTIE".h.@.| 00000350: 8D 31 38 30 3A 8D 31 39 30 3A 8D 31 36 30 3A 59 |.180:.190:.160:Y| 00000360: B2 31 38 3A 8D 31 38 30 00 87 0B 4A 01 99 A3 31 |.18:.180...J...1| 00000370: 38 29 22 5A 4F 52 47 54 20 56 4F 4F 52 20 48 45 |8)"ZORGT VOOR HE| 00000380: 52 48 41 41 4C 44 45 00 AD 0B 54 01 99 22 55 49 |RHAALDE...T.."UI| 00000390: 54 56 4F 45 52 49 4E 47 20 56 41 4E 20 41 4C 4C |TVOERING VAN ALL| 000003A0: 45 20 49 4E 53 54 52 55 4B 54 49 45 53 00 D1 0B |E INSTRUKTIES...| 000003B0: 5E 01 99 22 54 4F 54 20 41 41 4E 20 44 45 20 12 |^.."TOT AAN DE .| 000003C0: 4E 45 58 54 92 20 49 4E 53 54 52 55 4B 54 49 45 |NEXT. INSTRUKTIE| 000003D0: 2E 00 0A 0C 68 01 8D 31 36 30 3A 59 B2 31 35 3A |....h..160:Y.15:| 000003E0: 8D 31 38 30 3A 8D 31 39 30 3A 8D 31 36 30 3A 59 |.180:.190:.160:Y| 000003F0: B2 32 31 3A 8D 31 38 30 3A 99 22 45 45 52 53 54 |.21:.180:."EERST| 00000400: 20 56 4F 4F 52 20 49 3D 31 2C 00 24 0C 72 01 8D | VOOR I=1,.$.r..| 00000410: 31 36 30 3A 99 22 91 44 41 4E 20 56 4F 4F 52 20 |160:.".DAN VOOR | 00000420: 49 3D 32 2C 00 65 0C 7C 01 8D 31 36 30 3A 99 22 |I=2,.e.|..160:."| 00000430: 91 44 41 4E 20 56 4F 4F 52 20 49 3D 33 2C 22 3A |.DAN VOOR I=3,":| 00000440: 8D 31 36 30 3A 99 22 91 45 54 43 2E 2C 20 45 4E |.160:.".ETC., EN| 00000450: 20 54 45 4E 53 4C 4F 54 54 45 20 56 4F 4F 52 20 | TENSLOTTE VOOR | 00000460: 49 3D 31 30 2E 00 8A 0C 86 01 99 22 91 91 22 3A |I=10......."..":| 00000470: 8D 31 36 30 3A 59 31 B2 31 38 3A 59 32 B2 32 34 |.160:Y1.18:Y2.24| 00000480: 3A 8D 32 30 30 3A 8D 31 38 30 00 BA 0C 90 01 99 |:.200:.180......| 00000490: 22 44 45 20 12 4E 45 58 54 92 20 49 4E 53 54 52 |"DE .NEXT. INSTR| 000004A0: 55 4B 54 49 45 20 53 4C 55 49 54 20 44 45 20 49 |UKTIE SLUIT DE I| 000004B0: 4E 53 54 52 55 4B 54 49 45 53 00 E2 0C 9A 01 99 |NSTRUKTIES......| 000004C0: 22 2C 57 45 4C 4B 45 20 48 45 52 48 41 41 4C 44 |",WELKE HERHAALD| 000004D0: 20 55 49 54 47 45 56 4F 45 52 44 20 4D 4F 45 54 | UITGEVOERD MOET| 000004E0: 45 4E 00 0D 0D A4 01 99 22 57 4F 52 44 45 4E 20 |EN......"WORDEN | 000004F0: 56 4F 4F 52 20 49 45 44 45 52 45 20 57 41 41 52 |VOOR IEDERE WAAR| 00000500: 44 45 20 56 41 4E 20 49 2C 20 41 46 2E 00 3B 0D |DE VAN I, AF..;.| 00000510: AE 01 8D 31 36 30 3A 99 22 45 52 20 4D 4F 45 54 |...160:."ER MOET| 00000520: 20 45 45 4E 20 12 4E 45 58 54 92 20 49 4E 53 54 | EEN .NEXT. INST| 00000530: 52 55 4B 54 49 45 20 5A 49 4A 4E 00 5F 0D B8 01 |RUKTIE ZIJN._...| 00000540: 99 22 56 4F 4F 52 20 49 45 44 45 52 45 20 12 46 |."VOOR IEDERE .F| 00000550: 4F 52 92 20 49 4E 53 54 52 55 4B 54 49 45 2E 00 |OR. INSTRUKTIE..| 00000560: 8D 0D C2 01 8D 31 36 30 3A 99 22 93 45 45 4E 20 |.....160:.".EEN | 00000570: 42 52 55 49 4B 42 41 52 45 20 4D 4F 47 45 4C 49 |BRUIKBARE MOGELI| 00000580: 4A 4B 48 45 49 44 20 56 41 4E 20 44 45 00 B6 0D |JKHEID VAN DE...| 00000590: CC 01 99 22 12 46 4F 52 92 20 49 4E 53 54 52 55 |...".FOR. INSTRU| 000005A0: 4B 54 49 45 20 49 53 20 44 45 20 12 53 54 45 50 |KTIE IS DE .STEP| 000005B0: 92 2C 20 44 49 45 00 ED 0D D6 01 99 22 47 45 42 |., DIE......"GEB| 000005C0: 52 55 49 4B 54 20 57 4F 52 44 54 20 49 4E 20 48 |RUIKT WORDT IN H| 000005D0: 45 54 20 56 4F 4C 47 45 4E 44 45 20 56 4F 4F 52 |ET VOLGENDE VOOR| 000005E0: 42 45 45 4C 44 91 91 22 3A 8D 31 36 30 00 03 0E |BEELD..":.160...| 000005F0: E0 01 99 22 20 32 20 46 4F 52 20 49 3D 31 20 54 |..." 2 FOR I=1 T| 00000600: 4F 20 36 00 53 0E EA 01 99 22 20 34 20 20 52 45 |O 6.S...." 4 RE| 00000610: 41 44 20 41 28 49 29 22 3A 99 22 20 36 20 20 4E |AD A(I)":." 6 N| 00000620: 45 58 54 20 49 22 3A 99 22 20 38 20 20 46 4F 52 |EXT I":." 8 FOR| 00000630: 20 49 3D 36 20 54 4F 20 31 20 53 54 45 50 20 2D | I=6 TO 1 STEP -| 00000640: 31 22 3A 99 22 20 31 30 20 50 52 49 4E 54 20 41 |1":." 10 PRINT A| 00000650: 28 49 29 00 8F 0E F4 01 99 22 20 31 32 20 4E 45 |(I)......" 12 NE| 00000660: 58 54 20 49 22 3A 99 22 20 31 34 20 44 41 54 41 |XT I":." 14 DATA| 00000670: 20 33 2E 32 2C 20 32 2C 20 35 2E 31 2C 20 30 2E | 3.2, 2, 5.1, 0.| 00000680: 31 2C 20 36 36 2C 20 2E 37 22 3A 8D 31 36 30 00 |1, 66, .7":.160.| 00000690: BB 0E FE 01 99 22 44 45 20 4E 55 4D 4D 45 52 53 |....."DE NUMMERS| 000006A0: 20 57 4F 52 44 45 4E 20 45 45 52 53 54 20 4F 50 | WORDEN EERST OP| 000006B0: 47 45 53 4C 41 47 45 4E 20 49 4E 00 DF 0E 08 02 |GESLAGEN IN.....| 000006C0: 99 22 44 45 20 4C 49 4A 53 54 20 41 28 49 29 2E |."DE LIJST A(I).| 000006D0: 22 3A 59 B2 36 3A 8D 31 36 30 3A 8D 31 38 30 00 |":Y.6:.160:.180.| 000006E0: 10 0F 12 02 81 4D B2 31 A4 32 30 3A 99 A3 39 29 |.....M.1.20:..9)| 000006F0: 22 12 41 28 49 29 91 22 3A 99 A3 39 29 22 41 28 |".A(I).":..9)"A(| 00000700: 49 29 91 22 3A 81 4C B2 31 A4 36 30 3A 82 3A 82 |I).":.L.1.60:.:.| 00000710: 00 46 0F 1C 02 59 B2 31 35 3A 8D 31 38 30 3A 99 |.F...Y.15:.180:.| 00000720: 22 44 45 20 54 57 45 45 44 45 20 4C 55 53 20 28 |"DE TWEEDE LUS (| 00000730: 52 45 47 45 4C 53 20 38 20 54 4F 54 20 31 32 29 |REGELS 8 TOT 12)| 00000740: 22 3A 8D 31 36 30 00 68 0F 26 02 81 59 B2 38 A4 |":.160.h.&..Y.8.| 00000750: 31 30 3A 8D 31 38 30 3A 8D 31 39 30 3A 82 3A 59 |10:.180:.190:.:Y| 00000760: B2 31 36 3A 8D 31 38 30 00 8E 0F 30 02 99 22 5A |.16:.180...0.."Z| 00000770: 55 4C 4C 45 4E 20 44 45 20 4E 55 4D 4D 45 52 53 |ULLEN DE NUMMERS| 00000780: 20 49 4E 20 4F 4D 47 45 4B 45 45 52 44 45 00 AE | IN OMGEKEERDE..| 00000790: 0F 3A 02 99 22 56 4F 4C 47 4F 52 44 45 20 41 46 |.:.."VOLGORDE AF| 000007A0: 44 52 55 4B 4B 45 4E 2E 22 3A 8D 31 36 30 00 D9 |DRUKKEN.":.160..| 000007B0: 0F 44 02 99 22 4F 4D 44 41 54 20 44 45 20 53 54 |.D.."OMDAT DE ST| 000007C0: 45 50 20 2D 31 20 49 53 20 5A 41 4C 20 12 49 92 |EP -1 IS ZAL .I.| 000007D0: 20 42 45 47 49 4E 4E 45 4E 00 05 10 4E 02 99 22 | BEGINNEN...N.."| 000007E0: 4D 45 54 20 44 45 20 57 41 41 52 44 45 20 36 2C |MET DE WAARDE 6,| 000007F0: 20 44 41 41 52 4E 41 20 49 3D 35 2C 20 44 41 4E | DAARNA I=5, DAN| 00000800: 20 49 3D 34 2C 00 23 10 58 02 99 22 45 54 43 2E | I=4,.#.X.."ETC.| 00000810: 2C 20 45 4E 20 54 45 4E 53 4C 4F 54 54 45 20 49 |, EN TENSLOTTE I| 00000820: 3D 31 2E 00 54 10 62 02 8D 31 36 30 3A 99 22 41 |=1..T.b..160:."A| 00000830: 4C 53 20 45 52 20 47 45 45 4E 20 53 54 45 50 20 |LS ER GEEN STEP | 00000840: 41 41 4E 47 45 47 45 56 45 4E 20 49 53 2C 20 57 |AANGEGEVEN IS, W| 00000850: 4F 52 44 54 00 77 10 6C 02 99 22 44 45 20 57 41 |ORDT.w.l.."DE WA| 00000860: 41 52 44 45 20 56 41 4E 20 2B 31 20 41 41 4E 47 |ARDE VAN +1 AANG| 00000870: 45 4E 4F 4D 45 4E 2E 00 A8 10 76 02 8D 31 36 30 |ENOMEN....v..160| 00000880: 3A 99 22 93 11 44 45 20 56 4F 52 4D 20 56 41 4E |:."..DE VORM VAN| 00000890: 20 44 45 20 12 46 4F 52 92 20 49 4E 53 54 52 55 | DE .FOR. INSTRU| 000008A0: 4B 54 49 45 20 49 53 3A 00 DF 10 80 02 99 22 11 |KTIE IS:......".| 000008B0: 12 52 45 47 45 4C 20 4E 4F 2E 92 20 46 4F 52 20 |.REGEL NO.. FOR | 000008C0: 12 56 41 52 49 41 42 45 4C 45 92 20 3D 20 12 59 |.VARIABELE. = .Y| 000008D0: 92 54 4F 20 12 5A 92 20 53 54 45 50 20 12 53 00 |.TO .Z. STEP .S.| 000008E0: 0C 11 8A 02 99 22 11 57 41 41 52 20 12 59 2C 20 |.....".WAAR .Y, | 000008F0: 5A 20 45 4E 20 53 92 20 45 4C 4B 20 47 45 54 41 |Z EN S. ELK GETA| 00000900: 4C 2C 20 56 41 52 49 41 42 45 4C 45 00 2C 11 94 |L, VARIABELE.,..| 00000910: 02 99 22 4F 46 20 45 58 50 52 45 53 53 49 45 20 |.."OF EXPRESSIE | 00000920: 4B 55 4E 4E 45 4E 20 5A 49 4A 4E 2E 00 58 11 9E |KUNNEN ZIJN..X..| 00000930: 02 99 22 11 44 45 20 56 4F 52 4D 20 56 41 4E 20 |..".DE VORM VAN | 00000940: 44 45 20 12 4E 45 58 54 92 20 49 4E 53 54 52 55 |DE .NEXT. INSTRU| 00000950: 4B 54 49 45 20 49 53 3A 00 7A 11 A8 02 99 22 11 |KTIE IS:.z....".| 00000960: 12 52 45 47 45 4C 20 4E 4F 2E 92 20 4E 45 58 54 |.REGEL NO.. NEXT| 00000970: 20 12 56 41 52 49 41 42 4C 45 00 A5 11 B2 02 99 | .VARIABLE......| 00000980: 22 11 57 41 41 52 20 12 56 41 52 49 41 42 45 4C |".WAAR .VARIABEL| 00000990: 45 92 20 44 45 5A 45 4C 46 44 45 20 56 41 52 49 |E. DEZELFDE VARI| 000009A0: 41 42 45 4C 45 00 D8 11 BC 02 99 22 4E 41 41 4D |ABELE......"NAAM| 000009B0: 20 49 53 2C 20 41 4C 53 20 44 49 45 20 49 4E 20 | IS, ALS DIE IN | 000009C0: 44 45 20 46 4F 52 20 49 4E 53 54 52 55 4B 54 49 |DE FOR INSTRUKTI| 000009D0: 45 2E 22 3A 8D 31 36 30 00 FA 11 C6 02 99 22 93 |E.":.160......".| 000009E0: 11 45 4E 4B 45 4C 45 20 12 46 4F 52 92 20 56 4F |.ENKELE .FOR. VO| 000009F0: 4F 52 42 45 45 4C 44 45 4E 3A 00 14 12 D0 02 99 |ORBEELDEN:......| 00000A00: 22 11 11 31 30 20 46 4F 52 20 49 20 3D 20 31 20 |"..10 FOR I = 1 | 00000A10: 54 4F 20 35 00 39 12 DA 02 99 22 11 31 32 35 20 |TO 5.9....".125 | 00000A20: 46 4F 52 20 4A 20 3D 20 31 32 20 54 4F 20 33 39 |FOR J = 12 TO 39| 00000A30: 20 53 54 45 50 20 30 2E 35 00 5D 12 E4 02 99 22 | STEP 0.5.]...."| 00000A40: 11 31 37 20 46 4F 52 20 41 31 20 3D 20 33 39 20 |.17 FOR A1 = 39 | 00000A50: 54 4F 20 31 32 20 53 54 45 50 20 2D 31 00 82 12 |TO 12 STEP -1...| 00000A60: EE 02 99 22 11 31 32 34 30 20 46 4F 52 20 58 20 |...".1240 FOR X | 00000A70: 3D 20 41 31 20 54 4F 20 41 32 20 53 54 45 50 20 |= A1 TO A2 STEP | 00000A80: 41 33 00 AA 12 F8 02 99 22 11 31 30 30 20 46 4F |A3......".100 FO| 00000A90: 52 20 4B 20 3D 20 41 2A 33 20 54 4F 20 58 2D 31 |R K = A*3 TO X-1| 00000AA0: 20 53 54 45 50 20 32 2F 5A 5A 00 B3 12 02 03 8D | STEP 2/ZZ......| 00000AB0: 31 36 30 00 D3 12 0C 03 99 22 93 11 45 4E 20 44 |160......"..EN D| 00000AC0: 41 4E 20 4E 55 20 48 45 54 20 48 55 49 53 57 45 |AN NU HET HUISWE| 00000AD0: 52 4B 3A 00 FE 12 16 03 99 22 11 53 43 48 52 49 |RK:......".SCHRI| 00000AE0: 4A 46 20 45 4E 20 52 55 4E 20 45 45 4E 20 50 52 |JF EN RUN EEN PR| 00000AF0: 4F 47 52 41 4D 4D 41 20 44 41 54 20 44 45 00 2C |OGRAMMA DAT DE.,| 00000B00: 13 20 03 99 22 43 49 4A 46 45 52 53 20 31 20 54 |. .."CIJFERS 1 T| 00000B10: 4F 54 20 32 30 20 41 46 44 52 55 4B 54 20 4D 45 |OT 20 AFDRUKT ME| 00000B20: 54 20 44 41 41 52 41 43 48 54 45 52 00 59 13 2A |T DAARACHTER.Y.*| 00000B30: 03 99 22 48 45 54 20 4B 57 41 44 52 41 41 54 20 |.."HET KWADRAAT | 00000B40: 28 48 45 54 20 47 45 54 41 4C 20 4D 41 41 4C 20 |(HET GETAL MAAL | 00000B50: 5A 49 43 48 5A 45 4C 46 29 00 6E 13 34 03 99 22 |ZICHZELF).n.4.."| 00000B60: 56 41 4E 20 44 41 54 20 47 45 54 41 4C 2E 00 9E |VAN DAT GETAL...| 00000B70: 13 3E 03 99 22 11 12 20 20 20 20 20 20 20 20 20 |.>..".. | 00000B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B90: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 CD | "..| 00000BA0: 13 48 03 99 22 12 20 20 4D 49 53 53 43 48 49 45 |.H..". MISSCHIE| 00000BB0: 4E 20 4B 55 4E 54 20 55 20 44 49 54 20 4F 56 45 |N KUNT U DIT OVE| 00000BC0: 52 53 43 48 52 49 4A 56 45 4E 2C 20 22 00 FC 13 |RSCHRIJVEN, "...| 00000BD0: 52 03 99 22 12 20 20 56 4F 4F 52 44 41 54 20 55 |R..". VOORDAT U| 00000BE0: 20 4F 50 20 44 45 20 53 50 41 43 45 20 54 4F 45 | OP DE SPACE TOE| 00000BF0: 54 53 20 44 55 57 54 2E 20 20 20 22 00 2B 14 5C |TS DUWT. ".+.\| 00000C00: 03 99 22 12 20 20 20 20 20 20 20 20 20 20 20 20 |..". | 00000C10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000C20: 20 20 20 20 20 20 20 20 20 20 22 00 34 14 66 03 | ".4.f.| 00000C30: 8D 31 36 30 00 44 14 70 03 43 24 B2 22 A6 22 3A |.160.D.p.C$.".":| 00000C40: 8D 31 33 30 00 67 14 7A 03 99 22 11 11 11 11 11 |.130.g.z..".....| 00000C50: 11 1D 1D 1D 1D 1D 1D 1D 45 49 4E 44 45 20 56 41 |........EINDE VA| 00000C60: 4E 20 4C 45 53 20 37 00 90 14 84 03 99 22 11 11 |N LES 7......"..| 00000C70: 11 11 1D 1D 1D 1D 1D 1D 1D 4D 41 41 4B 20 45 45 |.........MAAK EE| 00000C80: 52 53 54 20 55 57 20 48 55 49 53 57 45 52 4B 22 |RST UW HUISWERK"| 00000C90: 00 96 14 8E 03 80 00 00 00 |......... |
....... +++ 7.2 +++.%.D.A.198:.G(142).9.
N..53281,8:.646,9.K.X.Z$.G(34):.220.}...
.".";:.I.1.39:.C$;:.:.I.1.22:.".."C$;:.:
.".";......I.1.38:."."C$".";:.:.C$......
I.1.23:."."C$".";:.:..J. ..A,0:.A,255:.A
,0.R....:.......".":.I.0.Y.1:.".";:.:.".
.";:.......J.1.15:.">";:.I.1.40:.:."..>.
.";:.K.1.20:.:.:." ":..T.H.Y.Y1:.180:.I.
0.Y2.Y1:."
":...R..180:.......".".10)"FOR
NNEXT INSTRUKTIES":.160.S...."LUSSEN KUN
NEN OOK GEMAAKT WORDEN DOOR......"HET GE
BRUIK VAN .FOR/NEXT. INSTRUKTIES..+....1
60:."DEZE ZIJN NUTTIG IN LUSSEN DIE.S...
."GECONTROLEERD WORDEN DOOR TELLEN......
.160:."HET VOLGENDE PROGRAMMA ZAL EEN LI
JST.G...."NUMMERS INLEZEN EN ZE DAN AFDR
UKKEN:":.160:." 2 FOR I=1 TO 10...".." 4
READ A(I)":." 6 PRINT A(I)":." 8 NEXT I
.0.,.." 9 DATA 3.1,1.4,8,9.4,2,5,7,8.6,3
,14.7":.160:Y.12.K.6.."DE .FOR. INSTRUKT
IE".H.@..180:.190:.160:Y.18:.180...J...1
8)"ZORGT VOOR HERHAALDE...T.."UITVOERING
VAN ALLE INSTRUKTIES.Q.^.."TOT AAN DE .
NEXT. INSTRUKTIE....H..160:Y.15:.180:.19
0:.160:Y.21:.180:."EERST VOOR I=1,.$.R..
160:.".DAN VOOR I=2,.E.|..160:.".DAN VOO
R I=3,":.160:.".ETC., EN TENSLOTTE VOOR
I=10......."..":.160:Y1.18:Y2.24:.200:.1
80......"DE .NEXT. INSTRUKTIE SLUIT DE I
NSTRUKTIES......",WELKE HERHAALD UITGEVO
ERD MOETEN......"WORDEN VOOR IEDERE WAAR
DE VAN I, AF..;....160:."ER MOET EEN .NE
XT. INSTRUKTIE ZIJN._...."VOOR IEDERE .F
OR. INSTRUKTIE....B..160:.".EEN BRUIKBAR
E MOGELIJKHEID VAN DE...L..".FOR. INSTRU
KTIE IS DE .STEP., DIE...V.."GEBRUIKT WO
RDT IN HET VOLGENDE VOORBEELD..":.160...
..." 2 FOR I=1 TO 6.S...." 4 READ A(I)"
:." 6 NEXT I":." 8 FOR I=6 TO 1 STEP -
1":." 10 PRINT A(I)......" 12 NEXT I":."
14 DATA 3.2, 2, 5.1, 0.1, 66, .7":.160.
....."DE NUMMERS WORDEN EERST OPGESLAGEN
IN......"DE LIJST A(I).":Y.6:.160:.180.
.....M.1.20:..9)".A(I).":..9)"A(I).":.L.
1.60:.:..F...Y.15:.180:."DE TWEEDE LUS (
REGELS 8 TOT 12)":.160.H.&..Y.8.10:.180:
.190:.:Y.16:.180...0.."ZULLEN DE NUMMERS
IN OMGEKEERDE...:.."VOLGORDE AFDRUKKEN.
":.160.Y.D.."OMDAT DE STEP -1 IS ZAL .I.
BEGINNEN...N.."MET DE WAARDE 6, DAARNA
I=5, DAN I=4,.#.X.."ETC., EN TENSLOTTE I
=1..T.B..160:."ALS ER GEEN STEP AANGEGEV
EN IS, WORDT.W.L.."DE WAARDE VAN +1 AANG
ENOMEN....V..160:."..DE VORM VAN DE .FOR
. INSTRUKTIE IS:......"..REGEL NO.. FOR
.VARIABELE. = .Y.TO .Z. STEP .S......".W
AAR .Y, Z EN S. ELK GETAL, VARIABELE.,..
.."OF EXPRESSIE KUNNEN ZIJN..X....".DE V
ORM VAN DE .NEXT. INSTRUKTIE IS:.Z....".
.REGEL NO.. NEXT .VARIABLE......".WAAR .
VARIABELE. DEZELFDE VARIABELE.X...."NAAM
IS, ALS DIE IN DE FOR INSTRUKTIE.":.160
...F.."..ENKELE .FOR. VOORBEELDEN:...P..
"..10 FOR I = 1 TO 5.9.Z..".125 FOR J =
12 TO 39 STEP 0.5.]....".17 FOR A1 = 39
TO 12 STEP -1......".1240 FOR X = A1 TO
A2 STEP A3......".100 FOR K = A*3 TO X-1
STEP 2/ZZ......160.S...."..EN DAN NU HE
T HUISWERK:......".SCHRIJF EN RUN EEN PR
OGRAMMA DAT DE.,. .."CIJFERS 1 TOT 20 AF
DRUKT MET DAARACHTER.Y.*.."HET KWADRAAT
(HET GETAL MAAL ZICHZELF).N.4.."VAN DAT
GETAL....>.."..
".M.H..". MISSCHIEN KUNT U
DIT OVERSCHRIJVEN, "...R..". VOORDAT U
OP DE SPACE TOETS DUWT. ".+.\..".
".4.F.
.160.D.P.C$.".":.130.G.Z..".............
EINDE VAN LES 7......"...........MAAK EE
RST UW HUISWERK".........
> CLICK IMAGE PREVIEW FOR FULL MODAL