BASIC 2.9
FILE INFORMATION
FILENAME(S): BASIC 2.9
FILE TYPE(S): PRG
FILE SIZE: 11.3K
FIRST SEEN: 2025-11-30 21:07:01
APPEARS ON: 1 disk(s)
FILE HASH
7468382f26edd907a2a53796ea4256c5260ea62336d7429e02570e04eaacdb21
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HBMD OSS 01 | BASIC 2.9 | PRG | DuncanTwain | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 97 35 33 32 38 31 2C 30 3A 97 |....d..53281,0:.|
00000010: 35 33 32 38 30 2C 30 00 28 08 6E 00 99 C7 28 31 |53280,0.(.n...(1|
00000020: 34 32 29 3A 99 22 1E 22 00 35 08 78 00 5A 24 B2 |42):.".".5.x.Z$.|
00000030: C7 28 33 34 29 00 67 08 82 00 99 22 93 11 1D 1D |.(34).g...."....|
00000040: 1D 1D 1D 1D 1D A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3A |..............":|
00000050: 99 22 1D 1D 1D 1D 1D 1D 1D 12 42 41 53 49 43 20 |."........BASIC |
00000060: 32 2E 39 92 11 11 22 00 8C 08 8C 00 99 22 11 1D |2.9..."......"..|
00000070: 1D 1D 1D 1D 1D 1D 41 41 4E 47 45 50 41 53 54 20 |......AANGEPAST |
00000080: 56 4F 4F 52 20 43 2D 36 34 20 20 11 00 AF 08 96 |VOOR C-64 .....|
00000090: 00 99 22 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D |..".............|
000000A0: 1D 1D 44 4F 4F 52 20 22 3B 3A 8D 32 33 31 30 00 |..DOOR ";:.2310.|
000000B0: BF 08 A0 00 81 49 B2 31 A4 37 30 30 30 3A 82 00 |.....I.1.7000:..|
000000C0: CD 08 AA 00 49 B2 31 3A 8D 32 32 38 30 00 EF 08 |....I.1:.2280...|
000000D0: B4 00 99 22 11 11 22 A3 31 30 29 22 4C 45 53 20 |..."..".10)"LES |
000000E0: 39 22 3A 99 A3 31 30 29 22 A3 A3 A3 A3 A3 22 00 |9":..10)".....".|
000000F0: 35 09 BE 00 99 A3 37 29 22 31 2E 20 50 52 4F 47 |5.....7)"1. PROG|
00000100: 52 41 4D 4D 41 27 53 20 53 41 56 45 4E 2F 4C 4F |RAMMA'S SAVEN/LO|
00000110: 41 44 45 4E 22 3A 99 A3 37 29 22 32 2E 20 56 4F |ADEN":..7)"2. VO|
00000120: 4F 52 42 45 45 4C 44 20 50 52 4F 47 52 41 4D 4D |ORBEELD PROGRAMM|
00000130: 41 27 53 3A 11 00 5F 09 C8 00 99 A3 39 29 22 41 |A'S:.._.....9)"A|
00000140: 2E 20 41 4E 49 4D 41 54 49 45 22 3A 99 A3 39 29 |. ANIMATIE":..9)|
00000150: 22 42 2E 20 44 45 50 52 45 43 49 41 54 49 45 00 |"B. DEPRECIATIE.|
00000160: 94 09 D2 00 99 A3 39 29 22 43 2E 20 47 45 4D 49 |......9)"C. GEMI|
00000170: 44 44 45 4C 44 45 20 45 4E 22 3A 99 A3 31 32 29 |DDELDE EN":..12)|
00000180: 22 53 54 41 4E 44 41 41 52 44 20 41 46 57 49 4A |"STANDAARD AFWIJ|
00000190: 4B 49 4E 47 00 A9 09 DC 00 99 A3 39 29 22 44 2E |KING.......9)"D.|
000001A0: 20 53 4F 52 54 45 52 45 4E 00 CF 09 E6 00 99 A3 | SORTEREN.......|
000001B0: 39 29 22 45 2E 20 57 4F 4F 52 44 53 50 45 4C 4C |9)"E. WOORDSPELL|
000001C0: 45 54 4A 45 22 3A 8D 32 34 30 3A 89 32 38 30 00 |ETJE":.240:.280.|
000001D0: E3 09 F0 00 99 22 11 11 11 4C 45 54 20 4F 50 3A |....."...LET OP:|
000001E0: 20 22 3B 00 13 0A FA 00 99 22 50 52 4F 47 52 41 | ";......"PROGRA|
000001F0: 4D 4D 41 27 53 20 4D 45 54 20 45 45 4E 20 44 49 |MMA'S MET EEN DI|
00000200: 4D 2D 49 4E 2D 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 |M-IN-":.".......|
00000210: 20 22 3B 00 38 0A 04 01 99 22 53 54 52 55 4B 54 | ";.8...."STRUKT|
00000220: 49 45 20 5A 49 4A 4E 20 49 4E 20 44 45 5A 45 20 |IE ZIJN IN DEZE |
00000230: 4C 45 53 20 4D 41 41 52 00 6A 0A 0E 01 99 22 1D |LES MAAR.j....".|
00000240: 1D 1D 1D 1D 1D 1D 1D 45 45 4E 20 4D 41 41 4C 20 |.......EEN MAAL |
00000250: 54 45 20 52 55 4E 4E 45 4E 20 21 22 3A 81 49 B2 |TE RUNNEN !":.I.|
00000260: 31 A4 37 30 30 30 3A 82 3A 8E 00 7C 0A 18 01 8D |1.7000:.:..|....|
00000270: 32 32 32 30 3A 8B 46 4C A7 31 37 30 00 8A 0A 22 |2220:.FL.170..."|
00000280: 01 49 B2 32 3A 8D 32 32 38 30 00 C3 0A 2C 01 99 |.I.2:.2280...,..|
00000290: 22 11 22 A3 31 30 29 22 50 52 4F 47 52 41 4D 4D |".".10)"PROGRAMM|
000002A0: 41 27 53 20 53 41 56 45 4E 22 3A 99 A3 31 30 29 |A'S SAVEN":..10)|
000002B0: 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |"...............|
000002C0: A3 A3 22 00 EA 0A 36 01 99 22 4E 41 44 41 54 20 |.."...6.."NADAT |
000002D0: 55 20 45 45 4E 20 50 52 4F 47 52 41 4D 4D 41 20 |U EEN PROGRAMMA |
000002E0: 4F 50 20 55 57 20 43 2D 36 34 00 17 0B 40 01 99 |OP UW C-64...@..|
000002F0: 22 47 45 53 43 48 52 45 56 45 4E 20 48 45 45 46 |"GESCHREVEN HEEF|
00000300: 54 2C 20 57 49 4C 54 20 55 20 48 45 54 20 4D 49 |T, WILT U HET MI|
00000310: 53 53 43 48 49 45 4E 00 42 0B 4A 01 99 22 4F 50 |SSCHIEN.B.J.."OP|
00000320: 20 43 41 53 53 45 54 54 45 20 42 45 57 41 52 45 | CASSETTE BEWARE|
00000330: 4E 20 54 4F 54 20 45 45 4E 20 56 4F 4C 47 45 4E |N TOT EEN VOLGEN|
00000340: 44 45 00 4E 0B 54 01 99 22 4B 45 45 52 2E 00 7A |DE.N.T.."KEER..z|
00000350: 0B 5E 01 99 22 11 50 4C 41 41 54 53 20 41 4C 4C |.^..".PLAATS ALL|
00000360: 45 52 45 45 52 53 54 20 45 45 4E 20 43 41 53 53 |EREERST EEN CASS|
00000370: 45 54 54 45 20 49 4E 20 44 45 00 8A 0B 68 01 99 |ETTE IN DE...h..|
00000380: 22 52 45 43 4F 52 44 45 52 2E 00 B8 0B 72 01 99 |"RECORDER....r..|
00000390: 22 11 41 4C 53 20 55 20 45 45 4E 20 4E 41 41 4D |".ALS U EEN NAAM|
000003A0: 20 56 4F 4F 52 20 55 57 20 50 52 4F 47 52 41 4D | VOOR UW PROGRAM|
000003B0: 4D 41 20 47 45 4B 4F 2D 00 E4 0B 7C 01 99 22 5A |MA GEKO-...|.."Z|
000003C0: 45 4E 20 48 45 45 46 54 2C 20 42 49 4A 56 2E 20 |EN HEEFT, BIJV. |
000003D0: 27 54 52 49 4F 2D 53 4F 46 54 27 2C 20 54 59 50 |'TRIO-SOFT', TYP|
000003E0: 54 20 55 3A 00 02 0C 86 01 99 22 11 11 53 41 56 |T U:......"..SAV|
000003F0: 45 20 22 5A 24 22 54 52 49 4F 2D 53 4F 46 54 22 |E "Z$"TRIO-SOFT"|
00000400: 5A 24 00 2C 0C 90 01 99 22 11 45 4E 20 44 55 57 |Z$.,....".EN DUW|
00000410: 54 20 44 41 41 52 4E 41 20 4F 50 20 44 45 20 52 |T DAARNA OP DE R|
00000420: 45 54 55 52 4E 20 54 4F 45 54 53 2E 00 56 0C 9A |ETURN TOETS..V..|
00000430: 01 99 22 11 44 49 54 20 50 52 4F 47 52 41 4D 4D |..".DIT PROGRAMM|
00000440: 41 20 57 4F 52 44 54 20 44 41 4E 20 4F 50 20 44 |A WORDT DAN OP D|
00000450: 45 20 54 41 50 45 00 74 0C A4 01 99 22 47 45 53 |E TAPE.t...."GES|
00000460: 41 56 45 44 2E 22 3A 8D 32 32 32 30 3A 8B 46 4C |AVED.":.2220:.FL|
00000470: A7 31 37 30 00 82 0C AE 01 49 B2 33 3A 8D 32 32 |.170.....I.3:.22|
00000480: 38 30 00 BB 0C B8 01 99 22 11 22 A3 31 30 29 22 |80......".".10)"|
00000490: 50 52 4F 47 52 41 4D 4D 41 27 53 20 4C 41 44 45 |PROGRAMMA'S LADE|
000004A0: 4E 22 3A 99 A3 31 30 29 22 A3 A3 A3 A3 A3 A3 A3 |N":..10)".......|
000004B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 E7 0C C2 01 |..........".....|
000004C0: 99 22 41 4C 53 20 55 20 45 45 4E 20 50 52 4F 47 |."ALS U EEN PROG|
000004D0: 52 41 4D 4D 41 20 56 41 4E 41 46 20 44 45 20 43 |RAMMA VANAF DE C|
000004E0: 41 53 53 45 54 54 45 00 15 0D CC 01 99 22 49 4E |ASSETTE......"IN|
000004F0: 20 44 45 20 43 4F 4D 50 55 54 45 52 20 57 49 4C | DE COMPUTER WIL|
00000500: 54 20 4C 41 44 45 4E 2C 20 42 49 4A 56 4F 4F 52 |T LADEN, BIJVOOR|
00000510: 42 45 45 4C 44 00 43 0D D6 01 99 22 27 54 52 49 |BEELD.C...."'TRI|
00000520: 4F 2D 53 4F 46 54 27 2C 20 4D 4F 45 54 20 55 20 |O-SOFT', MOET U |
00000530: 45 45 52 53 54 20 44 45 20 54 41 50 45 20 54 45 |EERST DE TAPE TE|
00000540: 52 55 47 00 6D 0D E0 01 99 22 53 50 4F 45 4C 45 |RUG.m...."SPOELE|
00000550: 4E 20 41 4C 53 20 44 49 54 20 4E 4F 44 49 47 20 |N ALS DIT NODIG |
00000560: 49 53 2C 20 45 4E 20 44 41 41 52 4E 41 00 7A 0D |IS, EN DAARNA.z.|
00000570: EA 01 99 22 54 59 50 45 4E 3A 00 98 0D F4 01 99 |..."TYPEN:......|
00000580: 22 11 11 4C 4F 41 44 20 22 5A 24 22 54 52 49 4F |"..LOAD "Z$"TRIO|
00000590: 2D 53 4F 46 54 22 5A 24 00 BC 0D FE 01 99 22 11 |-SOFT"Z$......".|
000005A0: 45 4E 20 4F 50 20 44 45 20 52 45 54 55 52 4E 20 |EN OP DE RETURN |
000005B0: 54 4F 45 54 53 20 44 55 57 45 4E 2E 00 E6 0D 08 |TOETS DUWEN.....|
000005C0: 02 99 22 11 44 49 54 20 50 52 4F 47 52 41 4D 4D |..".DIT PROGRAMM|
000005D0: 41 20 57 4F 52 44 54 20 44 41 4E 20 49 4E 20 55 |A WORDT DAN IN U|
000005E0: 57 20 43 2D 36 34 00 04 0E 12 02 99 22 47 45 4C |W C-64......"GEL|
000005F0: 41 44 45 4E 2E 22 3A 8D 32 32 32 30 3A 8B 46 4C |ADEN.":.2220:.FL|
00000600: A7 32 39 30 00 12 0E 1C 02 49 B2 34 3A 8D 32 32 |.290.....I.4:.22|
00000610: 38 30 00 3D 0E 26 02 99 22 11 44 45 20 52 45 53 |80.=.&..".DE RES|
00000620: 54 20 56 41 4E 20 44 45 5A 45 20 4C 45 53 53 45 |T VAN DEZE LESSE|
00000630: 4E 20 42 45 53 54 41 41 54 20 55 49 54 00 5F 0E |N BESTAAT UIT._.|
00000640: 30 02 99 22 56 49 4A 46 20 56 4F 4F 52 42 45 45 |0.."VIJF VOORBEE|
00000650: 4C 44 2D 50 52 4F 47 52 41 4D 4D 41 27 53 2E 00 |LD-PROGRAMMA'S..|
00000660: 8B 0E 3A 02 99 22 11 11 44 45 5A 45 20 5A 49 4A |..:.."..DEZE ZIJ|
00000670: 4E 20 4F 4E 54 57 4F 52 50 45 4E 20 4F 4D 20 44 |N ONTWORPEN OM D|
00000680: 45 20 4D 4F 47 45 4C 49 4A 4B 2D 00 B2 0E 44 02 |E MOGELIJK-...D.|
00000690: 99 22 48 45 44 45 4E 20 56 41 4E 20 42 41 53 49 |."HEDEN VAN BASI|
000006A0: 43 20 41 41 4E 20 54 45 20 54 4F 4E 45 4E 2C 20 |C AAN TE TONEN, |
000006B0: 45 4E 00 D9 0E 4E 02 99 22 47 45 42 52 55 49 4B |EN...N.."GEBRUIK|
000006C0: 45 4E 20 41 4C 4C 45 45 4E 20 44 45 20 49 4E 53 |EN ALLEEN DE INS|
000006D0: 54 52 55 4B 54 49 45 53 2C 00 F7 0E 58 02 99 22 |TRUKTIES,...X.."|
000006E0: 47 45 4C 45 45 52 44 20 49 4E 20 44 45 5A 45 20 |GELEERD IN DEZE |
000006F0: 43 55 52 53 55 53 2E 00 09 0F 62 02 8D 32 32 32 |CURSUS....b..222|
00000700: 30 3A 8B 46 4C A7 34 33 30 00 17 0F 6C 02 49 B2 |0:.FL.430...l.I.|
00000710: 35 3A 8D 32 32 38 30 00 3E 0F 76 02 99 22 11 22 |5:.2280.>.v.."."|
00000720: A3 31 35 29 22 41 4E 49 4D 41 54 49 45 22 3A 99 |.15)"ANIMATIE":.|
00000730: A3 31 35 29 22 A3 A3 A3 A3 A3 A3 A3 A3 22 00 6E |.15)"........".n|
00000740: 0F 80 02 99 22 11 48 45 54 20 56 4F 4C 47 45 4E |....".HET VOLGEN|
00000750: 44 45 20 50 52 4F 47 52 41 4D 4D 41 20 4C 41 41 |DE PROGRAMMA LAA|
00000760: 54 20 45 45 4E 20 42 41 4C 20 32 35 58 22 00 A7 |T EEN BAL 25X"..|
00000770: 0F 8A 02 99 22 48 45 45 4E 20 45 4E 20 57 45 45 |...."HEEN EN WEE|
00000780: 52 20 4F 56 45 52 20 48 45 54 20 53 43 48 45 52 |R OVER HET SCHER|
00000790: 4D 20 56 4C 49 45 47 45 4E 2E 22 3A 81 49 B2 31 |M VLIEGEN.":.I.1|
000007A0: A4 37 30 30 30 3A 82 00 BD 0F 94 02 99 A3 32 35 |.7000:........25|
000007B0: 29 22 50 41 47 49 4E 41 20 35 2E 31 22 00 D9 0F |)"PAGINA 5.1"...|
000007C0: 9E 02 99 22 34 30 30 30 20 46 4F 52 20 4A 20 3D |..."4000 FOR J =|
000007D0: 20 31 20 54 4F 20 32 35 22 00 F2 0F A8 02 99 22 | 1 TO 25"......"|
000007E0: 34 30 31 30 20 50 52 49 4E 54 22 5A 24 22 93 22 |4010 PRINT"Z$"."|
000007F0: 5A 24 00 0E 10 B2 02 99 22 34 30 32 30 20 46 4F |Z$......"4020 FO|
00000800: 52 20 58 20 3D 20 31 20 54 4F 20 31 30 22 00 27 |R X = 1 TO 10".'|
00000810: 10 BC 02 99 22 34 30 33 30 20 50 52 49 4E 54 22 |...."4030 PRINT"|
00000820: 5A 24 22 11 22 5A 24 00 3A 10 C6 02 99 22 34 30 |Z$"."Z$.:...."40|
00000830: 34 30 20 4E 45 58 54 20 58 22 00 57 10 D0 02 99 |40 NEXT X".W....|
00000840: 22 34 30 35 30 20 46 4F 52 20 42 4C 20 3D 20 31 |"4050 FOR BL = 1|
00000850: 20 54 4F 20 33 39 22 00 75 10 DA 02 99 22 34 30 | TO 39".u...."40|
00000860: 36 30 20 50 52 49 4E 54 22 5A 24 22 20 D1 9D 22 |60 PRINT"Z$" .."|
00000870: 5A 24 22 3B 22 00 91 10 E4 02 99 22 34 30 37 30 |Z$";"......"4070|
00000880: 20 46 4F 52 20 54 4D 20 3D 20 31 20 54 4F 20 35 | FOR TM = 1 TO 5|
00000890: 22 00 A5 10 EE 02 99 22 34 30 38 30 20 4E 45 58 |"......"4080 NEX|
000008A0: 54 20 54 4D 22 00 B9 10 F8 02 99 22 34 30 39 30 |T TM"......"4090|
000008B0: 20 4E 45 58 54 20 42 4C 22 00 DE 10 02 03 99 22 | NEXT BL"......"|
000008C0: 34 31 30 30 20 46 4F 52 20 42 4C 20 3D 20 33 39 |4100 FOR BL = 39|
000008D0: 20 54 4F 20 31 20 53 54 45 50 20 2D 31 22 00 FE | TO 1 STEP -1"..|
000008E0: 10 0C 03 99 22 34 31 31 30 20 50 52 49 4E 54 22 |...."4110 PRINT"|
000008F0: 5A 24 22 20 9D 9D D1 9D 22 5A 24 22 3B 22 00 1A |Z$" ...."Z$";"..|
00000900: 11 16 03 99 22 34 31 32 30 20 46 4F 52 20 54 4D |...."4120 FOR TM|
00000910: 20 3D 20 31 20 54 4F 20 35 22 00 2E 11 20 03 99 | = 1 TO 5"... ..|
00000920: 22 34 31 33 30 20 4E 45 58 54 20 54 4D 22 00 42 |"4130 NEXT TM".B|
00000930: 11 2A 03 99 22 34 31 34 30 20 4E 45 58 54 20 42 |.*.."4140 NEXT B|
00000940: 4C 22 00 55 11 34 03 99 22 34 31 35 30 20 4E 45 |L".U.4.."4150 NE|
00000950: 58 54 20 4A 22 00 5F 11 3E 03 8D 32 33 30 30 00 |XT J"._.>..2300.|
00000960: 72 11 48 03 99 22 50 52 4F 42 45 45 52 20 48 45 |r.H.."PROBEER HE|
00000970: 54 21 00 A0 11 52 03 99 22 11 44 52 55 4B 20 4F |T!...R..".DRUK O|
00000980: 50 20 3C 52 3E 20 4F 4D 20 44 49 54 20 50 52 4F |P <R> OM DIT PRO|
00000990: 47 52 41 4D 4D 41 20 54 45 20 52 55 4E 4E 45 4E |GRAMMA TE RUNNEN|
000009A0: 00 CB 11 5C 03 99 22 4F 46 20 4F 50 20 3C 43 3E |...\.."OF OP <C>|
000009B0: 20 4F 4D 20 55 57 20 4C 45 53 20 54 45 20 56 45 | OM UW LES TE VE|
000009C0: 52 56 4F 4C 47 45 4E 2E 11 11 22 00 E8 11 66 03 |RVOLGEN..."...f.|
000009D0: A1 41 24 3A 8B 41 24 B3 B1 22 52 22 AF 41 24 B3 |.A$:.A$.."R".A$.|
000009E0: B1 22 43 22 A7 38 37 30 00 F9 11 70 03 8B 41 24 |."C".870...p..A$|
000009F0: B2 22 52 22 A7 32 34 32 30 00 0B 12 7A 03 8D 32 |."R".2420...z..2|
00000A00: 32 32 30 3A 8B 46 4C A7 35 34 30 00 19 12 84 03 |220:.FL.540.....|
00000A10: 49 B2 36 3A 8D 32 32 38 30 00 1F 12 8E 03 99 00 |I.6:.2280.......|
00000A20: 29 12 98 03 89 32 35 39 30 00 60 12 A2 03 49 B2 |)....2590.`...I.|
00000A30: 37 3A 8D 32 32 38 30 3A 99 22 11 22 A3 31 35 29 |7:.2280:.".".15)|
00000A40: 22 44 45 50 52 45 43 49 41 54 49 45 22 3A 99 A3 |"DEPRECIATIE":..|
00000A50: 31 35 29 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |15)"..........."|
00000A60: 00 8E 12 AC 03 99 22 11 44 49 54 20 50 52 4F 47 |......".DIT PROG|
00000A70: 52 41 4D 4D 41 20 5A 41 4C 20 44 45 20 4A 41 41 |RAMMA ZAL DE JAA|
00000A80: 52 4C 49 4A 4B 53 45 20 44 45 50 52 45 2D 00 BB |RLIJKSE DEPRE-..|
00000A90: 12 B6 03 99 22 43 49 41 54 49 45 20 45 4E 20 42 |...."CIATIE EN B|
00000AA0: 4F 45 4B 57 41 41 52 44 45 20 56 4F 4F 52 20 45 |OEKWAARDE VOOR E|
00000AB0: 45 4E 20 56 4F 4F 52 57 45 52 50 00 CC 12 C0 03 |EN VOORWERP.....|
00000AC0: 99 22 42 45 52 45 4B 45 4E 45 4E 3A 00 DC 12 CA |."BEREKENEN:....|
00000AD0: 03 81 49 B2 31 A4 37 30 30 30 3A 82 00 F6 12 D4 |..I.1.7000:.....|
00000AE0: 03 99 22 11 22 A3 32 35 29 22 50 41 47 49 4E 41 |..".".25)"PAGINA|
00000AF0: 20 37 2E 31 11 22 00 27 13 DE 03 99 22 34 35 30 | 7.1.".'...."450|
00000B00: 30 20 50 52 49 4E 54 22 5A 24 22 47 45 45 46 20 |0 PRINT"Z$"GEEF |
00000B10: 56 4F 4F 52 57 45 52 50 20 42 45 47 49 4E 57 41 |VOORWERP BEGINWA|
00000B20: 41 52 44 45 22 5A 24 00 39 13 E8 03 99 22 34 35 |ARDE"Z$.9...."45|
00000B30: 31 30 20 49 4E 50 55 54 4A 00 70 13 F2 03 99 22 |10 INPUTJ.p...."|
00000B40: 34 35 32 30 20 50 52 49 4E 54 22 5A 24 22 47 45 |4520 PRINT"Z$"GE|
00000B50: 45 46 20 56 4F 4F 52 57 45 52 50 20 4C 45 45 46 |EF VOORWERP LEEF|
00000B60: 54 49 4A 44 20 49 4E 20 4A 41 52 45 4E 22 5A 24 |TIJD IN JAREN"Z$|
00000B70: 00 82 13 FC 03 99 22 34 35 33 30 20 49 4E 50 55 |......"4530 INPU|
00000B80: 54 4E 00 AF 13 06 04 99 22 34 35 34 30 20 50 52 |TN......"4540 PR|
00000B90: 49 4E 54 22 5A 24 22 47 45 45 46 20 41 46 53 43 |INT"Z$"GEEF AFSC|
00000BA0: 48 52 49 4A 46 2D 57 41 41 52 44 45 22 5A 24 00 |HRIJF-WAARDE"Z$.|
00000BB0: C1 13 10 04 99 22 34 35 35 30 20 49 4E 50 55 54 |....."4550 INPUT|
00000BC0: 53 00 FA 13 1A 04 99 22 34 35 36 30 20 50 52 49 |S......"4560 PRI|
00000BD0: 4E 54 22 5A 24 22 45 49 4E 44 22 5A 24 22 2C 22 |NT"Z$"EIND"Z$","|
00000BE0: 5A 24 22 44 45 50 52 45 2D 22 5A 24 22 2C 22 5A |Z$"DEPRE-"Z$","Z|
00000BF0: 24 22 42 4F 45 4B 2D 22 5A 24 00 38 14 24 04 99 |$"BOEK-"Z$.8.$..|
00000C00: 22 34 35 36 35 20 50 52 49 4E 54 22 5A 24 22 56 |"4565 PRINT"Z$"V|
00000C10: 41 4E 20 4A 41 41 52 22 5A 24 22 2C 22 5A 24 22 |AN JAAR"Z$","Z$"|
00000C20: 43 49 41 54 49 45 22 5A 24 22 2C 22 5A 24 22 57 |CIATIE"Z$","Z$"W|
00000C30: 41 41 52 44 45 22 5A 24 00 4E 14 2E 04 99 22 34 |AARDE"Z$.N...."4|
00000C40: 35 37 30 20 46 4F 52 4B 3D 31 54 4F 4E 22 00 66 |570 FORK=1TON".f|
00000C50: 14 38 04 99 22 34 35 38 30 20 42 3D 42 2D 28 4A |.8.."4580 B=B-(J|
00000C60: 2D 53 29 2F 4E 22 00 83 14 42 04 99 22 34 35 39 |-S)/N"...B.."459|
00000C70: 30 20 50 52 49 4E 54 4B 2C 28 4A 2D 53 29 2F 4E |0 PRINTK,(J-S)/N|
00000C80: 2C 42 22 00 94 14 4C 04 99 22 34 36 30 30 20 4E |,B"...L.."4600 N|
00000C90: 45 58 54 22 00 A4 14 56 04 99 22 34 36 31 30 20 |EXT"...V.."4610 |
00000CA0: 45 4E 44 22 00 AE 14 60 04 8D 32 33 30 30 00 C1 |END"...`..2300..|
00000CB0: 14 6A 04 99 22 50 52 4F 42 45 45 52 20 48 45 54 |.j.."PROBEER HET|
00000CC0: 21 00 EF 14 74 04 99 22 11 44 52 55 4B 20 4F 50 |!...t..".DRUK OP|
00000CD0: 20 3C 52 3E 20 4F 4D 20 44 49 54 20 50 52 4F 47 | <R> OM DIT PROG|
00000CE0: 52 41 4D 4D 41 20 54 45 20 52 55 4E 4E 45 4E 00 |RAMMA TE RUNNEN.|
00000CF0: 1A 15 7E 04 99 22 4F 46 20 4F 50 20 3C 43 3E 20 |..~.."OF OP <C> |
00000D00: 4F 4D 20 55 57 20 4C 45 53 20 54 45 20 56 45 52 |OM UW LES TE VER|
00000D10: 56 4F 4C 47 45 4E 2E 11 11 22 00 38 15 88 04 A1 |VOLGEN...".8....|
00000D20: 41 24 3A 8B 41 24 B3 B1 22 52 22 AF 41 24 B3 B1 |A$:.A$.."R".A$..|
00000D30: 22 43 22 A7 31 31 36 30 00 49 15 92 04 8B 41 24 |"C".1160.I....A$|
00000D40: B2 22 52 22 A7 32 39 32 30 00 53 15 9C 04 89 33 |."R".2920.S....3|
00000D50: 30 38 30 00 61 15 A6 04 49 B2 38 3A 8D 32 32 38 |080.a...I.8:.228|
00000D60: 30 00 8F 15 B0 04 99 22 11 22 A3 33 29 22 47 45 |0......".".3)"GE|
00000D70: 4D 49 44 44 45 4C 44 45 20 45 4E 20 53 54 41 4E |MIDDELDE EN STAN|
00000D80: 44 41 41 52 44 20 41 46 57 49 4A 4B 49 4E 47 00 |DAARD AFWIJKING.|
00000D90: BB 15 BA 04 99 A3 33 29 22 A3 A3 A3 A3 A3 A3 A3 |......3)".......|
00000DA0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000DB0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 E8 15 C4 04 |..........".....|
00000DC0: 99 22 11 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 |.".DIT PROGRAMMA|
00000DD0: 20 5A 41 4C 20 56 41 4E 20 45 45 4E 20 48 4F 45 | ZAL VAN EEN HOE|
00000DE0: 56 45 45 4C 48 45 49 44 00 16 16 CE 04 99 22 47 |VEELHEID......"G|
00000DF0: 45 54 41 4C 4C 45 4E 20 48 45 54 20 47 45 4D 49 |ETALLEN HET GEMI|
00000E00: 44 44 45 4C 44 45 20 45 4E 20 44 45 20 53 54 41 |DDELDE EN DE STA|
00000E10: 4E 44 41 41 52 44 00 53 16 D8 04 99 22 41 46 57 |NDAARD.S...."AFW|
00000E20: 49 4A 4B 49 4E 47 20 42 45 52 45 4B 45 4E 45 4E |IJKING BEREKENEN|
00000E30: 2E 22 3A 81 49 B2 31 A4 37 30 30 30 3A 82 3A 99 |.":.I.1.7000:.:.|
00000E40: 22 93 22 A3 32 35 29 22 50 41 47 49 4E 41 20 38 |".".25)"PAGINA 8|
00000E50: 2E 31 22 00 68 16 E2 04 99 22 35 30 30 30 20 44 |.1".h...."5000 D|
00000E60: 49 4D 58 28 32 35 30 29 00 93 16 EC 04 99 22 35 |IMX(250)......"5|
00000E70: 30 31 30 20 50 52 49 4E 54 22 5A 24 22 48 4F 45 |010 PRINT"Z$"HOE|
00000E80: 56 45 45 4C 20 47 45 54 41 4C 4C 45 4E 22 5A 24 |VEEL GETALLEN"Z$|
00000E90: 22 3B 22 00 A5 16 F6 04 99 22 35 30 32 30 20 49 |";"......"5020 I|
00000EA0: 4E 50 55 54 4E 00 E2 16 00 05 99 22 35 30 33 30 |NPUTN......"5030|
00000EB0: 20 50 52 49 4E 54 22 5A 24 22 47 45 45 46 20 44 | PRINT"Z$"GEEF D|
00000EC0: 45 20 47 45 54 41 4C 4C 45 4E 20 45 45 4E 20 56 |E GETALLEN EEN V|
00000ED0: 4F 4F 52 20 45 45 4E 20 28 45 4E 20 44 55 57 22 |OOR EEN (EN DUW"|
00000EE0: 5A 24 00 13 17 0A 05 99 22 35 30 34 30 20 50 52 |Z$......"5040 PR|
00000EF0: 49 4E 54 22 5A 24 22 4F 50 20 52 45 54 55 52 4E |INT"Z$"OP RETURN|
00000F00: 20 4E 41 20 49 45 44 45 52 20 47 45 54 41 4C 29 | NA IEDER GETAL)|
00000F10: 22 5A 24 00 28 17 14 05 99 22 35 30 35 30 20 46 |"Z$.(...."5050 F|
00000F20: 4F 52 49 3D 31 54 4F 4E 00 3E 17 1E 05 99 22 35 |ORI=1TON.>...."5|
00000F30: 30 36 30 20 49 4E 50 55 54 58 28 49 29 22 00 4E |060 INPUTX(I)".N|
00000F40: 17 28 05 99 22 35 30 37 30 20 4E 45 58 54 00 5D |.(.."5070 NEXT.]|
00000F50: 17 32 05 99 22 35 30 38 30 20 4D 3D 30 00 72 17 |.2.."5080 M=0.r.|
00000F60: 3C 05 99 22 35 30 39 30 20 46 4F 52 49 3D 31 54 |<.."5090 FORI=1T|
00000F70: 4F 4E 00 86 17 46 05 99 22 35 31 30 30 20 4D 3D |ON...F.."5100 M=|
00000F80: 4D 2B 58 28 49 29 00 96 17 50 05 99 22 35 31 31 |M+X(I)...P.."511|
00000F90: 30 20 4E 45 58 54 00 A7 17 5A 05 99 22 35 31 32 |0 NEXT...Z.."512|
00000FA0: 30 20 4D 3D 4D 2F 4E 00 B6 17 64 05 99 22 35 31 |0 M=M/N...d.."51|
00000FB0: 33 30 20 53 3D 30 00 CB 17 6E 05 99 22 35 31 34 |30 S=0...n.."514|
00000FC0: 30 20 46 4F 52 49 3D 31 54 4F 4E 00 E5 17 78 05 |0 FORI=1TON...x.|
00000FD0: 99 22 35 31 35 30 20 53 3D 53 2B 28 58 28 49 29 |."5150 S=S+(X(I)|
00000FE0: 2D 4D 29 5E 32 00 F5 17 82 05 99 22 35 31 36 30 |-M)^2......"5160|
00000FF0: 20 4E 45 58 54 00 0D 18 8C 05 99 22 35 31 37 30 | NEXT......"5170|
00001000: 20 53 3D 53 2F 28 4E 2D 31 29 5E 2E 35 00 34 18 | S=S/(N-1)^.5.4.|
00001010: 96 05 99 22 35 31 38 30 20 50 52 49 4E 54 22 5A |..."5180 PRINT"Z|
00001020: 24 22 47 45 4D 49 44 44 45 4C 44 45 20 49 53 22 |$"GEMIDDELDE IS"|
00001030: 5A 24 22 4D 00 65 18 A0 05 99 22 35 31 39 30 20 |Z$"M.e...."5190 |
00001040: 50 52 49 4E 54 22 5A 24 22 53 54 41 4E 44 41 41 |PRINT"Z$"STANDAA|
00001050: 52 44 20 41 46 57 49 4A 4B 49 4E 47 20 49 53 22 |RD AFWIJKING IS"|
00001060: 5A 24 22 53 22 00 74 18 AA 05 99 22 35 32 30 30 |Z$"S".t...."5200|
00001070: 20 45 4E 44 00 86 18 B4 05 8D 32 32 32 30 3A 8B | END......2220:.|
00001080: 46 4C A7 39 33 30 00 BF 18 BE 05 49 B2 39 3A 8D |FL.930.....I.9:.|
00001090: 32 32 38 30 3A 99 22 11 41 4C 53 20 55 20 48 45 |2280:.".ALS U HE|
000010A0: 54 20 50 52 4F 47 52 41 4D 4D 41 20 56 41 4E 20 |T PROGRAMMA VAN |
000010B0: 50 41 47 49 4E 41 20 38 2E 31 20 57 49 4C 54 00 |PAGINA 8.1 WILT.|
000010C0: ED 18 C8 05 99 22 5A 49 45 4E 20 52 55 4E 4E 45 |....."ZIEN RUNNE|
000010D0: 4E 2C 20 54 4F 45 54 53 20 44 41 4E 20 3C 52 3E |N, TOETS DAN <R>|
000010E0: 2E 20 56 45 52 56 4F 4C 47 20 55 57 22 00 00 19 |. VERVOLG UW"...|
000010F0: D2 05 99 22 4C 45 53 20 4D 45 54 20 3C 43 3E 2E |..."LES MET <C>.|
00001100: 00 1E 19 DC 05 A1 41 24 3A 8B 41 24 B3 B1 22 52 |......A$:.A$.."R|
00001110: 22 AF 41 24 B3 B1 22 43 22 A7 31 35 30 30 00 2F |".A$.."C".1500./|
00001120: 19 E6 05 8B 41 24 B2 22 52 22 A7 33 31 30 30 00 |....A$."R".3100.|
00001130: 40 19 F0 05 8B 41 24 B2 22 43 22 A7 33 33 31 30 |@....A$."C".3310|
00001140: 00 72 19 FA 05 49 B2 31 30 3A 8D 32 32 38 30 3A |.r...I.10:.2280:|
00001150: 99 22 11 22 A3 31 32 29 22 53 4F 52 54 45 52 45 |.".".12)"SORTERE|
00001160: 4E 22 3A 99 A3 31 32 29 22 A3 A3 A3 A3 A3 A3 A3 |N":..12)".......|
00001170: A3 22 00 9C 19 04 06 99 22 11 48 45 54 20 56 4F |."......".HET VO|
00001180: 4C 47 45 4E 44 45 20 50 52 4F 47 52 41 4D 4D 41 |LGENDE PROGRAMMA|
00001190: 20 49 53 20 49 4E 20 53 54 41 41 54 00 C6 19 0E | IS IN STAAT....|
000011A0: 06 99 22 54 4F 54 20 31 30 30 20 4E 41 4D 45 4E |.."TOT 100 NAMEN|
000011B0: 20 54 45 20 53 4F 52 54 45 52 45 4E 20 4E 41 41 | TE SORTEREN NAA|
000011C0: 52 20 41 41 4E 2D 00 EA 19 18 06 99 22 4C 45 49 |R AAN-......"LEI|
000011D0: 44 49 4E 47 20 56 41 4E 20 42 45 50 41 41 4C 44 |DING VAN BEPAALD|
000011E0: 45 20 57 41 41 52 44 45 4E 2E 00 0A 1A 22 06 99 |E WAARDEN...."..|
000011F0: 22 11 56 4F 4F 52 42 45 45 4C 44 45 4E 20 4B 55 |".VOORBEELDEN KU|
00001200: 4E 4E 45 4E 20 5A 49 4A 4E 3A 00 2D 1A 2C 06 99 |NNEN ZIJN:.-.,..|
00001210: 22 11 1D 1D 1D 53 4F 52 54 45 52 45 4E 20 4E 41 |"....SORTEREN NA|
00001220: 41 52 20 49 4E 4B 4F 4D 53 54 45 4E 2C 00 52 1A |AR INKOMSTEN,.R.|
00001230: 36 06 99 22 1D 1D 1D 53 4F 52 54 45 52 45 4E 20 |6.."...SORTEREN |
00001240: 4E 41 41 52 20 41 41 4E 54 41 4C 20 42 4F 45 4B |NAAR AANTAL BOEK|
00001250: 45 4E 00 6D 1A 40 06 99 22 1D 1D 1D 45 54 43 2E |EN.m.@.."...ETC.|
00001260: 22 3A 81 49 B2 31 A4 37 30 30 30 3A 82 00 84 1A |":.I.1.7000:....|
00001270: 4A 06 99 A3 32 35 29 22 50 41 47 49 4E 41 20 31 |J...25)"PAGINA 1|
00001280: 30 2E 31 22 00 AA 1A 54 06 99 22 35 35 30 30 20 |0.1"...T.."5500 |
00001290: 44 49 4D 4E 24 28 31 30 30 29 2C 53 28 31 30 30 |DIMN$(100),S(100|
000012A0: 29 2C 50 54 28 31 30 30 29 22 00 DD 1A 5E 06 99 |),PT(100)"...^..|
000012B0: 22 35 35 31 30 20 50 52 49 4E 54 22 5A 24 22 48 |"5510 PRINT"Z$"H|
000012C0: 4F 45 56 45 45 4C 20 4E 41 4D 45 4E 22 5A 24 3A |OEVEEL NAMEN"Z$:|
000012D0: 99 22 35 35 32 30 20 49 4E 50 55 54 4E 00 12 1B |."5520 INPUTN...|
000012E0: 68 06 99 22 35 35 33 30 20 50 52 49 4E 54 22 5A |h.."5530 PRINT"Z|
000012F0: 24 22 47 45 45 46 22 5A 24 22 4E 22 5A 24 22 4E |$"GEEF"Z$"N"Z$"N|
00001300: 41 4D 45 4E 20 45 4E 20 57 41 41 52 44 45 4E 22 |AMEN EN WAARDEN"|
00001310: 5A 24 00 27 1B 72 06 99 22 35 35 34 30 20 46 4F |Z$.'.r.."5540 FO|
00001320: 52 49 3D 31 54 4F 4E 00 4D 1B 7C 06 99 22 35 35 |RI=1TON.M.|.."55|
00001330: 35 30 20 49 4E 50 55 54 4E 24 28 49 29 2C 53 28 |50 INPUTN$(I),S(|
00001340: 49 29 22 3A 99 22 35 35 36 30 20 22 3B 00 8D 1B |I)":."5560 ";...|
00001350: 86 06 99 22 4E 45 58 54 22 3A 99 22 35 35 37 30 |..."NEXT":."5570|
00001360: 20 46 4F 52 49 3D 31 54 4F 4E 22 3A 99 22 35 35 | FORI=1TON":."55|
00001370: 38 30 20 4D 3D 2D 39 39 39 39 39 22 3A 99 22 35 |80 M=-99999":."5|
00001380: 35 39 30 20 46 4F 52 4A 3D 31 54 4F 4E 00 D4 1B |590 FORJ=1TON...|
00001390: 90 06 99 22 35 36 30 30 20 49 46 53 28 4A 29 3C |..."5600 IFS(J)<|
000013A0: 3D 4D 54 48 45 4E 35 36 33 30 22 3A 99 22 35 36 |=MTHEN5630":."56|
000013B0: 31 30 20 4D 3D 53 28 4A 29 22 3A 99 22 35 36 32 |10 M=S(J)":."562|
000013C0: 30 20 49 53 3D 4A 22 3A 99 22 35 36 33 30 20 4E |0 IS=J":."5630 N|
000013D0: 45 58 54 22 00 0A 1C 9A 06 99 22 35 36 34 30 20 |EXT"......"5640 |
000013E0: 50 54 28 49 29 3D 49 53 22 3A 99 22 35 36 35 30 |PT(I)=IS":."5650|
000013F0: 20 53 28 49 53 29 3D 2D 53 28 49 53 29 22 3A 99 | S(IS)=-S(IS)":.|
00001400: 22 35 36 36 30 20 4E 45 58 54 00 44 1C A4 06 99 |"5660 NEXT.D....|
00001410: 22 35 36 37 30 20 50 52 49 4E 54 22 5A 24 22 50 |"5670 PRINT"Z$"P|
00001420: 4C 41 41 54 53 22 5A 24 22 2C 22 5A 24 22 4E 41 |LAATS"Z$","Z$"NA|
00001430: 41 4D 22 5A 24 22 2C 22 5A 24 22 57 41 41 52 44 |AM"Z$","Z$"WAARD|
00001440: 45 22 5A 24 00 67 1C AE 06 99 22 35 36 38 30 20 |E"Z$.g...."5680 |
00001450: 50 52 49 4E 54 22 3A 99 22 35 36 39 30 20 46 4F |PRINT":."5690 FO|
00001460: 52 49 3D 31 54 4F 4E 00 A3 1C B8 06 99 22 35 37 |RI=1TON......"57|
00001470: 30 30 20 4B 3D 50 54 28 49 29 22 3A 99 22 35 37 |00 K=PT(I)":."57|
00001480: 31 30 20 50 52 49 4E 54 49 2C 4E 24 28 4B 29 2C |10 PRINTI,N$(K),|
00001490: 2D 53 28 4B 29 22 3A 99 22 35 37 32 30 20 4E 45 |-S(K)":."5720 NE|
000014A0: 58 54 22 00 C5 1C C2 06 81 49 B2 31 A4 33 30 30 |XT"......I.1.300|
000014B0: 30 30 3A 82 3A 99 3A 8D 32 32 32 30 3A 8B 46 4C |00:.:.:.2220:.FL|
000014C0: A7 31 34 37 30 00 FC 1C CC 06 49 B2 31 31 3A 8D |.1470.....I.11:.|
000014D0: 32 32 38 30 3A 99 22 11 4F 4F 4B 20 44 49 54 20 |2280:.".OOK DIT |
000014E0: 50 52 4F 47 52 41 4D 4D 41 20 28 53 4F 52 54 45 |PROGRAMMA (SORTE|
000014F0: 52 45 4E 29 20 4B 55 4E 54 20 55 22 00 2A 1D D6 |REN) KUNT U".*..|
00001500: 06 99 22 5A 49 45 4E 20 52 55 4E 4E 45 4E 2E 20 |.."ZIEN RUNNEN. |
00001510: 44 52 55 4B 20 44 41 41 52 56 4F 4F 52 20 4F 50 |DRUK DAARVOOR OP|
00001520: 20 3C 52 3E 20 4F 46 20 2D 22 00 52 1D E0 06 99 | <R> OF -".R....|
00001530: 22 4F 4D 20 55 57 20 4C 45 53 20 54 45 20 56 45 |"OM UW LES TE VE|
00001540: 52 56 4F 4C 47 45 4E 20 2D 20 4F 50 20 3C 43 3E |RVOLGEN - OP <C>|
00001550: 2E 22 00 70 1D EA 06 A1 41 24 3A 8B 41 24 B3 B1 |.".p....A$:.A$..|
00001560: 22 52 22 AF 41 24 B3 B1 22 43 22 A7 31 37 37 30 |"R".A$.."C".1770|
00001570: 00 81 1D F4 06 8B 41 24 B2 22 52 22 A7 33 33 33 |......A$."R".333|
00001580: 30 00 92 1D FE 06 8B 41 24 B2 22 43 22 A7 33 35 |0......A$."C".35|
00001590: 37 30 00 D0 1D 08 07 49 B2 31 32 3A 8D 32 32 38 |70.....I.12:.228|
000015A0: 30 3A 99 22 11 22 A3 31 32 29 22 57 4F 4F 52 44 |0:.".".12)"WOORD|
000015B0: 53 50 45 4C 4C 45 54 4A 45 22 3A 99 A3 31 32 29 |SPELLETJE":..12)|
000015C0: 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |".............."|
000015D0: 00 F8 1D 12 07 99 22 11 41 4C 53 20 44 45 20 43 |......".ALS DE C|
000015E0: 4F 4D 50 55 54 45 52 20 45 45 4E 20 57 4F 4F 52 |OMPUTER EEN WOOR|
000015F0: 44 20 4F 50 20 48 45 54 00 24 1E 1C 07 99 22 53 |D OP HET.$...."S|
00001600: 43 48 45 52 4D 20 41 46 44 52 55 4B 54 2C 20 4D |CHERM AFDRUKT, M|
00001610: 4F 45 54 20 44 45 20 47 45 42 52 55 49 4B 45 52 |OET DE GEBRUIKER|
00001620: 20 45 45 4E 00 4A 1E 26 07 99 22 53 59 4E 4F 4E | EEN.J.&.."SYNON|
00001630: 49 45 4D 20 56 41 4E 20 44 41 54 20 57 4F 4F 52 |IEM VAN DAT WOOR|
00001640: 44 20 49 4E 54 59 50 45 4E 2E 00 72 1E 30 07 99 |D INTYPEN..r.0..|
00001650: 22 11 44 45 20 43 4F 4D 50 55 54 45 52 20 47 45 |".DE COMPUTER GE|
00001660: 45 46 54 20 44 41 4E 20 41 41 4E 20 4F 46 20 48 |EFT DAN AAN OF H|
00001670: 45 54 00 87 1E 3A 07 99 22 57 4F 4F 52 44 20 47 |ET...:.."WOORD G|
00001680: 4F 45 44 20 49 53 2E 00 B0 1E 44 07 99 22 11 44 |OED IS....D..".D|
00001690: 45 20 4C 45 52 41 41 52 20 4B 41 4E 20 47 45 4D |E LERAAR KAN GEM|
000016A0: 41 4B 4B 45 4C 49 4A 4B 20 57 4F 4F 52 44 45 4E |AKKELIJK WOORDEN|
000016B0: 00 DB 1E 4E 07 99 22 42 49 4A 56 4F 45 47 45 4E |...N.."BIJVOEGEN|
000016C0: 20 44 4F 4F 52 20 4D 45 45 52 20 44 41 54 41 2D | DOOR MEER DATA-|
000016D0: 49 4E 53 54 52 55 4B 54 49 45 53 00 F0 1E 58 07 |INSTRUKTIES...X.|
000016E0: 99 22 54 45 20 53 43 48 52 49 4A 56 45 4E 2E 22 |."TE SCHRIJVEN."|
000016F0: 00 1F 1F 62 07 99 22 11 48 49 45 52 20 56 4F 4C |...b..".HIER VOL|
00001700: 47 54 20 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 |GT HET PROGRAMMA|
00001710: 3A 22 3A 81 49 B2 31 A4 31 30 30 30 30 3A 82 00 |:":.I.1.10000:..|
00001720: 36 1F 6C 07 99 A3 32 35 29 22 50 41 47 49 4E 41 |6.l...25)"PAGINA|
00001730: 20 31 32 2E 31 22 00 6F 1F 76 07 99 22 36 30 30 | 12.1".o.v.."600|
00001740: 30 20 52 45 41 44 4E 3A 46 4F 52 49 3D 31 54 4F |0 READN:FORI=1TO|
00001750: 4E 22 3A 99 22 36 30 32 30 20 52 45 41 44 57 24 |N":."6020 READW$|
00001760: 2C 4E 53 3A 46 4F 52 4B 3D 31 54 4F 4E 53 22 00 |,NS:FORK=1TONS".|
00001770: 8A 1F 80 07 99 22 36 30 34 30 20 52 45 41 44 53 |....."6040 READS|
00001780: 24 28 4B 29 3A 4E 45 58 54 22 00 BC 1F 8A 07 99 |$(K):NEXT"......|
00001790: 22 36 30 36 30 20 50 52 49 4E 54 22 5A 24 22 47 |"6060 PRINT"Z$"G|
000017A0: 45 45 46 20 45 45 4E 20 53 59 4E 4F 4E 49 45 4D |EEF EEN SYNONIEM|
000017B0: 20 56 4F 4F 52 20 22 5A 24 22 57 24 00 08 20 94 | VOOR "Z$"W$.. .|
000017C0: 07 99 22 36 30 37 30 20 49 4E 50 55 54 52 24 22 |.."6070 INPUTR$"|
000017D0: 3A 99 22 36 30 38 30 20 49 46 52 24 3D 22 3B 5A |:."6080 IFR$=";Z|
000017E0: 24 3B 22 48 45 4C 50 22 3B 5A 24 3B 22 54 48 45 |$;"HELP";Z$;"THE|
000017F0: 4E 36 31 36 30 22 3A 99 22 36 30 39 30 20 46 4F |N6160":."6090 FO|
00001800: 52 4B 3D 31 54 4F 4E 53 00 4A 20 9E 07 99 22 36 |RK=1TONS.J ..."6|
00001810: 31 30 30 20 49 46 52 24 3D 53 24 28 4B 29 54 48 |100 IFR$=S$(K)TH|
00001820: 45 4E 36 31 34 30 22 3A 99 22 36 31 31 30 20 4E |EN6140":."6110 N|
00001830: 45 58 54 22 3A 99 22 36 31 32 30 20 50 52 49 4E |EXT":."6120 PRIN|
00001840: 54 22 5A 24 22 4E 45 45 22 3B 00 86 20 A8 07 99 |T"Z$"NEE";.. ...|
00001850: 22 2C 20 50 52 4F 42 45 45 52 20 48 45 54 20 4E |", PROBEER HET N|
00001860: 4F 47 20 45 45 4E 53 20 4F 46 20 54 59 50 20 48 |OG EENS OF TYP H|
00001870: 45 4C 50 22 5A 24 3A 99 22 36 31 33 30 20 47 4F |ELP"Z$:."6130 GO|
00001880: 54 4F 36 30 37 30 00 A6 20 B2 07 99 22 36 31 34 |TO6070.. ..."614|
00001890: 30 20 50 52 49 4E 54 22 5A 24 22 43 4F 52 52 45 |0 PRINT"Z$"CORRE|
000018A0: 43 54 21 22 5A 24 00 E6 20 BC 07 99 22 36 31 35 |CT!"Z$.. ..."615|
000018B0: 30 20 47 4F 54 4F 36 32 30 30 22 3A 99 22 36 31 |0 GOTO6200":."61|
000018C0: 36 30 20 50 52 49 4E 54 57 24 22 5A 24 22 20 48 |60 PRINTW$"Z$" H|
000018D0: 45 45 46 54 20 44 45 20 53 59 4E 4F 4E 49 45 4D |EEFT DE SYNONIEM|
000018E0: 45 4E 3A 22 5A 24 00 2A 21 C6 07 99 22 36 31 37 |EN:"Z$.*!..."617|
000018F0: 30 20 46 4F 52 4B 3D 31 54 4F 4E 53 22 3A 99 22 |0 FORK=1TONS":."|
00001900: 36 31 38 30 20 50 52 49 4E 54 53 24 28 4B 29 22 |6180 PRINTS$(K)"|
00001910: 3A 99 22 36 31 39 30 20 4E 45 58 54 22 3A 99 22 |:."6190 NEXT":."|
00001920: 36 32 30 30 20 4E 45 58 54 22 00 3C 21 D0 07 99 |6200 NEXT".<!...|
00001930: 22 36 32 32 30 20 44 41 54 41 20 32 00 65 21 DA |"6220 DATA 2.e!.|
00001940: 07 99 22 36 32 33 30 20 44 41 54 41 20 47 45 56 |.."6230 DATA GEV|
00001950: 41 4E 47 45 4E 49 53 2C 33 2C 43 45 4C 2C 42 41 |ANGENIS,3,CEL,BA|
00001960: 4B 2C 4B 4F 54 00 88 21 E4 07 99 22 36 32 34 30 |K,KOT..!..."6240|
00001970: 20 44 41 54 41 20 48 55 49 53 2C 32 2C 57 4F 4E | DATA HUIS,2,WON|
00001980: 49 4E 47 2C 46 4C 41 54 00 8E 21 EE 07 99 00 A1 |ING,FLAT..!.....|
00001990: 21 F8 07 8D 32 32 32 30 3A 8B 46 4C A7 31 37 34 |!...2220:.FL.174|
000019A0: 30 00 DA 21 02 08 49 B2 31 33 3A 8D 32 32 38 30 |0..!..I.13:.2280|
000019B0: 3A 99 22 11 4F 4F 4B 20 44 49 54 20 4C 41 41 54 |:.".OOK DIT LAAT|
000019C0: 53 54 45 20 50 52 4F 47 52 41 4D 4D 41 20 28 57 |STE PROGRAMMA (W|
000019D0: 4F 4F 52 44 53 50 45 4C 29 22 00 09 22 0C 08 99 |OORDSPEL)".."...|
000019E0: 22 49 53 20 54 45 20 52 55 4E 4E 45 4E 2E 20 54 |"IS TE RUNNEN. T|
000019F0: 4F 45 54 53 20 44 41 4E 20 3C 52 3E 2C 20 41 4E |OETS DAN <R>, AN|
00001A00: 44 45 52 53 20 3C 43 3E 2E 00 27 22 16 08 A1 41 |DERS <C>..'"...A|
00001A10: 24 3A 8B 41 24 B3 B1 22 52 22 AF 41 24 B3 B1 22 |$:.A$.."R".A$.."|
00001A20: 43 22 A7 32 30 37 30 00 38 22 20 08 8B 41 24 B2 |C".2070.8" ..A$.|
00001A30: 22 52 22 A7 33 35 39 30 00 49 22 2A 08 8B 41 24 |"R".3590.I"*..A$|
00001A40: B2 22 43 22 A7 32 31 30 30 00 5C 22 34 08 8D 32 |."C".2100.\"4..2|
00001A50: 32 32 30 3A 8B 46 4C A7 31 37 34 30 00 97 22 3E |220:.FL.1740..">|
00001A60: 08 49 B2 31 34 3A 8D 32 32 38 30 3A 99 22 11 11 |.I.14:.2280:."..|
00001A70: 1D 1D 5A 4F 41 4C 53 20 55 20 42 45 47 52 45 50 |..ZOALS U BEGREP|
00001A80: 45 4E 20 5A 55 4C 54 20 48 45 42 42 45 4E 20 49 |EN ZULT HEBBEN I|
00001A90: 53 20 48 49 45 52 22 00 BE 22 48 08 99 22 1D 1D |S HIER".."H.."..|
00001AA0: 41 4C 4C 45 45 4E 20 44 45 20 52 45 43 4F 52 44 |ALLEEN DE RECORD|
00001AB0: 45 52 20 42 45 48 41 4E 44 45 4C 44 2E 22 00 E9 |ER BEHANDELD."..|
00001AC0: 22 52 08 99 22 1D 1D 44 45 20 42 45 48 41 4E 44 |"R.."..DE BEHAND|
00001AD0: 45 4C 49 4E 47 20 56 4F 4F 52 20 55 57 20 44 49 |ELING VOOR UW DI|
00001AE0: 53 4B 2D 44 52 49 56 45 22 00 14 23 5C 08 99 22 |SK-DRIVE"..#\.."|
00001AF0: 1D 1D 53 54 41 41 54 20 49 4E 20 44 45 20 44 49 |..STAAT IN DE DI|
00001B00: 53 4B 44 52 49 56 45 2D 48 41 4E 44 4C 45 49 44 |SKDRIVE-HANDLEID|
00001B10: 49 4E 47 22 00 3D 23 66 08 99 22 11 11 11 1D 1D |ING".=#f..".....|
00001B20: 1D 1D 1D 1D 44 49 54 20 42 45 53 4C 55 49 54 20 |....DIT BESLUIT |
00001B30: 44 45 20 43 55 52 53 55 53 20 56 41 4E 00 6A 23 |DE CURSUS VAN.j#|
00001B40: 70 08 99 22 1D 1D 1D 1D 1D 1D 11 12 42 45 47 49 |p.."........BEGI|
00001B50: 4E 4E 45 4E 44 20 42 41 53 49 43 20 56 4F 4F 52 |NNEND BASIC VOOR|
00001B60: 20 44 45 20 43 36 34 92 11 11 00 90 23 7A 08 99 | DE C64.....#z..|
00001B70: 22 11 11 55 20 5A 4F 55 20 4E 55 20 55 57 20 45 |"..U ZOU NU UW E|
00001B80: 49 47 45 4E 20 50 52 4F 47 52 41 4D 4D 41 27 53 |IGEN PROGRAMMA'S|
00001B90: 00 C6 23 84 08 99 22 4D 4F 45 54 45 4E 20 4B 55 |..#..."MOETEN KU|
00001BA0: 4E 4E 45 4E 20 53 43 48 52 49 4A 56 45 4E 20 56 |NNEN SCHRIJVEN V|
00001BB0: 4F 4F 52 22 3A 99 22 41 4C 4C 45 52 4C 45 49 20 |OOR":."ALLERLEI |
00001BC0: 54 41 4B 45 4E 2E 00 D8 23 8E 08 99 22 11 11 11 |TAKEN...#..."...|
00001BD0: 53 55 43 43 45 53 21 22 00 EB 23 98 08 8D 32 32 |SUCCES!"..#...22|
00001BE0: 32 30 3A 8B 46 4C A7 32 30 35 30 00 FB 23 A2 08 |20:.FL.2050..#..|
00001BF0: 8D 32 33 33 30 3A 8D 32 33 31 30 00 44 24 AC 08 |.2330:.2310.D$..|
00001C00: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00001C10: 11 11 11 11 11 11 11 11 11 11 12 20 3C 2B 3E 20 |........... <+> |
00001C20: 56 4F 4C 47 45 4E 44 45 20 50 41 47 49 4E 41 20 |VOLGENDE PAGINA |
00001C30: 20 3C 2D 3E 20 50 41 47 49 4E 41 20 54 45 52 55 | <-> PAGINA TERU|
00001C40: 47 20 92 22 00 56 24 B6 08 81 49 B2 31 A4 31 30 |G .".V$...I.1.10|
00001C50: 3A A1 58 24 3A 82 00 6A 24 C0 08 A1 58 24 3A 8B |:.X$:..j$...X$:.|
00001C60: 58 24 B2 22 22 A7 32 32 34 30 00 7D 24 CA 08 8B |X$."".2240.}$...|
00001C70: 58 24 B2 22 2B 22 A7 46 4C B2 30 3A 8E 00 90 24 |X$."+".FL.0:...$|
00001C80: D4 08 8B 58 24 B2 22 2D 22 A7 46 4C B2 31 3A 8E |...X$."-".FL.1:.|
00001C90: 00 9A 24 DE 08 89 32 32 34 30 00 D6 24 E8 08 8B |..$...2240..$...|
00001CA0: 49 B3 31 30 A7 99 22 93 12 20 43 55 52 53 55 53 |I.10..".. CURSUS|
00001CB0: 20 42 41 53 49 43 20 20 20 20 20 4C 45 53 20 39 | BASIC LES 9|
00001CC0: 20 20 20 20 20 50 41 47 49 4E 41 22 49 22 9D 20 | PAGINA"I". |
00001CD0: 20 20 92 22 3A 8E 00 12 25 F2 08 8B 49 B2 B1 31 | .":...%...I..1|
00001CE0: 30 A7 99 22 93 12 20 43 55 52 53 55 53 20 42 41 |0..".. CURSUS BA|
00001CF0: 53 49 43 20 20 20 20 20 4C 45 53 20 39 20 20 20 |SIC LES 9 |
00001D00: 20 20 50 41 47 49 4E 41 22 49 22 9D 20 20 92 22 | PAGINA"I". ."|
00001D10: 3A 8E 00 2D 25 FC 08 81 49 B2 31 A4 33 38 3A 99 |:..-%...I.1.38:.|
00001D20: 22 C0 22 3B 3A 82 3A 99 22 C0 22 3A 8E 00 71 25 |".";:.:.".":..q%|
00001D30: 06 09 99 A3 31 32 29 22 12 20 20 20 20 20 20 92 |....12)". .|
00001D40: 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |":."............|
00001D50: 12 20 54 52 49 4F 20 92 22 3A 99 22 1D 1D 1D 1D |. TRIO .":."....|
00001D60: 1D 1D 1D 1D 1D 1D 1D 1D 12 20 2D 2D 2D 2D 20 92 |......... ---- .|
00001D70: 22 00 B1 25 10 09 99 22 1D 1D 1D 1D 1D 1D 1D 1D |"..%..."........|
00001D80: 1D 1D 1D 1D 12 20 53 4F 46 54 20 92 22 3A 99 22 |..... SOFT .":."|
00001D90: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 20 20 |............. |
00001DA0: 20 20 20 92 20 4D 43 4D 4C 58 58 58 49 56 22 3A | . MCMLXXXIV":|
00001DB0: 8E 00 E0 25 1A 09 99 22 93 11 11 11 11 11 11 11 |...%..."........|
00001DC0: 11 22 A3 37 29 22 45 49 4E 44 45 20 56 41 4E 20 |.".7)"EINDE VAN |
00001DD0: 44 45 20 43 55 52 53 55 53 20 42 41 53 49 43 22 |DE CURSUS BASIC"|
00001DE0: 00 04 26 24 09 99 A3 37 29 22 B7 B7 B7 B7 B7 B7 |..&$...7)"......|
00001DF0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00001E00: B7 B7 B7 22 00 22 26 2E 09 99 22 13 11 11 11 11 |..."."&...".....|
00001E10: 11 11 11 11 11 11 11 11 11 11 11 22 3A 8D 32 33 |...........":.23|
00001E20: 31 30 00 6B 26 38 09 99 22 13 11 11 11 11 11 11 |10.k&8..".......|
00001E30: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001E40: 11 12 20 3C 2B 3E 20 45 49 4E 44 45 20 56 41 4E |.. <+> EINDE VAN|
00001E50: 20 4C 45 53 20 39 20 20 20 20 20 20 3C 2D 3E 20 | LES 9 <-> |
00001E60: 50 41 47 49 4E 41 20 31 20 92 22 00 7D 26 42 09 |PAGINA 1 .".}&B.|
00001E70: 81 49 B2 31 A4 31 33 3A A1 58 24 3A 82 00 91 26 |.I.1.13:.X$:...&|
00001E80: 4C 09 A1 58 24 3A 8B 58 24 B2 22 22 A7 32 33 38 |L..X$:.X$."".238|
00001E90: 30 00 A4 26 56 09 8B 58 24 B2 22 2B 22 A7 9E 36 |0..&V..X$."+"..6|
00001EA0: 34 37 33 38 00 B4 26 60 09 8B 58 24 B2 22 2D 22 |4738..&`..X$."-"|
00001EB0: A7 31 37 30 00 BE 26 6A 09 89 32 33 38 30 00 CA |.170..&j..2380..|
00001EC0: 26 74 09 81 4A B2 31 A4 32 35 00 D3 26 7E 09 99 |&t..J.1.25..&~..|
00001ED0: 22 93 22 00 DF 26 88 09 81 58 B2 31 A4 31 30 00 |"."..&...X.1.10.|
00001EE0: E8 26 92 09 99 22 11 22 00 EF 26 9C 09 82 58 00 |.&..."."..&...X.|
00001EF0: FC 26 A6 09 81 42 4C B2 31 A4 33 39 00 08 27 B0 |.&...BL.1.39..'.|
00001F00: 09 99 22 20 D1 9D 22 3B 00 14 27 BA 09 81 54 4D |.." ..";..'...TM|
00001F10: B2 31 A4 35 00 1C 27 C4 09 82 54 4D 00 24 27 CE |.1.5..'...TM.$'.|
00001F20: 09 82 42 4C 00 35 27 D8 09 81 20 42 4C B2 33 39 |..BL.5'... BL.39|
00001F30: A4 31 A9 AB 31 00 43 27 E2 09 99 22 20 9D 9D D1 |.1..1.C'..." ...|
00001F40: 9D 22 3B 00 4F 27 EC 09 81 54 4D B2 31 A4 35 00 |.";.O'...TM.1.5.|
00001F50: 57 27 F6 09 82 54 4D 00 5F 27 00 0A 82 42 4C 00 |W'...TM._'...BL.|
00001F60: 66 27 0A 0A 82 4A 00 74 27 14 0A 99 22 93 22 3A |f'...J.t'...".":|
00001F70: 89 36 36 30 00 90 27 1E 0A 99 22 34 30 30 30 20 |.660..'..."4000 |
00001F80: 46 4F 52 20 4A 20 3D 20 31 20 54 4F 20 32 35 22 |FOR J = 1 TO 25"|
00001F90: 00 A9 27 28 0A 99 22 34 30 31 30 20 50 52 49 4E |..'(.."4010 PRIN|
00001FA0: 54 22 5A 24 22 93 22 5A 24 00 C5 27 32 0A 99 22 |T"Z$"."Z$..'2.."|
00001FB0: 34 30 32 30 20 46 4F 52 20 58 20 3D 20 31 20 54 |4020 FOR X = 1 T|
00001FC0: 4F 20 31 30 22 00 DE 27 3C 0A 99 22 34 30 33 30 |O 10"..'<.."4030|
00001FD0: 20 50 52 49 4E 54 22 5A 24 22 11 22 5A 24 00 F1 | PRINT"Z$"."Z$..|
00001FE0: 27 46 0A 99 22 34 30 34 30 20 4E 45 58 54 20 58 |'F.."4040 NEXT X|
00001FF0: 22 00 0E 28 50 0A 99 22 34 30 35 30 20 46 4F 52 |"..(P.."4050 FOR|
00002000: 20 42 4C 20 3D 20 31 20 54 4F 20 33 39 22 00 2C | BL = 1 TO 39".,|
00002010: 28 5A 0A 99 22 34 30 36 30 20 50 52 49 4E 54 22 |(Z.."4060 PRINT"|
00002020: 5A 24 22 20 D1 9D 22 5A 24 22 3B 22 00 48 28 64 |Z$" .."Z$";".H(d|
00002030: 0A 99 22 34 30 37 30 20 46 4F 52 20 54 4D 20 3D |.."4070 FOR TM =|
00002040: 20 31 20 54 4F 20 35 22 00 5C 28 6E 0A 99 22 34 | 1 TO 5".\(n.."4|
00002050: 30 38 30 20 4E 45 58 54 20 54 4D 22 00 70 28 78 |080 NEXT TM".p(x|
00002060: 0A 99 22 34 30 39 30 20 4E 45 58 54 20 42 4C 22 |.."4090 NEXT BL"|
00002070: 00 95 28 82 0A 99 22 34 31 30 30 20 46 4F 52 20 |..(..."4100 FOR |
00002080: 42 4C 20 3D 20 33 39 20 54 4F 20 31 20 53 54 45 |BL = 39 TO 1 STE|
00002090: 50 20 2D 31 22 00 B5 28 8C 0A 99 22 34 31 31 30 |P -1"..(..."4110|
000020A0: 20 50 52 49 4E 54 22 5A 24 22 20 9D 9D D1 9D 22 | PRINT"Z$" ...."|
000020B0: 5A 24 22 3B 22 00 D1 28 96 0A 99 22 34 31 32 30 |Z$";"..(..."4120|
000020C0: 20 46 4F 52 20 54 4D 20 3D 20 31 20 54 4F 20 35 | FOR TM = 1 TO 5|
000020D0: 22 00 E5 28 A0 0A 99 22 34 31 33 30 20 4E 45 58 |"..(..."4130 NEX|
000020E0: 54 20 54 4D 22 00 F9 28 AA 0A 99 22 34 31 34 30 |T TM"..(..."4140|
000020F0: 20 4E 45 58 54 20 42 4C 22 00 0C 29 B4 0A 99 22 | NEXT BL"..)..."|
00002100: 34 31 35 30 20 4E 45 58 54 20 4A 22 00 16 29 BE |4150 NEXT J"..).|
00002110: 0A 8D 32 33 30 30 00 50 29 C8 0A 99 22 4C 45 54 |..2300.P)..."LET|
00002120: 20 4F 50 20 44 45 20 44 49 56 45 52 53 45 20 12 | OP DE DIVERSE .|
00002130: 46 4F 52 2D 4E 45 58 54 92 2D 4C 55 53 53 45 4E |FOR-NEXT.-LUSSEN|
00002140: 20 21 21 22 3A 81 54 B2 31 A4 33 30 30 30 3A 82 | !!":.T.1.3000:.|
00002150: 00 7E 29 D2 0A 99 22 13 11 11 1D 1D 1D 1D 1D 1D |.~)...".........|
00002160: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002170: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D AE 22 00 AB |............."..|
00002180: 29 DC 0A 81 4B B2 31 A4 31 34 3A 99 A3 33 34 29 |)...K.1.14:..34)|
00002190: 22 DD 22 3A 82 4B 3A 99 A3 33 34 29 22 BD 22 3A |".":.K:..34)".":|
000021A0: 81 54 B2 31 A4 31 35 30 30 3A 82 00 E1 29 E6 0A |.T.1.1500:...)..|
000021B0: 99 22 13 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
000021C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D AE 22 3A |..............":|
000021D0: 99 A3 32 32 29 22 DD 22 3A 99 A3 32 32 29 22 BD |..22)".":..22)".|
000021E0: 22 00 F1 29 F0 0A 81 54 B2 31 A4 31 35 30 30 3A |"..)...T.1.1500:|
000021F0: 82 00 2F 2A FA 0A 99 22 13 11 11 11 11 11 11 11 |../*..."........|
00002200: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002210: 1D 1D 1D 1D 1D 1D 1D 1D AE 22 3A 99 A3 32 32 29 |.........":..22)|
00002220: 22 BD 22 3A 81 54 B2 31 A4 31 35 30 30 3A 82 00 |".":.T.1.1500:..|
00002230: 59 2A 04 0B 99 22 13 11 11 11 11 11 11 11 1D 1D |Y*..."..........|
00002240: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002250: 1D 1D 1D 1D 1D 1D 1D AE 22 00 85 2A 0E 0B 81 4B |........"..*...K|
00002260: B2 31 A4 33 3A 99 A3 32 35 29 22 DD 22 3A 82 4B |.1.3:..25)".":.K|
00002270: 3A 99 A3 32 35 29 22 BD 22 3A 81 54 B2 31 A4 31 |:..25)".":.T.1.1|
00002280: 35 30 30 3A 82 00 BC 2A 18 0B 99 22 13 11 11 11 |500:...*..."....|
00002290: 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D |................|
000022A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000022B0: 1D AE 22 3A 99 A3 32 32 29 22 BD 22 00 CC 2A 22 |..":..22)"."..*"|
000022C0: 0B 81 54 B2 31 A4 31 35 30 30 3A 82 00 00 2B 2C |..T.1.1500:...+,|
000022D0: 0B 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
000022E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000022F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D AE 22 |..............."|
00002300: 00 2C 2B 36 0B 81 4B B2 31 A4 33 3A 99 A3 33 30 |.,+6..K.1.3:..30|
00002310: 29 22 DD 22 3A 82 4B 3A 99 A3 33 30 29 22 BD 22 |)".":.K:..30)"."|
00002320: 3A 81 54 B2 31 A4 31 35 30 30 3A 82 00 6C 2B 40 |:.T.1.1500:..l+@|
00002330: 0B 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00002340: 11 11 11 11 11 11 11 11 11 44 45 20 4C 4F 4F 50 |.........DE LOOP|
00002350: 53 20 42 49 4E 4E 45 4E 20 41 4E 44 45 52 45 20 |S BINNEN ANDERE |
00002360: 4C 4F 4F 50 53 20 57 4F 52 44 45 4E 00 A8 2B 4A |LOOPS WORDEN..+J|
00002370: 0B 99 22 12 47 45 4E 45 53 54 45 92 20 28 56 41 |..".GENESTE. (VA|
00002380: 4E 20 27 4E 45 53 54 45 4E 27 29 20 4C 55 53 53 |N 'NESTEN') LUSS|
00002390: 45 4E 20 47 45 4E 4F 45 4D 44 2E 22 3A 81 54 B2 |EN GENOEMD.":.T.|
000023A0: 31 A4 35 30 30 30 3A 82 00 BA 2B 54 0B 8D 32 32 |1.5000:...+T..22|
000023B0: 32 30 3A 8B 46 4C A7 36 32 30 00 C3 2B 5E 0B 89 |20:.FL.620..+^..|
000023C0: 39 33 30 00 E5 2B 68 0B 99 22 93 47 45 45 46 20 |930..+h..".GEEF |
000023D0: 56 4F 4F 52 57 45 52 50 20 42 45 47 49 4E 57 41 |VOORWERP BEGINWA|
000023E0: 41 52 44 45 22 00 EC 2B 72 0B 85 4A 00 13 2C 7C |ARDE"..+r..J..,||
000023F0: 0B 99 22 47 45 45 46 20 56 4F 4F 52 57 45 52 50 |.."GEEF VOORWERP|
00002400: 20 4C 45 45 46 54 49 4A 44 20 49 4E 20 4A 41 52 | LEEFTIJD IN JAR|
00002410: 45 4E 22 00 1A 2C 86 0B 85 4E 00 37 2C 90 0B 99 |EN"..,...N.7,...|
00002420: 22 47 45 45 46 20 41 46 53 43 48 52 49 4A 46 2D |"GEEF AFSCHRIJF-|
00002430: 57 41 41 52 44 45 22 00 3E 2C 9A 0B 85 53 00 5B |WAARDE".>,...S.[|
00002440: 2C A4 0B 99 22 45 49 4E 44 22 2C 22 44 45 50 52 |,..."EIND","DEPR|
00002450: 45 2D 22 2C 22 42 4F 45 4B 2D 22 00 7D 2C AE 0B |E-","BOEK-".},..|
00002460: 99 22 56 41 4E 20 4A 41 41 52 22 2C 22 43 49 41 |."VAN JAAR","CIA|
00002470: 54 49 45 22 2C 22 57 41 41 52 44 45 22 00 88 2C |TIE","WAARDE"..,|
00002480: B8 0B 81 4B B2 31 A4 4E 00 98 2C C2 0B 42 B2 42 |...K.1.N..,..B.B|
00002490: AB 28 4A AB 53 29 AD 4E 00 A9 2C CC 0B 99 4B 2C |.(J.S).N..,...K,|
000024A0: 28 4A AB 53 29 AD 4E 2C 42 00 AF 2C D6 0B 82 00 |(J.S).N,B..,....|
000024B0: D4 2C E0 0B 99 22 11 4E 4F 47 20 45 45 4E 53 20 |.,...".NOG EENS |
000024C0: 5A 49 45 4E 20 52 55 4E 4E 45 4E 20 28 4A 2F 4E |ZIEN RUNNEN (J/N|
000024D0: 29 20 3F 22 00 F2 2C EA 0B A1 41 24 3A 8B 41 24 |) ?"..,...A$:.A$|
000024E0: B3 B1 22 4A 22 AF 41 24 B3 B1 22 4E 22 A7 33 30 |.."J".A$.."N".30|
000024F0: 35 30 00 02 2D F4 0B 8B 41 24 B2 22 4A 22 A7 39 |50..-...A$."J".9|
00002500: 38 30 00 0B 2D FE 0B 99 22 11 22 00 1D 2D 08 0C |80..-..."."..-..|
00002510: 8D 32 32 32 30 3A 8B 46 4C A7 39 30 30 00 27 2D |.2220:.FL.900.'-|
00002520: 12 0C 89 31 31 39 30 00 44 2D 1C 0C 41 42 B2 41 |...1190.D-..AB.A|
00002530: 42 AA 31 3A 8B 41 42 B1 31 A7 8D 32 34 30 3A 89 |B.1:.AB.1..240:.|
00002540: 31 35 33 30 00 55 2D 26 0C 99 22 93 22 3A 86 58 |1530.U-&..".":.X|
00002550: 28 32 35 30 29 00 6E 2D 30 0C 99 22 48 4F 45 56 |(250).n-0.."HOEV|
00002560: 45 45 4C 20 47 45 54 41 4C 4C 45 4E 22 3B 00 75 |EEL GETALLEN";.u|
00002570: 2D 3A 0C 85 4E 00 A2 2D 44 0C 99 22 47 45 45 46 |-:..N..-D.."GEEF|
00002580: 20 44 45 20 47 45 54 41 4C 4C 45 4E 20 45 45 4E | DE GETALLEN EEN|
00002590: 20 56 4F 4F 52 20 45 45 4E 20 28 45 4E 20 44 55 | VOOR EEN (EN DU|
000025A0: 57 22 00 C3 2D 4E 0C 99 22 4F 50 20 52 45 54 55 |W"..-N.."OP RETU|
000025B0: 52 4E 20 4E 41 20 49 45 44 45 52 20 47 45 54 41 |RN NA IEDER GETA|
000025C0: 4C 29 22 00 CE 2D 58 0C 81 49 B2 31 A4 4E 00 D8 |L)"..-X..I.1.N..|
000025D0: 2D 62 0C 85 58 28 49 29 00 DE 2D 6C 0C 82 00 E6 |-b..X(I)..-l....|
000025E0: 2D 76 0C 4D B2 30 00 F1 2D 80 0C 81 49 B2 31 A4 |-v.M.0..-...I.1.|
000025F0: 4E 00 FE 2D 8A 0C 4D B2 4D AA 58 28 49 29 00 04 |N..-..M.M.X(I)..|
00002600: 2E 94 0C 82 00 0E 2E 9E 0C 4D B2 4D AD 4E 00 16 |.........M.M.N..|
00002610: 2E A8 0C 53 B2 30 00 21 2E B2 0C 81 49 B2 31 A4 |...S.0.!....I.1.|
00002620: 4E 00 34 2E BC 0C 53 B2 53 AA 28 58 28 49 29 AB |N.4...S.S.(X(I).|
00002630: 4D 29 AE 32 00 3A 2E C6 0C 82 00 4B 2E D0 0C 53 |M).2.:.....K...S|
00002640: B2 53 AD 28 4E AB 31 29 AE 2E 35 00 61 2E DA 0C |.S.(N.1)..5.a...|
00002650: 99 22 47 45 4D 49 44 44 45 4C 44 45 20 49 53 22 |."GEMIDDELDE IS"|
00002660: 4D 00 80 2E E4 0C 99 22 53 54 41 4E 44 41 41 52 |M......"STANDAAR|
00002670: 44 20 41 46 57 49 4A 4B 49 4E 47 20 49 53 22 53 |D AFWIJKING IS"S|
00002680: 00 93 2E EE 0C 8D 32 32 32 30 3A 8B 46 4C A7 31 |......2220:.FL.1|
00002690: 31 39 30 00 9D 2E F8 0C 89 31 35 33 30 00 DA 2E |190......1530...|
000026A0: 02 0D 43 44 B2 43 44 AA 31 3A 8B 43 44 B1 31 A7 |..CD.CD.1:.CD.1.|
000026B0: 8D 32 34 30 3A 89 31 38 30 30 20 20 20 20 99 22 |.240:.1800 ."|
000026C0: 93 22 3A 86 4E 24 28 31 30 30 29 2C 53 28 31 30 |.":.N$(100),S(10|
000026D0: 30 29 2C 50 54 28 31 30 30 29 00 FB 2E 0C 0D 99 |0),PT(100)......|
000026E0: 22 93 22 3A 86 4E 24 28 31 30 30 29 2C 53 28 31 |".":.N$(100),S(1|
000026F0: 30 30 29 2C 50 54 28 31 30 30 29 00 10 2F 16 0D |00),PT(100)../..|
00002700: 99 22 48 4F 45 56 45 45 4C 20 4E 41 4D 45 4E 22 |."HOEVEEL NAMEN"|
00002710: 00 17 2F 20 0D 85 4E 00 36 2F 2A 0D 99 22 47 45 |../ ..N.6/*.."GE|
00002720: 45 46 22 4E 22 4E 41 4D 45 4E 20 45 4E 20 57 41 |EF"N"NAMEN EN WA|
00002730: 41 52 44 45 4E 22 00 41 2F 34 0D 81 49 B2 31 A4 |ARDEN".A/4..I.1.|
00002740: 4E 00 51 2F 3E 0D 85 4E 24 28 49 29 2C 53 28 49 |N.Q/>..N$(I),S(I|
00002750: 29 00 57 2F 48 0D 82 00 62 2F 52 0D 81 49 B2 31 |).W/H...b/R..I.1|
00002760: A4 4E 00 6F 2F 5C 0D 4D B2 AB 39 39 39 39 39 00 |.N.o/\.M..99999.|
00002770: 7A 2F 66 0D 81 4A B2 31 A4 4E 00 8C 2F 70 0D 8B |z/f..J.1.N../p..|
00002780: 53 28 4A 29 B3 B2 4D A7 33 34 37 30 00 97 2F 7A |S(J)..M.3470../z|
00002790: 0D 4D B2 53 28 4A 29 00 A0 2F 84 0D 49 53 B2 4A |.M.S(J)../..IS.J|
000027A0: 00 A6 2F 8E 0D 82 00 B3 2F 98 0D 50 54 28 49 29 |../...../..PT(I)|
000027B0: B2 49 53 00 C4 2F A2 0D 53 28 49 53 29 B2 AB 53 |.IS../..S(IS)..S|
000027C0: 28 49 53 29 00 CA 2F AC 0D 82 00 E8 2F B6 0D 99 |(IS)../...../...|
000027D0: 22 50 4C 41 41 54 53 22 2C 22 4E 41 41 4D 22 2C |"PLAATS","NAAM",|
000027E0: 22 57 41 41 52 44 45 22 00 EE 2F C0 0D 99 00 F9 |"WAARDE"../.....|
000027F0: 2F CA 0D 81 49 B2 31 A4 4E 00 05 30 D4 0D 4B B2 |/...I.1.N..0..K.|
00002800: 50 54 28 49 29 00 18 30 DE 0D 99 49 2C 4E 24 28 |PT(I)..0...I,N$(|
00002810: 4B 29 2C AB 53 28 4B 29 00 1E 30 E8 0D 82 00 31 |K),.S(K)..0....1|
00002820: 30 F2 0D 8D 32 32 32 30 3A 8B 46 4C A7 31 35 33 |0...2220:.FL.153|
00002830: 30 00 3B 30 FC 0D 89 31 38 30 30 00 49 30 06 0E |0.;0...1800.I0..|
00002840: 9C 3A 99 22 93 22 3A 87 4E 00 54 30 10 0E 81 49 |.:.".":.N.T0...I|
00002850: B2 31 A4 4E 00 67 30 1A 0E 87 57 24 2C 4E 53 3A |.1.N.g0...W$,NS:|
00002860: 81 4B B2 31 A4 4E 53 00 76 30 24 0E 87 53 24 28 |.K.1.NS.v0$..S$(|
00002870: 4B 29 3A 82 20 4B 00 97 30 2E 0E 99 22 47 45 45 |K):. K..0..."GEE|
00002880: 46 20 45 45 4E 20 53 59 4E 4F 4E 49 45 4D 20 56 |F EEN SYNONIEM V|
00002890: 4F 4F 52 20 22 57 24 00 9F 30 38 0E 85 52 24 00 |OOR "W$..08..R$.|
000028A0: B3 30 42 0E 8B 52 24 B2 22 48 45 4C 50 22 A7 33 |.0B..R$."HELP".3|
000028B0: 37 33 30 00 BF 30 4C 0E 81 4B B2 31 A4 4E 53 00 |730..0L..K.1.NS.|
000028C0: D2 30 56 0E 8B 52 24 B2 53 24 28 4B 29 A7 33 37 |.0V..R$.S$(K).37|
000028D0: 31 30 00 DA 30 60 0E 82 20 4B 00 07 31 6A 0E 99 |10..0`.. K..1j..|
000028E0: 22 4E 45 45 2C 20 50 52 4F 42 45 45 52 20 48 45 |"NEE, PROBEER HE|
000028F0: 54 20 4E 4F 47 20 45 45 4E 53 20 4F 46 20 54 59 |T NOG EENS OF TY|
00002900: 50 20 48 45 4C 50 22 00 11 31 74 0E 89 33 36 34 |P HELP"..1t..364|
00002910: 30 00 2B 31 7E 0E 99 22 43 4F 52 52 45 43 54 21 |0.+1~.."CORRECT!|
00002920: 22 3A 8B 49 B2 4E A7 32 31 30 30 00 35 31 88 0E |":.I.N.2100.51..|
00002930: 89 33 37 37 30 00 54 31 92 0E 99 57 24 22 20 48 |.3770.T1...W$" H|
00002940: 45 45 46 54 20 44 45 20 53 59 4E 4F 4E 49 45 4D |EEFT DE SYNONIEM|
00002950: 45 4E 3A 22 00 60 31 9C 0E 81 4B B2 31 A4 4E 53 |EN:".`1...K.1.NS|
00002960: 00 6B 31 A6 0E 99 53 24 28 4B 29 00 73 31 B0 0E |.k1...S$(K).s1..|
00002970: 82 20 4B 00 7B 31 BA 0E 82 20 49 00 83 31 C4 0E |. K.{1... I..1..|
00002980: 83 20 32 00 A2 31 CE 0E 83 20 47 45 56 41 4E 47 |. 2..1... GEVANG|
00002990: 45 4E 49 53 2C 33 2C 43 45 4C 2C 42 41 4B 2C 4B |ENIS,3,CEL,BAK,K|
000029A0: 4F 54 00 BB 31 D8 0E 83 20 48 55 49 53 2C 32 2C |OT..1... HUIS,2,|
000029B0: 57 4F 4E 49 4E 47 2C 46 4C 41 54 00 E0 31 E2 0E |WONING,FLAT..1..|
000029C0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000029D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000029E0: 00 05 32 EC 0E 8F 20 2A 20 20 20 20 20 20 20 20 |..2... * |
000029F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A00: 20 20 20 20 2A 00 2A 32 F6 0E 8F 20 2A 20 20 20 | *.*2... * |
00002A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A20: 20 20 20 20 20 20 20 20 20 2A 00 4F 32 00 0F 8F | *.O2...|
00002A30: 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | * |
00002A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
00002A50: 74 32 0A 0F 8F 20 2A 20 20 20 20 20 20 20 20 20 |t2... * |
00002A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A70: 20 20 20 2A 00 99 32 14 0F 8F 20 2A 20 20 20 20 | *..2... * |
00002A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A90: 20 20 20 20 20 20 20 20 2A 00 BE 32 1E 0F 8F 20 | *..2... |
00002AA0: 2A 20 20 54 52 49 4F 20 20 20 20 20 20 20 20 20 |* TRIO |
00002AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 E3 | *..|
00002AC0: 32 28 0F 8F 20 2A 20 20 2D 2D 2D 2D 20 20 20 20 |2(.. * ---- |
00002AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002AE0: 20 20 2A 00 08 33 32 0F 8F 20 2A 20 20 53 4F 46 | *..32.. * SOF|
00002AF0: 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |T |
00002B00: 20 20 20 20 20 20 20 2A 00 2D 33 3C 0F 8F 20 2A | *.-3<.. *|
00002B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002B20: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 52 33 | *.R3|
00002B30: 46 0F 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |F.. * |
00002B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002B50: 20 2A 00 77 33 50 0F 8F 20 2A 20 20 20 20 20 20 | *.w3P.. * |
00002B60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002B70: 20 20 20 20 20 20 2A 00 9C 33 5A 0F 8F 20 2A 20 | *..3Z.. * |
00002B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002B90: 20 20 20 20 20 20 20 20 20 20 20 2A 00 C1 33 64 | *..3d|
00002BA0: 0F 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.. * |
00002BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002BC0: 2A 00 E6 33 6E 0F 8F 20 2A 20 20 20 20 20 20 20 |*..3n.. * |
00002BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002BE0: 20 20 20 20 20 2A 00 0B 34 78 0F 8F 20 2A 20 20 | *..4x.. * |
00002BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002C00: 20 20 20 20 20 20 20 20 20 20 2A 00 30 34 82 0F | *.04..|
00002C10: 8F 20 2A 20 20 48 4F 4D 4F 20 53 4F 49 54 20 20 |. * HOMO SOIT |
00002C20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *|
00002C30: 00 55 34 8C 0F 8F 20 2A 20 20 20 20 20 20 20 20 |.U4... * |
00002C40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002C50: 20 20 20 20 2A 00 7A 34 96 0F 8F 20 2A 20 20 20 | *.z4... * |
00002C60: 20 20 20 20 20 20 20 51 55 49 20 4D 41 4C 20 59 | QUI MAL Y|
00002C70: 20 50 45 4E 53 45 20 21 20 2A 00 9F 34 A0 0F 8F | PENSE ! *..4...|
00002C80: 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | * |
00002C90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
00002CA0: C4 34 AA 0F 8F 20 2A 20 20 20 20 20 20 20 20 20 |.4... * |
00002CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002CC0: 20 20 20 2A 00 E9 34 B4 0F 8F 20 2A 20 20 20 20 | *..4... * |
00002CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002CE0: 20 20 20 20 20 20 20 20 2A 00 0E 35 BE 0F 8F 20 | *..5... |
00002CF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 00 |**************..|
00002D10: 00 |. |
....D..53281,0:.53280,0.(.N..G(142):."."
.5.X.Z$.G(34).G...."..................":
."........BASIC 2.9..."......"........AA
NGEPAST VOOR C-64 .......".............
..DOOR ";:.2310... ..I.1.7000:..M...I.1:
.2280......"..".10)"LES 9":..10)".....".
5.....7)"1. PROGRAMMA'S SAVEN/LOADEN":..
7)"2. VOORBEELD PROGRAMMA'S:.._.H...9)"A
. ANIMATIE":..9)"B. DEPRECIATIE...R...9)
"C. GEMIDDELDE EN":..12)"STANDAARD AFWIJ
KING.......9)"D. SORTEREN.O.....9)"E. WO
ORDSPELLETJE":.240:.280......"...LET OP:
";......"PROGRAMMA'S MET EEN DIM-IN-":.
"....... ";.8...."STRUKTIE ZIJN IN DEZE
LES MAAR.J...."........EEN MAAL TE RUNNE
N !":.I.1.7000:.:..|....2220:.FL.170..."
.I.2:.2280.C.,..".".10)"PROGRAMMA'S SAVE
N":..10)"................."...6.."NADAT
U EEN PROGRAMMA OP UW C-64...@.."GESCHRE
VEN HEEFT, WILT U HET MISSCHIEN.B.J.."OP
CASSETTE BEWAREN TOT EEN VOLGENDE.N.T..
"KEER..Z.^..".PLAATS ALLEREERST EEN CASS
ETTE IN DE...H.."RECORDER....R..".ALS U
EEN NAAM VOOR UW PROGRAMMA GEKO-...|.."Z
EN HEEFT, BIJV. 'TRIO-SOFT', TYPT U:....
.."..SAVE "Z$"TRIO-SOFT"Z$.,....".EN DUW
T DAARNA OP DE RETURN TOETS..V....".DIT
PROGRAMMA WORDT DAN OP DE TAPE.T...."GES
AVED.":.2220:.FL.170.....I.3:.2280......
".".10)"PROGRAMMA'S LADEN":..10)".......
.........."...B.."ALS U EEN PROGRAMMA VA
NAF DE CASSETTE...L.."IN DE COMPUTER WIL
T LADEN, BIJVOORBEELD.C.V.."'TRIO-SOFT',
MOET U EERST DE TAPE TERUG.M...."SPOELE
N ALS DIT NODIG IS, EN DAARNA.Z...."TYPE
N:......"..LOAD "Z$"TRIO-SOFT"Z$......".
EN OP DE RETURN TOETS DUWEN.......".DIT
PROGRAMMA WORDT DAN IN UW C-64......"GEL
ADEN.":.2220:.FL.290.....I.4:.2280.=.&..
".DE REST VAN DEZE LESSEN BESTAAT UIT._.
0.."VIJF VOORBEELD-PROGRAMMA'S....:.."..
DEZE ZIJN ONTWORPEN OM DE MOGELIJK-...D.
."HEDEN VAN BASIC AAN TE TONEN, EN.Y.N..
"GEBRUIKEN ALLEEN DE INSTRUKTIES,...X.."
GELEERD IN DEZE CURSUS....B..2220:.FL.43
0...L.I.5:.2280.>.V..".".15)"ANIMATIE":.
.15)"........".N....".HET VOLGENDE PROGR
AMMA LAAT EEN BAL 25X"......"HEEN EN WEE
R OVER HET SCHERM VLIEGEN.":.I.1.7000:..
......25)"PAGINA 5.1".Y...."4000 FOR J =
1 TO 25"......"4010 PRINT"Z$"."Z$......
"4020 FOR X = 1 TO 10".'...."4030 PRINT"
Z$"."Z$.:.F.."4040 NEXT X".W.P.."4050 FO
R BL = 1 TO 39".U.Z.."4060 PRINT"Z$" Q."
Z$";"......"4070 FOR TM = 1 TO 5"......"
4080 NEXT TM"......"4090 NEXT BL"......"
4100 FOR BL = 39 TO 1 STEP -1"......"411
0 PRINT"Z$" ..Q."Z$";"......"4120 FOR TM
= 1 TO 5"... .."4130 NEXT TM".B.*.."414
0 NEXT BL".U.4.."4150 NEXT J"._.>..2300.
R.H.."PROBEER HET!. .R..".DRUK OP <R> OM
DIT PROGRAMMA TE RUNNEN.K.\.."OF OP <C>
OM UW LES TE VERVOLGEN..."...F..A$:.A$.
."R".A$.."C".870...P..A$."R".2420...Z..2
220:.FL.540.....I.6:.2280.......)....259
0.`...I.7:.2280:.".".15)"DEPRECIATIE":..
15)"..........."......".DIT PROGRAMMA ZA
L DE JAARLIJKSE DEPRE-......"CIATIE EN B
OEKWAARDE VOOR EEN VOORWERP.L...."BEREKE
NEN:...J..I.1.7000:....T..".".25)"PAGINA
7.1.".'...."4500 PRINT"Z$"GEEF VOORWERP
BEGINWAARDE"Z$.9...."4510 INPUTJ.P...."
4520 PRINT"Z$"GEEF VOORWERP LEEFTIJD IN
JAREN"Z$......"4530 INPUTN......"4540 PR
INT"Z$"GEEF AFSCHRIJF-WAARDE"Z$.A...."45
50 INPUTS......"4560 PRINT"Z$"EIND"Z$","
Z$"DEPRE-"Z$","Z$"BOEK-"Z$.8.$.."4565 PR
INT"Z$"VAN JAAR"Z$","Z$"CIATIE"Z$","Z$"W
AARDE"Z$.N...."4570 FORK=1TON".F.8.."458
0 B=B-(J-S)/N"...B.."4590 PRINTK,(J-S)/N
,B"...L.."4600 NEXT"...V.."4610 END"...`
..2300.A.J.."PROBEER HET!...T..".DRUK OP
<R> OM DIT PROGRAMMA TE RUNNEN...~.."OF
OP <C> OM UW LES TE VERVOLGEN...".8....
A$:.A$.."R".A$.."C".1160.I....A$."R".292
0.S....3080.A...I.8:.2280......".".3)"GE
MIDDELDE EN STANDAARD AFWIJKING.......3)
"................................."...D.
.".DIT PROGRAMMA ZAL VAN EEN HOEVEELHEID
...N.."GETALLEN HET GEMIDDELDE EN DE STA
NDAARD.S.X.."AFWIJKING BEREKENEN.":.I.1.
7000:.:.".".25)"PAGINA 8.1".H...."5000 D
IMX(250)......"5010 PRINT"Z$"HOEVEEL GET
ALLEN"Z$";"......"5020 INPUTN......"5030
PRINT"Z$"GEEF DE GETALLEN EEN VOOR EEN
(EN DUW"Z$......"5040 PRINT"Z$"OP RETURN
NA IEDER GETAL)"Z$.(...."5050 FORI=1TON
.>...."5060 INPUTX(I)".N.(.."5070 NEXT.]
.2.."5080 M=0.R.<.."5090 FORI=1TON...F..
"5100 M=M+X(I)...P.."5110 NEXT...Z.."512
0 M=M/N...D.."5130 S=0.K.N.."5140 FORI=1
TON...X.."5150 S=S+(X(I)-M)^2......"5160
NEXT......"5170 S=S/(N-1)^.5.4...."5180
PRINT"Z$"GEMIDDELDE IS"Z$"M.E. .."5190
PRINT"Z$"STANDAARD AFWIJKING IS"Z$"S".T.
..."5200 END......2220:.FL.930.....I.9:.
2280:.".ALS U HET PROGRAMMA VAN PAGINA 8
.1 WILT...H.."ZIEN RUNNEN, TOETS DAN <R>
. VERVOLG UW"...R.."LES MET <C>.......A$
:.A$.."R".A$.."C".1500./....A$."R".3100.
@....A$."C".3310.R...I.10:.2280:.".".12)
"SORTEREN":..12)"........"......".HET VO
LGENDE PROGRAMMA IS IN STAAT.F...."TOT 1
00 NAMEN TE SORTEREN NAAR AAN-......"LEI
DING VAN BEPAALDE WAARDEN...."..".VOORBE
ELDEN KUNNEN ZIJN:.-.,.."....SORTEREN NA
AR INKOMSTEN,.R.6.."...SORTEREN NAAR AAN
TAL BOEKEN.M.@.."...ETC.":.I.1.7000:....
J...25)"PAGINA 10.1"...T.."5500 DIMN$(10
0),S(100),PT(100)"...^.."5510 PRINT"Z$"H
OEVEEL NAMEN"Z$:."5520 INPUTN...H.."5530
PRINT"Z$"GEEF"Z$"N"Z$"NAMEN EN WAARDEN"
Z$.'.R.."5540 FORI=1TON.M.|.."5550 INPUT
N$(I),S(I)":."5560 ";......"NEXT":."5570
FORI=1TON":."5580 M=-99999":."5590 FORJ
=1TON.T...."5600 IFS(J)<=MTHEN5630":."56
10 M=S(J)":."5620 IS=J":."5630 NEXT"....
.."5640 PT(I)=IS":."5650 S(IS)=-S(IS)":.
"5660 NEXT.D...."5670 PRINT"Z$"PLAATS"Z$
","Z$"NAAM"Z$","Z$"WAARDE"Z$.G...."5680
PRINT":."5690 FORI=1TON......"5700 K=PT(
I)":."5710 PRINTI,N$(K),-S(K)":."5720 NE
XT".E.B..I.1.30000:.:.:.2220:.FL.1470...
L.I.11:.2280:.".OOK DIT PROGRAMMA (SORTE
REN) KUNT U".*.V.."ZIEN RUNNEN. DRUK DAA
RVOOR OP <R> OF -".R...."OM UW LES TE VE
RVOLGEN - OP <C>.".P....A$:.A$.."R".A$..
"C".1770......A$."R".3330......A$."C".35
70.P...I.12:.2280:.".".12)"WOORDSPELLETJ
E":..12)".............."......".ALS DE C
OMPUTER EEN WOORD OP HET.$...."SCHERM AF
DRUKT, MOET DE GEBRUIKER EEN.J.&.."SYNON
IEM VAN DAT WOORD INTYPEN..R.0..".DE COM
PUTER GEEFT DAN AAN OF HET...:.."WOORD G
OED IS....D..".DE LERAAR KAN GEMAKKELIJK
WOORDEN...N.."BIJVOEGEN DOOR MEER DATA-
INSTRUKTIES...X.."TE SCHRIJVEN."...B..".
HIER VOLGT HET PROGRAMMA:":.I.1.10000:..
6.L...25)"PAGINA 12.1".O.V.."6000 READN:
FORI=1TON":."6020 READW$,NS:FORK=1TONS".
....."6040 READS$(K):NEXT"......"6060 PR
INT"Z$"GEEF EEN SYNONIEM VOOR "Z$"W$.. .
.."6070 INPUTR$":."6080 IFR$=";Z$;"HELP"
;Z$;"THEN6160":."6090 FORK=1TONS.J ..."6
100 IFR$=S$(K)THEN6140":."6110 NEXT":."6
120 PRINT"Z$"NEE";.. ...", PROBEER HET N
OG EENS OF TYP HELP"Z$:."6130 GOTO6070..
..."6140 PRINT"Z$"CORRECT!"Z$.. ..."615
0 GOTO6200":."6160 PRINTW$"Z$" HEEFT DE
SYNONIEMEN:"Z$.*!F.."6170 FORK=1TONS":."
6180 PRINTS$(K)":."6190 NEXT":."6200 NEX
T".<!P.."6220 DATA 2.E!Z.."6230 DATA GEV
ANGENIS,3,CEL,BAK,KOT..!..."6240 DATA HU
IS,2,WONING,FLAT..!.....!...2220:.FL.174
0.Z!..I.13:.2280:.".OOK DIT LAATSTE PROG
RAMMA (WOORDSPEL)".."..."IS TE RUNNEN. T
OETS DAN <R>, ANDERS <C>..'"...A$:.A$.."
R".A$.."C".2070.8" ..A$."R".3590.I"*..A$
."C".2100.\"4..2220:.FL.1740..">.I.14:.2
280:."....ZOALS U BEGREPEN ZULT HEBBEN I
S HIER".."H.."..ALLEEN DE RECORDER BEHAN
DELD.".."R.."..DE BEHANDELING VOOR UW DI
SK-DRIVE"..#\.."..STAAT IN DE DISKDRIVE-
HANDLEIDING".=#F..".........DIT BESLUIT
DE CURSUS VAN.J#P.."........BEGINNEND BA
SIC VOOR DE C64.....#Z.."..U ZOU NU UW E
IGEN PROGRAMMA'S.F#..."MOETEN KUNNEN SCH
RIJVEN VOOR":."ALLERLEI TAKEN..X#..."...
SUCCES!"..#...2220:.FL.2050..#...2330:.2
310.D$..."......................... <+>
VOLGENDE PAGINA <-> PAGINA TERUG .".V$.
..I.1.10:.X$:..J$...X$:.X$."".2240.}$J..
X$."+".FL.0:...$T..X$."-".FL.1:...$...22
40.V$...I.10..".. CURSUS BASIC LES 9
PAGINA"I". .":...%...I..10..".. C
URSUS BASIC LES 9 PAGINA"I". ."
:..-%...I.1.38:.".";:.:.".":..Q%....12)"
. .":."............. TRIO .":."....
......... ---- ."..%..."............. SO
FT .":."............. . MCMLXXXIV":
...%...".........".7)"EINDE VAN DE CURSU
S BASIC"..&$...7)"......................
..."."&..."................":.2310.K&8..
"......................... <+> EINDE VAN
LES 9 <-> PAGINA 1 .".}&B..I.1.13:
.X$:...&L..X$:.X$."".2380..&V..X$."+"..6
4738..&`..X$."-".170..&J..2380.J&T..J.1.
25.S&~.."."..&...X.1.10..&..."."..&...X.
.&...BL.1.39..'..." Q.";..'...TM.1.5..'D
..TM.$'N..BL.5'X.. BL.39.1..1.C'..." ..Q
.";.O'...TM.1.5.W'...TM._'...BL.F'...J.T
'...".":.660..'..."4000 FOR J = 1 TO 25"
..'(.."4010 PRINT"Z$"."Z$.E'2.."4020 FOR
X = 1 TO 10"..'<.."4030 PRINT"Z$"."Z$..
'F.."4040 NEXT X"..(P.."4050 FOR BL = 1
TO 39".,(Z.."4060 PRINT"Z$" Q."Z$";".H(D
.."4070 FOR TM = 1 TO 5".\(N.."4080 NEXT
TM".P(X.."4090 NEXT BL"..(..."4100 FOR
BL = 39 TO 1 STEP -1"..(..."4110 PRINT"Z
$" ..Q."Z$";".Q(..."4120 FOR TM = 1 TO 5
"..( .."4130 NEXT TM"..(..."4140 NEXT BL
"..)..."4150 NEXT J"..)...2300.P)H.."LET
OP DE DIVERSE .FOR-NEXT.-LUSSEN !!":.T.
1.3000:..~)R..".........................
............."..)...K.1.14:..34)".":.K:.
.34)".":.T.1.1500:...)..."..............
..............":..22)".":..22)"."..)...T
.1.1500:../*..."........................
.........":..22)".":.T.1.1500:..Y*..."..
................................"..*...K
.1.3:..25)".":.K:..25)".":.T.1.1500:...*
..."....................................
..":..22)".".L*"..T.1.1500:...+,..".....
......................................."
.,+6..K.1.3:..30)".":.K:..30)".":.T.1.15
00:..L+@.."......................DE LOOP
S BINNEN ANDERE LOOPS WORDEN..+J..".GENE
STE. (VAN 'NESTEN') LUSSEN GENOEMD.":.T.
1.5000:...+T..2220:.FL.620.C+^..930..+H.
.".GEEF VOORWERP BEGINWAARDE"..+R..J..,|
.."GEEF VOORWERP LEEFTIJD IN JAREN"..,..
.N.7,..."GEEF AFSCHRIJF-WAARDE".>,...S.[
,..."EIND","DEPRE-","BOEK-".},..."VAN JA
AR","CIATIE","WAARDE"..,...K.1.N..,B.B.B
.(J.S).N..,L..K,(J.S).N,B..,V...T,...".N
OG EENS ZIEN RUNNEN (J/N) ?"..,...A$:.A$
.."J".A$.."N".3050..-...A$."J".980..-...
"."..-...2220:.FL.900.'-...1190.D-..AB.A
B.1:.AB.1..240:.1530.U-&..".":.X(250).N-
0.."HOEVEEL GETALLEN";.U-:..N..-D.."GEEF
DE GETALLEN EEN VOOR EEN (EN DUW".C-N..
"OP RETURN NA IEDER GETAL)".N-X..I.1.N.X
-B..X(I)..-L....-V.M.0..-...I.1.N..-..M.
M.X(I)...........M.M.N.....S.0.!....I.1.
N.4...S.S.(X(I).M).2.:.F...K.P.S.S.(N.1)
..5.A.Z.."GEMIDDELDE IS"M......"STANDAAR
D AFWIJKING IS"S......2220:.FL.1190.....
.1530.Z...CD.CD.1:.CD.1..240:.1800 ."
.":.N$(100),S(100),PT(100)......".":.N$(
100),S(100),PT(100)../..."HOEVEEL NAMEN"
../ ..N.6/*.."GEEF"N"NAMEN EN WAARDEN".A
/4..I.1.N.Q/>..N$(I),S(I).W/H...B/R..I.1
.N.O/\.M..99999.Z/F..J.1.N../P..S(J)..M.
3470../Z.M.S(J). /..IS.J../...../..PT(I)
.IS.D/..S(IS)..S(IS).J/...../..."PLAATS"
,"NAAM","WAARDE"../...../J..I.1.N..0T.K.
PT(I)..0...I,N$(K),.S(K)..0....10...2220
:.FL.1530.;0...1800.I0...:.".":.N.T0...I
.1.N.G0...W$,NS:.K.1.NS.V0$..S$(K):. K..
0..."GEEF EEN SYNONIEM VOOR "W$..08..R$.
.0B..R$."HELP".3730..0L..K.1.NS.R0V..R$.
S$(K).3710.Z0`.. K..1J.."NEE, PROBEER HE
T NOG EENS OF TYP HELP"..1T..3640.+1~.."
CORRECT!":.I.N.2100.51...3770.T1...W$" H
EEFT DE SYNONIEMEN:".`1...K.1.NS.K1...S$
(K).S1... K.{1... I..1D.. 2..1N.. GEVANG
ENIS,3,CEL,BAK,KOT..1X.. HUIS,2,WONING,F
LAT..1... ******************************
..2... * *.*2
... * *.O2...
* *.T2... *
*..2... *
*..2... * TRIO
*..2(.. * ----
*..32.. * SOFT
*.-3<.. *
*.R3F.. *
*.W3P.. *
*..3Z.. *
*.A3D.. *
*..3N.. * *..
4X.. * *.04..
. * HOMO SOIT *.U4... *
*.Z4... *
QUI MAL Y PENSE ! *..4 .. *
*.D4... *
*..4... *
*..5... ****************
**************...
> CLICK IMAGE PREVIEW FOR FULL MODAL