_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

VERHOUD.FORMULES

FILE INFORMATION

FILENAME(S): VERHOUD.FORMULES

FILE TYPE(S): PRG

FILE SIZE: 4.6K

FIRST SEEN: 2025-11-30 21:23:10

APPEARS ON: 1 disk(s)

FILE HASH

9cf5077d9b2d9291414f49f97d1d59f48c71d42687f9c3840d1e5c17a3d5b981

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 22 1 VERHOUD.FORMULES PRG DuncanTwain 13 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 04 2A 04 0A 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |..*.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 53 04 14 00 8F  |**********.S....|
00000030: 20 2A 20 20 42 2E 20 47  52 4F 4F 54 48 55 49 53  | *  B. GROOTHUIS|
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000050: 20 20 2A 00 7C 04 1E 00  8F 20 2A 20 20 4E 49 4A  |  *.|.... *  NIJ|
00000060: 45 4E 48 45 49 4D 20 35  30 2D 30 34 20 20 20 20  |ENHEIM 50-04    |
00000070: 20 20 20 20 20 20 20 20  20 20 20 2A 00 A5 04 28  |           *...(|
00000080: 00 8F 20 2A 20 20 33 37  30 34 20 42 41 20 20 5A  |.. *  3704 BA  Z|
00000090: 45 49 53 54 20 20 20 20  20 20 20 20 20 20 20 20  |EIST            |
000000A0: 20 20 20 20 2A 00 CE 04  32 00 8F 20 2A 20 20 30  |    *...2.. *  0|
000000B0: 33 34 30 34 2D 35 34 39  36 37 20 20 20 20 20 20  |3404-54967      |
000000C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 2A 00 F7  |             *..|
000000D0: 04 3C 00 8F 20 2A 20 20  4C 49 44 20 20 54 52 53  |.<.. *  LID  TRS|
000000E0: 2D 38 30 20 47 45 42 52  55 49 4B 45 52 53 56 45  |-80 GEBRUIKERSVE|
000000F0: 52 2E 20 20 20 20 2A 00  20 05 46 00 8F 20 2A 2A  |R.    *. .F.. **|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000120: 00 50 05 50 00 8F 20 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.P.P.. ---------|
00000130: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000140: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000150: 00 84 05 64 00 8F 20 52  45 47 45 4C 20 32 30 30  |...d.. REGEL 200|
00000160: 20 54 4F 54 20 33 32 30  20 20 20 3A 20 44 45 46  | TOT 320   : DEF|
00000170: 49 45 4E 49 45 52 49 4E  47 20 56 41 52 49 41 42  |IENIERING VARIAB|
00000180: 45 4C 45 4E 00 B7 05 6E  00 8F 20 52 45 47 45 4C  |ELEN...n.. REGEL|
00000190: 20 31 30 30 30 20 54 4F  54 20 31 30 38 30 20 3A  | 1000 TOT 1080 :|
000001A0: 20 44 49 4D 2E 20 45 4E  20 49 4E 4C 45 5A 45 4E  | DIM. EN INLEZEN|
000001B0: 20 41 52 52 41 59 53 00  E5 05 78 00 8F 20 52 45  | ARRAYS...x.. RE|
000001C0: 47 45 4C 20 31 31 35 30  20 54 4F 54 20 31 33 39  |GEL 1150 TOT 139|
000001D0: 30 20 3A 20 46 4F 52 4D  55 4C 45 20 47 45 4E 45  |0 : FORMULE GENE|
000001E0: 52 45 52 45 4E 00 13 06  82 00 8F 20 52 45 47 45  |REREN...... REGE|
000001F0: 4C 20 31 34 30 30 20 54  4F 54 20 31 36 34 30 20  |L 1400 TOT 1640 |
00000200: 3A 20 47 45 42 52 55 49  4B 45 52 53 20 49 4E 56  |: GEBRUIKERS INV|
00000210: 4F 45 52 00 3B 06 8C 00  8F 20 52 45 47 45 4C 20  |OER.;.... REGEL |
00000220: 33 30 30 30 20 54 4F 54  20 33 32 34 30 20 3A 20  |3000 TOT 3240 : |
00000230: 44 41 54 41 20 52 45 47  45 4C 53 00 63 06 96 00  |DATA REGELS.c...|
00000240: 8F 20 52 45 47 45 4C 20  35 30 30 30 20 54 4F 54  |. REGEL 5000 TOT|
00000250: 20 35 30 35 30 20 3A 20  53 55 42 52 4F 55 54 49  | 5050 : SUBROUTI|
00000260: 4E 45 53 00 8B 06 A0 00  8F 20 52 45 47 45 4C 20  |NES...... REGEL |
00000270: 38 30 30 30 20 54 4F 54  20 38 31 39 30 20 3A 20  |8000 TOT 8190 : |
00000280: 49 4E 53 54 52 55 4B 54  49 45 53 00 BB 06 AA 00  |INSTRUKTIES.....|
00000290: 8F 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |. --------------|
000002A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000002B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 00 E0 06 C8 00  |-----------.....|
000002C0: 8F 20 53 4E 24 28 58 29  20 20 20 20 20 3A 20 46  |. SN$(X)     : F|
000002D0: 4F 52 4D 55 4C 45 20 56  41 4E 20 42 41 53 45 4E  |ORMULE VAN BASEN|
000002E0: 00 08 07 D2 00 8F 20 53  50 24 28 58 29 20 20 20  |...... SP$(X)   |
000002F0: 20 20 3A 20 46 4F 52 4D  55 4C 45 20 56 41 4E 20  |  : FORMULE VAN |
00000300: 4B 41 54 49 4F 4E 45 4E  00 2A 07 DC 00 8F 20 4E  |KATIONEN.*.... N|
00000310: 4E 24 28 58 29 20 20 20  20 20 3A 20 4E 41 41 4D  |N$(X)     : NAAM|
00000320: 20 56 41 4E 20 42 41 53  45 4E 00 4F 07 E6 00 8F  | VAN BASEN.O....|
00000330: 20 4E 50 24 28 58 29 20  20 20 20 20 3A 20 4E 41  | NP$(X)     : NA|
00000340: 41 4D 20 56 41 4E 20 4B  41 54 49 4F 4E 45 4E 00  |AM VAN KATIONEN.|
00000350: 75 07 F0 00 8F 20 57 4E  24 28 58 29 20 20 20 20  |u.... WN$(X)    |
00000360: 20 3A 20 56 41 4C 45 4E  54 49 45 20 56 41 4E 20  | : VALENTIE VAN |
00000370: 42 41 53 45 4E 00 9E 07  FA 00 8F 20 57 50 24 28  |BASEN...... WP$(|
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 4B 41  54 49 4F 4E 45 4E 00 B8  |E VAN KATIONEN..|
000003A0: 07 04 01 8F 20 58 20 20  20 20 20 20 20 20 20 20  |.... X          |
000003B0: 3A 20 54 45 4C 4C 45 52  00 DA 07 0E 01 8F 20 42  |: TELLER...... B|
000003C0: 20 20 20 20 20 20 20 20  20 20 3A 20 41 41 4E 54  |          : AANT|
000003D0: 41 4C 20 42 45 55 52 54  45 4E 00 05 08 18 01 8F  |AL BEURTEN......|
000003E0: 20 47 20 20 20 20 20 20  20 20 20 20 3A 20 41 41  | G          : AA|
000003F0: 4E 54 41 4C 20 47 4F 45  44 45 20 41 4E 54 57 4F  |NTAL GOEDE ANTWO|
00000400: 4F 52 44 45 4E 00 32 08  22 01 8F 20 50 20 20 20  |ORDEN.2.".. P   |
00000410: 20 20 20 20 20 20 20 3A  20 52 41 4E 44 4F 4D 20  |       : RANDOM |
00000420: 47 45 54 41 4C 20 56 41  4E 20 4B 41 54 49 4F 4E  |GETAL VAN KATION|
00000430: 45 4E 00 5C 08 2C 01 8F  20 4E 20 20 20 20 20 20  |EN.\.,.. N      |
00000440: 20 20 20 20 3A 20 52 41  4E 44 4F 4D 20 47 45 54  |    : RANDOM GET|
00000450: 41 4C 20 56 41 4E 20 42  41 53 45 4E 00 83 08 36  |AL VAN BASEN...6|
00000460: 01 8F 20 49 24 20 20 20  20 20 20 20 20 20 3A 20  |.. I$         : |
00000470: 49 4E 50 55 54 20 56 41  4E 20 47 45 42 52 55 49  |INPUT VAN GEBRUI|
00000480: 4B 45 52 00 B2 08 40 01  8F 20 52 24 20 20 20 20  |KER...@.. R$    |
00000490: 20 20 20 20 20 3A 20 43  4F 4D 50 55 54 45 52 20  |     : COMPUTER |
000004A0: 56 45 52 48 4F 55 44 49  4E 47 53 46 4F 52 4D 55  |VERHOUDINGSFORMU|
000004B0: 4C 45 00 DF 08 4A 01 8F  20 2D 2D 2D 2D 2D 2D 2D  |LE...J.. -------|
000004C0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000004D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 00  |---------------.|
000004E0: E9 08 54 01 8D 35 30 31  30 00 07 09 5E 01 85 22  |..T..5010...^.."|
000004F0: 57 49 4C 54 20 55 20 49  4E 53 54 52 55 4B 54 49  |WILT U INSTRUKTI|
00000500: 45 53 20 22 3B 49 24 00  1D 09 68 01 8B C8 28 49  |ES ";I$...h...(I|
00000510: 24 2C 31 29 B2 22 4A 22  A7 38 30 30 30 00 4A 09  |$,1)."J".8000.J.|
00000520: 72 01 8F 20 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |r.. ------------|
00000530: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 00 7D 09 E8 03 8F  |----------.}....|
00000550: 43 4C 45 41 52 31 30 30  30 3A 52 45 4D 20 52 45  |CLEAR1000:REM RE|
00000560: 53 45 52 56 45 45 52 20  47 45 48 45 55 47 45 4E  |SERVEER GEHEUGEN|
00000570: 20 56 4F 4F 52 20 53 54  52 49 4E 47 53 00 87 09  | VOOR STRINGS...|
00000580: F2 03 8D 35 30 31 30 00  BC 09 FC 03 86 53 4E 24  |...5010......SN$|
00000590: 28 32 35 29 2C 53 50 24  28 32 35 29 2C 4E 4E 24  |(25),SP$(25),NN$|
000005A0: 28 32 35 29 2C 4E 50 24  28 32 35 29 2C 57 50 24  |(25),NP$(25),WP$|
000005B0: 28 32 35 29 2C 57 4E 24  28 32 35 29 00 C8 09 06  |(25),WN$(25)....|
000005C0: 04 81 58 B2 31 A4 32 30  00 E2 09 10 04 87 53 50  |..X.1.20......SP|
000005D0: 24 28 58 29 2C 4E 50 24  28 58 29 2C 57 50 24 28  |$(X),NP$(X),WP$(|
000005E0: 58 29 00 E9 09 1A 04 82  58 00 F5 09 24 04 81 58  |X)......X...$..X|
000005F0: B2 31 A4 32 33 00 0F 0A  2E 04 87 53 4E 24 28 58  |.1.23......SN$(X|
00000600: 29 2C 4E 4E 24 28 58 29  2C 57 4E 24 28 58 29 00  |),NN$(X),WN$(X).|
00000610: 16 0A 38 04 82 58 00 42  0A 42 04 8F 20 2D 2D 2D  |..8..X.B.B.. ---|
00000620: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000630: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000640: 2D 2D 00 4C 0A 4C 04 42  B2 42 AA 31 00 5B 0A 56  |--.L.L.B.B.1.[.V|
00000650: 04 8B 42 B2 31 31 A7 31  35 39 30 00 83 0A 60 04  |..B.11.1590...`.|
00000660: 50 B2 31 AA B5 28 32 30  AC BB 28 31 29 29 3A 8F  |P.1..(20..(1)):.|
00000670: 20 47 45 54 41 4C 20 56  41 4E 20 31 20 54 4F 54  | GETAL VAN 1 TOT|
00000680: 20 32 30 00 AB 0A 6A 04  4E B2 31 AA B5 28 32 33  | 20...j.N.1..(23|
00000690: AC BB 28 31 29 29 3A 8F  20 47 45 54 41 4C 20 56  |..(1)):. GETAL V|
000006A0: 41 4E 20 31 20 54 4F 54  20 32 33 00 D8 0A 74 04  |AN 1 TOT 23...t.|
000006B0: 8F 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |. --------------|
000006C0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D  00 EE 0A 7E 04 8B 50 B2  |--------...~..P.|
000006E0: B1 31 37 AF 4E B2 B1 32  30 A7 31 31 32 30 00 10  |.17.N..20.1120..|
000006F0: 0B 88 04 8B 53 50 24 28  50 29 B2 22 4E 48 34 22  |....SP$(P)."NH4"|
00000700: AF 53 4E 24 28 4E 29 B2  22 4F 22 A7 31 31 32 30  |.SN$(N)."O".1120|
00000710: 00 29 0B 92 04 8B 50 B2  34 AF 28 4E B2 37 B0 4E  |.)....P.4.(N.7.N|
00000720: B2 31 39 29 A7 31 31 32  30 00 41 0B 9C 04 8B 57  |.19).1120.A....W|
00000730: 50 24 28 50 29 B2 57 4E  24 28 4E 29 A7 31 32 36  |P$(P).WN$(N).126|
00000740: 30 00 58 0B A6 04 8B 53  50 24 28 50 29 B2 22 4E  |0.X....SP$(P)."N|
00000750: 48 34 22 A7 31 32 38 30  00 6D 0B B0 04 8B 57 50  |H4".1280.m....WP|
00000760: 24 28 50 29 B2 22 31 22  A7 31 33 30 30 00 87 0B  |$(P)."1".1300...|
00000770: BA 04 8B 57 4E 24 28 4E  29 B2 22 31 22 AF 4E B3  |...WN$(N)."1".N.|
00000780: B2 36 A7 31 33 32 30 00  9C 0B C4 04 8B 57 4E 24  |.6.1320......WN$|
00000790: 28 4E 29 B2 22 31 22 A7  31 33 34 30 00 AB 0B CE  |(N)."1".1340....|
000007A0: 04 8B 4E B3 B2 36 A7 31  33 36 30 00 B5 0B D8 04  |..N..6.1360.....|
000007B0: 89 31 33 38 30 00 E1 0B  E2 04 8F 20 2D 2D 2D 2D  |.1380...... ----|
000007C0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000007D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000007E0: 2D 00 F6 0B EC 04 52 24  B2 53 50 24 28 50 29 AA  |-.....R$.SP$(P).|
000007F0: 53 4E 24 28 4E 29 00 00  0C F6 04 89 31 34 31 30  |SN$(N)......1410|
00000800: 00 1D 0C 00 05 52 24 B2  22 28 4E 48 34 29 22 AA  |.....R$."(NH4)".|
00000810: 57 4E 24 28 4E 29 AA 53  4E 24 28 4E 29 00 27 0C  |WN$(N).SN$(N).'.|
00000820: 0A 05 89 31 34 31 30 00  43 0C 14 05 52 24 B2 53  |...1410.C...R$.S|
00000830: 50 24 28 50 29 AA 57 4E  24 28 4E 29 AA 53 4E 24  |P$(P).WN$(N).SN$|
00000840: 28 4E 29 00 4D 0C 1E 05  89 31 34 31 30 00 69 0C  |(N).M....1410.i.|
00000850: 28 05 52 24 B2 53 50 24  28 50 29 AA 53 4E 24 28  |(.R$.SP$(P).SN$(|
00000860: 4E 29 AA 57 50 24 28 50  29 00 73 0C 32 05 89 31  |N).WP$(P).s.2..1|
00000870: 34 31 30 00 97 0C 3C 05  52 24 B2 53 50 24 28 50  |410...<.R$.SP$(P|
00000880: 29 AA 22 28 22 AA 53 4E  24 28 4E 29 AA 22 29 22  |)."(".SN$(N).")"|
00000890: AA 57 50 24 28 50 29 00  A1 0C 46 05 89 31 34 31  |.WP$(P)...F..141|
000008A0: 30 00 C4 0C 50 05 52 24  B2 53 50 24 28 50 29 AA  |0...P.R$.SP$(P).|
000008B0: 57 4E 24 28 4E 29 AA 53  4E 24 28 4E 29 AA 57 50  |WN$(N).SN$(N).WP|
000008C0: 24 28 50 29 00 CE 0C 5A  05 89 31 34 31 30 00 F9  |$(P)...Z..1410..|
000008D0: 0C 64 05 52 24 B2 53 50  24 28 50 29 AA 57 4E 24  |.d.R$.SP$(P).WN$|
000008E0: 28 4E 29 AA 22 28 22 AA  53 4E 24 28 4E 29 AA 22  |(N)."(".SN$(N)."|
000008F0: 29 22 AA 57 50 24 28 50  29 00 03 0D 6E 05 89 31  |)".WP$(P)...n..1|
00000900: 34 31 30 00 35 0D 78 05  8F 20 2D 2D 2D 2D 2D 2D  |410.5.x.. ------|
00000910: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000920: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000930: 2D 2D 2D 2D 2D 00 3F 0D  82 05 8D 35 30 31 30 00  |-----.?....5010.|
00000940: 49 0D 8C 05 8D 35 30 34  30 00 51 0D 96 05 85 49  |I....5040.Q....I|
00000950: 24 00 61 0D A0 05 8B 49  24 B2 52 24 A7 31 35 33  |$.a....I$.R$.153|
00000960: 30 00 6B 0D AA 05 8D 35  30 31 30 00 7B 0D B4 05  |0.k....5010.{...|
00000970: 99 22 46 4F 55 54 20 21  21 21 22 00 91 0D BE 05  |."FOUT !!!".....|
00000980: 99 22 44 45 20 56 52 41  41 47 20 57 41 53 20 3A  |."DE VRAAG WAS :|
00000990: 22 00 9B 0D C8 05 8D 35  30 34 30 00 C3 0D D2 05  |"......5040.....|
000009A0: 99 22 20 20 20 20 48 45  54 20 47 4F 45 44 45 20  |."    HET GOEDE |
000009B0: 41 4E 54 57 4F 4F 52 44  20 57 41 53 20 3A 20 22  |ANTWOORD WAS : "|
000009C0: 3B 52 24 00 EB 0D DC 05  99 22 20 20 20 20 20 20  |;R$......"      |
000009D0: 20 20 20 20 20 55 57 20  41 4E 54 57 4F 4F 52 44  |     UW ANTWOORD|
000009E0: 20 57 41 53 20 3A 20 22  3B 49 24 00 0F 0E E6 05  | WAS : ";I$.....|
000009F0: 85 22 52 41 41 4B 20 45  45 4E 20 54 4F 45 54 53  |."RAAK EEN TOETS|
00000A00: 20 45 4E 20 52 45 54 55  52 4E 20 22 3B 49 24 00  | EN RETURN ";I$.|
00000A10: 19 0E F0 05 89 31 31 30  30 00 2C 0E FA 05 99 22  |.....1100.,...."|
00000A20: 20 47 4F 45 44 20 5A 4F  20 21 21 22 00 36 0E 04  | GOED ZO !!".6..|
00000A30: 06 47 B2 47 AA 31 00 43  0E 0E 06 81 58 B2 31 A4  |.G.G.1.C....X.1.|
00000A40: 37 35 30 00 4A 0E 18 06  82 58 00 54 0E 22 06 89  |750.J....X.T."..|
00000A50: 31 31 30 30 00 84 0E 2C  06 8F 20 2D 2D 2D 2D 2D  |1100...,.. -----|
00000A60: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000A70: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000A80: 2D 2D 2D 2D 00 8E 0E 36  06 8D 35 30 31 30 00 BA  |----...6..5010..|
00000A90: 0E 40 06 99 22 56 41 4E  20 44 45 20 31 30 20 4B  |.@.."VAN DE 10 K|
00000AA0: 41 4E 53 45 4E 20 48 41  44 20 55 20 45 52 20 22  |ANSEN HAD U ER "|
00000AB0: 3B 47 3B 22 20 47 4F 45  44 22 00 D9 0E 4A 06 85  |;G;" GOED"...J..|
00000AC0: 22 57 49 4C 54 20 55 20  4E 4F 47 20 45 45 4E 20  |"WILT U NOG EEN |
00000AD0: 4B 45 45 52 20 22 3B 49  24 00 EC 0E 54 06 8B C8  |KEER ";I$...T...|
00000AE0: 28 49 24 2C 31 29 B2 22  4A 22 A7 8A 00 F2 0E 5E  |(I$,1)."J".....^|
00000AF0: 06 80 00 23 0F 68 06 8F  20 2D 2D 2D 2D 2D 2D 2D  |...#.h.. -------|
00000B00: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000B10: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000B20: 2D 2D 2D 00 49 0F B8 0B  83 20 22 4E 41 22 2C 22  |---.I.... "NA","|
00000B30: 4E 41 54 52 49 55 4D 22  2C 31 2C 22 4B 22 2C 22  |NATRIUM",1,"K","|
00000B40: 4B 41 4C 49 55 4D 22 2C  31 00 5F 0F C2 0B 83 20  |KALIUM",1._.... |
00000B50: 22 41 47 22 2C 22 5A 49  4C 56 45 52 22 2C 31 00  |"AG","ZILVER",1.|
00000B60: 8A 0F CC 0B 83 20 22 48  22 2C 22 57 41 54 45 52  |..... "H","WATER|
00000B70: 53 54 4F 46 22 2C 31 2C  22 4D 47 22 2C 22 4D 41  |STOF",1,"MG","MA|
00000B80: 47 4E 45 53 49 55 4D 22  2C 32 00 B1 0F D6 0B 83  |GNESIUM",2......|
00000B90: 20 22 43 41 22 2C 22 43  41 4C 43 49 55 4D 22 2C  | "CA","CALCIUM",|
00000BA0: 32 2C 22 42 41 22 2C 22  42 41 52 49 55 4D 22 2C  |2,"BA","BARIUM",|
00000BB0: 32 00 D9 0F E0 0B 83 20  22 5A 4E 22 2C 22 5A 49  |2...... "ZN","ZI|
00000BC0: 4E 4B 22 2C 32 2C 22 46  45 22 2C 22 49 4A 5A 45  |NK",2,"FE","IJZE|
00000BD0: 52 20 28 49 49 29 22 2C  32 00 06 10 EA 0B 83 20  |R (II)",2...... |
00000BE0: 22 46 45 22 2C 22 49 4A  5A 45 52 20 28 49 49 49  |"FE","IJZER (III|
00000BF0: 29 22 2C 33 2C 22 53 4E  22 2C 22 54 49 4E 20 28  |)",3,"SN","TIN (|
00000C00: 49 49 29 22 2C 32 00 2D  10 F4 0B 83 20 22 42 45  |II)",2.-.... "BE|
00000C10: 22 2C 22 42 45 52 59 4C  4C 49 55 4D 22 2C 32 2C  |","BERYLLIUM",2,|
00000C20: 22 50 42 22 2C 22 4C 4F  4F 44 22 2C 32 00 59 10  |"PB","LOOD",2.Y.|
00000C30: FE 0B 83 20 22 41 4C 22  2C 22 41 4C 55 4D 49 4E  |... "AL","ALUMIN|
00000C40: 49 55 4D 22 2C 33 2C 22  43 55 22 2C 22 4B 4F 50  |IUM",3,"CU","KOP|
00000C50: 45 52 20 28 49 29 22 2C  31 00 84 10 08 0C 83 20  |ER (I)",1...... |
00000C60: 22 43 55 22 2C 22 4B 4F  50 45 52 20 28 49 49 29  |"CU","KOPER (II)|
00000C70: 22 2C 32 2C 22 4C 49 22  2C 22 4C 49 54 48 49 55  |",2,"LI","LITHIU|
00000C80: 4D 22 2C 31 00 AB 10 12  0C 83 20 22 43 52 22 2C  |M",1...... "CR",|
00000C90: 22 43 48 52 4F 4F 4D 22  2C 33 2C 22 4D 4E 22 2C  |"CHROOM",3,"MN",|
00000CA0: 22 4D 41 4E 47 41 41 4E  22 2C 32 00 C4 10 1C 0C  |"MANGAAN",2.....|
00000CB0: 83 20 22 4E 48 34 22 2C  22 41 4D 4D 4F 4E 49 55  |. "NH4","AMMONIU|
00000CC0: 4D 22 2C 31 00 E9 10 26  0C 83 20 22 43 4C 22 2C  |M",1...&.. "CL",|
00000CD0: 22 43 48 4C 4F 4F 52 22  2C 31 2C 22 42 52 22 2C  |"CHLOOR",1,"BR",|
00000CE0: 22 42 52 4F 4F 4D 22 2C  31 00 0A 11 30 0C 83 20  |"BROOM",1...0.. |
00000CF0: 22 49 22 2C 22 4A 4F 4F  44 22 2C 31 2C 22 46 22  |"I","JOOD",1,"F"|
00000D00: 2C 22 46 4C 55 4F 52 22  2C 31 00 30 11 3A 0C 83  |,"FLUOR",1.0.:..|
00000D10: 20 22 4F 22 2C 22 5A 55  55 52 53 54 4F 46 22 2C  | "O","ZUURSTOF",|
00000D20: 32 2C 22 53 22 2C 22 5A  57 41 56 45 4C 22 2C 32  |2,"S","ZWAVEL",2|
00000D30: 00 49 11 44 0C 83 20 22  4F 48 22 2C 22 48 59 44  |.I.D.. "OH","HYD|
00000D40: 52 4F 58 49 44 45 22 2C  31 00 73 11 4E 0C 83 20  |ROXIDE",1.s.N.. |
00000D50: 22 4E 4F 32 22 2C 22 4E  49 54 52 49 45 54 22 2C  |"NO2","NITRIET",|
00000D60: 31 2C 22 4E 4F 33 22 2C  22 4E 49 54 52 41 41 54  |1,"NO3","NITRAAT|
00000D70: 22 2C 31 00 9D 11 58 0C  83 20 22 53 4F 33 22 2C  |",1...X.. "SO3",|
00000D80: 22 53 55 4C 46 49 45 54  22 2C 32 2C 22 53 4F 34  |"SULFIET",2,"SO4|
00000D90: 22 2C 22 53 55 4C 46 41  41 54 22 2C 32 00 B4 11  |","SULFAAT",2...|
00000DA0: 62 0C 83 20 22 43 4E 22  2C 22 43 59 41 4E 49 44  |b.. "CN","CYANID|
00000DB0: 45 22 2C 31 00 CE 11 6C  0C 83 20 22 43 4F 33 22  |E",1...l.. "CO3"|
00000DC0: 2C 22 43 41 52 42 4F 4E  41 41 54 22 2C 32 00 F8  |,"CARBONAAT",2..|
00000DD0: 11 76 0C 83 20 22 50 4F  33 22 2C 22 46 4F 53 46  |.v.. "PO3","FOSF|
00000DE0: 49 45 54 22 2C 33 2C 22  50 4F 34 22 2C 22 46 4F  |IET",3,"PO4","FO|
00000DF0: 53 46 41 41 54 22 2C 33  00 22 12 80 0C 83 20 22  |SFAAT",3.".... "|
00000E00: 42 52 4F 33 22 2C 22 42  52 4F 4D 41 41 54 22 2C  |BRO3","BROMAAT",|
00000E10: 31 2C 22 49 4F 33 22 2C  22 4A 4F 44 41 41 54 22  |1,"IO3","JODAAT"|
00000E20: 2C 31 00 3C 12 8A 0C 83  20 22 43 4C 4F 33 22 2C  |,1.<.... "CLO3",|
00000E30: 22 43 48 4C 4F 52 41 41  54 22 2C 31 00 6A 12 94  |"CHLORAAT",1.j..|
00000E40: 0C 83 20 22 43 32 48 33  4F 32 22 2C 22 41 43 45  |.. "C2H3O2","ACE|
00000E50: 54 41 41 54 22 2C 31 2C  22 43 32 4F 34 22 2C 22  |TAAT",1,"C2O4","|
00000E60: 4F 58 41 4C 41 41 54 22  2C 32 00 9D 12 9E 0C 83  |OXALAAT",2......|
00000E70: 20 22 4D 4E 4F 34 22 2C  22 4D 41 4E 47 41 4E 41  | "MNO4","MANGANA|
00000E80: 41 54 22 2C 32 2C 22 4D  4E 4F 34 22 2C 22 50 45  |AT",2,"MNO4","PE|
00000E90: 52 4D 41 4E 47 41 4E 41  41 54 22 2C 31 00 B7 12  |RMANGANAAT",1...|
00000EA0: A8 0C 83 20 22 43 52 4F  34 22 2C 22 43 48 52 4F  |... "CRO4","CHRO|
00000EB0: 4D 41 41 54 22 2C 31 00  BD 12 B2 0C 80 00 E9 12  |MAAT",1.........|
00000EC0: 88 13 8F 20 2D 2D 2D 2D  20 52 4F 55 54 49 4E 45  |... ---- ROUTINE|
00000ED0: 20 4D 41 41 4B 54 20 53  43 48 45 52 4D 20 53 43  | MAAKT SCHERM SC|
00000EE0: 48 4F 4F 4E 20 2D 2D 2D  2D 00 F5 12 92 13 99 C7  |HOON ----.......|
00000EF0: 28 31 34 37 29 00 FB 12  9C 13 8E 00 2A 13 A6 13  |(147).......*...|
00000F00: 8F 20 2D 2D 2D 20 50 52  49 4E 54 20 52 4F 55 54  |. --- PRINT ROUT|
00000F10: 49 4E 45 20 20 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |INE  -----------|
00000F20: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 00 57 13 B0 13 99  |----------.W....|
00000F30: 22 48 4F 45 20 5A 49 45  54 20 44 45 20 56 45 52  |"HOE ZIET DE VER|
00000F40: 48 4F 55 44 49 4E 47 53  2D 46 4F 52 4D 55 4C 45  |HOUDINGS-FORMULE|
00000F50: 20 45 52 55 49 54 22 00  7D 13 BA 13 99 22 56 41  | ERUIT".}...."VA|
00000F60: 4E 20 3A 20 22 3B 4E 50  24 28 50 29 3B 22 20 20  |N : ";NP$(P);"  |
00000F70: 4D 45 54 20 20 22 3B 4E  4E 24 28 4E 29 00 83 13  |MET  ";NN$(N)...|
00000F80: C4 13 8E 00 B1 13 CE 13  8F 20 2D 2D 2D 2D 2D 2D  |......... ------|
00000F90: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000FA0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000FB0: 2D 00 BB 13 40 1F 8D 35  30 31 30 00 E1 13 4A 1F  |-...@..5010...J.|
00000FC0: 99 22 20 20 20 20 20 20  20 20 20 56 45 52 48 4F  |."         VERHO|
00000FD0: 55 44 49 4E 47 53 2D 46  4F 52 4D 55 4C 45 53 20  |UDINGS-FORMULES |
00000FE0: 22 00 04 14 54 1F 99 22  20 20 20 20 20 20 20 20  |"...T.."        |
00000FF0: 20 20 44 4F 4F 52 20 42  2E 20 47 52 4F 4F 54 48  |  DOOR B. GROOTH|
00001000: 55 49 53 22 00 30 14 5E  1F 99 22 44 49 54 20 50  |UIS".0.^.."DIT P|
00001010: 52 4F 47 52 41 4D 4D 41  20 54 45 53 54 20 55 57  |ROGRAMMA TEST UW|
00001020: 20 56 41 41 52 44 49 47  48 45 49 44 20 49 4E 22  | VAARDIGHEID IN"|
00001030: 00 59 14 68 1F 99 22 48  45 54 20 53 41 4D 45 4E  |.Y.h.."HET SAMEN|
00001040: 53 54 45 4C 4C 45 4E 20  56 41 4E 20 56 45 52 48  |STELLEN VAN VERH|
00001050: 4F 55 44 49 4E 47 53 2D  22 00 6A 14 6D 1F 99 22  |OUDINGS-".j.m.."|
00001060: 46 4F 52 4D 55 4C 45 53  2E 22 00 93 14 72 1F 99  |FORMULES."...r..|
00001070: 22 45 52 20 57 4F 52 44  54 20 55 20 53 54 52 41  |"ER WORDT U STRA|
00001080: 4B 53 20 47 45 56 52 41  41 47 44 20 57 41 54 20  |KS GEVRAAGD WAT |
00001090: 44 45 22 00 BE 14 7C 1F  99 22 56 45 52 48 4F 55  |DE"...|.."VERHOU|
000010A0: 44 49 4E 47 53 2D 46 4F  52 4D 55 4C 45 20 49 53  |DINGS-FORMULE IS|
000010B0: 20 55 49 47 41 41 4E 44  45 20 56 41 4E 22 00 DD  | UIGAANDE VAN"..|
000010C0: 14 86 1F 99 22 45 45 4E  20 4B 41 54 49 4F 4E 20  |...."EEN KATION |
000010D0: 45 4E 20 45 45 4E 20 42  41 53 45 2E 22 00 F0 14  |EN EEN BASE."...|
000010E0: 90 1F 99 22 56 4F 4F 52  42 45 45 4C 44 20 3A 22  |..."VOORBEELD :"|
000010F0: 00 10 15 9A 1F 99 22 20  41 4D 4D 4F 4E 49 55 4D  |......" AMMONIUM|
00001100: 20 20 4D 45 54 20 20 46  4F 53 46 41 41 54 20 22  |  MET  FOSFAAT "|
00001110: 00 34 15 A4 1F 99 22 20  55 20 56 4F 45 52 54 20  |.4...." U VOERT |
00001120: 44 41 4E 20 49 4E 20 3A  20 27 28 4E 48 34 29 33  |DAN IN : '(NH4)3|
00001130: 50 4F 34 27 00 5D 15 AE  1F 99 22 53 4F 4D 4D 49  |PO4'.]...."SOMMI|
00001140: 47 45 20 45 4C 45 4D 45  4E 54 45 4E 20 48 45 42  |GE ELEMENTEN HEB|
00001150: 42 45 4E 20 4D 45 45 52  44 45 52 45 22 00 84 15  |BEN MEERDERE"...|
00001160: B8 1F 99 22 56 41 4C 45  4E 54 49 45 53 2C 20 5A  |..."VALENTIES, Z|
00001170: 4F 41 4C 53 20 42 49 4A  56 4F 4F 52 42 45 45 4C  |OALS BIJVOORBEEL|
00001180: 44 20 3A 22 00 A7 15 C2  1F 99 22 4B 4F 50 45 52  |D :"......"KOPER|
00001190: 20 28 20 43 55 20 28 49  29 20 45 4E 20 43 55 20  | ( CU (I) EN CU |
000011A0: 28 49 49 29 20 29 2E 00  D0 15 CC 1F 99 22 42 49  |(II) )......."BI|
000011B0: 4A 20 44 49 54 20 53 4F  4F 52 54 20 45 4C 45 4D  |J DIT SOORT ELEM|
000011C0: 45 4E 54 45 4E 20 53 54  41 41 54 20 44 41 4E 22  |ENTEN STAAT DAN"|
000011D0: 00 F9 15 D6 1F 99 22 44  45 20 54 45 20 47 45 42  |......"DE TE GEB|
000011E0: 52 55 49 4B 45 4E 20 56  41 4C 45 4E 54 49 45 20  |RUIKEN VALENTIE |
000011F0: 56 45 52 4D 45 4C 44 2E  22 00 33 16 E0 1F 85 22  |VERMELD.".3...."|
00001200: 56 45 45 4C 20 53 55 43  43 45 53 2E 20 20 2D 54  |VEEL SUCCES.  -T|
00001210: 4F 45 54 53 20 41 41 4E  48 41 4C 49 4E 47 53 54  |OETS AANHALINGST|
00001220: 45 4B 45 4E 53 20 45 4E  20 52 45 54 55 52 4E 22  |EKENS EN RETURN"|
00001230: 3B 49 24 00 3D 16 EA 1F  89 31 30 30 30 00 43 16  |;I$.=....1000.C.|
00001240: F4 1F 80 00 00 00 28                              |......(         |
..*.... ********************************
**.S.... *  B. GROOTHUIS                
  *.|.... *  NIJENHEIM 50-04            
   *...(.. *  3704 BA  ZEIST            
    *.N.2.. *  03404-54967              
     *...<.. *  LID  TRS-80 GEBRUIKERSVE
R.    *. .F.. **************************
********.P.P.. -------------------------
----------------...D.. REGEL 200 TOT 320
   : DEFIENIERING VARIABELEN...N.. REGEL
 1000 TOT 1080 : DIM. EN INLEZEN ARRAYS.
..X.. REGEL 1150 TOT 1390 : FORMULE GENE
REREN...... REGEL 1400 TOT 1640 : GEBRUI
KERS INVOER.;.... REGEL 3000 TOT 3240 : 
DATA REGELS.C.... REGEL 5000 TOT 5050 : 
SUBROUTINES... .. REGEL 8000 TOT 8190 : 
INSTRUKTIES...... ----------------------
-------------------...H.. SN$(X)     : F
ORMULE VAN BASEN...R.. SP$(X)     : FORM
ULE VAN KATIONEN.*.... NN$(X)     : NAAM
 VAN BASEN.O.... NP$(X)     : NAAM VAN K
ATIONEN.U.... WN$(X)     : VALENTIE VAN 
BASEN...... WP$(X)     : VALENTIE VAN KA
TIONEN...... X          : TELLER.Z.... B
          : AANTAL BEURTEN...... G      
    : AANTAL GOEDE ANTWOORDEN.2.".. P   
       : RANDOM GETAL VAN KATIONEN.\.,..
 N          : RANDOM GETAL VAN BASEN...6
.. I$         : INPUT VAN GEBRUIKER...@.
. R$         : COMPUTER VERHOUDINGSFORMU
LE...J.. -------------------------------
-------...T..5010...^.."WILT U INSTRUKTI
ES ";I$...H..H(I$,1)."J".8000.J.R.. ----
----------------------------------.}....
CLEAR1000:REM RESERVEER GEHEUGEN VOOR ST
RINGS......5010......SN$(25),SP$(25),NN$
(25),NP$(25),WP$(25),WN$(25).H....X.1.20
......SP$(X),NP$(X),WP$(X)......X...$..X
.1.23......SN$(X),NN$(X),WN$(X)...8..X.B
.B.. -----------------------------------
--.L.L.B.B.1.[.V..B.11.1590...`.P.1..(20
..(1)):. GETAL VAN 1 TOT 20...J.N.1..(23
..(1)):. GETAL VAN 1 TOT 23.X.T.. ------
--------------------------------...~..P.
.17.N..20.1120......SP$(P)."NH4".SN$(N).
"O".1120.)....P.4.(N.7.N.19).1120.A....W
P$(P).WN$(N).1260.X....SP$(P)."NH4".1280
.M....WP$(P)."1".1300......WN$(N)."1".N.
.6.1320...D..WN$(N)."1".1340...N..N..6.1
360...X..1380...... --------------------
-----------------.....R$.SP$(P).SN$(N)..
....1410.....R$."(NH4)".WN$(N).SN$(N).'.
...1410.C...R$.SP$(P).WN$(N).SN$(N).M...
.1410.I.(.R$.SP$(P).SN$(N).WP$(P).S.2..1
410...<.R$.SP$(P)."(".SN$(N).")".WP$(P).
..F..1410.D.P.R$.SP$(P).WN$(N).SN$(N).WP
$(P).N.Z..1410...D.R$.SP$(P).WN$(N)."(".
SN$(N).")".WP$(P)...N..1410.5.X.. ------
-------------------------------------.?.
...5010.I....5040.Q....I$.A. ..I$.R$.153
0.K....5010.{...."FOUT !!!"......"DE VRA
AG WAS :"...H..5040.C.R.."    HET GOEDE 
ANTWOORD WAS : ";R$......"           UW 
ANTWOORD WAS : ";I$......"RAAK EEN TOETS
 EN RETURN ";I$......1100.,...." GOED ZO
 !!".6...G.G.1.C....X.1.750.J....X.T."..
1100...,.. -----------------------------
------------...6..5010...@.."VAN DE 10 K
ANSEN HAD U ER ";G;" GOED".Y.J.."WILT U 
NOG EEN KEER ";I$...T..H(I$,1)."J".....^
...#.H.. -------------------------------
-----------.I.... "NA","NATRIUM",1,"K","
KALIUM",1._.B.. "AG","ZILVER",1...L.. "H
","WATERSTOF",1,"MG","MAGNESIUM",2...V..
 "CA","CALCIUM",2,"BA","BARIUM",2.Y.... 
"ZN","ZINK",2,"FE","IJZER (II)",2...... 
"FE","IJZER (III)",3,"SN","TIN (II)",2.-
.... "BE","BERYLLIUM",2,"PB","LOOD",2.Y.
... "AL","ALUMINIUM",3,"CU","KOPER (I)",
1...... "CU","KOPER (II)",2,"LI","LITHIU
M",1...... "CR","CHROOM",3,"MN","MANGAAN
",2.D.... "NH4","AMMONIUM",1...&.. "CL",
"CHLOOR",1,"BR","BROOM",1...0.. "I","JOO
D",1,"F","FLUOR",1.0.:.. "O","ZUURSTOF",
2,"S","ZWAVEL",2.I.D.. "OH","HYDROXIDE",
1.S.N.. "NO2","NITRIET",1,"NO3","NITRAAT
",1...X.. "SO3","SULFIET",2,"SO4","SULFA
AT",2...B.. "CN","CYANIDE",1.N.L.. "CO3"
,"CARBONAAT",2...V.. "PO3","FOSFIET",3,"
PO4","FOSFAAT",3.".... "BRO3","BROMAAT",
1,"IO3","JODAAT",1.<.... "CLO3","CHLORAA
T",1.J.... "C2H3O2","ACETAAT",1,"C2O4","
OXALAAT",2...... "MNO4","MANGANAAT",2,"M
NO4","PERMANGANAAT",1...... "CRO4","CHRO
MAAT",1............ ---- ROUTINE MAAKT S
CHERM SCHOON ----......G(147).......*...
. --- PRINT ROUTINE  -------------------
--.W...."HOE ZIET DE VERHOUDINGS-FORMULE
 ERUIT".}...."VAN : ";NP$(P);"  MET  ";N
N$(N)...D.....N.. ----------------------
-----------------...@..5010...J.."      
   VERHOUDINGS-FORMULES "...T.."        
  DOOR B. GROOTHUIS".0.^.."DIT PROGRAMMA
 TEST UW VAARDIGHEID IN".Y.H.."HET SAMEN
STELLEN VAN VERHOUDINGS-".J.M.."FORMULES
."...R.."ER WORDT U STRAKS GEVRAAGD WAT 
DE"...|.."VERHOUDINGS-FORMULE IS UIGAAND
E VAN"......"EEN KATION EN EEN BASE."...
..."VOORBEELD :"......" AMMONIUM  MET  F
OSFAAT ".4...." U VOERT DAN IN : '(NH4)3
PO4'.]...."SOMMIGE ELEMENTEN HEBBEN MEER
DERE"......"VALENTIES, ZOALS BIJVOORBEEL
D :"...B.."KOPER ( CU (I) EN CU (II) )..
P.L.."BIJ DIT SOORT ELEMENTEN STAAT DAN"
...V.."DE TE GEBRUIKEN VALENTIE VERMELD.
".3...."VEEL SUCCES.  -TOETS AANHALINGST
EKENS EN RETURN";I$.=....1000.C.......(
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL