VINKLER OK
FILE INFORMATION
FILENAME(S): VINKLER OK
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 19:47:11
APPEARS ON: 1 disk(s)
FILE HASH
b2adbf65fda4f89ae816f9f107e315b5c4a7daae7792383b15c7cfa4310cb53b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A9 2 | VINKLER OK | PRG | Curtcool, Frank | 4 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 08 00 97 35 33 32 38 30 2C 31 31 3A |.......53280,11:| 00000010: 97 35 33 32 38 31 2C 39 3A 99 22 93 9E 22 00 42 |.53281,9:."..".B| 00000020: 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 54 |.... ********* T| 00000030: 52 49 41 4E 47 4C 45 52 20 2A 2A 2A 2A 2A 2A 2A |RIANGLER *******| 00000040: 2A 2A 00 65 08 14 00 99 C7 28 31 34 37 29 2C 22 |**.e.....(147),"| 00000050: 20 20 20 20 20 20 54 52 49 41 4E 47 4C 45 52 22 | TRIANGLER"| 00000060: C7 28 31 37 29 00 92 08 1E 00 99 22 44 45 54 54 |.(17)......"DETT| 00000070: 45 20 50 52 4F 47 52 41 4D 20 56 49 4C 20 46 49 |E PROGRAM VIL FI| 00000080: 4E 44 45 20 44 45 4E 20 52 45 4D 41 49 4E 49 4E |NDE DEN REMAININ| 00000090: 47 22 00 BD 08 28 00 99 22 53 49 44 45 20 4F 47 |G"...(.."SIDE OG| 000000A0: 20 56 49 4E 4B 45 4C 20 41 46 20 45 4E 20 54 52 | VINKEL AF EN TR| 000000B0: 49 41 4E 47 45 4C 2E 22 C7 28 31 37 29 00 E6 08 |IANGEL.".(17)...| 000000C0: 32 00 99 22 48 56 49 4C 4B 45 4E 20 4F 50 4C 59 |2.."HVILKEN OPLY| 000000D0: 53 4E 49 4E 47 45 52 20 48 41 52 20 44 55 20 3F |SNINGER HAR DU ?| 000000E0: 22 C7 28 31 37 29 00 07 09 3C 00 99 22 31 20 53 |".(17)...<.."1 S| 000000F0: 53 53 20 3A 20 41 4C 4C 45 20 33 20 53 49 44 45 |SS : ALLE 3 SIDE| 00000100: 52 22 C7 28 31 37 29 00 3A 09 46 00 99 22 32 20 |R".(17).:.F.."2 | 00000110: 53 53 41 20 3A 20 32 20 53 49 44 45 52 20 4F 47 |SSA : 2 SIDER OG| 00000120: 20 4E 4F 4E 2D 49 4E 43 4C 55 53 49 56 45 20 56 | NON-INCLUSIVE V| 00000130: 49 4E 4B 2E 22 C7 28 31 37 29 00 6B 09 50 00 99 |INK.".(17).k.P..| 00000140: 22 33 20 53 41 53 20 3A 20 32 20 53 49 44 45 52 |"3 SAS : 2 SIDER| 00000150: 20 4F 47 20 49 4E 43 4C 55 53 49 56 45 20 56 49 | OG INCLUSIVE VI| 00000160: 4E 4B 45 4C 2E 22 C7 28 31 37 29 00 9E 09 5A 00 |NKEL.".(17)...Z.| 00000170: 99 22 34 20 53 41 41 20 3A 20 32 20 56 49 4E 4B |."4 SAA : 2 VINK| 00000180: 4C 45 52 20 4F 47 20 4E 4F 4E 2D 49 4E 43 4C 55 |LER OG NON-INCLU| 00000190: 53 49 56 20 53 49 44 45 22 C7 28 31 37 29 00 CF |SIV SIDE".(17)..| 000001A0: 09 64 00 99 22 35 20 41 53 41 20 3A 20 32 20 56 |.d.."5 ASA : 2 V| 000001B0: 49 4E 4B 4C 45 52 20 4F 47 20 49 4E 43 4C 55 53 |INKLER OG INCLUS| 000001C0: 49 56 45 20 53 49 44 45 2E 22 C7 28 31 37 29 00 |IVE SIDE.".(17).| 000001D0: F2 09 6E 00 8F 20 2A 2A 2A 2A 2A 2A 20 4D 41 4B |..n.. ****** MAK| 000001E0: 45 20 53 45 4C 45 43 54 49 4F 4E 20 2A 2A 2A 2A |E SELECTION ****| 000001F0: 2A 2A 00 11 0A 78 00 99 3A 85 22 48 56 49 4C 4B |**...x..:."HVILK| 00000200: 45 4E 20 4E 52 2E 20 30 4E 53 4B 45 53 20 22 3B |EN NR. 0NSKES ";| 00000210: 4E 00 4D 0A 82 00 8B 4E B3 31 B0 4E B1 35 B0 4E |N.M....N.1.N.5.N| 00000220: B3 B1 B5 28 4E 29 A7 99 22 11 50 52 30 56 20 4D |...(N)..".PR0V M| 00000230: 45 44 20 31 2E 20 32 2E 20 33 2E 20 34 2E 20 45 |ED 1. 2. 3. 4. E| 00000240: 4C 4C 45 52 20 35 2E 22 3A 89 31 32 30 00 74 0A |LLER 5.":.120.t.| 00000250: 8C 00 8F 20 2A 2A 20 44 45 46 49 4E 45 52 20 41 |... ** DEFINER A| 00000260: 52 43 53 49 4E 45 20 46 55 4E 4B 54 49 4F 4E 2C |RCSINE FUNKTION,| 00000270: 20 49 20 2A 00 9B 0A 8D 00 8F 20 2A 2A 20 47 52 | I *...... ** GR| 00000280: 41 44 45 52 20 4D 45 44 20 32 20 44 45 43 49 4D |ADER MED 2 DECIM| 00000290: 41 4C 20 50 4C 41 44 53 20 2A 2A 00 C5 0A 96 00 |AL PLADS **.....| 000002A0: 96 A5 41 53 28 58 29 B2 B5 28 31 38 30 30 30 AC |..AS(X)..(18000.| 000002B0: C1 28 58 AD BA 28 31 AB 58 AC 58 29 29 AA 2E 35 |.(X..(1.X.X))..5| 000002C0: 29 AD 31 30 30 00 E8 0A A0 00 8F 20 2A 2A 2A 2A |).100...... ****| 000002D0: 2A 2A 2A 2A 20 53 50 4C 49 54 20 4F 46 46 20 2A |**** SPLIT OFF *| 000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 00 06 0B AA 00 99 3A 91 |********......:.| 000002F0: 4E 8D 33 31 30 2C 35 31 30 2C 37 31 30 2C 39 31 |N.310,510,710,91| 00000300: 30 2C 31 30 31 30 00 29 0B B4 00 99 C7 28 31 37 |0,1010.).....(17| 00000310: 29 22 41 4E 4F 54 48 45 52 20 47 4F 20 3F 20 4A |)"ANOTHER GO ? J| 00000320: 20 45 4C 4C 45 52 20 4E 22 00 46 0B BE 00 A1 47 | ELLER N".F....G| 00000330: 24 3A 8B 47 24 B3 B1 22 4A 22 AF 47 24 B3 B1 22 |$:.G$.."J".G$.."| 00000340: 4E 22 A7 31 39 30 00 54 0B C8 00 8B 47 24 B2 22 |N".190.T....G$."| 00000350: 4A 22 A7 8A 00 78 0B D2 00 99 C7 28 31 34 37 29 |J"...x.....(147)| 00000360: 22 20 54 41 4B 20 46 4F 52 20 44 45 4E 4E 45 20 |" TAK FOR DENNE | 00000370: 47 41 4E 47 2E 22 3A 80 00 9B 0B 2C 01 8F 20 2A |GANG.":....,.. *| 00000380: 2A 2A 2A 2A 2A 20 41 4C 4C 45 20 33 20 53 49 44 |***** ALLE 3 SID| 00000390: 45 52 20 2A 2A 2A 2A 2A 2A 2A 2A 00 CD 0B 36 01 |ER ********...6.| 000003A0: 99 22 93 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.".*************| 000003B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000003C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B 00 FE 0B |***********";...| 000003D0: 37 01 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 41 |7.."********** A| 000003E0: 4C 4C 45 20 33 20 53 49 44 45 52 20 4B 45 4E 44 |LLE 3 SIDER KEND| 000003F0: 54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B 00 2E |T **********";..| 00000400: 0C 38 01 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.8.."***********| 00000410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 41 |*************".A| 00000430: 0C 40 01 4D B2 31 3A 8D 31 31 31 30 3A 53 58 B2 |.@.M.1:.1110:SX.| 00000440: 53 00 54 0C 4A 01 4D B2 32 3A 8D 31 31 31 30 3A |S.T.J.M.2:.1110:| 00000450: 53 59 B2 53 00 67 0C 54 01 4D B2 33 3A 8D 31 31 |SY.S.g.T.M.3:.11| 00000460: 31 30 3A 53 5A B2 53 00 85 0C 5E 01 41 B2 28 53 |10:SZ.S...^.A.(S| 00000470: 59 AC 53 5A AB 53 58 AC 53 58 29 AD 28 32 AC 53 |Y.SZ.SX.SX).(2.S| 00000480: 59 AC 53 5A 29 00 AF 0C 68 01 8B B6 28 41 29 B1 |Y.SZ)...h...(A).| 00000490: B2 31 A7 99 22 44 45 54 20 45 52 20 49 4B 4B 45 |.1.."DET ER IKKE| 000004A0: 20 45 4E 20 54 52 49 41 4E 47 45 4C 22 3A 8E 00 | EN TRIANGEL":..| 000004B0: DC 0C 72 01 99 22 56 49 4E 4B 4C 45 4E 53 20 4F |..r.."VINKLENS O| 000004C0: 50 50 4F 53 49 54 45 20 53 49 44 45 20 31 20 45 |PPOSITE SIDE 1 E| 000004D0: 52 20 22 39 30 AB A5 41 53 28 41 29 00 00 0D 7C |R "90..AS(A)...|| 000004E0: 01 41 B2 28 53 58 AC 53 58 AA 53 5A AC 53 5A AB |.A.(SX.SX.SZ.SZ.| 000004F0: 53 59 AC 53 59 29 AD 28 32 AC 53 58 AC 53 5A 29 |SY.SY).(2.SX.SZ)| 00000500: 00 32 0D 86 01 99 C7 28 31 37 29 22 56 49 4E 4B |.2.....(17)"VINK| 00000510: 4C 45 4E 53 20 4F 50 50 4F 53 49 54 45 20 53 49 |LENS OPPOSITE SI| 00000520: 44 45 20 32 20 45 52 20 22 39 30 AB A5 41 53 28 |DE 2 ER "90..AS(| 00000530: 41 29 00 56 0D 90 01 41 B2 28 53 58 AC 53 58 AA |A).V...A.(SX.SX.| 00000540: 53 59 AC 53 59 AB 53 5A AC 53 5A 29 AD 28 32 AC |SY.SY.SZ.SZ).(2.| 00000550: 53 58 AC 53 59 29 00 88 0D 9A 01 99 C7 28 31 37 |SX.SY).......(17| 00000560: 29 22 56 49 4E 4B 4C 45 4E 53 20 4F 50 50 4F 53 |)"VINKLENS OPPOS| 00000570: 49 54 45 20 53 49 44 45 20 33 20 45 52 20 22 39 |ITE SIDE 3 ER "9| 00000580: 30 AB A5 41 53 28 41 29 00 8E 0D A4 01 8E 00 C0 |0..AS(A)........| 00000590: 0D FE 01 99 22 93 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....".**********| 000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B |**************";| 000005C0: 00 F1 0D FF 01 99 22 2A 2A 20 32 20 53 49 44 45 |......"** 2 SIDE| 000005D0: 52 20 4F 47 20 45 4E 20 4E 4F 4E 2D 49 4E 43 4C |R OG EN NON-INCL| 000005E0: 55 53 49 56 45 20 56 49 4E 4B 45 4C 20 2A 2A 22 |USIVE VINKEL **"| 000005F0: 3B 00 21 0E 00 02 99 22 2A 2A 2A 2A 2A 2A 2A 2A |;.!...."********| 00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000610: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000620: 22 00 64 0E 08 02 99 22 54 59 50 45 20 49 4E 20 |".d...."TYPE IN | 00000630: 54 48 45 20 53 49 44 45 20 46 4F 52 20 57 48 49 |THE SIDE FOR WHI| 00000640: 43 48 20 54 48 45 20 4F 50 50 4F 53 49 54 45 20 |CH THE OPPOSITE | 00000650: 41 4E 47 4C 45 20 49 53 20 4B 4E 4F 57 4E 22 C7 |ANGLE IS KNOWN".| 00000660: 28 31 37 29 00 82 0E 12 02 4D B2 31 3A 8D 31 31 |(17).....M.1:.11| 00000670: 31 30 3A 53 58 B2 53 3A 8D 31 32 31 30 3A 41 58 |10:SX.S:.1210:AX| 00000680: B2 41 00 95 0E 1C 02 4D B2 32 3A 8D 31 31 31 30 |.A.....M.2:.1110| 00000690: 3A 53 59 B2 53 00 D0 0E 26 02 41 B2 BF 28 41 58 |:SY.S...&.A..(AX| 000006A0: 29 AC 53 59 AD 53 58 3A 8B B6 28 41 29 B1 31 B0 |).SY.SX:..(A).1.| 000006B0: 41 B2 30 A7 99 22 44 45 54 20 45 52 20 49 4B 4B |A.0.."DET ER IKK| 000006C0: 45 20 45 4E 20 54 52 49 41 4E 47 45 4C 22 3A 8E |E EN TRIANGEL":.| 000006D0: 00 18 0F 30 02 99 22 49 53 20 41 4E 47 4C 45 20 |...0.."IS ANGLE | 000006E0: 4F 50 50 4F 53 49 54 45 20 53 49 44 45 20 32 20 |OPPOSITE SIDE 2 | 000006F0: 47 52 45 41 54 45 52 20 28 3E 29 20 4F 52 20 4C |GREATER (>) OR L| 00000700: 45 53 20 28 3C 29 20 54 48 41 4E 20 39 30 20 44 |ES (<) THAN 90 D| 00000710: 45 47 52 45 45 53 3F 22 00 35 0F 3A 02 85 22 49 |EGREES?".5.:.."I| 00000720: 4E 44 54 41 53 54 20 3E 20 45 4C 4C 45 52 20 3C |NDTAST > ELLER <| 00000730: 20 22 3B 41 24 00 4E 0F 44 02 8B 41 24 B3 B1 22 | ";A$.N.D..A$.."| 00000740: 3C 22 AF 41 24 B3 B1 22 3E 22 A7 35 38 30 00 73 |<".A$..">".580.s| 00000750: 0F 4E 02 41 59 B2 A5 41 53 28 41 29 3A 8B 41 24 |.N.AY..AS(A):.A$| 00000760: B2 22 3E 22 AF 41 59 B3 39 30 A7 41 59 B2 39 30 |.">".AY.90.AY.90| 00000770: AA 41 59 00 9F 0F 58 02 99 C7 28 31 37 29 22 41 |.AY...X...(17)"A| 00000780: 4E 47 4C 45 20 4F 50 50 4F 53 49 54 45 20 53 49 |NGLE OPPOSITE SI| 00000790: 44 45 20 32 20 49 53 22 41 59 C7 28 31 37 29 00 |DE 2 IS"AY.(17).| 000007A0: B0 0F 62 02 41 5A B2 41 58 AB 41 59 AD 31 38 30 |..b.AZ.AX.AY.180| 000007B0: 00 DF 0F 6C 02 99 22 4C 40 4E 47 44 45 4E 20 41 |...l.."L@NGDEN A| 000007C0: 46 20 53 49 44 45 20 33 20 45 52 22 53 58 AC BF |F SIDE 3 ER"SX..| 000007D0: 28 41 5A 29 AD BF 28 41 58 29 C7 28 31 37 29 00 |(AZ)..(AX).(17).| 000007E0: 11 10 76 02 99 22 41 4E 47 4C 45 20 4F 50 50 4F |..v.."ANGLE OPPO| 000007F0: 53 49 54 45 20 53 49 44 45 20 33 20 49 53 22 B5 |SITE SIDE 3 IS".| 00000800: 28 31 38 30 30 30 AC 41 5A AA 2E 35 29 AD 31 30 |(18000.AZ..5).10| 00000810: 30 00 17 10 80 02 8E 00 3E 10 BC 02 8F 20 2A 20 |0.......>.... * | 00000820: 32 20 53 49 44 45 52 20 4F 47 20 54 48 45 20 49 |2 SIDER OG THE I| 00000830: 4E 43 4C 55 53 49 56 45 20 41 4E 47 4C 45 00 70 |NCLUSIVE ANGLE.p| 00000840: 10 C6 02 99 22 93 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....".**********| 00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B |**************";| 00000870: 00 A1 10 C7 02 99 22 2A 2A 2A 2A 2A 2A 20 32 20 |......"****** 2 | 00000880: 53 49 44 45 53 20 41 4E 44 20 49 4E 43 4C 55 53 |SIDES AND INCLUS| 00000890: 49 56 45 20 41 4E 47 4C 45 20 2A 2A 2A 2A 2A 22 |IVE ANGLE *****"| 000008A0: 3B 00 D1 10 C8 02 99 22 2A 2A 2A 2A 2A 2A 2A 2A |;......"********| 000008B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000008C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000008D0: 22 00 E4 10 D0 02 4D B2 31 3A 8D 31 31 31 30 3A |".....M.1:.1110:| 000008E0: 53 58 B2 53 00 F7 10 DA 02 4D B2 32 3A 8D 31 31 |SX.S.....M.2:.11| 000008F0: 31 30 3A 53 59 B2 53 00 0A 11 E4 02 4D B2 33 3A |10:SY.S.....M.3:| 00000900: 8D 31 32 31 30 3A 41 5A B2 41 00 2E 11 EE 02 53 |.1210:AZ.A.....S| 00000910: 5A B2 BA 28 53 58 AC 53 58 AA 53 59 AC 53 59 AB |Z..(SX.SX.SY.SY.| 00000920: 32 AC 53 58 AC 53 59 AC BE 28 41 5A 29 29 00 55 |2.SX.SY..(AZ)).U| 00000930: 11 F8 02 8B 53 5A B2 30 A7 99 22 44 45 54 20 45 |....SZ.0.."DET E| 00000940: 52 20 49 4B 4B 45 20 45 4E 20 54 52 49 41 4E 47 |R IKKE EN TRIANG| 00000950: 45 4C 22 3A 8E 00 78 11 02 03 99 22 4C 40 4E 47 |EL":..x...."L@NG| 00000960: 44 45 4E 20 41 46 20 53 49 44 45 20 33 20 45 52 |DEN AF SIDE 3 ER| 00000970: 22 53 5A C7 28 31 37 29 00 9C 11 0C 03 41 B2 28 |"SZ.(17).....A.(| 00000980: 53 59 AC 53 59 AA 53 5A AC 53 5A AB 53 58 AC 53 |SY.SY.SZ.SZ.SX.S| 00000990: 58 29 AD 28 32 AC 53 59 AC 53 5A 29 00 C6 11 16 |X).(2.SY.SZ)....| 000009A0: 03 99 22 41 4E 47 4C 45 20 4F 50 50 4F 53 49 54 |.."ANGLE OPPOSIT| 000009B0: 45 20 53 49 44 45 20 31 20 45 52 20 22 39 30 AB |E SIDE 1 ER "90.| 000009C0: A5 41 53 28 41 29 00 EA 11 20 03 41 B2 28 53 58 |.AS(A)... .A.(SX| 000009D0: AC 53 58 AA 53 5A AC 53 5A AB 53 59 AC 53 59 29 |.SX.SZ.SZ.SY.SY)| 000009E0: AD 28 32 AC 53 58 AC 53 5A 29 00 19 12 2A 03 99 |.(2.SX.SZ)...*..| 000009F0: C7 28 31 37 29 22 41 4E 47 4C 45 20 4F 50 50 4F |.(17)"ANGLE OPPO| 00000A00: 53 49 54 45 20 53 49 44 45 20 32 20 45 52 20 22 |SITE SIDE 2 ER "| 00000A10: 39 30 AB A5 41 53 28 41 29 00 1F 12 34 03 8E 00 |90..AS(A)...4...| 00000A20: 4A 12 84 03 8F 20 2A 20 32 20 56 49 4E 4B 4C 45 |J.... * 2 VINKLE| 00000A30: 52 20 4F 47 20 45 4E 20 4E 4F 4E 2D 49 4E 43 4C |R OG EN NON-INCL| 00000A40: 55 53 49 56 45 20 53 49 44 45 00 7C 12 8E 03 99 |USIVE SIDE.|....| 00000A50: 22 93 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |".**************| 00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B 00 AD 12 8F |**********";....| 00000A80: 03 99 22 2A 2A 20 32 20 56 49 4E 4B 4C 45 52 20 |.."** 2 VINKLER | 00000A90: 4F 47 20 45 4E 20 4E 4F 4E 2D 49 4E 43 4C 55 53 |OG EN NON-INCLUS| 00000AA0: 49 56 45 20 53 49 44 45 20 2A 2A 22 3B 00 DD 12 |IVE SIDE **";...| 00000AB0: 90 03 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..."************| 00000AC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 25 13 |************".%.| 00000AE0: 98 03 99 22 54 59 50 45 20 49 4E 20 54 48 45 20 |..."TYPE IN THE | 00000AF0: 41 4E 47 4C 45 20 46 4F 52 20 57 48 49 43 48 20 |ANGLE FOR WHICH | 00000B00: 54 48 45 20 4F 50 50 4F 53 49 54 45 53 49 44 45 |THE OPPOSITESIDE| 00000B10: 20 49 53 20 4B 4E 4F 57 4E 20 46 49 52 53 54 22 | IS KNOWN FIRST"| 00000B20: C7 28 31 37 29 00 43 13 A2 03 4D B2 31 3A 8D 31 |.(17).C...M.1:.1| 00000B30: 32 31 30 3A 41 58 B2 41 3A 8D 31 31 31 30 3A 53 |210:AX.A:.1110:S| 00000B40: 58 B2 53 00 56 13 AC 03 4D B2 32 3A 8D 31 32 31 |X.S.V...M.2:.121| 00000B50: 30 3A 41 59 B2 41 00 85 13 B6 03 41 B2 41 58 AB |0:AY.A.....A.AX.| 00000B60: 41 59 3A 8B 41 B3 B2 30 A7 99 22 44 45 54 20 45 |AY:.A..0.."DET E| 00000B70: 52 20 49 4B 4B 45 20 45 4E 20 54 52 49 41 4E 47 |R IKKE EN TRIANG| 00000B80: 45 4C 22 3A 8E 00 B5 13 C0 03 99 22 4C 40 4E 47 |EL":......."L@NG| 00000B90: 44 45 4E 20 41 46 20 53 49 44 45 20 32 20 45 52 |DEN AF SIDE 2 ER| 00000BA0: 20 22 53 58 AC BF 28 41 59 29 AD BF 28 41 58 29 | "SX..(AY)..(AX)| 00000BB0: C7 28 31 37 29 00 EC 13 CA 03 99 22 41 4E 47 4C |.(17)......"ANGL| 00000BC0: 45 20 4F 50 50 4F 53 49 54 45 20 53 49 44 45 20 |E OPPOSITE SIDE | 00000BD0: 33 20 45 52 20 22 B5 28 31 38 30 30 30 AC 41 AA |3 ER ".(18000.A.| 00000BE0: 2E 35 29 AD 31 30 30 C7 28 31 37 29 00 16 14 D4 |.5).100.(17)....| 00000BF0: 03 99 22 4C 40 4E 47 44 45 4E 20 41 46 20 53 49 |.."L@NGDEN AF SI| 00000C00: 44 45 20 33 20 45 52 20 22 53 58 AC BF 28 41 29 |DE 3 ER "SX..(A)| 00000C10: AD BF 28 41 58 29 00 1C 14 DE 03 8E 00 42 14 E8 |..(AX).......B..| 00000C20: 03 8F 20 2A 20 32 41 4E 47 4C 45 53 20 4F 47 20 |.. * 2ANGLES OG | 00000C30: 45 4E 20 49 4E 43 4C 55 53 49 56 45 20 53 49 44 |EN INCLUSIVE SID| 00000C40: 45 2A 00 74 14 F2 03 99 22 93 2A 2A 2A 2A 2A 2A |E*.t....".******| 00000C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000C60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000C70: 2A 2A 22 3B 00 A5 14 F3 03 99 22 2A 2A 2A 2A 20 |**";......"**** | 00000C80: 32 20 56 49 4E 4B 4C 45 52 20 4F 47 20 45 4E 20 |2 VINKLER OG EN | 00000C90: 49 4E 43 4C 55 53 49 56 45 20 53 49 44 45 20 2A |INCLUSIVE SIDE *| 00000CA0: 2A 2A 2A 22 3B 00 D5 14 F4 03 99 22 2A 2A 2A 2A |***";......"****| 00000CB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000CC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000CD0: 2A 2A 2A 2A 22 00 E8 14 FC 03 4D B2 31 3A 8D 31 |****".....M.1:.1| 00000CE0: 32 31 30 3A 41 58 B2 41 00 FB 14 06 04 4D B2 32 |210:AX.A.....M.2| 00000CF0: 3A 8D 31 32 31 30 3A 41 59 B2 41 00 0E 15 10 04 |:.1210:AY.A.....| 00000D00: 4D B2 33 3A 8D 31 32 31 30 3A 53 5A B2 53 00 3D |M.3:.1210:SZ.S.=| 00000D10: 15 1A 04 41 B2 41 58 AB 41 59 3A 8B 41 B3 B2 30 |...A.AX.AY:.A..0| 00000D20: A7 99 22 44 45 54 20 45 52 20 49 4B 4B 45 20 45 |.."DET ER IKKE E| 00000D30: 4E 20 54 52 49 41 4E 47 45 4C 22 3A 8E 00 74 15 |N TRIANGEL":..t.| 00000D40: 24 04 99 22 41 4E 47 4C 45 20 4F 50 50 4F 53 49 |$.."ANGLE OPPOSI| 00000D50: 54 45 20 53 49 44 45 20 33 20 45 52 20 22 B5 28 |TE SIDE 3 ER ".(| 00000D60: 31 38 30 30 30 AC 41 AA 2E 35 29 AD 31 30 30 C7 |18000.A..5).100.| 00000D70: 28 31 37 29 00 A3 15 2E 04 99 22 4C 40 4E 47 44 |(17)......"L@NGD| 00000D80: 45 4E 20 41 46 20 53 49 44 45 20 31 20 45 52 20 |EN AF SIDE 1 ER | 00000D90: 22 53 5A AC BF 28 41 58 29 AD BF 28 41 29 C7 28 |"SZ..(AX)..(A).(| 00000DA0: 31 37 29 00 CD 15 38 04 99 22 4C 40 4E 47 44 45 |17)...8.."L@NGDE| 00000DB0: 4E 20 41 46 20 53 49 44 45 20 32 20 45 52 20 22 |N AF SIDE 2 ER "| 00000DC0: 53 5A AC BF 28 41 59 29 AD BF 28 41 29 00 D3 15 |SZ..(AY)..(A)...| 00000DD0: 42 04 8E 00 F7 15 4C 04 8F 20 2A 2A 2A 2A 2A 2A |B.....L.. ******| 00000DE0: 2A 2A 20 54 41 47 20 45 4E 20 53 49 44 45 20 2A |** TAG EN SIDE *| 00000DF0: 2A 2A 2A 2A 2A 2A 2A 00 2B 16 56 04 53 B2 30 3A |*******.+.V.S.0:| 00000E00: 99 22 49 4E 44 54 41 53 54 20 4C 40 4E 47 44 45 |."INDTAST L@NGDE| 00000E10: 4E 20 41 46 20 53 49 44 45 22 4D 22 3A 20 22 3B |N AF SIDE"M": ";| 00000E20: 3A 85 53 3A 99 C7 28 31 37 29 3A 00 57 16 60 04 |:.S:..(17):.W.`.| 00000E30: 8B 53 B3 B2 30 A7 99 22 44 45 54 20 45 52 20 49 |.S..0.."DET ER I| 00000E40: 4B 4B 45 20 45 4E 20 54 52 49 41 4E 47 45 4C 21 |KKE EN TRIANGEL!| 00000E50: 22 3A 89 31 31 31 30 00 5D 16 6A 04 8E 00 7F 16 |":.1110.].j.....| 00000E60: B0 04 8F 20 2A 2A 2A 2A 2A 2A 20 47 45 54 20 41 |... ****** GET A| 00000E70: 4E 20 41 4E 47 4C 45 20 2A 2A 2A 2A 2A 2A 2A 00 |N ANGLE *******.| 00000E80: B4 16 BA 04 41 B2 30 3A 99 22 54 59 50 45 20 41 |....A.0:."TYPE A| 00000E90: 4E 47 4C 45 20 4F 50 50 4F 53 49 54 45 20 53 49 |NGLE OPPOSITE SI| 00000EA0: 44 45 22 4D 22 3A 20 22 3B 3A 85 41 3A 99 C7 28 |DE"M": ";:.A:..(| 00000EB0: 31 37 29 3A 00 EB 16 C4 04 8B 41 B3 B2 30 2E 30 |17):......A..0.0| 00000EC0: 30 31 B0 41 B1 B2 31 38 30 A7 99 22 44 45 54 20 |01.A..180.."DET | 00000ED0: 45 52 20 49 4B 4B 45 20 45 4E 20 54 52 49 41 4E |ER IKKE EN TRIAN| 00000EE0: 47 4C 45 21 22 3A 89 31 32 31 30 00 F9 16 CE 04 |GLE!":.1210.....| 00000EF0: 41 B2 41 AD 31 38 30 3A 8E 00 00 80 |A.A.180:.... |
.......53280,11:.53281,9:."..".B.... ***
****** TRIANGLER *********.E....G(147),"
TRIANGLER"G(17)......"DETTE PROGRA
M VIL FINDE DEN REMAINING"...(.."SIDE OG
VINKEL AF EN TRIANGEL."G(17)...2.."HVIL
KEN OPLYSNINGER HAR DU ?"G(17)...<.."1 S
SS : ALLE 3 SIDER"G(17).:.F.."2 SSA : 2
SIDER OG NON-INCLUSIVE VINK."G(17).K.P..
"3 SAS : 2 SIDER OG INCLUSIVE VINKEL."G(
17)...Z.."4 SAA : 2 VINKLER OG NON-INCLU
SIV SIDE"G(17).O.D.."5 ASA : 2 VINKLER O
G INCLUSIVE SIDE."G(17)...N.. ****** MAK
E SELECTION ******...X..:."HVILKEN NR. 0
NSKES ";N.M....N.1.N.5.N...(N)..".PR0V M
ED 1. 2. 3. 4. ELLER 5.":.120.T.... ** D
EFINER ARCSINE FUNKTION, I *...... ** GR
ADER MED 2 DECIMAL PLADS **.E.....AS(X).
.(18000.A(X..(1.X.X))..5).100... .. ****
**** SPLIT OFF *********......:.N.310,51
0,710,910,1010.)....G(17)"ANOTHER GO ? J
ELLER N".F....G$:.G$.."J".G$.."N".190.T
.H..G$."J"...X.R..G(147)" TAK FOR DENNE
GANG.":....,.. ****** ALLE 3 SIDER *****
***.M.6..".*****************************
***********";...7.."********** ALLE 3 SI
DER KENDT **********";...8.."***********
*****************************".A.@.M.1:.
1110:SX.S.T.J.M.2:.1110:SY.S.G.T.M.3:.11
10:SZ.S...^.A.(SY.SZ.SX.SX).(2.SY.SZ)...
H...(A)..1.."DET ER IKKE EN TRIANGEL":..
..R.."VINKLENS OPPOSITE SIDE 1 ER "90..A
S(A)...|.A.(SX.SX.SZ.SZ.SY.SY).(2.SX.SZ)
.2....G(17)"VINKLENS OPPOSITE SIDE 2 ER
"90..AS(A).V...A.(SX.SX.SY.SY.SZ.SZ).(2.
SX.SY)......G(17)"VINKLENS OPPOSITE SIDE
3 ER "90..AS(A)............".**********
******************************";......"*
* 2 SIDER OG EN NON-INCLUSIVE VINKEL **"
;.!...."********************************
********".D...."TYPE IN THE SIDE FOR WHI
CH THE OPPOSITE ANGLE IS KNOWN"G(17)....
.M.1:.1110:SX.S:.1210:AX.A.....M.2:.1110
:SY.S.P.&.A..(AX).SY.SX:..(A).1.A.0.."DE
T ER IKKE EN TRIANGEL":....0.."IS ANGLE
OPPOSITE SIDE 2 GREATER (>) OR LES (<) T
HAN 90 DEGREES?".5.:.."INDTAST > ELLER <
";A$.N.D..A$.."<".A$..">".580.S.N.AY..A
S(A):.A$.">".AY.90.AY.90.AY...X..G(17)"A
NGLE OPPOSITE SIDE 2 IS"AYG(17)...B.AZ.A
X.AY.180...L.."L@NGDEN AF SIDE 3 ER"SX..
(AZ)..(AX)G(17)...V.."ANGLE OPPOSITE SID
E 3 IS".(18000.AZ..5).100.......>.... *
2 SIDER OG THE INCLUSIVE ANGLE.P.F..".**
**************************************";
...G.."****** 2 SIDES AND INCLUSIVE ANGL
E *****";.Q.H.."************************
****************"...P.M.1:.1110:SX.S...Z
.M.2:.1110:SY.S.....M.3:.1210:AZ.A.....S
Z..(SX.SX.SY.SY.2.SX.SY..(AZ)).U....SZ.0
.."DET ER IKKE EN TRIANGEL":..X...."L@NG
DEN AF SIDE 3 ER"SZG(17).....A.(SY.SY.SZ
.SZ.SX.SX).(2.SY.SZ).F...."ANGLE OPPOSIT
E SIDE 1 ER "90..AS(A)... .A.(SX.SX.SZ.S
Z.SY.SY).(2.SX.SZ)...*..G(17)"ANGLE OPPO
SITE SIDE 2 ER "90..AS(A)...4...J.... *
2 VINKLER OG EN NON-INCLUSIVE SIDE.|....
".**************************************
**";......"** 2 VINKLER OG EN NON-INCLUS
IVE SIDE **";......"********************
********************".%...."TYPE IN THE
ANGLE FOR WHICH THE OPPOSITESIDE IS KNOW
N FIRST"G(17).C...M.1:.1210:AX.A:.1110:S
X.S.V...M.2:.1210:AY.A.....A.AX.AY:.A..0
.."DET ER IKKE EN TRIANGEL":......."L@NG
DEN AF SIDE 2 ER "SX..(AY)..(AX)G(17)...
J.."ANGLE OPPOSITE SIDE 3 ER ".(18000.A.
.5).100G(17)...T.."L@NGDEN AF SIDE 3 ER
"SX..(A)..(AX).......B.... * 2ANGLES OG
EN INCLUSIVE SIDE*.T....".**************
**************************";......"****
2 VINKLER OG EN INCLUSIVE SIDE ****";.U.
..."************************************
****".....M.1:.1210:AX.A.....M.2:.1210:A
Y.A.....M.3:.1210:SZ.S.=...A.AX.AY:.A..0
.."DET ER IKKE EN TRIANGEL":..T.$.."ANGL
E OPPOSITE SIDE 3 ER ".(18000.A..5).100G
(17)......"L@NGDEN AF SIDE 1 ER "SZ..(AX
)..(A)G(17).M.8.."L@NGDEN AF SIDE 2 ER "
SZ..(AY)..(A).S.B.....L.. ******** TAG E
N SIDE ********.+.V.S.0:."INDTAST L@NGDE
N AF SIDE"M": ";:.S:.G(17):.W.`..S..0.."
DET ER IKKE EN TRIANGEL!":.1110.].J....
... ****** GET AN ANGLE *******.....A.0:
."TYPE ANGLE OPPOSITE SIDE"M": ";:.A:.G(
17):...D..A..0.001.A..180.."DET ER IKKE
EN TRIANGLE!":.1210...N.A.A.180:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL