WISKUNDE
FILE INFORMATION
FILENAME(S): WISKUNDE
FILE TYPE(S): PRG
FILE SIZE: 11.4K
FIRST SEEN: 2025-11-30 21:06:42
APPEARS ON: 1 disk(s)
FILE HASH
69f9ca5b78b29dcad3796b184fb58d5db416520f0eb09e115fc2e8fee4d59057
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| V D BERGH SOFT U | WISKUNDE | PRG | DuncanTwain | 7 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 31 30 30 30 00 15 08 14 00 |.......1000.....|
00000010: 89 31 30 31 30 00 21 08 64 00 99 22 93 22 3B 3A |.1010.!.d..".";:|
00000020: 8E 00 51 08 6E 00 99 C8 28 22 13 11 11 11 11 11 |..Q.n...("......|
00000030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000040: 11 11 11 22 2C B6 28 B5 28 56 45 AA 31 29 29 29 |...",.(.(VE.1)))|
00000050: 3B 00 61 08 70 00 99 A6 B6 28 48 4F 29 29 3B 3A |;.a.p....(HO));:|
00000060: 8E 00 86 08 78 00 48 4F B2 C2 28 32 30 39 29 AA |....x.HO..(209).|
00000070: 32 35 36 AC C2 28 32 31 30 29 AB 31 30 32 34 AA |256..(210).1024.|
00000080: C2 28 32 31 31 29 00 A4 08 79 00 56 45 B2 B5 28 |.(211)...y.VE..(|
00000090: 48 4F AD 34 30 29 3A 48 4F B2 48 4F AB 34 30 AC |HO.40):HO.HO.40.|
000000A0: 56 45 3A 8E 00 AF 08 C8 00 A1 49 4E 24 3A 8E 00 |VE:.......IN$:..|
000000B0: C4 08 D2 00 A1 49 4E 24 3A 8B 49 4E 24 B2 22 22 |.....IN$:.IN$.""|
000000C0: A7 32 31 30 00 CA 08 DC 00 8E 00 F7 08 FA 00 97 |.210............|
000000D0: 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 38 2C |54296,15:.54278,|
000000E0: 32 35 35 3A 97 35 34 32 37 33 2C 39 35 3A 97 35 |255:.54273,95:.5|
000000F0: 34 32 37 36 2C 31 37 00 09 09 FB 00 81 4F 4F B2 |4276,17......OO.|
00000100: 31 A4 32 30 30 3A 82 4F 4F 00 2A 09 FC 00 97 35 |1.200:.OO.*....5|
00000110: 34 32 37 36 2C 30 3A 97 35 34 32 37 37 2C 30 3A |4276,0:.54277,0:|
00000120: 97 35 34 32 37 38 2C 30 3A 8E 00 38 09 04 01 52 |.54278,0:..8...R|
00000130: 56 B2 BB 28 31 29 3A 8E 00 46 09 0E 01 46 52 B2 |V..(1):..F...FR.|
00000140: B8 28 30 29 3A 8E 00 6F 09 2C 01 53 52 24 B2 C4 |.(0):..o.,.SR$..|
00000150: 28 53 52 29 3A 8B C8 28 53 52 24 2C 31 29 B2 22 |(SR):..(SR$,1)."|
00000160: 20 22 A7 53 52 24 B2 CA 28 53 52 24 2C 32 29 00 | ".SR$..(SR$,2).|
00000170: 75 09 2D 01 8E 00 BD 09 36 01 4F 4F 24 B2 22 20 |u.-.....6.OO$." |
00000180: 22 3A 4F 4F B2 43 54 AB 43 4E AB B4 28 43 4E 29 |":OO.CT.CN..(CN)|
00000190: 3A 4F 31 B2 2E 35 AC 31 30 AE AB 43 4E 3A 4F 33 |:O1..5.10..CN:O3|
000001A0: B2 B6 28 53 52 29 3A 53 52 24 B2 22 22 3A 8B 53 |..(SR):SR$."":.S|
000001B0: 52 B3 AB 4F 31 A7 53 52 24 B2 22 2D 22 00 E0 09 |R..O1.SR$."-"...|
000001C0: 37 01 8B 4F 33 B1 B2 31 30 AE 4F 4F A7 53 52 24 |7..O3..10.OO.SR$|
000001D0: B2 22 22 3A 4F 4F 24 B2 22 2A 22 3A 89 33 31 36 |."":OO$."*":.316|
000001E0: 00 FD 09 38 01 53 52 24 B2 53 52 24 AA CA 28 C4 |...8.SR$.SR$..(.|
000001F0: 28 B5 28 4F 33 AA 4F 31 29 29 2C 32 29 00 1D 0A |(.(O3.O1)),2)...|
00000200: 39 01 8B C3 28 53 52 24 29 B3 4F 4F A7 53 52 24 |9...(SR$).OO.SR$|
00000210: B2 4F 4F 24 AA 53 52 24 3A 89 33 31 33 00 34 0A |.OO$.SR$:.313.4.|
00000220: 3A 01 8B 43 4E B2 30 B0 4F 33 B1 B2 31 45 31 30 |:..CN.0.O3..1E10|
00000230: A7 33 31 36 00 5B 0A 3B 01 53 52 24 B2 53 52 24 |.316.[.;.SR$.SR$|
00000240: AA CA 28 C4 28 31 AA 4F 33 AB B5 28 4F 33 29 AA |..(.(1.O3..(O3).|
00000250: 4F 31 29 2C 33 2C 43 4E AA 31 29 00 7B 0A 3C 01 |O1),3,CN.1).{.<.|
00000260: 8B C3 28 53 52 24 29 B3 43 54 A7 53 52 24 B2 53 |..(SR$).CT.SR$.S|
00000270: 52 24 AA 4F 4F 24 3A 89 33 31 36 00 9E 0A 3D 01 |R$.OO$:.316...=.|
00000280: 8B C3 28 53 52 24 29 B1 43 54 A7 53 52 24 B2 22 |..(SR$).CT.SR$."|
00000290: 22 3A 4F 4F 24 B2 22 2A 22 3A 89 33 31 36 00 A4 |":OO$."*":.316..|
000002A0: 0A 3E 01 8E 00 BC 0A 5E 01 9F 34 2C 34 2C 37 3A |.>.....^..4,4,7:|
000002B0: 98 34 2C 53 52 24 3B 3A A0 34 3A 8E 00 CF 0A 68 |.4,SR$;:.4:....h|
000002C0: 01 9F 34 2C 34 2C 37 3A 98 34 3A A0 34 3A 8E 00 |..4,4,7:.4:.4:..|
000002D0: F3 0A E8 03 41 B2 31 30 30 3A 89 32 30 3A 8F 20 |....A.100:.20:. |
000002E0: 20 57 49 53 4B 55 4E 44 45 20 50 52 4F 47 52 41 | WISKUNDE PROGRA|
000002F0: 4D 4D 41 00 FA 0A F2 03 8F 20 00 13 0B FC 03 8F |MMA...... ......|
00000300: 20 20 20 4D 4F 44 55 4C 45 20 4B 45 55 5A 45 4D | MODULE KEUZEM|
00000310: 45 4E 55 00 1C 0B 06 04 8D 31 30 30 00 2F 0B 10 |ENU......100./..|
00000320: 04 48 4F B2 38 3A 56 45 B2 32 3A 8D 31 31 30 00 |.HO.8:VE.2:.110.|
00000330: 40 0B 1A 04 99 22 4B 45 55 5A 45 4D 45 4E 55 22 |@...."KEUZEMENU"|
00000340: 00 53 0B 24 04 48 4F B2 35 3A 56 45 B2 37 3A 8D |.S.$.HO.5:VE.7:.|
00000350: 31 31 30 00 69 0B 2E 04 99 22 31 2E 20 41 42 43 |110.i...."1. ABC|
00000360: 2D 46 4F 52 4D 55 4C 45 22 00 7D 0B 38 04 48 4F |-FORMULE".}.8.HO|
00000370: B2 35 3A 56 45 B2 31 30 3A 8D 31 31 30 00 9F 0B |.5:VE.10:.110...|
00000380: 42 04 99 22 32 2E 20 53 54 45 4C 4C 49 4E 47 20 |B.."2. STELLING |
00000390: 56 41 4E 20 D0 59 54 48 41 47 4F 52 41 53 22 00 |VAN .YTHAGORAS".|
000003A0: B3 0B 4C 04 48 4F B2 35 3A 56 45 B2 31 33 3A 8D |..L.HO.5:VE.13:.|
000003B0: 31 31 30 00 CA 0B 56 04 99 22 33 2E 20 43 4F 53 |110...V.."3. COS|
000003C0: 49 4E 55 53 52 45 47 45 4C 22 00 DE 0B 60 04 48 |INUSREGEL"...`.H|
000003D0: 4F B2 35 3A 56 45 B2 31 36 3A 8D 31 31 30 00 F3 |O.5:VE.16:.110..|
000003E0: 0B 6A 04 99 22 34 2E 20 42 45 45 49 4E 44 49 47 |.j.."4. BEEINDIG|
000003F0: 45 4E 22 00 07 0C 74 04 48 4F B2 38 3A 56 45 B2 |EN"...t.HO.8:VE.|
00000400: 32 32 3A 8D 31 31 30 00 18 0C 7E 04 99 22 D5 57 |22:.110...~..".W|
00000410: 20 4B 45 55 5A 45 3A 22 00 33 0C 88 04 8D 32 31 | KEUZE:".3....21|
00000420: 30 3A 8F 20 20 54 4F 45 54 53 20 41 46 56 41 4E |0:. TOETS AFVAN|
00000430: 47 45 4E 00 5B 0C 8D 04 8B 28 C6 28 49 4E 24 29 |GEN.[....(.(IN$)|
00000440: AB 34 38 B1 34 29 20 B0 28 C6 28 49 4E 24 29 AB |.48.4) .(.(IN$).|
00000450: 34 38 B3 31 29 20 A7 31 31 36 30 00 81 0C 92 04 |48.1) .1160.....|
00000460: 91 28 C6 28 49 4E 24 29 AB 34 38 29 20 8D 32 30 |.(.(IN$).48) .20|
00000470: 30 30 2C 33 30 30 30 2C 35 30 30 30 2C 31 31 39 |00,3000,5000,119|
00000480: 30 00 98 0C 9C 04 89 31 30 31 30 3A 8F 20 20 4B |0......1010:. K|
00000490: 45 55 5A 45 4D 45 4E 55 00 A1 0C A6 04 8D 31 30 |EUZEMENU......10|
000004A0: 30 00 B5 0C B0 04 48 4F B2 30 3A 56 45 B2 31 32 |0.....HO.0:VE.12|
000004B0: 3A 8D 31 31 30 00 D0 0C BA 04 99 22 D0 52 4F 47 |:.110......".ROG|
000004C0: 52 41 4D 4D 41 20 42 45 45 49 4E 44 49 47 44 22 |RAMMA BEEINDIGD"|
000004D0: 00 D6 0C C4 04 80 00 DD 0C D0 07 8F 20 00 F8 0C |............ ...|
000004E0: DA 07 8F 20 20 20 4D 4F 44 55 4C 45 20 41 42 43 |... MODULE ABC|
000004F0: 2D 46 4F 52 4D 55 4C 45 00 FF 0C E4 07 8F 20 00 |-FORMULE...... .|
00000500: 08 0D EE 07 8D 31 30 30 00 1B 0D F8 07 48 4F B2 |.....100.....HO.|
00000510: 38 3A 56 45 B2 30 3A 8D 31 31 30 00 34 0D 02 08 |8:VE.0:.110.4...|
00000520: 99 22 3E 3E 20 41 42 43 2D 46 4F 52 4D 55 4C 45 |.">> ABC-FORMULE|
00000530: 20 3C 3C 22 00 47 0D 0C 08 48 4F B2 30 3A 56 45 | <<".G...HO.0:VE|
00000540: B2 35 3A 8D 31 31 30 00 60 0D 16 08 99 22 D6 4F |.5:.110.`....".O|
00000550: 45 52 20 44 45 20 41 20 49 4E 20 22 3B 3A 85 41 |ER DE A IN ";:.A|
00000560: 00 7B 0D 20 08 99 3A 99 22 D6 4F 45 52 20 44 45 |.{. ..:.".OER DE|
00000570: 20 42 20 49 4E 20 22 3B 3A 85 42 00 96 0D 2A 08 | B IN ";:.B...*.|
00000580: 99 3A 99 22 D6 4F 45 52 20 44 45 20 43 20 49 4E |.:.".OER DE C IN|
00000590: 20 22 3B 3A 85 43 00 AD 0D 34 08 8D 39 30 30 30 | ";:.C...4..9000|
000005A0: 3A 8F 20 20 47 4F 45 44 20 5A 4F 20 3F 00 CD 0D |:. GOED ZO ?...|
000005B0: 3E 08 8B 28 49 4E 24 B2 22 4A 22 29 20 B0 28 49 |>..(IN$."J") .(I|
000005C0: 4E 24 B2 22 CA 22 29 20 A7 32 31 33 30 00 ED 0D |N$.".") .2130...|
000005D0: 48 08 8B 28 49 4E 24 B2 22 4E 22 29 20 B0 28 49 |H..(IN$."N") .(I|
000005E0: 4E 24 B2 22 CE 22 29 20 A7 32 30 33 30 00 06 0E |N$.".") .2030...|
000005F0: 4D 08 89 32 31 30 30 3A 8F 20 20 47 45 45 4E 20 |M..2100:. GEEN |
00000600: 4A 20 4F 46 20 4E 00 25 0E 52 08 8B 28 41 B2 30 |J OF N.%.R..(A.0|
00000610: 29 20 AF 28 42 B2 30 29 20 AF 28 43 B2 30 29 20 |) .(B.0) .(C.0) |
00000620: A7 32 39 31 30 00 41 0E 5C 08 8D 39 30 36 30 3A |.2910.A.\..9060:|
00000630: 8F 20 20 3E 3E 55 49 54 57 45 52 4B 49 4E 47 3C |. >>UITWERKING<|
00000640: 3C 00 51 0E 66 08 44 B2 42 AE 32 AB 34 AC 41 AC |<.Q.f.D.B.2.4.A.|
00000650: 43 00 62 0E 70 08 8B 28 44 B3 30 29 20 A7 32 39 |C.b.p..(D.0) .29|
00000660: 31 30 00 78 0E 7A 08 58 B2 28 AB 42 AA BA 28 44 |10.x.z.X.(.B..(D|
00000670: 29 29 AD 28 32 AC 41 29 00 8E 0E 84 08 59 B2 28 |)).(2.A).....Y.(|
00000680: AB 42 AB BA 28 44 29 29 AD 28 32 AC 41 29 00 A1 |.B..(D)).(2.A)..|
00000690: 0E 8E 08 48 4F B2 30 3A 56 45 B2 32 3A 8D 31 31 |...HO.0:VE.2:.11|
000006A0: 30 00 C2 0E 98 08 99 22 20 20 2D 22 3B 42 3B 22 |0......" -";B;"|
000006B0: 2B 2D D6 22 3B 42 AE 32 3B 22 2D 22 3B 34 AC 41 |+-.";B.2;"-";4.A|
000006C0: AC 43 00 DE 0E A2 08 99 22 D8 3D 2D 2D 2D 2D 2D |.C......".=-----|
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 F2 |-------------"..|
000006E0: 0E AC 08 99 22 20 20 20 20 20 20 20 20 22 3B 32 |...." ";2|
000006F0: AC 41 00 05 0F B6 08 48 4F B2 30 3A 56 45 B2 37 |.A.....HO.0:VE.7|
00000700: 3A 8D 31 31 30 00 1B 0F C0 08 99 22 20 20 2D 22 |:.110......" -"|
00000710: 3B 42 3B 22 2B 22 3B BA 28 44 29 00 31 0F CA 08 |;B;"+";.(D).1...|
00000720: 99 22 D8 3D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.".=------------|
00000730: 22 00 42 0F D4 08 99 22 20 20 20 20 20 22 3B 32 |".B...." ";2|
00000740: AC 41 00 56 0F DE 08 48 4F B2 30 3A 56 45 B2 31 |.A.V...HO.0:VE.1|
00000750: 31 3A 8D 31 31 30 00 69 0F E8 08 99 22 20 20 20 |1:.110.i...." |
00000760: 22 3B AB 42 AA BA 28 44 29 00 7B 0F F2 08 99 22 |";.B..(D).{...."|
00000770: D8 3D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 8A 0F FC 08 |.=--------".....|
00000780: 99 22 20 20 20 22 3B 32 AC 41 00 9E 0F 06 09 48 |." ";2.A.....H|
00000790: 4F B2 30 3A 56 45 B2 31 35 3A 8D 31 31 30 00 AA |O.0:VE.15:.110..|
000007A0: 0F 10 09 99 22 D8 3D 22 3B 58 00 BE 0F 1A 09 48 |....".=";X.....H|
000007B0: 4F B2 32 33 3A 56 45 B2 37 3A 8D 31 31 30 00 D4 |O.23:VE.7:.110..|
000007C0: 0F 24 09 99 22 20 20 2D 22 3B 42 3B 22 2D 22 3B |.$.." -";B;"-";|
000007D0: BA 28 44 29 00 F1 0F 2E 09 56 45 B2 38 3A 8D 31 |.(D).....VE.8:.1|
000007E0: 31 30 3A 99 22 D8 3D 2D 2D 2D 2D 2D 2D 2D 2D 2D |10:.".=---------|
000007F0: 22 00 0C 10 38 09 56 45 B2 39 3A 8D 31 31 30 3A |"...8.VE.9:.110:|
00000800: 99 22 20 20 20 20 20 22 3B 32 AC 41 00 1B 10 42 |." ";2.A...B|
00000810: 09 56 45 B2 31 31 3A 8D 31 31 30 00 2E 10 4C 09 |.VE.11:.110...L.|
00000820: 99 22 20 20 20 22 3B AB 42 AB BA 28 44 29 00 3D |." ";.B..(D).=|
00000830: 10 56 09 56 45 B2 31 32 3A 8D 31 31 30 00 4F 10 |.V.VE.12:.110.O.|
00000840: 60 09 99 22 D8 3D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |`..".=--------".|
00000850: 5E 10 6A 09 56 45 B2 31 33 3A 8D 31 31 30 00 6D |^.j.VE.13:.110.m|
00000860: 10 74 09 99 22 20 20 20 22 3B 32 AC 41 00 7C 10 |.t.." ";2.A.|.|
00000870: 7E 09 56 45 B2 31 35 3A 8D 31 31 30 00 88 10 88 |~.VE.15:.110....|
00000880: 09 99 22 D8 3D 22 3B 59 00 9D 10 CE 09 48 4F B2 |..".=";Y.....HO.|
00000890: 31 36 3A 56 45 B2 32 30 3A 8D 31 31 30 00 A7 10 |16:VE.20:.110...|
000008A0: D8 09 99 22 45 4E 22 00 BB 10 E2 09 48 4F B2 30 |..."EN".....HO.0|
000008B0: 3A 56 45 B2 31 37 3A 8D 31 31 30 00 E8 10 EC 09 |:VE.17:.110.....|
000008C0: 99 22 C4 45 20 53 4E 49 4A 50 55 4E 54 45 4E 20 |.".E SNIJPUNTEN |
000008D0: 56 41 4E 20 44 45 5A 45 20 46 55 4E 43 54 49 45 |VAN DEZE FUNCTIE|
000008E0: 20 4D 45 54 20 44 45 22 00 FE 10 F6 09 99 22 D8 | MET DE"......".|
000008F0: 2D 41 53 20 5A 49 4A 4E 20 44 55 53 3A 22 00 12 |-AS ZIJN DUS:"..|
00000900: 11 00 0A 48 4F B2 30 3A 56 45 B2 32 30 3A 8D 31 |...HO.0:VE.20:.1|
00000910: 31 30 00 25 11 0A 0A 99 22 28 22 3B 58 3B 22 2C |10.%...."(";X;",|
00000920: 20 30 20 29 22 00 34 11 14 0A 48 4F B2 32 33 3A | 0 )".4...HO.23:|
00000930: 8D 31 31 30 00 47 11 1E 0A 99 22 28 22 3B 59 3B |.110.G...."(";Y;|
00000940: 22 2C 20 30 20 29 22 00 5E 11 28 0A 8D 39 31 32 |", 0 )".^.(..912|
00000950: 30 3A 8F 20 3C 3C 52 45 54 55 52 4E 3E 3E 00 67 |0:. <<RETURN>>.g|
00000960: 11 32 0A 8D 31 30 30 00 7B 11 3C 0A 48 4F B2 31 |.2..100.{.<.HO.1|
00000970: 32 3A 56 45 B2 30 3A 8D 31 31 30 00 8C 11 46 0A |2:VE.0:.110...F.|
00000980: 99 22 3E 3E 20 54 4F 50 20 3C 3C 22 00 A0 11 50 |.">> TOP <<"...P|
00000990: 0A 48 4F B2 30 3A 56 45 B2 31 32 3A 8D 31 31 30 |.HO.0:VE.12:.110|
000009A0: 00 CE 11 5A 0A 99 22 D7 49 4C 54 20 55 20 44 45 |...Z..".ILT U DE|
000009B0: 20 54 4F 50 20 56 41 4E 20 44 45 5A 45 20 46 55 | TOP VAN DEZE FU|
000009C0: 4E 43 54 49 45 20 57 45 54 45 4E 20 3F 22 00 D7 |NCTIE WETEN ?"..|
000009D0: 11 64 0A 8D 32 31 30 00 F7 11 6E 0A 8B 28 49 4E |.d..210...n..(IN|
000009E0: 24 B2 22 4A 22 29 20 B0 28 49 4E 24 B2 22 CA 22 |$."J") .(IN$."."|
000009F0: 29 20 A7 32 37 30 30 00 14 12 73 0A 8B 28 49 4E |) .2700...s..(IN|
00000A00: 24 B2 22 4E 22 29 20 B0 28 49 4E 24 B2 22 CE 22 |$."N") .(IN$."."|
00000A10: 29 20 A7 8E 00 1E 12 82 0A 89 32 36 36 30 00 2E |) ........2660..|
00000A20: 12 8C 0A 54 B2 58 AA 59 3A 55 B2 54 AD 32 00 38 |...T.X.Y:U.T.2.8|
00000A30: 12 91 0A 8D 39 30 36 30 00 4B 12 96 0A 48 4F B2 |....9060.K...HO.|
00000A40: 30 3A 56 45 B2 35 3A 8D 31 31 30 00 5E 12 A0 0A |0:VE.5:.110.^...|
00000A50: 99 58 3B 22 2B 22 3B 59 3B 22 3D 22 3B 54 00 6F |.X;"+";Y;"=";T.o|
00000A60: 12 AA 0A 99 54 3B 22 2F 20 32 20 3D 22 3B 55 00 |....T;"/ 2 =";U.|
00000A70: 99 12 B4 0A 99 3A 99 22 CE 55 20 47 41 41 4E 20 |.....:.".U GAAN |
00000A80: 57 45 20 46 20 28 22 3B 55 3B 22 29 20 55 49 54 |WE F (";U;") UIT|
00000A90: 52 45 4B 45 4E 45 4E 2E 22 00 AD 12 BE 0A 8D 39 |REKENEN."......9|
00000AA0: 31 32 30 3A 8F 20 20 52 45 54 55 52 4E 00 C8 12 |120:. RETURN...|
00000AB0: C8 0A 8D 39 30 36 30 3A 8F 20 20 3E 3E 55 49 54 |...9060:. >>UIT|
00000AC0: 57 45 52 4B 49 4E 3C 3C 00 E4 12 D2 0A 56 B2 41 |WERKIN<<.....V.A|
00000AD0: AC 28 55 AE 32 29 3A 57 B2 42 AC 55 3A 4D B2 56 |.(U.2):W.B.U:M.V|
00000AE0: AA 57 AA 43 00 F7 12 DC 0A 48 4F B2 35 3A 56 45 |.W.C.....HO.5:VE|
00000AF0: B2 35 3A 8D 31 31 30 00 10 13 E6 0A 99 41 3B 22 |.5:.110......A;"|
00000B00: D8 5E 32 20 2B 22 3B 42 3B 22 D8 20 2B 22 3B 43 |.^2 +";B;". +";C|
00000B10: 00 3B 13 F0 0A 99 3A 99 22 3D 3D 3E 20 20 22 3B |.;....:."==> ";|
00000B20: 41 3B 22 2A 22 3B 55 AE 32 3B 22 2B 22 3B 42 3B |A;"*";U.2;"+";B;|
00000B30: 22 2A 22 3B 55 3B 22 2B 22 3B 43 00 5E 13 FA 0A |"*";U;"+";C.^...|
00000B40: 99 3A 99 22 3D 3D 3E 20 20 22 3B 56 3B 22 2B 22 |.:."==> ";V;"+"|
00000B50: 3B 57 3B 22 2B 22 3B 43 3B 22 3D 22 3B 4D 00 72 |;W;"+";C;"=";M.r|
00000B60: 13 04 0B 48 4F B2 30 3A 56 45 B2 31 35 3A 8D 31 |...HO.0:VE.15:.1|
00000B70: 31 30 00 88 13 0E 0B 99 22 C4 45 20 54 4F 50 20 |10......".E TOP |
00000B80: 49 53 20 44 55 53 3A 22 00 A1 13 18 0B 99 3A 99 |IS DUS:"......:.|
00000B90: 22 D4 3D 28 22 3B 55 3B 22 2C 22 3B 4D 3B 22 29 |".=(";U;",";M;")|
00000BA0: 22 00 B6 13 22 0B 48 4F B2 32 30 3A 56 45 B2 31 |"...".HO.20:VE.1|
00000BB0: 35 3A 8D 31 31 30 00 D0 13 2C 0B 99 22 C4 45 20 |5:.110...,..".E |
00000BC0: 45 58 54 52 45 45 4D 20 49 53 20 44 55 53 3A 22 |EXTREEM IS DUS:"|
00000BD0: 00 E5 13 36 0B 48 4F B2 32 30 3A 56 45 B2 31 37 |...6.HO.20:VE.17|
00000BE0: 3A 8D 31 31 30 00 FA 13 40 0B 99 22 46 20 28 22 |:.110...@.."F ("|
00000BF0: 3B 55 3B 22 29 20 3D 22 3B 4D 00 12 14 4A 0B 8D |;U;") =";M...J..|
00000C00: 39 31 32 30 3A 8F 20 20 3C 3C 52 45 54 55 52 4E |9120:. <<RETURN|
00000C10: 3E 3E 00 25 14 54 0B 8E 3A 8F 20 20 4B 45 55 5A |>>.%.T..:. KEUZ|
00000C20: 45 4D 45 4E 55 00 3D 14 5E 0B 8D 39 30 36 30 3A |EMENU.=.^..9060:|
00000C30: 8F 20 20 55 49 54 57 45 52 4B 49 4E 47 00 51 14 |. UITWERKING.Q.|
00000C40: 63 0B 48 4F B2 30 3A 56 45 B2 31 30 3A 8D 31 31 |c.HO.0:VE.10:.11|
00000C50: 30 00 7F 14 68 0B 99 22 C4 45 5A 45 20 46 55 4E |0...h..".EZE FUN|
00000C60: 43 54 49 45 20 48 45 45 46 54 20 47 45 45 4E 20 |CTIE HEEFT GEEN |
00000C70: 4F 52 49 47 49 4E 45 4C 45 4E 20 56 41 4E 22 00 |ORIGINELEN VAN".|
00000C80: 8B 14 6D 0B 99 22 4E 55 4C 2E 22 00 97 14 72 0B |..m.."NUL."...r.|
00000C90: 8D 39 31 32 30 3A 8E 00 9E 14 B8 0B 8F 20 00 C3 |.9120:....... ..|
00000CA0: 14 C2 0B 8F 20 20 4D 4F 44 55 4C 45 20 53 54 45 |.... MODULE STE|
00000CB0: 4C 4C 49 4E 47 20 56 2E 20 50 59 54 48 41 47 4F |LLING V. PYTHAGO|
00000CC0: 52 41 53 00 CA 14 CC 0B 8F 20 00 D3 14 D6 0B 8D |RAS...... ......|
00000CD0: 31 30 30 00 E6 14 E0 0B 48 4F B2 35 3A 56 45 B2 |100.....HO.5:VE.|
00000CE0: 30 3A 8D 31 31 30 00 0A 15 EA 0B 99 22 3C 3C 20 |0:.110......"<< |
00000CF0: D3 54 45 4C 4C 49 4E 47 20 56 2E 20 D0 59 54 48 |.TELLING V. .YTH|
00000D00: 41 47 4F 52 41 53 20 3E 3E 22 00 20 15 F4 0B 8D |AGORAS >>". ....|
00000D10: 39 39 30 30 3A 8F 20 20 44 52 49 45 48 4F 45 4B |9900:. DRIEHOEK|
00000D20: 00 34 15 FE 0B 48 4F B2 31 35 3A 56 45 B2 35 3A |.4...HO.15:VE.5:|
00000D30: 8D 31 31 30 00 50 15 08 0C 99 22 CD 45 54 20 44 |.110.P....".ET D|
00000D40: 49 54 20 44 45 45 4C 20 56 41 4E 20 48 45 54 22 |IT DEEL VAN HET"|
00000D50: 00 75 15 12 0C 56 45 B2 36 3A 8D 31 31 30 3A 99 |.u...VE.6:.110:.|
00000D60: 22 50 52 4F 47 52 41 4D 4D 41 20 4B 55 4E 54 20 |"PROGRAMMA KUNT |
00000D70: 55 20 44 45 22 00 9E 15 1C 0C 56 45 B2 37 3A 8D |U DE".....VE.7:.|
00000D80: 31 31 30 3A 99 22 53 54 45 4C 4C 49 4E 47 20 56 |110:."STELLING V|
00000D90: 41 4E 20 50 59 54 48 41 47 4F 52 41 53 22 00 C5 |AN PYTHAGORAS"..|
00000DA0: 15 26 0C 56 45 B2 38 3A 8D 31 31 30 3A 99 22 54 |.&.VE.8:.110:."T|
00000DB0: 4F 45 50 41 53 53 45 4E 2E 20 C4 45 20 53 43 48 |OEPASSEN. .E SCH|
00000DC0: 55 49 4E 45 22 00 EB 15 30 0C 56 45 B2 39 3A 8D |UINE"...0.VE.9:.|
00000DD0: 31 31 30 3A 99 22 5A 49 4A 44 45 20 4D 4F 45 54 |110:."ZIJDE MOET|
00000DE0: 20 41 4C 54 49 4A 44 20 44 45 22 00 13 16 3A 0C | ALTIJD DE"...:.|
00000DF0: 56 45 B2 31 30 3A 8D 31 31 30 3A 99 22 56 41 52 |VE.10:.110:."VAR|
00000E00: 49 41 42 45 4C 45 20 2D C3 2D 20 48 45 42 42 45 |IABELE -.- HEBBE|
00000E10: 4E 2E 22 00 31 16 44 0C 48 4F B2 31 30 3A 56 45 |N.".1.D.HO.10:VE|
00000E20: B2 36 3A 43 48 24 B2 22 C3 22 3A 8D 31 30 30 35 |.6:CH$.".":.1005|
00000E30: 30 00 54 16 4E 0C 8F 20 20 5E 5E 20 57 41 54 20 |0.T.N.. ^^ WAT |
00000E40: 45 4E 20 57 41 41 52 20 4B 4E 49 50 50 45 52 45 |EN WAAR KNIPPERE|
00000E50: 4E 20 5E 5E 00 84 16 58 0C 48 4F B2 31 35 3A 56 |N ^^...X.HO.15:V|
00000E60: 45 B2 31 32 3A 8D 31 31 30 3A 99 22 C4 45 20 41 |E.12:.110:.".E A|
00000E70: 4E 44 45 52 45 20 5A 49 4A 44 45 4E 20 48 45 42 |NDERE ZIJDEN HEB|
00000E80: 42 45 4E 22 00 B0 16 62 0C 56 45 B2 31 33 3A 8D |BEN"...b.VE.13:.|
00000E90: 31 31 30 3A 99 22 44 45 20 56 41 52 49 41 42 45 |110:."DE VARIABE|
00000EA0: 4C 45 4E 20 2D C1 2D 20 45 4E 20 2D C2 2D 2E 22 |LEN -.- EN -.-."|
00000EB0: 00 CD 16 6C 0C 48 4F B2 31 3A 56 45 B2 37 3A 43 |...l.HO.1:VE.7:C|
00000EC0: 48 24 B2 22 C1 22 3A 8D 31 30 30 35 30 00 EB 16 |H$.".":.10050...|
00000ED0: 76 0C 48 4F B2 37 3A 56 45 B2 31 33 3A 43 48 24 |v.HO.7:VE.13:CH$|
00000EE0: B2 22 C2 22 3A 8D 31 30 30 35 30 00 FF 16 80 0C |.".":.10050.....|
00000EF0: 48 4F B2 30 3A 56 45 B2 31 38 3A 8D 31 31 30 00 |HO.0:VE.18:.110.|
00000F00: 2F 17 8A 0C 99 22 C9 53 20 44 45 20 53 43 48 55 |/....".S DE SCHU|
00000F10: 49 4E 45 20 5A 49 4A 44 45 20 42 45 4B 45 4E 44 |INE ZIJDE BEKEND|
00000F20: 20 3F 20 28 4A 2F 4E 29 22 3B 3A 8D 32 31 30 00 | ? (J/N)";:.210.|
00000F30: 4F 17 94 0C 8B 28 49 4E 24 B2 22 4E 22 29 20 B0 |O....(IN$."N") .|
00000F40: 28 49 4E 24 B2 22 CE 22 29 20 A7 33 32 35 30 00 |(IN$.".") .3250.|
00000F50: 6F 17 9E 0C 8B 28 49 4E 24 B2 22 4A 22 29 20 B0 |o....(IN$."J") .|
00000F60: 28 49 4E 24 B2 22 CA 22 29 20 A7 33 35 33 30 00 |(IN$.".") .3530.|
00000F70: 92 17 A8 0C 89 33 32 30 30 3A 8F 20 20 47 45 45 |.....3200:. GEE|
00000F80: 4E 20 4A 20 4F 46 20 4E 20 49 4E 47 45 44 52 55 |N J OF N INGEDRU|
00000F90: 4B 54 00 A7 17 AD 0C 8F 20 20 43 20 4E 49 45 54 |KT...... C NIET|
00000FA0: 20 42 45 4B 45 4E 44 00 B0 17 B2 0C 8D 31 30 30 | BEKEND......100|
00000FB0: 00 C3 17 BC 0C 48 4F B2 35 3A 56 45 B2 30 3A 8D |.....HO.5:VE.0:.|
00000FC0: 31 31 30 00 E7 17 C6 0C 99 22 3C 3C 20 D3 54 45 |110......"<< .TE|
00000FD0: 4C 4C 49 4E 47 20 56 2E 20 D0 59 54 48 41 47 4F |LLING V. .YTHAGO|
00000FE0: 52 41 53 20 3E 3E 22 00 11 18 D0 0C 48 4F B2 30 |RAS >>".....HO.0|
00000FF0: 3A 56 45 B2 35 3A 8D 31 31 30 3A 99 22 56 4F 45 |:VE.5:.110:."VOE|
00001000: 52 20 44 45 20 2D C1 2D 20 49 4E 20 22 3B 3A 85 |R DE -.- IN ";:.|
00001010: 41 00 2E 18 DA 0C 99 3A 99 22 56 4F 45 52 20 44 |A......:."VOER D|
00001020: 45 20 2D C2 2D 20 49 4E 20 22 3B 3A 85 42 00 43 |E -.- IN ";:.B.C|
00001030: 18 E4 0C 8D 39 30 30 30 3A 8F 20 20 47 4F 45 44 |....9000:. GOED|
00001040: 20 5A 4F 00 63 18 EE 0C 8B 28 49 4E 24 B2 22 4E | ZO.c....(IN$."N|
00001050: 22 29 20 B0 28 49 4E 24 B2 22 CE 22 29 20 A7 33 |") .(IN$.".") .3|
00001060: 32 35 30 00 83 18 F8 0C 8B 28 49 4E 24 B2 22 4A |250......(IN$."J|
00001070: 22 29 20 B0 28 49 4E 24 B2 22 CA 22 29 20 A7 33 |") .(IN$.".") .3|
00001080: 33 34 30 00 9C 18 02 0D 89 33 33 30 30 3A 8F 20 |340......3300:. |
00001090: 20 47 45 45 4E 20 4A 20 4F 46 20 4E 00 BC 18 0C | GEEN J OF N....|
000010A0: 0D 8B 28 41 B3 30 29 20 B0 28 42 B3 30 29 20 A7 |..(A.0) .(B.0) .|
000010B0: 8D 31 30 31 33 35 3A 89 33 32 35 30 00 C6 18 16 |.10135:.3250....|
000010C0: 0D 8D 39 30 36 30 00 D7 18 20 0D 4C B2 BA 28 41 |..9060... .L..(A|
000010D0: AE 32 AA 42 AE 32 29 00 ED 18 2A 0D 8D 39 39 30 |.2.B.2)...*..990|
000010E0: 30 3A 8F 20 20 44 52 49 45 48 4F 45 4B 00 05 19 |0:. DRIEHOEK...|
000010F0: 2F 0D 8F 20 20 41 42 43 20 42 49 4A 20 44 52 49 |/.. ABC BIJ DRI|
00001100: 45 48 4F 45 4B 00 23 19 34 0D 48 4F B2 31 30 3A |EHOEK.#.4.HO.10:|
00001110: 56 45 B2 36 3A 43 48 24 B2 22 C3 22 3A 8D 31 30 |VE.6:CH$.".":.10|
00001120: 30 35 30 00 40 19 3E 0D 48 4F B2 31 3A 56 45 B2 |050.@.>.HO.1:VE.|
00001130: 37 3A 43 48 24 B2 22 C1 22 3A 8D 31 30 30 35 30 |7:CH$.".":.10050|
00001140: 00 5E 19 48 0D 48 4F B2 37 3A 56 45 B2 31 33 3A |.^.H.HO.7:VE.13:|
00001150: 43 48 24 B2 22 C2 22 3A 8D 31 30 30 35 30 00 72 |CH$.".":.10050.r|
00001160: 19 52 0D 48 4F B2 35 3A 56 45 B2 31 36 3A 8D 31 |.R.HO.5:VE.16:.1|
00001170: 31 30 00 8B 19 5C 0D 99 22 C3 5E 32 20 3D 22 3B |10...\..".^2 =";|
00001180: 41 AE 32 3B 22 2B 22 3B 42 AE 32 00 9A 19 66 0D |A.2;"+";B.2...f.|
00001190: 56 45 B2 31 37 3A 8D 31 31 30 00 AF 19 70 0D 99 |VE.17:.110...p..|
000011A0: 22 C3 5E 32 20 3D 22 3B 41 AE 32 AA 42 AE 32 00 |".^2 =";A.2.B.2.|
000011B0: BE 19 7A 0D 56 45 B2 31 38 3A 8D 31 31 30 00 CD |..z.VE.18:.110..|
000011C0: 19 84 0D 99 22 C3 20 20 20 3D 22 3B 4C 00 E1 19 |....". =";L...|
000011D0: 8E 0D 48 4F B2 31 37 3A 56 45 B2 37 3A 8D 31 31 |..HO.17:VE.7:.11|
000011E0: 30 00 EE 19 98 0D 99 22 C1 20 3D 22 3B 41 00 05 |0......". =";A..|
000011F0: 1A A2 0D 56 45 B2 38 3A 8D 31 31 30 3A 99 22 C2 |...VE.8:.110:.".|
00001200: 20 3D 22 3B 42 00 1C 1A AC 0D 56 45 B2 39 3A 8D | =";B.....VE.9:.|
00001210: 31 31 30 3A 99 22 C3 20 3D 22 3B 4C 00 32 1A B6 |110:.". =";L.2..|
00001220: 0D 8D 39 31 32 30 3A 8F 20 20 3C 52 45 54 55 52 |..9120:. <RETUR|
00001230: 4E 3E 00 38 1A C0 0D 8E 00 4C 1A CA 0D 8F 20 20 |N>.8.....L.... |
00001240: 43 20 57 45 4C 20 42 45 4B 45 4E 44 00 55 1A D4 |C WEL BEKEND.U..|
00001250: 0D 8D 31 30 30 00 68 1A DE 0D 48 4F B2 35 3A 56 |..100.h...HO.5:V|
00001260: 45 B2 30 3A 8D 31 31 30 00 8C 1A E8 0D 99 22 3C |E.0:.110......"<|
00001270: 3C 20 D3 54 45 4C 4C 49 4E 47 20 56 2E 20 D0 59 |< .TELLING V. .Y|
00001280: 54 48 41 47 4F 52 41 53 20 3E 3E 22 00 9F 1A F2 |THAGORAS >>"....|
00001290: 0D 48 4F B2 30 3A 56 45 B2 35 3A 8D 31 31 30 00 |.HO.0:VE.5:.110.|
000012A0: BB 1A FC 0D 99 22 D6 4F 45 52 20 44 45 20 2D C3 |.....".OER DE -.|
000012B0: 2D 20 49 4E 20 3A 22 3B 3A 85 43 00 EA 1A 06 0E |- IN :";:.C.....|
000012C0: 99 3A 99 22 D6 4F 45 52 20 44 45 20 41 4E 44 45 |.:.".OER DE ANDE|
000012D0: 52 45 20 42 45 4B 45 4E 44 45 20 5A 49 4A 44 45 |RE BEKENDE ZIJDE|
000012E0: 20 49 4E 20 3A 22 3B 3A 85 41 00 F4 1A 10 0E 8D | IN :";:.A......|
000012F0: 39 30 30 30 00 14 1B 1A 0E 8B 28 49 4E 24 B2 22 |9000......(IN$."|
00001300: 4E 22 29 20 B0 28 49 4E 24 B2 22 CE 22 29 20 A7 |N") .(IN$.".") .|
00001310: 33 35 34 30 00 34 1B 24 0E 8B 28 49 4E 24 B2 22 |3540.4.$..(IN$."|
00001320: 4A 22 29 20 B0 28 49 4E 24 B2 22 CA 22 29 20 A7 |J") .(IN$.".") .|
00001330: 33 36 34 30 00 50 1B 2E 0E 89 33 36 30 30 3A 8F |3640.P....3600:.|
00001340: 20 20 47 45 45 4E 20 4A 20 4F 46 20 4E 45 45 20 | GEEN J OF NEE |
00001350: 00 70 1B 38 0E 8B 28 43 B3 30 29 20 B0 28 41 B3 |.p.8..(C.0) .(A.|
00001360: 30 29 20 A7 8D 31 30 31 33 35 3A 89 33 35 34 30 |0) ..10135:.3540|
00001370: 00 89 1B 42 0E 8B 28 43 B3 41 29 20 A7 8D 31 30 |...B..(C.A) ..10|
00001380: 31 35 30 3A 89 33 35 34 30 00 A0 1B 4C 0E 8D 39 |150:.3540...L..9|
00001390: 30 36 30 3A 4C B2 BA 28 43 AE 32 AB 41 AE 32 29 |060:L..(C.2.A.2)|
000013A0: 00 AA 1B 56 0E 8D 39 39 30 30 00 C8 1B 60 0E 48 |...V..9900...`.H|
000013B0: 4F B2 31 30 3A 56 45 B2 36 3A 43 48 24 B2 22 C3 |O.10:VE.6:CH$.".|
000013C0: 22 3A 8D 31 30 30 35 30 00 E5 1B 6A 0E 48 4F B2 |":.10050...j.HO.|
000013D0: 31 3A 56 45 B2 37 3A 43 48 24 B2 22 C1 22 3A 8D |1:VE.7:CH$.".":.|
000013E0: 31 30 30 35 30 00 03 1C 74 0E 48 4F B2 37 3A 56 |10050...t.HO.7:V|
000013F0: 45 B2 31 33 3A 43 48 24 B2 22 C2 22 3A 8D 31 30 |E.13:CH$.".":.10|
00001400: 30 35 30 00 17 1C 7E 0E 48 4F B2 33 3A 56 45 B2 |050...~.HO.3:VE.|
00001410: 31 36 3A 8D 31 31 30 00 32 1C 88 0E 99 43 3B 22 |16:.110.2....C;"|
00001420: 5E 32 20 3D 22 3B 41 3B 22 5E 32 20 2B 20 C2 5E |^2 =";A;"^2 + .^|
00001430: 32 22 00 5B 1C 92 0E 48 4F B2 35 3A 56 45 B2 31 |2".[...HO.5:VE.1|
00001440: 37 3A 8D 31 31 30 3A 99 43 AE 32 3B 22 3D 22 3B |7:.110:.C.2;"=";|
00001450: 41 AE 32 3B 22 2B 20 C2 5E 32 22 00 7F 1C 9C 0E |A.2;"+ .^2".....|
00001460: 56 45 B2 31 38 3A 8D 31 31 30 3A 99 22 C2 5E 32 |VE.18:.110:.".^2|
00001470: 20 3D 22 3B 43 AE 32 3B 22 2D 22 3B 41 AE 32 00 | =";C.2;"-";A.2.|
00001480: 9F 1C A6 0E 56 45 B2 31 39 3A 8D 31 31 30 3A 99 |....VE.19:.110:.|
00001490: 22 C2 5E 32 20 3D 22 3B 43 AE 32 AB 41 AE 32 00 |".^2 =";C.2.A.2.|
000014A0: B9 1C B0 0E 56 45 B2 32 30 3A 8D 31 31 30 3A 99 |....VE.20:.110:.|
000014B0: 22 C2 20 20 20 3D 22 3B 4C 00 D6 1C BA 0E 48 4F |". =";L.....HO|
000014C0: B2 31 37 3A 56 45 B2 37 3A 8D 31 31 30 3A 99 22 |.17:VE.7:.110:."|
000014D0: C1 20 3D 22 3B 41 00 ED 1C C4 0E 56 45 B2 38 3A |. =";A.....VE.8:|
000014E0: 8D 31 31 30 3A 99 22 C2 20 3D 22 3B 4C 00 04 1D |.110:.". =";L...|
000014F0: CE 0E 56 45 B2 39 3A 8D 31 31 30 3A 99 22 C3 20 |..VE.9:.110:.". |
00001500: 3D 22 3B 43 00 1A 1D D8 0E 8D 39 31 32 30 3A 8F |=";C......9120:.|
00001510: 20 20 3C 52 45 54 55 52 4E 3E 00 20 1D E2 0E 8E | <RETURN>. ....|
00001520: 00 27 1D 88 13 8F 20 00 42 1D 92 13 8F 20 20 4D |.'.... .B.... M|
00001530: 4F 44 55 4C 45 20 43 4F 53 49 4E 55 53 52 45 47 |ODULE COSINUSREG|
00001540: 45 4C 00 49 1D 9C 13 8F 20 00 52 1D A6 13 8D 31 |EL.I.... .R....1|
00001550: 30 30 00 7B 1D B0 13 48 4F B2 35 3A 56 45 B2 30 |00.{...HO.5:VE.0|
00001560: 3A 8D 31 31 30 3A 99 22 3C 3C 20 43 4F 53 49 4E |:.110:."<< COSIN|
00001570: 55 53 52 45 47 45 4C 20 3E 3E 22 00 9E 1D BA 13 |USREGEL >>".....|
00001580: 48 4F B2 35 3A 56 45 B2 36 3A 8D 31 31 30 3A 99 |HO.5:VE.6:.110:.|
00001590: 22 4B 49 45 53 20 56 45 52 53 49 45 3A 22 00 B2 |"KIES VERSIE:"..|
000015A0: 1D C4 13 48 4F B2 32 3A 56 45 B2 31 30 3A 8D 31 |...HO.2:VE.10:.1|
000015B0: 31 30 00 D8 1D CE 13 99 22 31 2E 20 41 5E 32 20 |10......"1. A^2 |
000015C0: 3D 20 42 5E 32 20 2B 20 43 5E 32 20 2D 20 32 42 |= B^2 + C^2 - 2B|
000015D0: 43 20 43 4F 53 20 C1 22 00 E7 1D D8 13 56 45 B2 |C COS .".....VE.|
000015E0: 31 33 3A 8D 31 31 30 00 0D 1E E2 13 99 22 32 2E |13:.110......"2.|
000015F0: 20 42 5E 32 20 3D 20 41 5E 32 20 2B 20 43 5E 32 | B^2 = A^2 + C^2|
00001600: 20 2D 20 32 41 43 20 43 4F 53 20 C2 22 00 1C 1E | - 2AC COS ."...|
00001610: EC 13 56 45 B2 31 36 3A 8D 31 31 30 00 42 1E F6 |..VE.16:.110.B..|
00001620: 13 99 22 33 2E 20 43 5E 32 20 3D 20 41 5E 32 20 |.."3. C^2 = A^2 |
00001630: 2B 20 42 5E 32 20 2D 20 32 41 42 20 43 4F 53 20 |+ B^2 - 2AB COS |
00001640: C3 22 00 56 1E 00 14 48 4F B2 35 3A 56 45 B2 32 |.".V...HO.5:VE.2|
00001650: 32 3A 8D 31 31 30 00 6C 1E 0A 14 99 22 D5 57 20 |2:.110.l....".W |
00001660: 4B 45 55 5A 45 22 3B 3A 8D 32 31 30 00 94 1E 14 |KEUZE";:.210....|
00001670: 14 8B 28 C6 28 49 4E 24 29 AB 34 38 B3 31 29 20 |..(.(IN$).48.1) |
00001680: B0 28 C6 28 49 4E 24 29 AB 34 38 B1 33 29 20 A7 |.(.(IN$).48.3) .|
00001690: 35 31 33 30 00 B5 1E 1E 14 91 28 C6 28 49 4E 24 |5130......(.(IN$|
000016A0: 29 AB 34 38 29 20 8D 36 30 30 30 2C 37 30 30 30 |).48) .6000,7000|
000016B0: 2C 38 30 30 30 00 C8 1E 54 15 8E 3A 8F 20 20 48 |,8000...T..:. H|
000016C0: 4F 4F 46 44 4D 45 4E 55 00 DD 1E 6F 17 8F 20 20 |OOFDMENU...o.. |
000016D0: 43 2E 52 2E 20 4D 4F 44 55 4C 45 20 31 00 F4 1E |C.R. MODULE 1...|
000016E0: 70 17 8D 31 30 32 30 30 3A 8F 20 20 53 55 42 4D |p..10200:. SUBM|
000016F0: 45 4E 55 20 00 0D 1F 7A 17 8B 28 C6 28 49 4E 24 |ENU ...z..(.(IN$|
00001700: 29 AB 34 38 B2 32 29 20 A7 36 35 30 30 00 25 1F |).48.2) .6500.%.|
00001710: 84 17 8D 31 30 30 3A 48 4F B2 35 3A 56 45 B2 31 |...100:HO.5:VE.1|
00001720: 3A 8D 31 31 30 00 46 1F 8E 17 99 22 3C 3C 20 43 |:.110.F...."<< C|
00001730: 2E 52 2E 20 56 45 52 53 49 45 20 31 20 28 DA DA |.R. VERSIE 1 (..|
00001740: DA 29 20 3E 3E 22 00 59 1F 98 17 48 4F B2 30 3A |.) >>".Y...HO.0:|
00001750: 56 45 B2 35 3A 8D 31 31 30 00 73 1F A2 17 99 22 |VE.5:.110.s...."|
00001760: D6 4F 45 52 20 44 45 20 41 20 49 4E 20 3A 22 3B |.OER DE A IN :";|
00001770: 3A 85 41 00 8F 1F AC 17 99 3A 99 22 D6 4F 45 52 |:.A......:.".OER|
00001780: 20 44 45 20 42 20 49 4E 20 3A 22 3B 3A 85 42 00 | DE B IN :";:.B.|
00001790: AB 1F B6 17 99 3A 99 22 D6 4F 45 52 20 44 45 20 |.....:.".OER DE |
000017A0: 43 20 49 4E 20 3A 22 3B 3A 85 43 00 B5 1F C0 17 |C IN :";:.C.....|
000017B0: 8D 39 30 30 30 00 D5 1F CA 17 8B 28 49 4E 24 B2 |.9000......(IN$.|
000017C0: 22 4E 22 29 20 B0 28 49 4E 24 B2 22 CE 22 29 20 |"N") .(IN$.".") |
000017D0: A7 36 30 32 30 00 F5 1F D4 17 8B 28 49 4E 24 B2 |.6020......(IN$.|
000017E0: 22 4A 22 29 20 B0 28 49 4E 24 B2 22 CA 22 29 20 |"J") .(IN$.".") |
000017F0: A7 36 31 32 30 00 0E 20 DE 17 89 36 30 38 30 3A |.6120.. ...6080:|
00001800: 8F 20 20 47 45 45 4E 20 4A 20 4F 46 20 4E 00 3E |. GEEN J OF N.>|
00001810: 20 E8 17 8D 39 30 36 30 3A 51 49 B2 31 2E 35 37 | ...9060:QI.1.57|
00001820: 30 38 3A 5A B2 32 AC 42 AC 43 3A 59 B2 42 AE 32 |08:Z.2.B.C:Y.B.2|
00001830: AA 43 AE 32 AB 41 AE 32 3A 57 B2 59 AD 5A 00 5D |.C.2.A.2:W.Y.Z.]|
00001840: 20 F2 17 56 B2 AB 31 AC 28 C1 28 57 AD BA 28 AB | ..V..1.(.(W..(.|
00001850: 31 AC 57 AE 32 AA 31 29 29 29 AA 51 49 00 70 20 |1.W.2.1))).QI.p |
00001860: FC 17 48 4F B2 35 3A 56 45 B2 34 3A 8D 31 31 30 |..HO.5:VE.4:.110|
00001870: 00 93 20 06 18 99 22 41 5E 32 20 3D 20 42 5E 32 |.. ..."A^2 = B^2|
00001880: 20 2B 20 43 5E 32 20 2D 20 32 42 43 20 43 4F 53 | + C^2 - 2BC COS|
00001890: 20 C1 22 00 A6 20 10 18 48 4F B2 30 3A 56 45 B2 | .".. ..HO.0:VE.|
000018A0: 36 3A 8D 31 31 30 00 DA 20 1A 18 99 22 3D 3D 3E |6:.110.. ..."==>|
000018B0: 20 22 3B 41 AE 32 3B 22 20 3D 20 22 3B 42 AE 32 | ";A.2;" = ";B.2|
000018C0: 3B 22 20 2B 20 22 3B 43 AE 32 3B 22 20 2D 20 22 |;" + ";C.2;" - "|
000018D0: 3B 5A 3B 22 43 4F 53 20 C1 22 00 E8 20 24 18 56 |;Z;"COS .".. $.V|
000018E0: 45 B2 38 3A 8D 31 31 30 00 03 21 2E 18 99 22 3D |E.8:.110..!..."=|
000018F0: 3D 3E 20 22 3B 5A 3B 22 43 4F 53 20 C1 20 3D 20 |=> ";Z;"COS . = |
00001900: 22 3B 59 00 12 21 38 18 56 45 B2 31 30 3A 8D 31 |";Y..!8.VE.10:.1|
00001910: 31 30 00 29 21 42 18 99 22 3D 3D 3E 20 20 43 4F |10.)!B.."==> CO|
00001920: 53 20 C1 20 3D 20 22 3B 57 00 38 21 4C 18 56 45 |S . = ";W.8!L.VE|
00001930: B2 31 32 3A 8D 31 31 30 00 59 21 56 18 99 22 3D |.12:.110.Y!V.."=|
00001940: 3D 3E 20 22 3B 22 20 C1 20 3D 20 22 3B 56 AD 28 |=> ";" . = ";V.(|
00001950: 34 AC 51 49 AD 33 36 30 29 00 65 21 60 18 8D 39 |4.QI.360).e!`..9|
00001960: 31 32 30 3A 8E 00 70 21 64 19 8F 20 20 5A 48 5A |120:..p!d.. ZHZ|
00001970: 00 88 21 6E 19 8D 31 30 30 3A 48 4F B2 35 3A 56 |..!n..100:HO.5:V|
00001980: 45 B2 30 3A 8D 31 31 30 00 A9 21 78 19 99 22 3C |E.0:.110..!x.."<|
00001990: 3C 20 43 2E 52 2E 20 56 45 52 53 49 45 20 31 20 |< C.R. VERSIE 1 |
000019A0: 28 DA C8 DA 29 20 3E 3E 22 00 BC 21 82 19 48 4F |(...) >>"..!..HO|
000019B0: B2 30 3A 56 45 B2 35 3A 8D 31 31 30 00 D5 21 8C |.0:VE.5:.110..!.|
000019C0: 19 99 22 D6 4F 45 52 20 44 45 20 42 20 49 4E 3A |..".OER DE B IN:|
000019D0: 22 3B 3A 85 42 00 F0 21 96 19 99 3A 99 22 56 4F |";:.B..!...:."VO|
000019E0: 45 52 20 44 45 20 43 20 49 4E 3A 22 3B 3A 85 43 |ER DE C IN:";:.C|
000019F0: 00 16 22 A0 19 99 3A 99 22 56 4F 45 52 20 48 4F |.."...:."VOER HO|
00001A00: 45 4B 20 41 4C 50 48 41 20 28 C1 29 20 49 4E 3A |EK ALPHA (.) IN:|
00001A10: 22 3B 3A 85 41 4C 00 20 22 AA 19 8D 39 30 30 30 |";:.AL. "...9000|
00001A20: 00 40 22 B4 19 8B 28 49 4E 24 B2 22 4E 22 29 20 |.@"...(IN$."N") |
00001A30: B0 28 49 4E 24 B2 22 CE 22 29 20 A7 36 35 31 30 |.(IN$.".") .6510|
00001A40: 00 60 22 BE 19 8B 28 49 4E 24 B2 22 4A 22 29 20 |.`"...(IN$."J") |
00001A50: B0 28 49 4E 24 B2 22 CA 22 29 20 A7 36 36 31 30 |.(IN$.".") .6610|
00001A60: 00 79 22 C8 19 89 36 35 37 30 3A 8F 20 20 47 45 |.y"...6570:. GE|
00001A70: 45 4E 20 4A 20 4F 46 20 4E 00 8D 22 D2 19 8D 39 |EN J OF N.."...9|
00001A80: 30 36 30 3A 59 B2 42 AE 32 AA 43 AE 32 00 BA 22 |060:Y.B.2.C.2.."|
00001A90: DC 19 5A B2 32 AC 42 AC 43 3A 51 49 B2 36 2E 32 |..Z.2.B.C:QI.6.2|
00001AA0: 38 33 31 39 3A 55 49 B2 59 AB 28 5A AC BE 28 41 |8319:UI.Y.(Z..(A|
00001AB0: 4C AC 51 49 AD 33 36 30 29 29 00 CD 22 E6 19 48 |L.QI.360)).."..H|
00001AC0: 4F B2 35 3A 56 45 B2 35 3A 8D 31 31 30 00 F0 22 |O.5:VE.5:.110.."|
00001AD0: F0 19 99 22 41 5E 32 20 3D 20 42 5E 32 20 2B 20 |..."A^2 = B^2 + |
00001AE0: 43 5E 32 20 2D 20 32 42 43 20 43 4F 53 20 C1 22 |C^2 - 2BC COS ."|
00001AF0: 00 03 23 FA 19 48 4F B2 30 3A 56 45 B2 37 3A 8D |..#..HO.0:VE.7:.|
00001B00: 31 31 30 00 35 23 04 1A 99 22 3D 3D 3E 20 20 41 |110.5#..."==> A|
00001B10: 5E 32 20 3D 20 22 3B 42 AE 32 3B 22 20 2B 20 22 |^2 = ";B.2;" + "|
00001B20: 3B 43 AE 32 3B 22 20 2D 20 22 3B 5A 3B 22 43 4F |;C.2;" - ";Z;"CO|
00001B30: 53 22 3B 41 4C 00 43 23 0E 1A 56 45 B2 39 3A 8D |S";AL.C#..VE.9:.|
00001B40: 31 31 30 00 69 23 18 1A 99 22 3D 3D 3E 20 20 41 |110.i#..."==> A|
00001B50: 5E 32 20 3D 20 22 3B 59 3B 22 20 2D 20 22 3B 5A |^2 = ";Y;" - ";Z|
00001B60: 3B 22 43 4F 53 22 3B 41 4C 00 78 23 22 1A 56 45 |;"COS";AL.x#".VE|
00001B70: B2 31 31 3A 8D 31 31 30 00 A2 23 2C 1A 99 22 3D |.11:.110..#,.."=|
00001B80: 3D 3E 20 20 41 5E 32 20 3D 20 22 3B 59 3B 22 20 |=> A^2 = ";Y;" |
00001B90: 2D 20 22 3B 5A AC BE 28 41 4C AC 51 49 AD 33 36 |- ";Z..(AL.QI.36|
00001BA0: 30 29 00 B1 23 36 1A 56 45 B2 31 33 3A 8D 31 31 |0)..#6.VE.13:.11|
00001BB0: 30 00 C7 23 40 1A 99 22 3D 3D 3E 20 20 41 5E 32 |0..#@.."==> A^2|
00001BC0: 20 3D 20 22 3B 55 49 00 D6 23 4A 1A 56 45 B2 31 | = ";UI..#J.VE.1|
00001BD0: 35 3A 8D 31 31 30 00 EF 23 54 1A 99 22 3D 3D 3E |5:.110..#T.."==>|
00001BE0: 20 20 20 41 20 20 3D 20 22 3B BA 28 55 49 29 00 | A = ";.(UI).|
00001BF0: FB 23 5E 1A 8D 39 31 32 30 3A 8E 00 10 24 58 1B |.#^..9120:...$X.|
00001C00: 8F 20 20 43 2E 52 2E 20 4D 4F 44 55 4C 45 20 32 |. C.R. MODULE 2|
00001C10: 00 1B 24 62 1B 8D 31 30 32 30 30 00 34 24 6C 1B |..$b..10200.4$l.|
00001C20: 8B 28 C6 28 49 4E 24 29 AB 34 38 B2 32 29 20 A7 |.(.(IN$).48.2) .|
00001C30: 37 35 30 30 00 4C 24 76 1B 8D 31 30 30 3A 48 4F |7500.L$v..100:HO|
00001C40: B2 35 3A 56 45 B2 30 3A 8D 31 31 30 00 6D 24 80 |.5:VE.0:.110.m$.|
00001C50: 1B 99 22 3C 3C 20 43 2E 52 2E 20 56 45 52 53 49 |.."<< C.R. VERSI|
00001C60: 45 20 32 20 28 DA DA DA 29 20 3E 3E 22 00 80 24 |E 2 (...) >>"..$|
00001C70: 8A 1B 48 4F B2 30 3A 56 45 B2 35 3A 8D 31 31 30 |..HO.0:VE.5:.110|
00001C80: 00 99 24 94 1B 99 22 D6 4F 45 52 20 44 45 20 42 |..$...".OER DE B|
00001C90: 20 49 4E 3A 22 3B 3A 85 42 00 B4 24 9E 1B 99 3A | IN:";:.B..$...:|
00001CA0: 99 22 D6 4F 45 52 20 44 45 20 41 20 49 4E 3A 22 |.".OER DE A IN:"|
00001CB0: 3B 3A 85 41 00 CF 24 A8 1B 99 3A 99 22 D6 4F 45 |;:.A..$...:.".OE|
00001CC0: 52 20 44 45 20 43 20 49 4E 3A 22 3B 3A 85 43 00 |R DE C IN:";:.C.|
00001CD0: E6 24 B2 1B 8D 39 30 30 30 3A 8F 20 20 47 4F 45 |.$...9000:. GOE|
00001CE0: 44 20 5A 4F 20 3F 00 06 25 BC 1B 8B 28 49 4E 24 |D ZO ?..%...(IN$|
00001CF0: B2 22 4E 22 29 20 B0 28 49 4E 24 B2 22 CE 22 29 |."N") .(IN$.".")|
00001D00: 20 A7 37 30 33 30 00 26 25 C6 1B 8B 28 49 4E 24 | .7030.&%...(IN$|
00001D10: B2 22 4A 22 29 20 B0 28 49 4E 24 B2 22 CA 22 29 |."J") .(IN$.".")|
00001D20: 20 A7 37 31 33 30 00 3F 25 D0 1B 89 37 30 39 30 | .7130.?%...7090|
00001D30: 3A 8F 20 20 47 45 45 4E 20 4A 20 4F 46 20 4E 00 |:. GEEN J OF N.|
00001D40: 75 25 DA 1B 8D 39 30 36 30 3A 51 49 B2 31 2E 35 |u%...9060:QI.1.5|
00001D50: 37 30 37 39 36 3A 5A B2 32 AC 41 AC 43 3A 59 B2 |70796:Z.2.A.C:Y.|
00001D60: 41 AE 32 AA 43 AE 32 3A 58 B2 59 AB 42 AE 32 3A |A.2.C.2:X.Y.B.2:|
00001D70: 57 B2 58 AD 5A 00 94 25 E4 1B 56 B2 AB 31 AC 28 |W.X.Z..%..V..1.(|
00001D80: C1 28 57 AD BA 28 AB 31 AC 57 AE 32 AA 31 29 29 |.(W..(.1.W.2.1))|
00001D90: 29 AA 51 49 00 A7 25 EE 1B 48 4F B2 35 3A 56 45 |).QI..%..HO.5:VE|
00001DA0: B2 34 3A 8D 31 31 30 00 CA 25 F8 1B 99 22 42 5E |.4:.110..%..."B^|
00001DB0: 32 20 3D 20 41 5E 32 20 2B 20 43 5E 32 20 2D 20 |2 = A^2 + C^2 - |
00001DC0: 32 41 43 20 43 4F 53 20 C2 22 00 DD 25 02 1C 48 |2AC COS ."..%..H|
00001DD0: 4F B2 30 3A 56 45 B2 36 3A 8D 31 31 30 00 11 26 |O.0:VE.6:.110..&|
00001DE0: 0C 1C 99 22 3D 3D 3E 20 22 3B 42 AE 32 3B 22 20 |..."==> ";B.2;" |
00001DF0: 3D 20 22 3B 41 AE 32 3B 22 20 2B 20 22 3B 43 AE |= ";A.2;" + ";C.|
00001E00: 32 3B 22 20 2D 20 22 3B 5A 3B 22 43 4F 53 20 C2 |2;" - ";Z;"COS .|
00001E10: 22 00 1F 26 16 1C 56 45 B2 38 3A 8D 31 31 30 00 |"..&..VE.8:.110.|
00001E20: 48 26 20 1C 99 22 3D 3D 3E 20 22 3B 42 AE 32 3B |H& .."==> ";B.2;|
00001E30: 22 20 3D 20 22 3B 59 3B 22 20 2D 20 22 3B 5A 3B |" = ";Y;" - ";Z;|
00001E40: 22 20 43 4F 53 20 C2 22 00 57 26 2A 1C 56 45 B2 |" COS .".W&*.VE.|
00001E50: 31 30 3A 8D 31 31 30 00 72 26 34 1C 99 22 3D 3D |10:.110.r&4.."==|
00001E60: 3E 20 22 3B 5A 3B 22 43 4F 53 20 C2 20 3D 20 22 |> ";Z;"COS . = "|
00001E70: 3B 58 00 81 26 3E 1C 56 45 B2 31 32 3A 8D 31 31 |;X..&>.VE.12:.11|
00001E80: 30 00 98 26 48 1C 99 22 3D 3D 3E 20 20 43 4F 53 |0..&H.."==> COS|
00001E90: 20 C2 20 3D 20 22 3B 57 00 A7 26 52 1C 56 45 B2 | . = ";W..&R.VE.|
00001EA0: 31 34 3A 8D 31 31 30 00 C9 26 5C 1C 99 22 3D 3D |14:.110..&\.."==|
00001EB0: 3E 20 20 C2 20 20 20 20 20 3D 20 22 3B 56 AD 28 |> . = ";V.(|
00001EC0: 34 AC 51 49 AD 33 36 30 29 00 D5 26 66 1C 8D 39 |4.QI.360)..&f..9|
00001ED0: 31 32 30 3A 8E 00 E0 26 4C 1D 8F 20 20 5A 48 5A |120:...&L.. ZHZ|
00001EE0: 00 F8 26 56 1D 8D 31 30 30 3A 48 4F B2 35 3A 56 |..&V..100:HO.5:V|
00001EF0: 45 B2 30 3A 8D 31 31 30 00 19 27 60 1D 99 22 3C |E.0:.110..'`.."<|
00001F00: 3C 20 43 2E 52 2E 20 D6 45 52 53 49 45 20 32 20 |< C.R. .ERSIE 2 |
00001F10: 28 DA C8 DA 29 20 3E 3E 22 00 2C 27 6A 1D 48 4F |(...) >>".,'j.HO|
00001F20: B2 30 3A 56 45 B2 34 3A 8D 31 31 30 00 45 27 74 |.0:VE.4:.110.E't|
00001F30: 1D 99 22 D6 4F 45 52 20 44 45 20 41 20 49 4E 3A |..".OER DE A IN:|
00001F40: 22 3B 3A 85 41 00 60 27 7E 1D 99 3A 99 22 D6 4F |";:.A.`'~..:.".O|
00001F50: 45 52 20 44 45 20 43 20 49 4E 3A 22 3B 3A 85 43 |ER DE C IN:";:.C|
00001F60: 00 85 27 88 1D 99 3A 99 22 D6 4F 45 52 20 48 4F |..'...:.".OER HO|
00001F70: 45 4B 20 42 45 54 41 20 28 C2 29 20 49 4E 3A 22 |EK BETA (.) IN:"|
00001F80: 3B 3A 85 42 45 00 8F 27 92 1D 8D 39 30 30 30 00 |;:.BE..'...9000.|
00001F90: AF 27 9C 1D 8B 28 49 4E 24 B2 22 4E 22 29 20 B0 |.'...(IN$."N") .|
00001FA0: 28 49 4E 24 B2 22 CE 22 29 20 A7 37 35 31 30 00 |(IN$.".") .7510.|
00001FB0: CF 27 A6 1D 8B 28 49 4E 24 B2 22 4A 22 29 20 B0 |.'...(IN$."J") .|
00001FC0: 28 49 4E 24 B2 22 CA 22 29 20 A7 37 36 31 30 00 |(IN$.".") .7610.|
00001FD0: E8 27 B0 1D 89 37 35 37 30 3A 8F 20 20 47 45 45 |.'...7570:. GEE|
00001FE0: 4E 20 4A 20 4F 46 20 4E 00 0F 28 BA 1D 8D 39 30 |N J OF N..(...90|
00001FF0: 36 30 3A 5A B2 32 AC 41 AC 43 3A 59 B2 41 AE 32 |60:Z.2.A.C:Y.A.2|
00002000: AA 43 AE 32 3A 51 49 B2 36 2E 32 38 33 31 39 00 |.C.2:QI.6.28319.|
00002010: 27 28 C4 1D 55 49 B2 59 AB 5A AC BE 28 42 45 AC |'(..UI.Y.Z..(BE.|
00002020: 51 49 AD 33 36 30 29 00 3A 28 CE 1D 48 4F B2 35 |QI.360).:(..HO.5|
00002030: 3A 56 45 B2 34 3A 8D 31 31 30 00 5D 28 D8 1D 99 |:VE.4:.110.](...|
00002040: 22 42 5E 32 20 3D 20 41 5E 32 20 2B 20 43 5E 32 |"B^2 = A^2 + C^2|
00002050: 20 2D 20 32 41 43 20 43 4F 53 20 C2 22 00 6B 28 | - 2AC COS .".k(|
00002060: E2 1D 56 45 B2 36 3A 8D 31 31 30 00 9D 28 EC 1D |..VE.6:.110..(..|
00002070: 99 22 3D 3D 3E 20 20 42 5E 32 20 3D 20 22 3B 41 |."==> B^2 = ";A|
00002080: AE 32 3B 22 20 2B 20 22 3B 43 AE 32 3B 22 20 2D |.2;" + ";C.2;" -|
00002090: 20 22 3B 5A 3B 22 43 4F 53 22 3B 42 45 00 AB 28 | ";Z;"COS";BE..(|
000020A0: F6 1D 56 45 B2 38 3A 8D 31 31 30 00 D1 28 00 1E |..VE.8:.110..(..|
000020B0: 99 22 3D 3D 3E 20 20 42 5E 32 20 3D 20 22 3B 59 |."==> B^2 = ";Y|
000020C0: 3B 22 20 2D 20 22 3B 5A 3B 22 C3 CF D3 22 3B 42 |;" - ";Z;"...";B|
000020D0: 45 00 E0 28 0A 1E 56 45 B2 31 30 3A 8D 31 31 30 |E..(..VE.10:.110|
000020E0: 00 0A 29 14 1E 99 22 3D 3D 3E 20 20 42 5E 32 20 |..)..."==> B^2 |
000020F0: 3D 20 22 3B 59 3B 22 20 2D 20 22 3B 5A AC BE 28 |= ";Y;" - ";Z..(|
00002100: 42 45 AC 51 49 AD 33 36 30 29 00 19 29 1E 1E 56 |BE.QI.360)..)..V|
00002110: 45 B2 31 32 3A 8D 31 31 30 00 2F 29 28 1E 99 22 |E.12:.110./)(.."|
00002120: 3D 3D 3E 20 20 42 5E 32 20 3D 20 22 3B 55 49 00 |==> B^2 = ";UI.|
00002130: 3E 29 32 1E 56 45 B2 31 34 3A 8D 31 31 30 00 57 |>)2.VE.14:.110.W|
00002140: 29 3C 1E 99 22 3D 3D 3E 20 20 20 42 20 20 3D 20 |)<.."==> B = |
00002150: 22 3B BA 28 55 49 29 00 63 29 46 1E 8D 39 31 32 |";.(UI).c)F..912|
00002160: 30 3A 8E 00 78 29 40 1F 8F 20 20 43 2E 52 2E 20 |0:..x)@.. C.R. |
00002170: 56 45 52 53 49 45 20 33 00 8E 29 4A 1F 8D 31 30 |VERSIE 3..)J..10|
00002180: 32 30 30 3A 8F 20 20 53 55 42 4D 45 4E 55 00 A7 |200:. SUBMENU..|
00002190: 29 54 1F 8B 28 C6 28 49 4E 24 29 AB 34 38 B2 32 |)T..(.(IN$).48.2|
000021A0: 29 20 A7 38 35 30 30 00 BF 29 5E 1F 8D 31 30 30 |) .8500..)^..100|
000021B0: 3A 48 4F B2 35 3A 56 45 B2 30 3A 8D 31 31 30 00 |:HO.5:VE.0:.110.|
000021C0: E0 29 68 1F 99 22 3C 3C 20 43 2E 52 2E 20 56 45 |.)h.."<< C.R. VE|
000021D0: 52 53 49 45 20 33 20 28 DA DA DA 29 20 3E 3E 22 |RSIE 3 (...) >>"|
000021E0: 00 F3 29 72 1F 48 4F B2 30 3A 56 45 B2 34 3A 8D |..)r.HO.0:VE.4:.|
000021F0: 31 31 30 00 0C 2A 7C 1F 99 22 D6 4F 45 52 20 44 |110..*|..".OER D|
00002200: 45 20 43 20 49 4E 3A 22 3B 3A 85 43 00 27 2A 86 |E C IN:";:.C.'*.|
00002210: 1F 99 3A 99 22 D6 4F 45 52 20 44 45 20 41 20 49 |..:.".OER DE A I|
00002220: 4E 3A 22 3B 3A 85 41 00 42 2A 90 1F 99 3A 99 22 |N:";:.A.B*...:."|
00002230: D6 4F 45 52 20 44 45 20 42 20 49 4E 3A 22 3B 3A |.OER DE B IN:";:|
00002240: 85 42 00 58 2A 9A 1F 8D 39 30 30 30 3A 8F 20 20 |.B.X*...9000:. |
00002250: 47 4F 45 44 20 5A 4F 3F 00 78 2A A4 1F 8B 28 49 |GOED ZO?.x*...(I|
00002260: 4E 24 B2 22 4E 22 29 20 B0 28 49 4E 24 B2 22 CE |N$."N") .(IN$.".|
00002270: 22 29 20 A7 38 30 33 30 00 98 2A AE 1F 8B 28 49 |") .8030..*...(I|
00002280: 4E 24 B2 22 4A 22 29 20 B0 28 49 4E 24 B2 22 CA |N$."J") .(IN$.".|
00002290: 22 29 20 A7 38 31 33 30 00 B0 2A B8 1F 89 38 30 |") .8130..*...80|
000022A0: 39 30 3A 8F 20 20 47 45 45 4E 20 4A 20 4F 46 4E |90:. GEEN J OFN|
000022B0: 00 E0 2A C2 1F 8D 39 30 36 30 3A 51 49 B2 31 2E |..*...9060:QI.1.|
000022C0: 35 37 30 37 39 36 3A 5A B2 32 AC 41 AC 42 3A 59 |570796:Z.2.A.B:Y|
000022D0: B2 41 AE 32 AA 42 AE 32 3A 58 B2 59 AB 43 AE 32 |.A.2.B.2:X.Y.C.2|
000022E0: 00 05 2B CC 1F 57 B2 58 AD 5A 3A 56 B2 AB 31 AC |..+..W.X.Z:V..1.|
000022F0: 28 C1 28 57 AD BA 28 AB 31 AC 57 AE 32 AA 31 29 |(.(W..(.1.W.2.1)|
00002300: 29 29 AA 51 49 00 18 2B D6 1F 48 4F B2 35 3A 56 |)).QI..+..HO.5:V|
00002310: 45 B2 34 3A 8D 31 31 30 00 3B 2B E0 1F 99 22 43 |E.4:.110.;+..."C|
00002320: 5E 32 20 3D 20 41 5E 32 20 2B 20 42 5E 32 20 2D |^2 = A^2 + B^2 -|
00002330: 20 32 41 42 20 43 4F 53 20 C3 22 00 4E 2B EA 1F | 2AB COS .".N+..|
00002340: 48 4F B2 30 3A 56 45 B2 36 3A 8D 31 31 30 00 82 |HO.0:VE.6:.110..|
00002350: 2B F4 1F 99 22 3D 3D 3E 20 22 3B 43 AE 32 3B 22 |+..."==> ";C.2;"|
00002360: 20 3D 20 22 3B 41 AE 32 3B 22 20 2B 20 22 3B 42 | = ";A.2;" + ";B|
00002370: AE 32 3B 22 20 2D 20 22 3B 5A 3B 22 43 4F 53 20 |.2;" - ";Z;"COS |
00002380: C3 22 00 90 2B FE 1F 56 45 B2 38 3A 8D 31 31 30 |."..+..VE.8:.110|
00002390: 00 B8 2B 08 20 99 22 3D 3D 3E 20 22 3B 43 AE 32 |..+. ."==> ";C.2|
000023A0: 3B 22 20 3D 20 22 3B 59 3B 22 20 2D 20 22 3B 5A |;" = ";Y;" - ";Z|
000023B0: 3B 22 43 4F 53 20 C3 22 00 C7 2B 12 20 56 45 B2 |;"COS ."..+. VE.|
000023C0: 31 30 3A 8D 31 31 30 00 E2 2B 1C 20 99 22 3D 3D |10:.110..+. ."==|
000023D0: 3E 20 22 3B 5A 3B 22 43 4F 53 20 C3 20 3D 20 22 |> ";Z;"COS . = "|
000023E0: 3B 58 00 F1 2B 26 20 56 45 B2 31 32 3A 8D 31 31 |;X..+& VE.12:.11|
000023F0: 30 00 08 2C 30 20 99 22 3D 3D 3E 20 20 43 4F 53 |0..,0 ."==> COS|
00002400: 20 C3 20 3D 20 22 3B 57 00 17 2C 3A 20 56 45 B2 | . = ";W..,: VE.|
00002410: 31 34 3A 8D 31 31 30 00 39 2C 44 20 99 22 3D 3D |14:.110.9,D ."==|
00002420: 3E 20 20 20 C3 20 20 20 20 3D 20 22 3B 56 AD 28 |> . = ";V.(|
00002430: 34 AC 51 49 AD 33 36 30 29 00 45 2C 4E 20 8D 39 |4.QI.360).E,N .9|
00002440: 31 32 30 3A 8E 00 50 2C 34 21 8F 20 20 5A 48 5A |120:..P,4!. ZHZ|
00002450: 00 68 2C 3E 21 8D 31 30 30 3A 48 4F B2 35 3A 56 |.h,>!.100:HO.5:V|
00002460: 45 B2 30 3A 8D 31 31 30 00 89 2C 48 21 99 22 3C |E.0:.110..,H!."<|
00002470: 3C 20 43 2E 52 2E 20 56 45 52 53 49 45 20 33 20 |< C.R. VERSIE 3 |
00002480: 28 DA C8 DA 29 20 3E 3E 22 00 9C 2C 52 21 48 4F |(...) >>"..,R!HO|
00002490: B2 30 3A 56 45 B2 34 3A 8D 31 31 30 00 B5 2C 5C |.0:VE.4:.110..,\|
000024A0: 21 99 22 D6 4F 45 52 20 44 45 20 41 20 49 4E 3A |!.".OER DE A IN:|
000024B0: 22 3B 3A 85 41 00 D0 2C 66 21 99 3A 99 22 D6 4F |";:.A..,f!.:.".O|
000024C0: 45 52 20 44 45 20 42 20 49 4E 3A 22 3B 3A 85 42 |ER DE B IN:";:.B|
000024D0: 00 F6 2C 70 21 99 3A 99 22 D6 4F 45 52 20 48 4F |..,p!.:.".OER HO|
000024E0: 45 4B 20 47 41 4D 4D 41 20 28 C3 29 20 49 4E 3A |EK GAMMA (.) IN:|
000024F0: 22 3B 3A 85 47 41 00 00 2D 7A 21 8D 39 30 30 30 |";:.GA..-z!.9000|
00002500: 00 20 2D 84 21 8B 28 49 4E 24 B2 22 4E 22 29 20 |. -.!.(IN$."N") |
00002510: B0 28 49 4E 24 B2 22 CE 22 29 20 A7 38 35 31 30 |.(IN$.".") .8510|
00002520: 00 40 2D 8E 21 8B 28 49 4E 24 B2 22 4A 22 29 20 |.@-.!.(IN$."J") |
00002530: B0 28 49 4E 24 B2 22 CA 22 29 20 A7 38 36 31 30 |.(IN$.".") .8610|
00002540: 00 59 2D 98 21 89 38 35 37 30 3A 8F 20 20 47 45 |.Y-.!.8570:. GE|
00002550: 45 4E 20 4A 20 4F 46 20 4E 00 80 2D A2 21 8D 39 |EN J OF N..-.!.9|
00002560: 30 36 30 3A 5A B2 32 AC 41 AC 42 3A 59 B2 41 AE |060:Z.2.A.B:Y.A.|
00002570: 32 AA 42 AE 32 3A 51 49 B2 36 2E 32 38 33 31 39 |2.B.2:QI.6.28319|
00002580: 00 9A 2D AC 21 55 49 B2 59 AB 28 5A AC BE 28 47 |..-.!UI.Y.(Z..(G|
00002590: 41 AC 51 49 AD 33 36 30 29 29 00 AD 2D B6 21 48 |A.QI.360))..-.!H|
000025A0: 4F B2 35 3A 56 45 B2 34 3A 8D 31 31 30 00 D0 2D |O.5:VE.4:.110..-|
000025B0: C0 21 99 22 43 5E 32 20 3D 20 41 5E 32 20 2B 20 |.!."C^2 = A^2 + |
000025C0: 42 5E 32 20 2D 20 32 41 42 20 43 4F 53 20 C3 22 |B^2 - 2AB COS ."|
000025D0: 00 E3 2D CA 21 48 4F B2 30 3A 56 45 B2 36 3A 8D |..-.!HO.0:VE.6:.|
000025E0: 31 31 30 00 16 2E D4 21 99 22 3D 3D 3E 20 20 43 |110....!."==> C|
000025F0: 5E 32 20 3D 20 22 3B 41 AE 32 3B 22 20 2B 20 22 |^2 = ";A.2;" + "|
00002600: 3B 42 AE 32 3B 22 20 2D 20 22 3B 5A 3B 22 43 4F |;B.2;" - ";Z;"CO|
00002610: 53 20 22 3B 47 41 00 24 2E DE 21 56 45 B2 38 3A |S ";GA.$..!VE.8:|
00002620: 8D 31 31 30 00 4A 2E E8 21 99 22 3D 3D 3E 20 20 |.110.J..!."==> |
00002630: 43 5E 32 20 3D 20 22 3B 59 3B 22 20 2D 20 22 3B |C^2 = ";Y;" - ";|
00002640: 5A 3B 22 43 4F 53 22 3B 47 41 00 59 2E F2 21 56 |Z;"COS";GA.Y..!V|
00002650: 45 B2 31 30 3A 8D 31 31 30 00 6F 2E FC 21 99 22 |E.10:.110.o..!."|
00002660: 3D 3D 3E 20 20 43 5E 32 20 3D 20 22 3B 55 49 00 |==> C^2 = ";UI.|
00002670: 7E 2E 06 22 56 45 B2 31 32 3A 8D 31 31 30 00 97 |~.."VE.12:.110..|
00002680: 2E 10 22 99 22 3D 3D 3E 20 20 20 43 20 20 3D 20 |.."."==> C = |
00002690: 22 3B BA 28 55 49 29 00 A3 2E 1A 22 8D 39 31 32 |";.(UI)....".912|
000026A0: 30 3A 8E 00 AA 2E 28 23 8F 20 00 C5 2E 32 23 8F |0:....(#. ...2#.|
000026B0: 20 20 4D 4F 44 55 4C 45 20 48 55 4C 50 52 4F 55 | MODULE HULPROU|
000026C0: 54 49 4E 45 53 00 CC 2E 37 23 8F 20 00 E6 2E 3C |TINES...7#. ...<|
000026D0: 23 8F 20 20 47 4F 45 44 20 5A 4F 3F 20 4F 50 20 |#. GOED ZO? OP |
000026E0: 53 43 48 45 52 4D 00 FA 2E 46 23 48 4F B2 35 3A |SCHERM...F#HO.5:|
000026F0: 56 45 B2 31 32 3A 8D 31 31 30 00 1A 2F 50 23 99 |VE.12:.110../P#.|
00002700: 22 C7 4F 45 44 20 5A 4F 20 3F 20 28 4A 2F 4E 29 |".OED ZO ? (J/N)|
00002710: 20 3A 20 22 3B 3A 8D 32 31 30 00 20 2F 5A 23 8E | : ";:.210. /Z#.|
00002720: 00 27 2F 64 23 8F 20 00 47 2F 6E 23 8F 20 20 3E |.'/d#. .G/n#. >|
00002730: 3E 55 49 54 57 45 52 4B 49 4E 47 3C 3C 20 4F 50 |>UITWERKING<< OP|
00002740: 20 53 43 48 45 52 4D 00 50 2F 78 23 8D 31 30 30 | SCHERM.P/x#.100|
00002750: 00 63 2F 82 23 48 4F B2 38 3A 56 45 B2 30 3A 8D |.c/.#HO.8:VE.0:.|
00002760: 31 31 30 00 7B 2F 8C 23 99 22 3E 3E 20 55 49 54 |110.{/.#.">> UIT|
00002770: 57 45 52 4B 49 4E 47 20 3C 3C 22 00 81 2F 96 23 |WERKING <<"../.#|
00002780: 8E 00 88 2F A0 23 8F 20 00 A4 2F AA 23 8F 20 20 |.../.#. ../.#. |
00002790: 3C 3C 52 45 54 55 52 4E 3E 3E 20 4F 50 20 53 43 |<<RETURN>> OP SC|
000027A0: 48 45 52 4D 00 B8 2F B4 23 48 4F B2 30 3A 56 45 |HERM../.#HO.0:VE|
000027B0: B2 32 34 3A 8D 31 31 30 00 CB 2F BE 23 99 22 3C |.24:.110../.#."<|
000027C0: 3C D2 C5 D4 D5 D2 CE 3E 3E 22 3B 00 D4 2F C8 23 |<......>>";../.#|
000027D0: 8D 32 31 30 00 EC 2F D2 23 8B 28 C6 28 49 4E 24 |.210../.#.(.(IN$|
000027E0: 29 B3 B1 31 33 29 20 A7 39 31 36 30 00 F2 2F 34 |)..13) .9160../4|
000027F0: 26 8E 00 F9 2F AC 26 8F 20 00 09 30 B6 26 8F 20 |&.../.&. ..0.&. |
00002800: 20 44 52 49 45 48 4F 45 4B 00 15 30 C0 26 81 49 | DRIEHOEK..0.&.I|
00002810: B2 31 20 A4 38 00 2C 30 CA 26 56 45 B2 49 AA 33 |.1 .8.,0.&VE.I.3|
00002820: 3A 48 4F B2 49 AA 33 3A 8D 31 31 30 00 35 30 D4 |:HO.I.3:.110.50.|
00002830: 26 99 22 2A 22 00 3C 30 DE 26 82 49 00 4C 30 E8 |&."*".<0.&.I.L0.|
00002840: 26 81 49 B2 38 20 A4 31 20 A9 AB 31 00 62 30 F2 |&.I.8 .1 ..1.b0.|
00002850: 26 56 45 B2 31 31 3A 48 4F B2 49 AA 33 3A 8D 31 |&VE.11:HO.I.3:.1|
00002860: 31 30 00 6B 30 FC 26 99 22 2A 22 00 72 30 06 27 |10.k0.&."*".r0.'|
00002870: 82 49 00 82 30 10 27 81 49 B2 38 20 A4 31 20 A9 |.I..0.'.I.8 .1 .|
00002880: AB 31 00 97 30 1A 27 48 4F B2 34 3A 56 45 B2 49 |.1..0.'HO.4:VE.I|
00002890: AA 33 3A 8D 31 31 30 00 A0 30 24 27 99 22 2A 22 |.3:.110..0$'."*"|
000028A0: 00 A7 30 2E 27 82 49 00 AD 30 38 27 8E 00 B4 30 |..0.'.I..08'...0|
000028B0: 42 27 8F 20 00 CC 30 4C 27 8F 20 20 44 52 49 45 |B'. ..0L'. DRIE|
000028C0: 48 4F 45 4B 20 4B 4E 49 50 50 45 52 00 D9 30 56 |HOEK KNIPPER..0V|
000028D0: 27 81 49 B2 31 20 A4 31 30 00 E8 30 60 27 8D 31 |'.I.1 .10..0`'.1|
000028E0: 31 30 3A 99 22 20 20 22 00 F8 30 6A 27 81 4A B2 |10:." "..0j'.J.|
000028F0: 31 20 A4 31 30 3A 82 4A 00 06 31 74 27 8D 31 31 |1 .10:.J..1t'.11|
00002900: 30 3A 99 43 48 24 00 16 31 7E 27 81 4A B2 31 20 |0:.CH$..1~'.J.1 |
00002910: A4 31 30 3A 82 4A 00 1D 31 88 27 82 49 00 23 31 |.10:.J..1.'.I.#1|
00002920: 92 27 8E 00 2A 31 97 27 8F 20 00 3D 31 98 27 8F |.'..*1.'. .=1.'.|
00002930: 20 20 46 4F 55 54 4D 45 4C 44 49 4E 47 00 6F 31 | FOUTMELDING.o1|
00002940: 9C 27 46 24 B2 22 C7 45 45 4E 20 4E 45 47 41 54 |.'F$.".EEN NEGAT|
00002950: 49 45 56 45 20 47 45 54 41 4C 4C 45 4E 20 49 4E |IEVE GETALLEN IN|
00002960: 56 4F 45 52 45 4E 20 21 22 3A 47 24 B2 22 22 00 |VOEREN !":G$."".|
00002970: 7A 31 A1 27 89 31 30 31 37 30 00 A5 31 A6 27 46 |z1.'.10170..1.'F|
00002980: 24 B2 22 C4 45 20 53 43 48 55 49 4E 45 20 5A 49 |$.".E SCHUINE ZI|
00002990: 4A 44 45 20 4B 41 4E 20 4E 4F 4F 49 54 20 4B 4F |JDE KAN NOOIT KO|
000029A0: 52 54 45 52 22 00 C9 31 B0 27 47 24 B2 22 44 41 |RTER"..1.'G$."DA|
000029B0: 4E 20 44 45 20 52 45 43 48 54 45 20 5A 49 4A 44 |N DE RECHTE ZIJD|
000029C0: 45 20 5A 49 4A 4E 20 21 22 00 E6 31 BA 27 48 4F |E ZIJN !"..1.'HO|
000029D0: B2 35 3A 56 45 B2 31 36 3A 8D 31 31 30 3A 99 46 |.5:VE.16:.110:.F|
000029E0: 24 3A 8D 32 35 30 00 F9 31 BF 27 56 45 B2 31 37 |$:.250..1.'VE.17|
000029F0: 3A 8D 31 31 30 3A 99 47 24 00 11 32 C4 27 8D 39 |:.110:.G$..2.'.9|
00002A00: 31 32 30 3A 8F 20 20 3C 3C 52 45 54 55 52 4E 3E |120:. <<RETURN>|
00002A10: 3E 00 1A 32 C9 27 8D 32 35 30 00 20 32 CE 27 8E |>..2.'.250. 2.'.|
00002A20: 00 27 32 D8 27 8F 20 00 43 32 E2 27 8F 20 20 53 |.'2.'. .C2.'. S|
00002A30: 55 42 4D 45 4E 55 20 43 4F 53 49 4E 55 53 52 45 |UBMENU COSINUSRE|
00002A40: 47 45 4C 00 5B 32 EC 27 8D 31 30 30 3A 48 4F B2 |GEL.[2.'.100:HO.|
00002A50: 35 3A 56 45 B2 31 3A 8D 31 31 30 00 75 32 F6 27 |5:VE.1:.110.u2.'|
00002A60: 99 22 3C 3C 20 43 4F 53 49 4E 55 53 52 45 47 45 |."<< COSINUSREGE|
00002A70: 4C 20 3E 3E 22 00 9C 32 00 28 48 4F B2 36 3A 56 |L >>"..2.(HO.6:V|
00002A80: 45 B2 35 3A 8D 31 31 30 3A 99 22 D7 41 54 20 49 |E.5:.110:.".AT I|
00002A90: 53 20 45 52 20 42 45 4B 45 4E 44 22 00 C3 32 0A |S ER BEKEND"..2.|
00002AA0: 28 48 4F B2 36 3A 56 45 B2 36 3A 8D 31 31 30 3A |(HO.6:VE.6:.110:|
00002AB0: 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
00002AC0: 2D 2D 22 00 F2 32 14 28 48 4F B2 31 3A 56 45 B2 |--"..2.(HO.1:VE.|
00002AD0: 31 30 3A 8D 31 31 30 3A 99 22 31 2E 20 C4 45 20 |10:.110:."1. .E |
00002AE0: 44 52 49 45 20 5A 49 4A 44 45 4E 20 28 DA DA DA |DRIE ZIJDEN (...|
00002AF0: 29 22 00 01 33 1E 28 56 45 B2 31 34 3A 8D 31 31 |)"..3.(VE.14:.11|
00002B00: 30 00 2F 33 28 28 99 22 32 2E 20 D4 57 45 45 20 |0./3((."2. .WEE |
00002B10: 5A 49 4A 44 45 4E 20 26 20 49 4E 47 45 53 4C 4F |ZIJDEN & INGESLO|
00002B20: 54 45 4E 20 48 4F 45 4B 20 28 DA C8 DA 29 22 00 |TEN HOEK (...)".|
00002B30: 43 33 32 28 48 4F B2 35 3A 56 45 B2 32 32 3A 8D |C32(HO.5:VE.22:.|
00002B40: 31 31 30 00 59 33 3C 28 99 22 D5 57 20 4B 45 55 |110.Y3<(.".W KEU|
00002B50: 5A 45 3A 22 3A 8D 32 31 30 00 82 33 46 28 8B 28 |ZE:":.210..3F(.(|
00002B60: C6 28 49 4E 24 29 AB 34 38 B3 31 29 20 B0 28 C6 |.(IN$).48.1) .(.|
00002B70: 28 49 4E 24 29 AB 34 38 B1 32 29 20 A7 31 30 32 |(IN$).48.2) .102|
00002B80: 39 30 00 88 33 50 28 8E 00 8F 33 20 4E 8F 20 00 |90..3P(...3 N. .|
00002B90: B1 33 2A 4E 8F 20 10 20 44 45 20 27 56 27 20 49 |.3*N. . DE 'V' I|
00002BA0: 4E 20 44 45 20 53 54 45 4C 4C 49 4E 47 20 56 41 |N DE STELLING VA|
00002BB0: 4E 00 D3 33 34 4E 8F 20 20 20 50 59 54 48 41 47 |N..34N. PYTHAG|
00002BC0: 4F 52 41 53 20 49 53 20 45 45 4E 20 57 4F 52 54 |ORAS IS EEN WORT|
00002BD0: 45 4C 2D 00 F5 33 3E 4E 8F 20 20 20 54 45 4B 45 |EL-..3>N. TEKE|
00002BE0: 4E 2E 20 44 45 20 27 2B 2D 27 20 53 54 41 41 54 |N. DE '+-' STAAT|
00002BF0: 20 56 4F 4F 52 00 0A 34 48 4E 8F 20 20 20 50 4C | VOOR..4HN. PL|
00002C00: 55 53 20 4F 46 20 4D 49 4E 2E 00 11 34 52 4E 8F |US OF MIN...4RN.|
00002C10: 20 00 2D 34 30 75 8F 20 20 20 20 57 49 53 4B 55 | .-40u. WISKU|
00002C20: 4E 44 45 20 50 52 4F 47 52 41 4D 4D 41 00 4A 34 |NDE PROGRAMMA.J4|
00002C30: 58 75 8F 20 20 20 20 20 20 20 20 56 45 52 53 49 |Xu. VERSI|
00002C40: 45 20 35 20 20 20 20 20 20 20 00 65 34 62 75 8F |E 5 .e4bu.|
00002C50: 20 20 20 20 42 45 56 41 54 20 41 42 43 2D 46 4F | BEVAT ABC-FO|
00002C60: 52 4D 55 4C 45 00 6C 34 6C 75 8F 20 00 8A 34 76 |RMULE.l4lu. ..4v|
00002C70: 75 8F 20 20 53 54 45 4C 4C 49 4E 47 20 56 2E 20 |u. STELLING V. |
00002C80: 50 59 54 48 41 47 4F 52 41 53 00 91 34 80 75 8F |PYTHAGORAS..4.u.|
00002C90: 20 00 AA 34 8A 75 8F 20 20 20 20 20 20 20 43 4F | ..4.u. CO|
00002CA0: 53 49 4E 55 53 52 45 47 45 4C 00 B1 34 94 75 8F |SINUSREGEL..4.u.|
00002CB0: 20 00 B8 34 A8 75 8F 20 00 D3 34 B2 75 8F 20 20 | ..4.u. ..4.u. |
00002CC0: 20 20 47 45 53 43 48 52 45 56 45 4E 20 4F 50 20 | GESCHREVEN OP |
00002CD0: 45 45 4E 00 F1 34 BC 75 8F 20 20 20 50 32 30 30 |EEN..4.u. P200|
00002CE0: 30 54 20 31 36 4B 20 20 30 35 2D 30 35 2D 27 38 |0T 16K 05-05-'8|
00002CF0: 35 00 0E 35 C1 75 8F 20 20 20 4C 41 41 54 53 54 |5..5.u. LAATST|
00002D00: 45 20 42 45 57 45 52 4B 49 4E 47 20 4F 50 00 25 |E BEWERKING OP.%|
00002D10: 35 C4 75 8F 20 20 20 20 20 20 20 20 30 37 2D 30 |5.u. 07-0|
00002D20: 39 2D 27 38 35 00 2C 35 C6 75 8F 20 00 45 35 D0 |9-'85.,5.u. .E5.|
00002D30: 75 8F 20 20 20 20 20 20 4A 2E 20 56 41 4C 4B 45 |u. J. VALKE|
00002D40: 4E 42 55 52 47 00 5E 35 DA 75 8F 20 20 20 20 20 |NBURG.^5.u. |
00002D50: 20 54 4F 4F 52 4F 50 4C 41 41 4E 20 31 30 00 7A | TOOROPLAAN 10.z|
00002D60: 35 E4 75 8F 20 20 20 20 33 31 34 31 20 4B 50 20 |5.u. 3141 KP |
00002D70: 20 4D 41 41 53 53 4C 55 49 53 00 80 35 EE 75 8F | MAASSLUIS..5.u.|
00002D80: 00 90 35 F8 75 8F 20 43 4F 50 59 52 49 47 48 54 |..5.u. COPYRIGHT|
00002D90: 00 A4 35 02 76 8F 20 4E 4F 53 20 48 49 4C 56 45 |..5.v. NOS HILVE|
00002DA0: 52 53 55 4D 00 00 00 |RSUM... |
.......1000......1010.!.D..".";:..Q.N..H
(".........................",.(.(VE.1)))
;.A.P....(HO));:....X.HO.B(209).256.B(21
0).1024.B(211)...Y.VE..(HO.40):HO.HO.40.
VE:....H..IN$:..D.R..IN$:.IN$."".210.J..
........54296,15:.54278,255:.54273,95:.5
4276,17......OO.1.200:.OO.*....54276,0:.
54277,0:.54278,0:..8...RV..(1):..F...FR.
.(0):..O.,.SR$.D(SR):.H(SR$,1)." ".SR$.J
(SR$,2).U.-.....6.OO$." ":OO.CT.CN..(CN)
:O1..5.10..CN:O3..(SR):SR$."":.SR..O1.SR
$."-"...7..O3..10.OO.SR$."":OO$."*":.316
...8.SR$.SR$.J(D(.(O3.O1)),2)...9..C(SR$
).OO.SR$.OO$.SR$:.313.4.:..CN.0.O3..1E10
.316.[.;.SR$.SR$.J(D(1.O3..(O3).O1),3,CN
.1).{.<..C(SR$).CT.SR$.SR$.OO$:.316...=.
.C(SR$).CT.SR$."":OO$."*":.316...>.....^
..4,4,7:.4,SR$;: 4:..O.H..4,4,7:.4: 4:..
....A.100:.20:. WISKUNDE PROGRAMMA.....
. ...... MODULE KEUZEMENU......100./..
.HO.8:VE.2:.110.@...."KEUZEMENU".S.$.HO.
5:VE.7:.110.I...."1. ABC-FORMULE".}.8.HO
.5:VE.10:.110...B.."2. STELLING VAN PYTH
AGORAS"...L.HO.5:VE.13:.110.J.V.."3. COS
INUSREGEL"...`.HO.5:VE.16:.110...J.."4.
BEEINDIGEN"...T.HO.8:VE.22:.110...~.."UW
KEUZE:".3....210:. TOETS AFVANGEN.[...
.(F(IN$).48.4) .(F(IN$).48.1) .1160.....
.(F(IN$).48) .2000,3000,5000,1190......1
010:. KEUZEMENU......100.....HO.0:VE.12
:.110.P...."PROGRAMMA BEEINDIGD".V.D....
.P.. ...Z.. MODULE ABC-FORMULE...... .
.....100.....HO.8:VE.0:.110.4....">> ABC
-FORMULE <<".G...HO.0:VE.5:.110.`...."VO
ER DE A IN ";:.A.{. ..:."VOER DE B IN ";
:.B...*..:."VOER DE C IN ";:.C...4..9000
:. GOED ZO ?.M.>..(IN$."J") .(IN$."J")
.2130...H..(IN$."N") .(IN$."N") .2030...
M..2100:. GEEN J OF N.%.R..(A.0) .(B.0)
.(C.0) .2910.A.\..9060:. >>UITWERKING<
<.Q.F.D.B.2.4.A.C.B.P..(D.0) .2910.X.Z.X
.(.B..(D)).(2.A).....Y.(.B..(D)).(2.A)..
...HO.0:VE.2:.110.B...." -";B;"+-V";B.2
;"-";4.A.C......"X=------------------"..
...." ";2.A.....HO.0:VE.7:.110...
..." -";B;"+";.(D).1.J.."X=------------
".B.T.." ";2.A.V...HO.0:VE.11:.110.I
...." ";.B..(D).{...."X=--------".....
." ";2.A.....HO.0:VE.15:.110......"X="
;X.....HO.23:VE.7:.110.T.$.." -";B;"-";
.(D).....VE.8:.110:."X=---------"...8.VE
.9:.110:." ";2.A...B.VE.11:.110...L.
." ";.B..(D).=.V.VE.12:.110.O.`.."X=--
------".^.J.VE.13:.110.M.T.." ";2.A.|.
~.VE.15:.110......"X=";Y...N.HO.16:VE.20
:.110...X.."EN".....HO.0:VE.17:.110.....
."DE SNIJPUNTEN VAN DEZE FUNCTIE MET DE"
......"X-AS ZIJN DUS:".....HO.0:VE.20:.1
10.%...."(";X;", 0 )".4...HO.23:.110.G..
.."(";Y;", 0 )".^.(..9120:. <<RETURN>>.G
.2..100.{.<.HO.12:VE.0:.110...F..">> TOP
<<". .P.HO.0:VE.12:.110.N.Z.."WILT U DE
TOP VAN DEZE FUNCTIE WETEN ?".W.D..210.
..N..(IN$."J") .(IN$."J") .2700...S..(IN
$."N") .(IN$."N") ........2660.....T.X.Y
:U.T.2.8....9060.K...HO.0:VE.5:.110.^. .
.X;"+";Y;"=";T.O....T;"/ 2 =";U......:."
NU GAAN WE F (";U;") UITREKENEN."......9
120:. RETURN.H.H..9060:. >>UITWERKIN<<
...R.V.A.(U.2):W.B.U:M.V.W.C.....HO.5:VE
.5:.110......A;"X^2 +";B;"X +";C.;....:.
"==> ";A;"*";U.2;"+";B;"*";U;"+";C.^...
.:."==> ";V;"+";W;"+";C;"=";M.R...HO.0:
VE.15:.110......"DE TOP IS DUS:"......:.
"T=(";U;",";M;")"...".HO.20:VE.15:.110.P
.,.."DE EXTREEM IS DUS:"...6.HO.20:VE.17
:.110...@.."F (";U;") =";M...J..9120:.
<<RETURN>>.%.T..:. KEUZEMENU.=.^..9060:
. UITWERKING.Q.C.HO.0:VE.10:.110..H.."
DEZE FUNCTIE HEEFT GEEN ORIGINELEN VAN".
..M.."NUL."...R..9120:....... .C.B.. MO
DULE STELLING V. PYTHAGORAS.J.L.. .S.V..
100.....HO.5:VE.0:.110......"<< STELLING
V. PYTHAGORAS >>". ....9900:. DRIEHOEK
.4...HO.15:VE.5:.110.P...."MET DIT DEEL
VAN HET".U...VE.6:.110:."PROGRAMMA KUNT
U DE".....VE.7:.110:."STELLING VAN PYTHA
GORAS".E.&.VE.8:.110:."TOEPASSEN. DE SCH
UINE"...0.VE.9:.110:."ZIJDE MOET ALTIJD
DE"...:.VE.10:.110:."VARIABELE -C- HEBBE
N.".1.D.HO.10:VE.6:CH$."C":.10050.T.N..
^^ WAT EN WAAR KNIPPEREN ^^...X.HO.15:V
E.12:.110:."DE ANDERE ZIJDEN HEBBEN"...B
.VE.13:.110:."DE VARIABELEN -A- EN -B-."
.M.L.HO.1:VE.7:CH$."A":.10050...V.HO.7:V
E.13:CH$."B":.10050.....HO.0:VE.18:.110.
/...."IS DE SCHUINE ZIJDE BEKEND ? (J/N)
";:.210.O....(IN$."N") .(IN$."N") .3250.
O....(IN$."J") .(IN$."J") .3530......320
0:. GEEN J OF N INGEDRUKT...... C NIET
BEKEND......100.C...HO.5:VE.0:.110...F.
."<< STELLING V. PYTHAGORAS >>"...P.HO.0
:VE.5:.110:."VOER DE -A- IN ";:.A...Z..:
."VOER DE -B- IN ";:.B.C....9000:. GOED
ZO.C....(IN$."N") .(IN$."N") .3250.....
.(IN$."J") .(IN$."J") .3340......3300:.
GEEN J OF N......(A.0) .(B.0) ..10135:.
3250.F....9060.W. .L..(A.2.B.2)...*..990
0:. DRIEHOEK.../.. ABC BIJ DRIEHOEK.#.
4.HO.10:VE.6:CH$."C":.10050.@.>.HO.1:VE.
7:CH$."A":.10050.^.H.HO.7:VE.13:CH$."B":
.10050.R.R.HO.5:VE.16:.110...\.."C^2 =";
A.2;"+";B.2...F.VE.17:.110...P.."C^2 =";
A.2.B.2...Z.VE.18:.110.M...."C =";L...
..HO.17:VE.7:.110......"A =";A.....VE.8:
.110:."B =";B.....VE.9:.110:."C =";L.2..
..9120:. <RETURN>.8.....L.J.. C WEL BE
KEND.U.T..100.H...HO.5:VE.0:.110......"<
< STELLING V. PYTHAGORAS >>".....HO.0:VE
.5:.110......"VOER DE -C- IN :";:.C.....
.:."VOER DE ANDERE BEKENDE ZIJDE IN :";:
.A......9000......(IN$."N") .(IN$."N") .
3540.4.$..(IN$."J") .(IN$."J") .3640.P..
..3600:. GEEN J OF NEE .P.8..(C.0) .(A.
0) ..10135:.3540...B..(C.A) ..10150:.354
0. .L..9060:L..(C.2.A.2)...V..9900.H.`.H
O.10:VE.6:CH$."C":.10050...J.HO.1:VE.7:C
H$."A":.10050...T.HO.7:VE.13:CH$."B":.10
050...~.HO.3:VE.16:.110.2....C;"^2 =";A;
"^2 + B^2".[...HO.5:VE.17:.110:.C.2;"=";
A.2;"+ B^2"....VE.18:.110:."B^2 =";C.2;
"-";A.2.....VE.19:.110:."B^2 =";C.2.A.2.
....VE.20:.110:."B =";L.V...HO.17:VE.7
:.110:."A =";A...D.VE.8:.110:."B =";L...
N.VE.9:.110:."C =";C...X..9120:. <RETUR
N>. .....'.... .B.... MODULE COSINUSREG
EL.I.... .R....100.{...HO.5:VE.0:.110:."
<< COSINUSREGEL >>".....HO.5:VE.6:.110:.
"KIES VERSIE:"...D.HO.2:VE.10:.110.X.N..
"1. A^2 = B^2 + C^2 - 2BC COS A"...X.VE.
13:.110......"2. B^2 = A^2 + C^2 - 2AC C
OS B".....VE.16:.110.B...."3. C^2 = A^2
+ B^2 - 2AB COS C".V...HO.5:VE.22:.110.L
...."UW KEUZE";:.210......(F(IN$).48.1)
.(F(IN$).48.3) .5130......(F(IN$).48) .6
000,7000,8000.H.T..:. HOOFDMENU...O..
C.R. MODULE 1...P..10200:. SUBMENU ...Z
..(F(IN$).48.2) .6500.%....100:HO.5:VE.1
:.110.F...."<< C.R. VERSIE 1 (ZZZ) >>".Y
...HO.0:VE.5:.110.S...."VOER DE A IN :";
:.A......:."VOER DE B IN :";:.B......:."
VOER DE C IN :";:.C......9000.U.J..(IN$.
"N") .(IN$."N") .6020...T..(IN$."J") .(I
N$."J") .6120.. ...6080:. GEEN J OF N.>
...9060:QI.1.5708:Z.2.B.C:Y.B.2.C.2.A.2
:W.Y.Z.] ..V..1.(A(W..(.1.W.2.1))).QI.P
..HO.5:VE.4:.110.. ..."A^2 = B^2 + C^2 -
2BC COS A".. ..HO.0:VE.6:.110.Z ..."==>
";A.2;" = ";B.2;" + ";C.2;" - ";Z;"COS
A".. $.VE.8:.110..!..."==> ";Z;"COS A =
";Y..!8.VE.10:.110.)!B.."==> COS A = ";
W.8!L.VE.12:.110.Y!V.."==> ";" A = ";V.(
4.QI.360).E!`..9120:..P!D.. ZHZ..!N..10
0:HO.5:VE.0:.110..!X.."<< C.R. VERSIE 1
(ZHZ) >>"..!..HO.0:VE.5:.110.U!..."VOER
DE B IN:";:.B..!...:."VOER DE C IN:";:.C
.." ..:."VOER HOEK ALPHA (A) IN:";:.AL.
"...9000.@"...(IN$."N") .(IN$."N") .6510
.`"...(IN$."J") .(IN$."J") .6610.Y"H..65
70:. GEEN J OF N.."R..9060:Y.B.2.C.2.."
..Z.2.B.C:QI.6.28319:UI.Y.(Z..(AL.QI.360
)).M"..HO.5:VE.5:.110.."..."A^2 = B^2 +
C^2 - 2BC COS A"..#..HO.0:VE.7:.110.5#..
."==> A^2 = ";B.2;" + ";C.2;" - ";Z;"CO
S";AL.C#..VE.9:.110.I#..."==> A^2 = ";Y
;" - ";Z;"COS";AL.X#".VE.11:.110..#,.."=
=> A^2 = ";Y;" - ";Z..(AL.QI.360)..#6.V
E.13:.110.G#@.."==> A^2 = ";UI.V#J.VE.1
5:.110..#T.."==> A = ";.(UI)..#^..912
0:...$X.. C.R. MODULE 2..$B..10200.4$L.
.(F(IN$).48.2) .7500.L$V..100:HO.5:VE.0:
.110.M$..."<< C.R. VERSIE 2 (ZZZ) >>"..$
..HO.0:VE.5:.110..$..."VOER DE B IN:";:.
B..$...:."VOER DE A IN:";:.A.O$...:."VOE
R DE C IN:";:.C..$...9000:. GOED ZO ?..
%...(IN$."N") .(IN$."N") .7030.&%F..(IN$
."J") .(IN$."J") .7130.?%P..7090:. GEEN
J OF N.U%Z..9060:QI.1.570796:Z.2.A.C:Y.
A.2.C.2:X.Y.B.2:W.X.Z..%..V..1.(A(W..(.1
.W.2.1))).QI..%..HO.5:VE.4:.110.J%..."B^
2 = A^2 + C^2 - 2AC COS B"..%..HO.0:VE.6
:.110..&..."==> ";B.2;" = ";A.2;" + ";C.
2;" - ";Z;"COS B"..&..VE.8:.110.H& .."==
> ";B.2;" = ";Y;" - ";Z;" COS B".W&*.VE.
10:.110.R&4.."==> ";Z;"COS B = ";X..&>.V
E.12:.110..&H.."==> COS B = ";W..&R.VE.
14:.110.I&\.."==> B = ";V.(4.QI.360
).U&F..9120:...&L.. ZHZ..&V..100:HO.5:V
E.0:.110..'`.."<< C.R. VERSIE 2 (ZHZ) >>
".,'J.HO.0:VE.4:.110.E'T.."VOER DE A IN:
";:.A.`'~..:."VOER DE C IN:";:.C..'...:.
"VOER HOEK BETA (B) IN:";:.BE..'...9000.
.'...(IN$."N") .(IN$."N") .7510.O'...(IN
$."J") .(IN$."J") .7610..'...7570:. GEE
N J OF N..(...9060:Z.2.A.C:Y.A.2.C.2:QI.
6.28319.'(D.UI.Y.Z..(BE.QI.360).:(N.HO.5
:VE.4:.110.](X.."B^2 = A^2 + C^2 - 2AC C
OS B".K(..VE.6:.110..(..."==> B^2 = ";A
.2;" + ";C.2;" - ";Z;"COS";BE..(..VE.8:.
110.Q(..."==> B^2 = ";Y;" - ";Z;"COS";B
E..(..VE.10:.110..)..."==> B^2 = ";Y;"
- ";Z..(BE.QI.360)..)..VE.12:.110./)(.."
==> B^2 = ";UI.>)2.VE.14:.110.W)<.."==>
B = ";.(UI).C)F..9120:..X)@.. C.R.
VERSIE 3..)J..10200:. SUBMENU..)T..(F(I
N$).48.2) .8500..)^..100:HO.5:VE.0:.110.
.)H.."<< C.R. VERSIE 3 (ZZZ) >>"..)R.HO.
0:VE.4:.110..*|.."VOER DE C IN:";:.C.'*.
..:."VOER DE A IN:";:.A.B*...:."VOER DE
B IN:";:.B.X*...9000:. GOED ZO?.X*...(I
N$."N") .(IN$."N") .8030..*...(IN$."J")
.(IN$."J") .8130..*...8090:. GEEN J OFN
..*B..9060:QI.1.570796:Z.2.A.B:Y.A.2.B.2
:X.Y.C.2..+L.W.X.Z:V..1.(A(W..(.1.W.2.1)
)).QI..+V.HO.5:VE.4:.110.;+..."C^2 = A^2
+ B^2 - 2AB COS C".N+..HO.0:VE.6:.110..
+..."==> ";C.2;" = ";A.2;" + ";B.2;" - "
;Z;"COS C"..+..VE.8:.110..+. ."==> ";C.2
;" = ";Y;" - ";Z;"COS C".G+. VE.10:.110.
.+. ."==> ";Z;"COS C = ";X..+& VE.12:.11
0..,0 ."==> COS C = ";W..,: VE.14:.110.
9,D ."==> C = ";V.(4.QI.360).E,N .9
120:..P,4!. ZHZ.H,>!.100:HO.5:VE.0:.110
..,H!."<< C.R. VERSIE 3 (ZHZ) >>"..,R!HO
.0:VE.4:.110..,\!."VOER DE A IN:";:.A.P,
F!.:."VOER DE B IN:";:.B..,P!.:."VOER HO
EK GAMMA (C) IN:";:.GA..-Z!.9000. -.!.(I
N$."N") .(IN$."N") .8510.@-.!.(IN$."J")
.(IN$."J") .8610.Y-.!.8570:. GEEN J OF
N..-.!.9060:Z.2.A.B:Y.A.2.B.2:QI.6.28319
..-.!UI.Y.(Z..(GA.QI.360))..-.!HO.5:VE.4
:.110.P-.!."C^2 = A^2 + B^2 - 2AB COS C"
..-J!HO.0:VE.6:.110...T!."==> C^2 = ";A
.2;" + ";B.2;" - ";Z;"COS ";GA.$..!VE.8:
.110.J..!."==> C^2 = ";Y;" - ";Z;"COS";
GA.Y..!VE.10:.110.O..!."==> C^2 = ";UI.
~.."VE.12:.110...."."==> C = ";.(UI).
...".9120:....(#. .E.2#. MODULE HULPROU
TINES.L.7#. ...<#. GOED ZO? OP SCHERM..
.F#HO.5:VE.12:.110../P#."GOED ZO ? (J/N)
: ";:.210. /Z#..'/D#. .G/N#. >>UITWERK
ING<< OP SCHERM.P/X#.100.C/.#HO.8:VE.0:.
110.{/.#.">> UITWERKING <<"../.#.../ #.
../.#. <<RETURN>> OP SCHERM../.#HO.0:VE
.24:.110.K/.#."<<RETURN>>";.T/H#.210../R
#.(F(IN$)..13) .9160../4&.../.&. ..0.&.
DRIEHOEK..0.&.I.1 .8.,0J&VE.I.3:HO.I.3:
.110.50T&."*".<0.&.I.L0.&.I.8 .1 ..1.B0.
&VE.11:HO.I.3:.110.K0.&."*".R0.'.I..0.'.
I.8 .1 ..1..0.'HO.4:VE.I.3:.110. 0$'."*"
..0.'.I..08'...0B'. .L0L'. DRIEHOEK KNI
PPER.Y0V'.I.1 .10..0`'.110:." "..0J'.J.
1 .10:.J..1T'.110:.CH$..1~'.J.1 .10:.J..
1.'.I.#1.'..*1.'. .=1.'. FOUTMELDING.O1
.'F$."GEEN NEGATIEVE GETALLEN INVOEREN !
":G$."".Z1.'.10170..1.'F$."DE SCHUINE ZI
JDE KAN NOOIT KORTER".I1.'G$."DAN DE REC
HTE ZIJDE ZIJN !"..1.'HO.5:VE.16:.110:.F
$:.250..1.'VE.17:.110:.G$..2D'.9120:. <
<RETURN>>..2I'.250. 2N'..'2X'. .C2.'. S
UBMENU COSINUSREGEL.[2.'.100:HO.5:VE.1:.
110.U2.'."<< COSINUSREGEL >>"..2.(HO.6:V
E.5:.110:."WAT IS ER BEKEND".C2.(HO.6:VE
.6:.110:."----------------"..2.(HO.1:VE.
10:.110:."1. DE DRIE ZIJDEN (ZZZ)"..3.(V
E.14:.110./3((."2. TWEE ZIJDEN & INGESLO
TEN HOEK (ZHZ)".C32(HO.5:VE.22:.110.Y3<(
."UW KEUZE:":.210..3F(.(F(IN$).48.1) .(F
(IN$).48.2) .10290..3P(...3 N. ..3*N. .
DE 'V' IN DE STELLING VAN.S34N. PYTHAG
ORAS IS EEN WORTEL-..3>N. TEKEN. DE '+
-' STAAT VOOR..4HN. PLUS OF MIN...4RN.
.-40U. WISKUNDE PROGRAMMA.J4XU.
VERSIE 5 .E4BU. BEVAT ABC-FO
RMULE.L4LU. ..4VU. STELLING V. PYTHAGOR
AS..4.U. ..4.U. COSINUSREGEL..4.U.
..4.U. .S4.U. GESCHREVEN OP EEN..4.U
. P2000T 16K 05-05-'85..5AU. LAATST
E BEWERKING OP.%5DU. 07-09-'85.,5
FU. .E5PU. J. VALKENBURG.^5ZU.
TOOROPLAAN 10.Z5.U. 3141 KP MAASSLU
IS..5.U...5.U. COPYRIGHT..5.V. NOS HILVE
RSUM...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL