VERH.FORMULES
FILE INFORMATION
FILENAME(S): VERH.FORMULES
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 21:15:47
APPEARS ON: 1 disk(s)
FILE HASH
4ccaf06db45a8ac59d78721792a14a341f9247b0058239d5b6e4e834a96445fc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| VCGN EDUCA 02 | VERH.FORMULES | PRG | DuncanTwain | 7 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 97 35 33 32 38 30 2C 39 3A 97 |..'.d..53280,9:.|
00000010: 35 33 32 38 31 2C 39 3A 99 22 9E 22 3B C7 28 31 |53281,9:.".";.(1|
00000020: 34 29 3B C7 28 38 29 00 50 08 E8 03 8F 20 2A 2A |4);.(8).P.... **|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000050: 00 79 08 F2 03 8F 20 2A 20 20 42 2E 20 47 52 4F |.y.... * B. GRO|
00000060: 4F 54 48 55 49 53 20 20 20 20 20 20 20 20 20 20 |OTHUIS |
00000070: 20 20 20 20 20 20 20 20 2A 00 A2 08 FC 03 8F 20 | *...... |
00000080: 2A 20 20 4E 49 4A 45 4E 48 45 49 4D 20 35 30 2D |* NIJENHEIM 50-|
00000090: 30 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |04 |
000000A0: 20 2A 00 CB 08 06 04 8F 20 2A 20 20 33 37 30 34 | *...... * 3704|
000000B0: 20 42 41 20 20 5A 45 49 53 54 20 20 20 20 20 20 | BA ZEIST |
000000C0: 20 20 20 20 20 20 20 20 20 20 2A 00 F4 08 10 04 | *.....|
000000D0: 8F 20 2A 20 20 30 33 34 30 34 2D 35 34 39 36 37 |. * 03404-54967|
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 2A 00 1D 09 1A 04 8F 20 2A 20 20 4C 49 | *...... * LI|
00000100: 44 20 20 54 52 53 2D 38 30 20 47 45 42 52 55 49 |D TRS-80 GEBRUI|
00000110: 4B 45 52 53 56 45 52 2E 20 20 20 20 2A 00 46 09 |KERSVER. *.F.|
00000120: 24 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |$.. ************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000140: 2A 2A 2A 2A 2A 2A 00 76 09 2E 04 8F 20 2D 2D 2D |******.v.... ---|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000160: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000170: 2D 2D 2D 2D 2D 2D 00 AA 09 38 04 8F 20 52 45 47 |------...8.. REG|
00000180: 45 4C 20 32 30 30 20 54 4F 54 20 33 32 30 20 20 |EL 200 TOT 320 |
00000190: 20 3A 20 44 45 46 49 45 4E 49 45 52 49 4E 47 20 | : DEFIENIERING |
000001A0: 56 41 52 49 41 42 45 4C 45 4E 00 DD 09 42 04 8F |VARIABELEN...B..|
000001B0: 20 52 45 47 45 4C 20 31 30 30 30 20 54 4F 54 20 | REGEL 1000 TOT |
000001C0: 31 30 38 30 20 3A 20 44 49 4D 2E 20 45 4E 20 49 |1080 : DIM. EN I|
000001D0: 4E 4C 45 5A 45 4E 20 41 52 52 41 59 53 00 0B 0A |NLEZEN ARRAYS...|
000001E0: 4C 04 8F 20 52 45 47 45 4C 20 31 31 35 30 20 54 |L.. REGEL 1150 T|
000001F0: 4F 54 20 31 33 39 30 20 3A 20 46 4F 52 4D 55 4C |OT 1390 : FORMUL|
00000200: 45 20 47 45 4E 45 52 45 52 45 4E 00 39 0A 56 04 |E GENEREREN.9.V.|
00000210: 8F 20 52 45 47 45 4C 20 31 34 30 30 20 54 4F 54 |. REGEL 1400 TOT|
00000220: 20 31 36 34 30 20 3A 20 47 45 42 52 55 49 4B 45 | 1640 : GEBRUIKE|
00000230: 52 53 20 49 4E 56 4F 45 52 00 61 0A 60 04 8F 20 |RS INVOER.a.`.. |
00000240: 52 45 47 45 4C 20 33 30 30 30 20 54 4F 54 20 33 |REGEL 3000 TOT 3|
00000250: 32 34 30 20 3A 20 44 41 54 41 20 52 45 47 45 4C |240 : DATA REGEL|
00000260: 53 00 89 0A 6A 04 8F 20 52 45 47 45 4C 20 35 30 |S...j.. REGEL 50|
00000270: 30 30 20 54 4F 54 20 35 30 35 30 20 3A 20 53 55 |00 TOT 5050 : SU|
00000280: 42 52 4F 55 54 49 4E 45 53 00 B1 0A 74 04 8F 20 |BROUTINES...t.. |
00000290: 52 45 47 45 4C 20 38 30 30 30 20 54 4F 54 20 38 |REGEL 8000 TOT 8|
000002A0: 31 39 30 20 3A 20 49 4E 53 54 52 55 4B 54 49 45 |190 : INSTRUKTIE|
000002B0: 53 00 E1 0A 7E 04 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |S...~.. --------|
000002C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002E0: 2D 00 06 0B 88 04 8F 20 53 4E 24 28 58 29 20 20 |-...... SN$(X) |
000002F0: 20 20 20 3A 20 46 4F 52 4D 55 4C 45 20 56 41 4E | : FORMULE VAN|
00000300: 20 42 41 53 45 4E 00 2E 0B 92 04 8F 20 53 50 24 | BASEN...... SP$|
00000310: 28 58 29 20 20 20 20 20 3A 20 46 4F 52 4D 55 4C |(X) : FORMUL|
00000320: 45 20 56 41 4E 20 4B 41 54 49 4F 4E 45 4E 00 50 |E VAN KATIONEN.P|
00000330: 0B 9C 04 8F 20 4E 4E 24 28 58 29 20 20 20 20 20 |.... NN$(X) |
00000340: 3A 20 4E 41 41 4D 20 56 41 4E 20 42 41 53 45 4E |: NAAM VAN BASEN|
00000350: 00 75 0B A6 04 8F 20 4E 50 24 28 58 29 20 20 20 |.u.... NP$(X) |
00000360: 20 20 3A 20 4E 41 41 4D 20 56 41 4E 20 4B 41 54 | : NAAM VAN KAT|
00000370: 49 4F 4E 45 4E 00 9B 0B B0 04 8F 20 57 4E 24 28 |IONEN...... WN$(|
00000380: 58 29 20 20 20 20 20 3A 20 56 41 4C 45 4E 54 49 |X) : VALENTI|
00000390: 45 20 56 41 4E 20 42 41 53 45 4E 00 C4 0B BA 04 |E VAN BASEN.....|
000003A0: 8F 20 57 50 24 28 58 29 20 20 20 20 20 3A 20 56 |. WP$(X) : V|
000003B0: 41 4C 45 4E 54 49 45 20 56 41 4E 20 4B 41 54 49 |ALENTIE VAN KATI|
000003C0: 4F 4E 45 4E 00 DE 0B C4 04 8F 20 58 20 20 20 20 |ONEN...... X |
000003D0: 20 20 20 20 20 20 3A 20 54 45 4C 4C 45 52 00 00 | : TELLER..|
000003E0: 0C CE 04 8F 20 42 20 20 20 20 20 20 20 20 20 20 |.... B |
000003F0: 3A 20 41 41 4E 54 41 4C 20 42 45 55 52 54 45 4E |: AANTAL BEURTEN|
00000400: 00 2B 0C D8 04 8F 20 47 20 20 20 20 20 20 20 20 |.+.... G |
00000410: 20 20 3A 20 41 41 4E 54 41 4C 20 47 4F 45 44 45 | : AANTAL GOEDE|
00000420: 20 41 4E 54 57 4F 4F 52 44 45 4E 00 58 0C E2 04 | ANTWOORDEN.X...|
00000430: 8F 20 50 20 20 20 20 20 20 20 20 20 20 3A 20 52 |. P : R|
00000440: 41 4E 44 4F 4D 20 47 45 54 41 4C 20 56 41 4E 20 |ANDOM GETAL VAN |
00000450: 4B 41 54 49 4F 4E 45 4E 00 82 0C EC 04 8F 20 4E |KATIONEN...... N|
00000460: 20 20 20 20 20 20 20 20 20 20 3A 20 52 41 4E 44 | : RAND|
00000470: 4F 4D 20 47 45 54 41 4C 20 56 41 4E 20 42 41 53 |OM GETAL VAN BAS|
00000480: 45 4E 00 A9 0C F6 04 8F 20 49 24 20 20 20 20 20 |EN...... I$ |
00000490: 20 20 20 20 3A 20 49 4E 50 55 54 20 56 41 4E 20 | : INPUT VAN |
000004A0: 47 45 42 52 55 49 4B 45 52 00 D8 0C 00 05 8F 20 |GEBRUIKER...... |
000004B0: 52 24 20 20 20 20 20 20 20 20 20 3A 20 43 4F 4D |R$ : COM|
000004C0: 50 55 54 45 52 20 56 45 52 48 4F 55 44 49 4E 47 |PUTER VERHOUDING|
000004D0: 53 46 4F 52 4D 55 4C 45 00 05 0D 0A 05 8F 20 2D |SFORMULE...... -|
000004E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000004F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000500: 2D 2D 2D 2D 2D 00 10 0D 14 05 8D 32 32 36 30 20 |-----......2260 |
00000510: 00 2E 0D 1E 05 85 22 57 49 4C 54 20 55 20 49 4E |......"WILT U IN|
00000520: 53 54 52 55 4B 54 49 45 53 20 22 3B 49 24 00 45 |STRUKTIES ";I$.E|
00000530: 0D 28 05 8B C8 28 49 24 2C 31 29 B2 22 4A 22 A7 |.(...(I$,1)."J".|
00000540: 32 33 33 30 20 00 72 0D 32 05 8F 20 2D 2D 2D 2D |2330 .r.2.. ----|
00000550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000570: 2D 2D 00 98 0D 3C 05 8F 20 52 45 53 45 52 56 45 |--...<.. RESERVE|
00000580: 45 52 20 47 45 48 45 55 47 45 4E 20 56 4F 4F 52 |ER GEHEUGEN VOOR|
00000590: 20 53 54 52 49 4E 47 53 00 A3 0D 46 05 8D 32 32 | STRINGS...F..22|
000005A0: 36 30 20 00 D8 0D 50 05 86 53 4E 24 28 32 35 29 |60 ...P..SN$(25)|
000005B0: 2C 53 50 24 28 32 35 29 2C 4E 4E 24 28 32 35 29 |,SP$(25),NN$(25)|
000005C0: 2C 4E 50 24 28 32 35 29 2C 57 50 24 28 32 35 29 |,NP$(25),WP$(25)|
000005D0: 2C 57 4E 24 28 32 35 29 00 E4 0D 5A 05 81 58 B2 |,WN$(25)...Z..X.|
000005E0: 31 A4 32 30 00 FE 0D 64 05 87 53 50 24 28 58 29 |1.20...d..SP$(X)|
000005F0: 2C 4E 50 24 28 58 29 2C 57 50 24 28 58 29 00 05 |,NP$(X),WP$(X)..|
00000600: 0E 6E 05 82 58 00 11 0E 78 05 81 58 B2 31 A4 32 |.n..X...x..X.1.2|
00000610: 33 00 2B 0E 82 05 87 53 4E 24 28 58 29 2C 4E 4E |3.+....SN$(X),NN|
00000620: 24 28 58 29 2C 57 4E 24 28 58 29 00 32 0E 8C 05 |$(X),WN$(X).2...|
00000630: 82 58 00 5E 0E 96 05 8F 20 2D 2D 2D 2D 2D 2D 2D |.X.^.... -------|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000650: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 68 |--------------.h|
00000660: 0E A0 05 42 B2 42 AA 31 00 78 0E AA 05 8B 42 B2 |...B.B.1.x....B.|
00000670: 31 31 A7 31 39 33 30 20 00 A0 0E B4 05 50 B2 31 |11.1930 .....P.1|
00000680: AA B5 28 32 30 AC BB 28 31 29 29 3A 8F 20 47 45 |..(20..(1)):. GE|
00000690: 54 41 4C 20 56 41 4E 20 31 20 54 4F 54 20 32 30 |TAL VAN 1 TOT 20|
000006A0: 00 C9 0E BE 05 4E B2 31 AA B5 28 32 33 AC BB 28 |.....N.1..(23..(|
000006B0: 31 29 29 3A 8F 20 47 45 54 41 4C 20 56 41 4E 20 |1)):. GETAL VAN |
000006C0: 31 20 54 4F 54 20 32 33 2E 00 F6 0E C8 05 8F 20 |1 TOT 23....... |
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006F0: 2D 2D 2D 2D 2D 2D 00 0D 0F D2 05 8B 50 B2 B1 31 |------......P..1|
00000700: 37 AF 4E B2 B1 32 30 A7 31 34 36 30 20 00 30 0F |7.N..20.1460 .0.|
00000710: DC 05 8B 53 50 24 28 50 29 B2 22 4E 48 34 22 AF |...SP$(P)."NH4".|
00000720: 53 4E 24 28 4E 29 B2 22 4F 22 A7 31 34 36 30 20 |SN$(N)."O".1460 |
00000730: 00 4A 0F E6 05 8B 50 B2 34 AF 28 4E B2 37 B0 4E |.J....P.4.(N.7.N|
00000740: B2 31 39 29 A7 31 34 36 30 20 00 63 0F F0 05 8B |.19).1460 .c....|
00000750: 57 50 24 28 50 29 B2 57 4E 24 28 4E 29 A7 31 36 |WP$(P).WN$(N).16|
00000760: 30 30 20 00 7B 0F FA 05 8B 53 50 24 28 50 29 B2 |00 .{....SP$(P).|
00000770: 22 4E 48 34 22 A7 31 36 32 30 20 00 91 0F 04 06 |"NH4".1620 .....|
00000780: 8B 57 50 24 28 50 29 B2 22 31 22 A7 31 36 34 30 |.WP$(P)."1".1640|
00000790: 20 00 AC 0F 0E 06 8B 57 4E 24 28 4E 29 B2 22 31 | ......WN$(N)."1|
000007A0: 22 AF 4E B3 B2 36 A7 31 36 36 30 20 00 C2 0F 18 |".N..6.1660 ....|
000007B0: 06 8B 57 4E 24 28 4E 29 B2 22 31 22 A7 31 36 38 |..WN$(N)."1".168|
000007C0: 30 20 00 D2 0F 22 06 8B 4E B3 B2 36 A7 31 37 30 |0 ..."..N..6.170|
000007D0: 30 20 00 DD 0F 2C 06 89 31 37 32 30 20 00 09 10 |0 ...,..1720 ...|
000007E0: 36 06 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |6.. ------------|
000007F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000800: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 1E 10 40 06 52 24 |---------...@.R$|
00000810: B2 53 50 24 28 50 29 AA 53 4E 24 28 4E 29 00 29 |.SP$(P).SN$(N).)|
00000820: 10 4A 06 89 31 37 35 30 20 00 46 10 54 06 52 24 |.J..1750 .F.T.R$|
00000830: B2 22 28 4E 48 34 29 22 AA 57 4E 24 28 4E 29 AA |."(NH4)".WN$(N).|
00000840: 53 4E 24 28 4E 29 00 51 10 5E 06 89 31 37 35 30 |SN$(N).Q.^..1750|
00000850: 20 00 6D 10 68 06 52 24 B2 53 50 24 28 50 29 AA | .m.h.R$.SP$(P).|
00000860: 57 4E 24 28 4E 29 AA 53 4E 24 28 4E 29 00 78 10 |WN$(N).SN$(N).x.|
00000870: 72 06 89 31 37 35 30 20 00 94 10 7C 06 52 24 B2 |r..1750 ...|.R$.|
00000880: 53 50 24 28 50 29 AA 53 4E 24 28 4E 29 AA 57 50 |SP$(P).SN$(N).WP|
00000890: 24 28 50 29 00 9F 10 86 06 89 31 37 35 30 20 00 |$(P)......1750 .|
000008A0: C3 10 90 06 52 24 B2 53 50 24 28 50 29 AA 22 28 |....R$.SP$(P)."(|
000008B0: 22 AA 53 4E 24 28 4E 29 AA 22 29 22 AA 57 50 24 |".SN$(N).")".WP$|
000008C0: 28 50 29 00 CE 10 9A 06 89 31 37 35 30 20 00 F1 |(P)......1750 ..|
000008D0: 10 A4 06 52 24 B2 53 50 24 28 50 29 AA 57 4E 24 |...R$.SP$(P).WN$|
000008E0: 28 4E 29 AA 53 4E 24 28 4E 29 AA 57 50 24 28 50 |(N).SN$(N).WP$(P|
000008F0: 29 00 FC 10 AE 06 89 31 37 35 30 20 00 27 11 B8 |)......1750 .'..|
00000900: 06 52 24 B2 53 50 24 28 50 29 AA 57 4E 24 28 4E |.R$.SP$(P).WN$(N|
00000910: 29 AA 22 28 22 AA 53 4E 24 28 4E 29 AA 22 29 22 |)."(".SN$(N).")"|
00000920: AA 57 50 24 28 50 29 00 32 11 C2 06 89 31 37 35 |.WP$(P).2....175|
00000930: 30 20 00 64 11 CC 06 8F 20 2D 2D 2D 2D 2D 2D 2D |0 .d.... -------|
00000940: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000960: 2D 2D 2D 2D 00 6F 11 D6 06 8D 32 32 36 30 20 00 |----.o....2260 .|
00000970: 7A 11 E0 06 8D 32 32 39 30 20 00 82 11 EA 06 85 |z....2290 ......|
00000980: 49 24 00 93 11 F4 06 8B 49 24 B2 52 24 A7 31 38 |I$......I$.R$.18|
00000990: 37 30 20 00 9E 11 FE 06 8D 32 32 36 30 20 00 AE |70 ......2260 ..|
000009A0: 11 08 07 99 22 46 4F 55 54 20 21 21 21 22 00 C4 |...."FOUT !!!"..|
000009B0: 11 12 07 99 22 44 45 20 56 52 41 41 47 20 57 41 |...."DE VRAAG WA|
000009C0: 53 20 3A 22 00 CF 11 1C 07 8D 32 32 39 30 20 00 |S :"......2290 .|
000009D0: F7 11 26 07 99 22 20 20 20 20 48 45 54 20 47 4F |..&.." HET GO|
000009E0: 45 44 45 20 41 4E 54 57 4F 4F 52 44 20 57 41 53 |EDE ANTWOORD WAS|
000009F0: 20 3A 20 22 3B 52 24 00 1F 12 30 07 99 22 20 20 | : ";R$...0.." |
00000A00: 20 20 20 20 20 20 20 20 20 55 57 20 41 4E 54 57 | UW ANTW|
00000A10: 4F 4F 52 44 20 57 41 53 20 3A 20 22 3B 49 24 00 |OORD WAS : ";I$.|
00000A20: 37 12 3A 07 85 22 54 4F 45 54 53 20 52 45 54 55 |7.:.."TOETS RETU|
00000A30: 52 4E 20 22 3B 49 24 00 42 12 44 07 89 31 34 34 |RN ";I$.B.D..144|
00000A40: 30 20 00 55 12 4E 07 99 22 20 47 4F 45 44 20 5A |0 .U.N.." GOED Z|
00000A50: 4F 20 21 21 22 00 5F 12 58 07 47 B2 47 AA 31 00 |O !!"._.X.G.G.1.|
00000A60: 6C 12 62 07 81 58 B2 31 A4 37 35 30 00 73 12 6C |l.b..X.1.750.s.l|
00000A70: 07 82 58 00 7E 12 76 07 89 31 34 34 30 20 00 AE |..X.~.v..1440 ..|
00000A80: 12 80 07 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.... -----------|
00000A90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000AA0: 2D 2D 2D 2D 2D 2D 4B 2D 2D 2D 2D 2D 2D 2D 00 B9 |------K-------..|
00000AB0: 12 8A 07 8D 32 32 36 30 20 00 E5 12 94 07 99 22 |....2260 ......"|
00000AC0: 56 41 4E 20 44 45 20 31 30 20 4B 41 4E 53 45 4E |VAN DE 10 KANSEN|
00000AD0: 20 48 41 44 20 55 20 45 52 20 22 3B 47 3B 22 20 | HAD U ER ";G;" |
00000AE0: 47 4F 45 44 22 00 04 13 9E 07 85 22 57 49 4C 54 |GOED"......"WILT|
00000AF0: 20 55 20 4E 4F 47 20 45 45 4E 20 4B 45 45 52 20 | U NOG EEN KEER |
00000B00: 22 3B 49 24 00 17 13 A8 07 8B C8 28 49 24 2C 31 |";I$.......(I$,1|
00000B10: 29 B2 22 4A 22 A7 8A 00 1D 13 B2 07 80 00 4E 13 |)."J".........N.|
00000B20: BC 07 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------|
00000B30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 74 |--------------.t|
00000B50: 13 C6 07 83 20 22 4E 41 22 2C 22 4E 41 54 52 49 |.... "NA","NATRI|
00000B60: 55 4D 22 2C 31 2C 22 4B 22 2C 22 4B 41 4C 49 55 |UM",1,"K","KALIU|
00000B70: 4D 22 2C 31 00 8A 13 D0 07 83 20 22 41 47 22 2C |M",1...... "AG",|
00000B80: 22 5A 49 4C 56 45 52 22 2C 31 00 B5 13 DA 07 83 |"ZILVER",1......|
00000B90: 20 22 48 22 2C 22 57 41 54 45 52 53 54 4F 46 22 | "H","WATERSTOF"|
00000BA0: 2C 31 2C 22 4D 47 22 2C 22 4D 41 47 4E 45 53 49 |,1,"MG","MAGNESI|
00000BB0: 55 4D 22 2C 32 00 DC 13 E4 07 83 20 22 43 41 22 |UM",2...... "CA"|
00000BC0: 2C 22 43 41 4C 43 49 55 4D 22 2C 32 2C 22 42 41 |,"CALCIUM",2,"BA|
00000BD0: 22 2C 22 42 41 52 49 55 4D 22 2C 32 00 04 14 EE |","BARIUM",2....|
00000BE0: 07 83 20 22 5A 4E 22 2C 22 5A 49 4E 4B 22 2C 32 |.. "ZN","ZINK",2|
00000BF0: 2C 22 46 45 22 2C 22 49 4A 5A 45 52 20 28 49 49 |,"FE","IJZER (II|
00000C00: 29 22 2C 32 00 31 14 F8 07 83 20 22 46 45 22 2C |)",2.1.... "FE",|
00000C10: 22 49 4A 5A 45 52 20 28 49 49 49 29 22 2C 33 2C |"IJZER (III)",3,|
00000C20: 22 53 4E 22 2C 22 54 49 4E 20 28 49 49 29 22 2C |"SN","TIN (II)",|
00000C30: 32 00 58 14 02 08 83 20 22 42 45 22 2C 22 42 45 |2.X.... "BE","BE|
00000C40: 52 59 4C 4C 49 55 4D 22 2C 32 2C 22 50 42 22 2C |RYLLIUM",2,"PB",|
00000C50: 22 4C 4F 4F 44 22 2C 32 00 84 14 0C 08 83 20 22 |"LOOD",2...... "|
00000C60: 41 4C 22 2C 22 41 4C 55 4D 49 4E 49 55 4D 22 2C |AL","ALUMINIUM",|
00000C70: 33 2C 22 43 55 22 2C 22 4B 4F 50 45 52 20 28 49 |3,"CU","KOPER (I|
00000C80: 29 22 2C 31 00 AF 14 16 08 83 20 22 43 55 22 2C |)",1...... "CU",|
00000C90: 22 4B 4F 50 45 52 20 28 49 49 29 22 2C 32 2C 22 |"KOPER (II)",2,"|
00000CA0: 4C 49 22 2C 22 4C 49 54 48 49 55 4D 22 2C 31 00 |LI","LITHIUM",1.|
00000CB0: D6 14 20 08 83 20 22 43 52 22 2C 22 43 48 52 4F |.. .. "CR","CHRO|
00000CC0: 4F 4D 22 2C 33 2C 22 4D 4E 22 2C 22 4D 41 4E 47 |OM",3,"MN","MANG|
00000CD0: 41 41 4E 22 2C 32 00 EF 14 2A 08 83 20 22 4E 48 |AAN",2...*.. "NH|
00000CE0: 34 22 2C 22 41 4D 4D 4F 4E 49 55 4D 22 2C 31 00 |4","AMMONIUM",1.|
00000CF0: 14 15 34 08 83 20 22 43 4C 22 2C 22 43 48 4C 4F |..4.. "CL","CHLO|
00000D00: 4F 52 22 2C 31 2C 22 42 52 22 2C 22 42 52 4F 4F |OR",1,"BR","BROO|
00000D10: 4D 22 2C 31 00 35 15 3E 08 83 20 22 49 22 2C 22 |M",1.5.>.. "I","|
00000D20: 4A 4F 4F 44 22 2C 31 2C 22 46 22 2C 22 46 4C 55 |JOOD",1,"F","FLU|
00000D30: 4F 52 22 2C 31 00 5B 15 48 08 83 20 22 4F 22 2C |OR",1.[.H.. "O",|
00000D40: 22 5A 55 55 52 53 54 4F 46 22 2C 32 2C 22 53 22 |"ZUURSTOF",2,"S"|
00000D50: 2C 22 5A 57 41 56 45 4C 22 2C 32 00 74 15 52 08 |,"ZWAVEL",2.t.R.|
00000D60: 83 20 22 4F 48 22 2C 22 48 59 44 52 4F 58 49 44 |. "OH","HYDROXID|
00000D70: 45 22 2C 31 00 9E 15 5C 08 83 20 22 4E 4F 32 22 |E",1...\.. "NO2"|
00000D80: 2C 22 4E 49 54 52 49 45 54 22 2C 31 2C 22 4E 4F |,"NITRIET",1,"NO|
00000D90: 33 22 2C 22 4E 49 54 52 41 41 54 22 2C 31 00 C8 |3","NITRAAT",1..|
00000DA0: 15 66 08 83 20 22 53 4F 33 22 2C 22 53 55 4C 46 |.f.. "SO3","SULF|
00000DB0: 49 45 54 22 2C 32 2C 22 53 4F 34 22 2C 22 53 55 |IET",2,"SO4","SU|
00000DC0: 4C 46 41 41 54 22 2C 32 00 DF 15 70 08 83 20 22 |LFAAT",2...p.. "|
00000DD0: 43 4E 22 2C 22 43 59 41 4E 49 44 45 22 2C 31 00 |CN","CYANIDE",1.|
00000DE0: F9 15 7A 08 83 20 22 43 4F 33 22 2C 22 43 41 52 |..z.. "CO3","CAR|
00000DF0: 42 4F 4E 41 41 54 22 2C 32 00 23 16 84 08 83 20 |BONAAT",2.#.... |
00000E00: 22 50 4F 33 22 2C 22 46 4F 53 46 49 45 54 22 2C |"PO3","FOSFIET",|
00000E10: 33 2C 22 50 4F 34 22 2C 22 46 4F 53 46 41 41 54 |3,"PO4","FOSFAAT|
00000E20: 22 2C 33 00 4D 16 8E 08 83 20 22 42 52 4F 33 22 |",3.M.... "BRO3"|
00000E30: 2C 22 42 52 4F 4D 41 41 54 22 2C 31 2C 22 49 4F |,"BROMAAT",1,"IO|
00000E40: 33 22 2C 22 4A 4F 44 41 41 54 22 2C 31 00 67 16 |3","JODAAT",1.g.|
00000E50: 98 08 83 20 22 43 4C 4F 33 22 2C 22 43 48 4C 4F |... "CLO3","CHLO|
00000E60: 52 41 41 54 22 2C 31 00 95 16 A2 08 83 20 22 43 |RAAT",1...... "C|
00000E70: 32 48 33 4F 32 22 2C 22 41 43 45 54 41 41 54 22 |2H3O2","ACETAAT"|
00000E80: 2C 31 2C 22 43 32 4F 34 22 2C 22 4F 58 41 4C 41 |,1,"C2O4","OXALA|
00000E90: 41 54 22 2C 32 00 C8 16 AC 08 83 20 22 4D 4E 4F |AT",2...... "MNO|
00000EA0: 34 22 2C 22 4D 41 4E 47 41 4E 41 41 54 22 2C 32 |4","MANGANAAT",2|
00000EB0: 2C 22 4D 4E 4F 34 22 2C 22 50 45 52 4D 41 4E 47 |,"MNO4","PERMANG|
00000EC0: 41 4E 41 41 54 22 2C 31 00 E2 16 B6 08 83 20 22 |ANAAT",1...... "|
00000ED0: 43 52 4F 34 22 2C 22 43 48 52 4F 4D 41 41 54 22 |CRO4","CHROMAAT"|
00000EE0: 2C 31 00 E8 16 C0 08 80 00 14 17 CA 08 8F 20 2D |,1............ -|
00000EF0: 2D 2D 2D 20 52 4F 55 54 49 4E 45 20 4D 41 41 4B |--- ROUTINE MAAK|
00000F00: 54 20 53 43 48 45 52 4D 20 53 43 48 4F 4F 4E 20 |T SCHERM SCHOON |
00000F10: 2D 2D 2D 2D 00 20 17 D4 08 99 C7 28 31 34 37 29 |----. .....(147)|
00000F20: 00 26 17 DE 08 8E 00 55 17 E8 08 8F 20 2D 2D 2D |.&.....U.... ---|
00000F30: 20 50 52 49 4E 54 20 52 4F 55 54 49 4E 45 20 20 | PRINT ROUTINE |
00000F40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000F50: 2D 2D 2D 2D 2D 00 82 17 F2 08 99 22 48 4F 45 20 |-----......"HOE |
00000F60: 5A 49 45 54 20 44 45 20 56 45 52 48 4F 55 44 49 |ZIET DE VERHOUDI|
00000F70: 4E 47 53 2D 46 4F 52 4D 55 4C 45 20 45 52 55 49 |NGS-FORMULE ERUI|
00000F80: 54 22 00 A8 17 FC 08 99 22 56 41 4E 20 3A 20 22 |T"......"VAN : "|
00000F90: 3B 4E 50 24 28 50 29 3B 22 20 20 4D 45 54 20 20 |;NP$(P);" MET |
00000FA0: 22 3B 4E 4E 24 28 4E 29 00 AE 17 06 09 8E 00 DC |";NN$(N)........|
00000FB0: 17 10 09 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.... -----------|
00000FC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E7 17 1A |------------....|
00000FE0: 09 8D 32 32 36 30 20 00 0D 18 24 09 99 22 20 20 |..2260 ...$.." |
00000FF0: 20 20 20 20 20 20 20 56 45 52 48 4F 55 44 49 4E | VERHOUDIN|
00001000: 47 53 2D 46 4F 52 4D 55 4C 45 53 20 22 00 30 18 |GS-FORMULES ".0.|
00001010: 2E 09 99 22 20 20 20 20 20 20 20 20 20 20 44 4F |..." DO|
00001020: 4F 52 20 42 2E 20 47 52 4F 4F 54 48 55 49 53 22 |OR B. GROOTHUIS"|
00001030: 00 5C 18 38 09 99 22 44 49 54 20 50 52 4F 47 52 |.\.8.."DIT PROGR|
00001040: 41 4D 4D 41 20 54 45 53 54 20 55 57 20 56 41 41 |AMMA TEST UW VAA|
00001050: 52 44 49 47 48 45 49 44 20 49 4E 22 00 85 18 42 |RDIGHEID IN"...B|
00001060: 09 99 22 48 45 54 20 53 41 4D 45 4E 53 54 45 4C |.."HET SAMENSTEL|
00001070: 4C 45 4E 20 56 41 4E 20 56 45 52 48 4F 55 44 49 |LEN VAN VERHOUDI|
00001080: 4E 47 53 2D 22 00 96 18 4C 09 99 22 46 4F 52 4D |NGS-"...L.."FORM|
00001090: 55 4C 45 53 2E 22 00 BF 18 56 09 99 22 45 52 20 |ULES."...V.."ER |
000010A0: 57 4F 52 44 54 20 55 20 53 54 52 41 4B 53 20 47 |WORDT U STRAKS G|
000010B0: 45 56 52 41 41 47 44 20 57 41 54 20 44 45 22 00 |EVRAAGD WAT DE".|
000010C0: EA 18 60 09 99 22 56 45 52 48 4F 55 44 49 4E 47 |..`.."VERHOUDING|
000010D0: 53 2D 46 4F 52 4D 55 4C 45 20 49 53 20 55 49 47 |S-FORMULE IS UIG|
000010E0: 41 41 4E 44 45 20 56 41 4E 22 00 09 19 6A 09 99 |AANDE VAN"...j..|
000010F0: 22 45 45 4E 20 4B 41 54 49 4F 4E 20 45 4E 20 45 |"EEN KATION EN E|
00001100: 45 4E 20 42 41 53 45 2E 22 00 1C 19 74 09 99 22 |EN BASE."...t.."|
00001110: 56 4F 4F 52 42 45 45 4C 44 20 3A 22 00 3C 19 7E |VOORBEELD :".<.~|
00001120: 09 99 22 20 41 4D 4D 4F 4E 49 55 4D 20 20 4D 45 |.." AMMONIUM ME|
00001130: 54 20 20 46 4F 53 46 41 41 54 20 22 00 60 19 88 |T FOSFAAT ".`..|
00001140: 09 99 22 20 55 20 56 4F 45 52 54 20 44 41 4E 20 |.." U VOERT DAN |
00001150: 49 4E 20 3A 20 27 28 4E 48 34 29 33 50 4F 34 27 |IN : '(NH4)3PO4'|
00001160: 00 89 19 92 09 99 22 53 4F 4D 4D 49 47 45 20 45 |......"SOMMIGE E|
00001170: 4C 45 4D 45 4E 54 45 4E 20 48 45 42 42 45 4E 20 |LEMENTEN HEBBEN |
00001180: 4D 45 45 52 44 45 52 45 22 00 B0 19 9C 09 99 22 |MEERDERE"......"|
00001190: 56 41 4C 45 4E 54 49 45 53 2C 20 5A 4F 41 4C 53 |VALENTIES, ZOALS|
000011A0: 20 42 49 4A 56 4F 4F 52 42 45 45 4C 44 20 3A 22 | BIJVOORBEELD :"|
000011B0: 00 D3 19 A6 09 99 22 4B 4F 50 45 52 20 28 20 43 |......"KOPER ( C|
000011C0: 55 20 28 49 29 20 45 4E 20 43 55 20 28 49 49 29 |U (I) EN CU (II)|
000011D0: 20 29 2E 00 FC 19 B0 09 99 22 42 49 4A 20 44 49 | )......."BIJ DI|
000011E0: 54 20 53 4F 4F 52 54 20 45 4C 45 4D 45 4E 54 45 |T SOORT ELEMENTE|
000011F0: 4E 20 53 54 41 41 54 20 44 41 4E 22 00 25 1A BA |N STAAT DAN".%..|
00001200: 09 99 22 44 45 20 54 45 20 47 45 42 52 55 49 4B |.."DE TE GEBRUIK|
00001210: 45 4E 20 56 41 4C 45 4E 54 49 45 20 56 45 52 4D |EN VALENTIE VERM|
00001220: 45 4C 44 2E 22 00 4C 1A C4 09 85 22 56 45 45 4C |ELD.".L...."VEEL|
00001230: 20 53 55 43 43 45 53 2E 20 20 2D 54 4F 45 54 53 | SUCCES. -TOETS|
00001240: 20 52 45 54 55 52 4E 2D 22 3B 49 24 00 57 1A CE | RETURN-";I$.W..|
00001250: 09 89 31 33 34 30 20 00 5D 1A D8 09 80 00 6A 1A |..1340 .].....j.|
00001260: E2 09 8F 20 50 41 33 43 4F 4C 00 00 00 00 00 FF |... PA3COL......|
00001270: 00 00 00 00 00 08 1A |....... |
..'.D..53280,9:.53281,9:.".";G(14);G(8).
P.... **********************************
.Y.... * B. GROOTHUIS
*...... * NIJENHEIM 50-04
*.K.... * 3704 BA ZEIST
*...... * 03404-54967
*...... * LID TRS-80 GEBRUIKERSVER.
*.F.$.. ****************************
******.V.... ---------------------------
--------------...8.. REGEL 200 TOT 320
: DEFIENIERING VARIABELEN...B.. REGEL 1
000 TOT 1080 : DIM. EN INLEZEN ARRAYS...
L.. REGEL 1150 TOT 1390 : FORMULE GENERE
REN.9.V.. REGEL 1400 TOT 1640 : GEBRUIKE
RS INVOER.A.`.. REGEL 3000 TOT 3240 : DA
TA REGELS...J.. REGEL 5000 TOT 5050 : SU
BROUTINES...T.. REGEL 8000 TOT 8190 : IN
STRUKTIES...~.. ------------------------
-----------------...... SN$(X) : FOR
MULE VAN BASEN...... SP$(X) : FORMUL
E VAN KATIONEN.P.... NN$(X) : NAAM V
AN BASEN.U.... NP$(X) : NAAM VAN KAT
IONEN...... WN$(X) : VALENTIE VAN BA
SEN.D.... WP$(X) : VALENTIE VAN KATI
ONEN...D.. X : TELLER...N.. B
: AANTAL BEURTEN.+.X.. G
: AANTAL GOEDE ANTWOORDEN.X.... P
: RANDOM GETAL VAN KATIONEN...... N
: RANDOM GETAL VAN BASEN......
I$ : INPUT VAN GEBRUIKER.X....
R$ : COMPUTER VERHOUDINGSFORMULE
...... ---------------------------------
-----......2260 ......"WILT U INSTRUKTIE
S ";I$.E.(..H(I$,1)."J".2330 .R.2.. ----
----------------------------------...<..
RESERVEER GEHEUGEN VOOR STRINGS...F..22
60 .X.P..SN$(25),SP$(25),NN$(25),NP$(25)
,WP$(25),WN$(25)...Z..X.1.20...D..SP$(X)
,NP$(X),WP$(X)...N..X...X..X.1.23.+....S
N$(X),NN$(X),WN$(X).2....X.^.... -------
------------------------------.H. .B.B.1
.X....B.11.1930 . ...P.1..(20..(1)):. GE
TAL VAN 1 TOT 20.I...N.1..(23..(1)):. GE
TAL VAN 1 TOT 23....H.. ----------------
----------------------...R..P..17.N..20.
1460 .0....SP$(P)."NH4".SN$(N)."O".1460
.J....P.4.(N.7.N.19).1460 .C....WP$(P).W
N$(N).1600 .{....SP$(P)."NH4".1620 .....
.WP$(P)."1".1640 ......WN$(N)."1".N..6.1
660 .B....WN$(N)."1".1680 .R."..N..6.170
0 ...,..1720 ...6.. --------------------
-----------------...@.R$.SP$(P).SN$(N).)
.J..1750 .F.T.R$."(NH4)".WN$(N).SN$(N).Q
.^..1750 .M.H.R$.SP$(P).WN$(N).SN$(N).X.
R..1750 ...|.R$.SP$(P).SN$(N).WP$(P)....
..1750 .C...R$.SP$(P)."(".SN$(N).")".WP$
(P).N....1750 .....R$.SP$(P).WN$(N).SN$(
N).WP$(P)......1750 .'...R$.SP$(P).WN$(N
)."(".SN$(N).")".WP$(P).2.B..1750 .D.L..
---------------------------------------
----.O.V..2260 .Z....2290 ......I$......
I$.R$.1870 ......2260 ......"FOUT !!!".D
...."DE VRAAG WAS :".O....2290 ...&.."
HET GOEDE ANTWOORD WAS : ";R$...0.."
UW ANTWOORD WAS : ";I$.7.:.."TO
ETS RETURN ";I$.B.D..1440 .U.N.." GOED Z
O !!"._.X.G.G.1.L.B..X.1.750.S.L..X.~.V.
.1440 ...... ---------------------------
------K-------......2260 ......"VAN DE 1
0 KANSEN HAD U ER ";G;" GOED"......"WILT
U NOG EEN KEER ";I$......H(I$,1)."J"...
......N.... ----------------------------
--------------.T.F.. "NA","NATRIUM",1,"K
","KALIUM",1...P.. "AG","ZILVER",1...Z..
"H","WATERSTOF",1,"MG","MAGNESIUM",2...
... "CA","CALCIUM",2,"BA","BARIUM",2....
.. "ZN","ZINK",2,"FE","IJZER (II)",2.1..
.. "FE","IJZER (III)",3,"SN","TIN (II)",
2.X.... "BE","BERYLLIUM",2,"PB","LOOD",2
...... "AL","ALUMINIUM",3,"CU","KOPER (I
)",1...... "CU","KOPER (II)",2,"LI","LIT
HIUM",1.V. .. "CR","CHROOM",3,"MN","MANG
AAN",2...*.. "NH4","AMMONIUM",1...4.. "C
L","CHLOOR",1,"BR","BROOM",1.5.>.. "I","
JOOD",1,"F","FLUOR",1.[.H.. "O","ZUURSTO
F",2,"S","ZWAVEL",2.T.R.. "OH","HYDROXID
E",1...\.. "NO2","NITRIET",1,"NO3","NITR
AAT",1.H.F.. "SO3","SULFIET",2,"SO4","SU
LFAAT",2...P.. "CN","CYANIDE",1...Z.. "C
O3","CARBONAAT",2.#.... "PO3","FOSFIET",
3,"PO4","FOSFAAT",3.M.... "BRO3","BROMAA
T",1,"IO3","JODAAT",1.G.... "CLO3","CHLO
RAAT",1...... "C2H3O2","ACETAAT",1,"C2O4
","OXALAAT",2.H.... "MNO4","MANGANAAT",2
,"MNO4","PERMANGANAAT",1...... "CRO4","C
HROMAAT",1.........J.. ---- ROUTINE MAAK
T SCHERM SCHOON ----. .T..G(147).&.....U
.... --- PRINT ROUTINE ----------------
-----......"HOE ZIET DE VERHOUDINGS-FORM
ULE ERUIT"......"VAN : ";NP$(P);" MET
";NN$(N)............ -------------------
--------------------......2260 ...$.."
VERHOUDINGS-FORMULES ".0...."
DOOR B. GROOTHUIS".\.8.."DIT PROGR
AMMA TEST UW VAARDIGHEID IN"...B.."HET S
AMENSTELLEN VAN VERHOUDINGS-"...L.."FORM
ULES."...V.."ER WORDT U STRAKS GEVRAAGD
WAT DE"...`.."VERHOUDINGS-FORMULE IS UIG
AANDE VAN"...J.."EEN KATION EN EEN BASE.
"...T.."VOORBEELD :".<.~.." AMMONIUM ME
T FOSFAAT ".`...." U VOERT DAN IN : '(N
H4)3PO4'......"SOMMIGE ELEMENTEN HEBBEN
MEERDERE"......"VALENTIES, ZOALS BIJVOOR
BEELD :".S...."KOPER ( CU (I) EN CU (II)
)......."BIJ DIT SOORT ELEMENTEN STAAT
DAN".%...."DE TE GEBRUIKEN VALENTIE VERM
ELD.".L.D.."VEEL SUCCES. -TOETS RETURN-
";I$.W.N..1340 .].X...J.... PA3COL......
.......
> CLICK IMAGE PREVIEW FOR FULL MODAL