HYPERPERSPEC

00000000: 01 08 0D 08 01 00 64 32  20 49 4E 49 54 00 19 08  |......d2 INIT...|
00000010: 0A 00 64 31 20 46 55 4E  43 00 36 08 14 00 55 31  |..d1 FUNC.6...U1|
00000020: B2 55 AC FF AD 31 30 3A  20 52 B2 56 AC 28 32 30  |.U...10: R.V.(20|
00000030: AB 56 29 AD 34 30 00 49  08 1E 00 58 28 55 2C 56  |.V).40.I...X(U,V|
00000040: 29 B2 52 AC BF 28 55 31  29 00 6B 08 28 00 5A 28  |).R..(U1).k.(.Z(|
00000050: 55 2C 56 29 B2 AB 28 52  AC BE 28 55 31 29 AA 28  |U,V)..(R..(U1).(|
00000060: 56 AB 31 30 29 AE 32 AD  31 30 29 00 7B 08 32 00  |V.10).2.10).{.2.|
00000070: 59 28 55 2C 56 29 B2 56  AB 31 30 00 82 08 3C 00  |Y(U,V).V.10...<.|
00000080: 64 34 00 91 08 E8 03 64  31 20 50 45 52 53 50 45  |d4.....d1 PERSPE|
00000090: 43 00 B7 08 F2 03 58 52  20 B2 20 41 28 31 2C 31  |C.....XR . A(1,1|
000000A0: 29 AC 58 28 55 2C 56 29  AA 20 41 28 31 2C 32 29  |).X(U,V). A(1,2)|
000000B0: AC 59 28 55 2C 56 29 00  DD 08 FC 03 59 52 20 B2  |.Y(U,V).....YR .|
000000C0: 20 41 28 32 2C 31 29 AC  58 28 55 2C 56 29 AA 20  | A(2,1).X(U,V). |
000000D0: 41 28 32 2C 32 29 AC 59  28 55 2C 56 29 00 F2 08  |A(2,2).Y(U,V)...|
000000E0: 06 04 58 53 B2 58 52 AC  28 44 AD 28 44 AA 59 52  |..XS.XR.(D.(D.YR|
000000F0: 29 29 00 0F 09 10 04 59  53 B2 28 5A 28 55 2C 56  |)).....YS.(Z(U,V|
00000100: 29 AB 45 29 AC 28 44 AD  28 44 AA 59 52 29 29 00  |).E).(D.(D.YR)).|
00000110: 16 09 1A 04 64 34 00 23  09 24 04 64 31 20 46 43  |....d4.#.$.d1 FC|
00000120: 4F 4D 50 00 56 09 2E 04  99 22 13 22 3B 3A 20 64  |OMP.V....".";: d|
00000130: 07 30 2C 30 2C 34 30 2C  32 2C 33 32 2C 30 3A 20  |.0,0,40,2,32,0: |
00000140: 64 07 20 30 2C 30 2C 32  30 AD 53 AA 31 2C 31 2C  |d. 0,0,20.S.1,1,|
00000150: 31 36 30 2C 31 30 00 66  09 38 04 81 55 B2 30 A4  |160,10.f.8..U.0.|
00000160: 32 30 20 A9 20 53 00 70  09 42 04 99 22 46 22 3B  |20 . S.p.B.."F";|
00000170: 00 83 09 4C 04 3A 20 81  20 56 B2 30 A4 32 30 20  |...L.: . V.0.20 |
00000180: A9 20 53 00 91 09 56 04  3A 20 64 33 20 46 55 4E  |. S...V.: d3 FUN|
00000190: 43 00 9B 09 60 04 82 20  56 2C 55 00 A1 09 6A 04  |C...`.. V,U...j.|
000001A0: 99 00 AE 09 74 04 64 31  20 50 43 4F 4D 50 00 E1  |....t.d1 PCOMP..|
000001B0: 09 7E 04 99 22 13 22 3B  3A 20 64 07 30 2C 30 2C  |.~..".";: d.0,0,|
000001C0: 34 30 2C 32 2C 33 32 2C  30 3A 20 64 07 20 30 2C  |40,2,32,0: d. 0,|
000001D0: 30 2C 32 30 AD 53 AA 31  2C 31 2C 31 36 30 2C 31  |0,20.S.1,1,160,1|
000001E0: 30 00 F2 09 88 04 81 20  55 B2 30 A4 32 30 20 A9  |0...... U.0.20 .|
000001F0: 20 53 00 FC 09 92 04 99  22 50 22 3B 00 0F 0A 9C  | S......"P";....|
00000200: 04 3A 20 81 20 56 B2 30  A4 32 30 20 A9 20 53 00  |.: . V.0.20 . S.|
00000210: 22 0A A6 04 3A 20 20 20  64 33 20 50 45 52 53 50  |"...:   d3 PERSP|
00000220: 45 43 00 35 0A B0 04 3A  20 20 20 58 53 28 55 2C  |EC.5...:   XS(U,|
00000230: 56 29 B2 58 53 00 48 0A  BA 04 3A 20 20 20 59 53  |V).XS.H...:   YS|
00000240: 28 55 2C 56 29 B2 59 53  00 60 0A C4 04 3A 20 20  |(U,V).YS.`...:  |
00000250: 20 8B 20 58 53 B3 58 4C  20 A7 20 58 4C B2 58 53  | . XS.XL . XL.XS|
00000260: 00 78 0A CE 04 3A 20 20  20 8B 20 58 53 B1 58 48  |.x...:   . XS.XH|
00000270: 20 A7 20 58 48 B2 58 53  00 90 0A D8 04 3A 20 20  | . XH.XS.....:  |
00000280: 20 8B 20 59 53 B3 59 4C  20 A7 20 59 4C B2 59 53  | . YS.YL . YL.YS|
00000290: 00 A8 0A E2 04 3A 20 20  20 8B 20 59 53 B1 59 48  |.....:   . YS.YH|
000002A0: 20 A7 20 59 48 B2 59 53  00 B2 0A EC 04 82 20 56  | . YH.YS...... V|
000002B0: 2C 55 00 B8 0A F6 04 99  00 C5 0A 00 05 64 33 20  |,U...........d3 |
000002C0: 53 43 41 4C 45 00 CF 0A  0A 05 64 31 20 64 0A 00  |SCALE.....d1 d..|
000002D0: DA 0A 14 05 64 01 20 30  2C 31 00 EB 0A 1E 05 81  |....d. 0,1......|
000002E0: 20 55 B2 30 A4 32 30 20  A9 20 53 00 02 0B 28 05  | U.0.20 . S...(.|
000002F0: 3A 20 58 41 B2 58 30 AA  58 53 28 55 2C 30 29 AC  |: XA.X0.XS(U,0).|
00000300: 58 31 00 19 0B 32 05 3A  20 58 42 B2 58 30 AA 58  |X1...2.: XB.X0.X|
00000310: 53 28 30 2C 55 29 AC 58  31 00 30 0B 3C 05 3A 20  |S(0,U).X1.0.<.: |
00000320: 59 41 B2 59 30 AA 59 53  28 55 2C 30 29 AC 59 31  |YA.Y0.YS(U,0).Y1|
00000330: 00 47 0B 46 05 3A 20 59  42 B2 59 30 AA 59 53 28  |.G.F.: YB.Y0.YS(|
00000340: 30 2C 55 29 AC 59 31 00  5A 0B 50 05 3A 20 81 20  |0,U).Y1.Z.P.: . |
00000350: 56 B2 53 A4 32 30 20 A9  20 53 00 73 0B 5A 05 3A  |V.S.20 . S.s.Z.:|
00000360: 20 20 20 41 58 B2 58 30  AA 58 53 28 55 2C 56 29  |   AX.X0.XS(U,V)|
00000370: AC 58 31 00 8C 0B 64 05  3A 20 20 20 42 58 B2 58  |.X1...d.:   BX.X|
00000380: 30 AA 58 53 28 56 2C 55  29 AC 58 31 00 A5 0B 6E  |0.XS(V,U).X1...n|
00000390: 05 3A 20 20 20 41 59 B2  59 30 AA 59 53 28 55 2C  |.:   AY.Y0.YS(U,|
000003A0: 56 29 AC 59 31 00 BE 0B  78 05 3A 20 20 20 42 59  |V).Y1...x.:   BY|
000003B0: B2 59 30 AA 59 53 28 56  2C 55 29 AC 59 31 00 D7  |.Y0.YS(V,U).Y1..|
000003C0: 0B 82 05 3A 20 20 20 64  03 20 58 41 2C 59 41 2C  |...:   d. XA,YA,|
000003D0: 41 58 2C 41 59 2C 31 00  F0 0B 8C 05 3A 20 20 20  |AX,AY,1.....:   |
000003E0: 64 03 20 58 42 2C 59 42  2C 42 58 2C 42 59 2C 31  |d. XB,YB,BX,BY,1|
000003F0: 00 13 0C 96 05 3A 20 20  20 58 41 B2 41 58 3A 20  |.....:   XA.AX: |
00000400: 58 42 B2 42 58 3A 20 59  41 B2 41 59 3A 20 59 42  |XB.BX: YA.AY: YB|
00000410: B2 42 59 00 1D 0C A0 05  82 20 56 2C 55 00 38 0C  |.BY...... V,U.8.|
00000420: AA 05 64 20 3A 64 29 64  56 B3 B1 30 3A 64 70 30  |..d :d)dV..0:dp0|
00000430: 3A 64 32 20 4D 41 49 4E  00 44 0C B4 05 64 31 20  |:d2 MAIN.D...d1 |
00000440: 49 4E 49 54 00 57 0C BE  05 99 22 93 90 20 57 4F  |INIT.W....".. WO|
00000450: 52 4B 49 4E 47 2E 2E 00  65 0C C8 05 86 20 46 24  |RKING...e.... F$|
00000460: 28 38 2C 32 29 00 7D 0C  D2 05 81 20 49 B2 31 A4  |(8,2).}.... I.1.|
00000470: 38 3A 87 20 46 24 28 49  2C 30 29 3A 82 00 89 0C  |8:. F$(I,0):....|
00000480: DC 05 81 20 4A B2 31 A4  32 00 95 0C E6 05 81 20  |... J.1.2...... |
00000490: 49 B2 31 A4 34 00 A2 0C  F0 05 87 46 24 28 49 2C  |I.1.4......F$(I,|
000004A0: 4A 29 00 AC 0C FA 05 82  20 49 2C 4A 00 B9 0C 04  |J)...... I,J....|
000004B0: 06 86 20 41 28 32 2C 32  29 00 DC 0C 0E 06 86 20  |.. A(2,2)...... |
000004C0: 58 28 32 30 2C 32 30 29  20 2C 59 28 32 30 2C 32  |X(20,20) ,Y(20,2|
000004D0: 30 29 2C 20 5A 28 32 30  2C 32 30 29 00 F7 0C 18  |0), Z(20,20)....|
000004E0: 06 86 20 58 53 28 32 30  2C 32 30 29 2C 20 59 53  |.. XS(20,20), YS|
000004F0: 28 32 30 2C 32 30 29 00  15 0D 22 06 44 B2 35 30  |(20,20)...".D.50|
00000500: 30 3A 20 45 B2 32 30 30  3A 20 46 49 B2 32 30 30  |0: E.200: FI.200|
00000510: 3A 20 53 B2 32 00 21 0D  2C 06 64 31 20 4D 41 49  |: S.2.!.,.d1 MAI|
00000520: 4E 00 2E 0D 36 06 55 B2  30 3A 56 B2 30 3A 00 3C  |N...6.U.0:V.0:.<|
00000530: 0D 40 06 64 33 20 56 45  4E 54 45 52 00 4D 0D 4A  |.@.d3 VENTER.M.J|
00000540: 06 4A B2 30 3A 20 64 33  20 54 41 4C 4B 00 62 0D  |.J.0: d3 TALK.b.|
00000550: 54 06 8B 20 51 B2 31 20  A7 20 64 32 20 46 43 4F  |T.. Q.1 . d2 FCO|
00000560: 4D 50 00 77 0D 5E 06 8B  20 51 B2 32 20 A7 20 64  |MP.w.^.. Q.2 . d|
00000570: 32 20 50 43 4F 4D 50 00  88 0D 68 06 8B 20 51 B2  |2 PCOMP...h.. Q.|
00000580: 33 20 A7 20 64 32 20 93  00 99 0D 72 06 8B 20 51  |3 . d2 ....r.. Q|
00000590: B2 34 20 A7 20 64 32 20  94 00 AB 0D 7C 06 8B 20  |.4 . d2 ....|.. |
000005A0: 51 B2 35 20 A7 20 64 32  20 64 0A 00 C0 0D 86 06  |Q.5 . d2 d......|
000005B0: 8B 20 51 B2 36 20 A7 20  64 32 20 56 49 45 55 57  |. Q.6 . d2 VIEUW|
000005C0: 00 E7 0D 90 06 8B 20 51  B2 37 20 A7 20 99 22 4E  |...... Q.7 . ."N|
000005D0: 4F 54 20 49 4D 50 4C 45  4D 45 4E 54 45 44 22 3A  |OT IMPLEMENTED":|
000005E0: 64 32 20 4D 41 49 4E 00  F9 0D 9A 06 8B 20 51 B2  |d2 MAIN...... Q.|
000005F0: 38 20 A7 20 64 69 3A 20  80 00 00 0E A4 06 64 34  |8 . di: ......d4|
00000600: 00 0D 0E AE 06 64 31 20  53 43 41 4C 45 00 44 0E  |.....d1 SCALE.D.|
00000610: B8 06 8B 20 28 58 48 B2  58 4C 29 B0 28 59 48 B2  |... (XH.XL).(YH.|
00000620: 59 4C 29 20 A7 20 99 22  50 49 43 54 55 52 45 20  |YL) . ."PICTURE |
00000630: 47 4F 45 53 20 46 4C 41  54 2E 22 3A 20 64 32 20  |GOES FLAT.": d2 |
00000640: 4D 41 49 4E 00 87 0E C2  06 8F 20 20 58 20 4F 46  |MAIN......  X OF|
00000650: 20 59 44 49 4D 45 4E 53  49 45 20 42 45 50 41 41  | YDIMENSIE BEPAA|
00000660: 4C 54 20 53 43 48 41 64  59 47 2E 20 49 4E 20 41  |LT SCHAdYG. IN A|
00000670: 4E 44 45 52 45 20 52 49  43 48 54 49 4E 47 20 47  |NDERE RICHTING G|
00000680: 45 64 23 45 52 44 2E 00  B3 0E CC 06 8B 20 28 58  |Ed#ERD....... (X|
00000690: 48 AB 58 4C 29 AD 28 59  48 AB 59 4C 29 20 B1 20  |H.XL).(YH.YL) . |
000006A0: 28 33 30 30 AD 31 38 30  29 20 A7 20 64 33 20 58  |(300.180) . d3 X|
000006B0: 4C 49 4D 00 DA 0E D6 06  8B 20 28 58 48 AB 58 4C  |LIM...... (XH.XL|
000006C0: 29 AD 28 59 48 AB 59 4C  29 20 B1 20 28 33 30 30  |).(YH.YL) . (300|
000006D0: AD 31 38 30 29 20 A7 20  64 34 00 FA 0E E0 06 59  |.180) . d4.....Y|
000006E0: 31 B2 31 38 30 AD 28 59  48 AB 59 4C 29 3A 20 59  |1.180.(YH.YL): Y|
000006F0: 30 B2 31 30 AB 59 31 AC  59 4C 00 1A 0F EA 06 58  |0.10.Y1.YL.....X|
00000700: 31 B2 59 31 3A 20 58 30  20 B2 31 36 30 AB 58 31  |1.Y1: X0 .160.X1|
00000710: AC 28 58 48 AA 58 4C 29  AD 32 00 21 0F F4 06 64  |.(XH.XL).2.!...d|
00000720: 34 00 2D 0F FE 06 64 31  20 58 4C 49 4D 00 4D 0F  |4.-...d1 XLIM.M.|
00000730: 08 07 58 31 B2 33 30 30  AD 28 58 48 AB 58 4C 29  |..X1.300.(XH.XL)|
00000740: 3A 20 58 30 B2 31 30 AB  58 31 AC 58 4C 00 6D 0F  |: X0.10.X1.XL.m.|
00000750: 12 07 59 31 B2 58 31 3A  20 59 30 20 B2 31 30 30  |..Y1.X1: Y0 .100|
00000760: AB 59 31 AC 28 59 48 AA  59 4C 29 AD 32 00 74 0F  |.Y1.(YH.YL).2.t.|
00000770: 1C 07 64 34 00 7D 0F 26  07 64 31 20 93 00 8E 0F  |..d4.}.&.d1 ....|
00000780: 30 07 4A B2 31 3A 20 64  33 20 54 41 4C 4B 00 A8  |0.J.1: d3 TALK..|
00000790: 0F 3A 07 8B 20 51 B2 31  20 A7 20 46 24 B2 22 46  |.:.. Q.1 . F$."F|
000007A0: 55 4E 43 54 49 4F 4E 22  00 C1 0F 44 07 8B 20 51  |UNCTION"...D.. Q|
000007B0: B2 32 20 A7 20 46 24 B2  22 50 49 43 54 55 52 45  |.2 . F$."PICTURE|
000007C0: 22 00 DE 0F 4E 07 8B 20  51 B2 33 20 A7 20 99 22  |"...N.. Q.3 . ."|
000007D0: 93 44 49 52 27 27 24 22  3A 20 64 32 20 93 00 F2  |.DIR''$": d2 ...|
000007E0: 0F 58 07 8B 20 51 B1 33  20 A7 20 64 32 20 4D 41  |.X.. Q.3 . d2 MA|
000007F0: 49 4E 00 11 10 62 07 99  22 13 4E 41 4D 45 20 4F  |IN...b..".NAME O|
00000800: 46 20 22 20 46 24 22 20  54 4F 20 4C 4F 41 44 22  |F " F$" TO LOAD"|
00000810: 3B 00 1A 10 6C 07 85 20  51 24 00 30 10 76 07 9F  |;...l.. Q$.0.v..|
00000820: 20 32 2C 38 2C 32 2C 51  24 AA 22 2C 53 2C 52 22  | 2,8,2,Q$.",S,R"|
00000830: 00 3A 10 80 07 84 32 2C  20 53 00 4B 10 8A 07 81  |.:....2, S.K....|
00000840: 20 55 B2 30 A4 32 30 20  A9 20 53 00 5C 10 94 07  | U.0.20 . S.\...|
00000850: 81 20 56 B2 30 A4 32 30  20 A9 20 53 00 7A 10 9E  |. V.0.20 . S.z..|
00000860: 07 84 20 32 2C 20 58 28  55 2C 56 29 2C 59 28 55  |.. 2, X(U,V),Y(U|
00000870: 2C 56 29 2C 5A 28 55 2C  56 29 00 9F 10 A8 07 8B  |,V),Z(U,V)......|
00000880: 20 51 B2 31 20 A7 20 84  32 2C 20 58 28 55 2C 56  | Q.1 . .2, X(U,V|
00000890: 29 3B 59 28 55 2C 56 29  3B 5A 28 55 2C 56 29 00  |);Y(U,V);Z(U,V).|
000008A0: BF 10 B2 07 8B 20 51 B2  32 20 A7 20 84 32 2C 20  |..... Q.2 . .2, |
000008B0: 58 53 28 55 2C 56 29 3B  59 53 28 55 2C 56 29 00  |XS(U,V);YS(U,V).|
000008C0: C9 10 BC 07 82 20 56 2C  55 00 D0 10 C6 07 A0 32  |..... V,U......2|
000008D0: 00 E5 10 D0 07 8B 20 51  B2 31 20 A7 20 64 32 20  |...... Q.1 . d2 |
000008E0: 46 43 4F 4D 50 00 F2 10  DA 07 64 32 20 50 43 4F  |FCOMP.....d2 PCO|
000008F0: 4D 50 00 FB 10 E4 07 64  31 20 94 00 0B 11 EE 07  |MP.....d1 ......|
00000900: 4A B2 32 3A 64 33 20 54  41 4C 4B 00 25 11 F8 07  |J.2:d3 TALK.%...|
00000910: 8B 20 51 B2 31 20 A7 20  46 24 B2 22 46 55 4E 43  |. Q.1 . F$."FUNC|
00000920: 54 49 4F 4E 22 00 3E 11  02 08 8B 20 51 B2 32 20  |TION".>.... Q.2 |
00000930: A7 20 46 24 B2 22 50 49  43 54 55 52 45 22 00 5B  |. F$."PICTURE".[|
00000940: 11 0C 08 8B 20 51 B2 33  20 A7 20 99 22 93 44 49  |.... Q.3 . .".DI|
00000950: 52 27 27 24 22 3A 20 64  32 20 94 00 6F 11 16 08  |R''$": d2 ..o...|
00000960: 8B 20 51 B1 33 20 A7 20  64 32 20 4D 41 49 4E 00  |. Q.3 . d2 MAIN.|
00000970: 8D 11 20 08 99 22 13 4E  41 4D 45 20 4F 46 20 22  |.. ..".NAME OF "|
00000980: 46 24 22 20 54 4F 20 53  41 56 45 22 3B 00 96 11  |F$" TO SAVE";...|
00000990: 2A 08 85 20 51 24 00 B2  11 34 08 9F 20 32 2C 38  |*.. Q$...4.. 2,8|
000009A0: 2C 32 2C 22 40 30 3A 22  AA 51 24 AA 22 2C 53 2C  |,2,"@0:".Q$.",S,|
000009B0: 57 22 00 BC 11 3E 08 98  32 2C 20 53 00 CD 11 48  |W"...>..2, S...H|
000009C0: 08 81 20 55 B2 30 A4 32  30 20 A9 20 53 00 DE 11  |.. U.0.20 . S...|
000009D0: 52 08 81 20 56 B2 30 A4  32 30 20 A9 20 53 00 04  |R.. V.0.20 . S..|
000009E0: 12 5C 08 8B 20 51 B2 31  20 A7 20 98 20 32 2C 20  |.\.. Q.1 . . 2, |
000009F0: 58 28 55 2C 56 29 3B 59  28 55 2C 56 29 3B 5A 28  |X(U,V);Y(U,V);Z(|
00000A00: 55 2C 56 29 00 25 12 66  08 8B 20 51 B2 32 20 A7  |U,V).%.f.. Q.2 .|
00000A10: 20 98 20 32 2C 20 58 53  28 55 2C 56 29 3B 59 53  | . 2, XS(U,V);YS|
00000A20: 28 55 2C 56 29 00 2F 12  70 08 82 20 56 2C 55 00  |(U,V)./.p.. V,U.|
00000A30: 37 12 7A 08 A0 20 32 00  43 12 84 08 64 32 20 4D  |7.z.. 2.C...d2 M|
00000A40: 41 49 4E 00 50 12 8E 08  64 31 20 56 49 45 55 57  |AIN.P...d1 VIEUW|
00000A50: 00 73 12 98 08 99 22 93  11 11 11 11 11 44 49 53  |.s...."......DIS|
00000A60: 54 41 4E 43 45 2C 20 28  3D 22 44 22 9D 29 22 3B  |TANCE, (="D".)";|
00000A70: 3A 85 44 00 91 12 A2 08  99 22 45 4C 45 56 41 54  |:.D......"ELEVAT|
00000A80: 49 4F 4E 2C 20 28 3D 22  45 22 9D 29 22 3B 3A 85  |ION, (="E".)";:.|
00000A90: 45 00 AA 12 AC 08 99 22  46 49 2C 20 28 3D 22 46  |E......"FI, (="F|
00000AA0: 49 22 9D 29 22 3B 3A 85  46 49 00 CB 12 B6 08 99  |I".)";:.FI......|
00000AB0: 22 53 54 45 50 53 49 5A  45 28 31 2C 32 2C 34 2C  |"STEPSIZE(1,2,4,|
00000AC0: 3D 22 53 22 9D 29 22 3B  3A 85 53 00 D7 12 C0 08  |="S".)";:.S.....|
00000AD0: 64 32 20 4D 41 49 4E 00  E3 12 CA 08 64 31 20 54  |d2 MAIN.....d1 T|
00000AE0: 41 4C 4B 00 F2 12 D4 08  64 20 3A 64 29 20 64 56  |ALK.....d :d) dV|
00000AF0: B2 30 00 1E 13 DE 08 99  22 93 11 11 11 11 20 20  |.0......".....  |
00000B00: 20 20 41 55 54 4F 53 43  41 4C 49 4E 47 20 46 55  |  AUTOSCALING FU|
00000B10: 4E 43 54 49 4F 4E 20 50  4C 4F 54 54 45 52 00 43  |NCTION PLOTTER.C|
00000B20: 13 E8 08 99 22 20 20 20  20 20 20 20 20 20 55 53  |...."         US|
00000B30: 49 4E 47 20 53 49 4D 4F  4E 53 20 42 41 53 49 43  |ING SIMONS BASIC|
00000B40: 22 3A 99 00 50 13 F2 08  81 20 49 B2 31 A4 38 3A  |":..P.... I.1.8:|
00000B50: 00 69 13 FC 08 99 20 49  20 22 9D 9D 9D 46 1D 1D  |.i.... I "...F..|
00000B60: 20 22 46 24 28 49 2C 4A  29 00 71 13 06 09 82 20  | "F$(I,J).q.... |
00000B70: 49 00 85 13 10 09 64 07  30 2C 30 2C 34 30 2C 32  |I.....d.0,0,40,2|
00000B80: 2C 33 32 2C 30 00 A2 13  1A 09 99 20 22 13 1C 12  |,32,0...... "...|
00000B90: 20 20 45 4E 54 45 52 20  43 48 4F 49 43 45 20 20  |  ENTER CHOICE  |
00000BA0: 92 90 00 AE 13 24 09 64  1F 20 32 2C 34 35 00 C2  |.....$.d. 2,45..|
00000BB0: 13 2E 09 64 20 3A 51 B2  64 56 3A 64 29 20 51 B3  |...d :Q.dV:d) Q.|
00000BC0: B1 30 00 C9 13 38 09 64  69 00 D8 13 42 09 64 20  |.0...8.di...B.d |
00000BD0: 3A 64 29 20 64 56 B2 30  00 DF 13 4C 09 64 34 00  |:d) dV.0...L.d4.|
00000BE0: ED 13 56 09 64 31 20 56  45 4E 54 45 52 00 08 14  |..V.d1 VENTER...|
00000BF0: 60 09 8F 20 45 4E 54 45  52 20 4E 45 57 20 56 49  |`.. ENTER NEW VI|
00000C00: 45 55 57 50 4F 49 4E 54  00 14 14 6A 09 64 33 20  |EUWPOINT...j.d3 |
00000C10: 46 55 4E 43 00 23 14 74  09 64 33 20 50 45 52 53  |FUNC.#.t.d3 PERS|
00000C20: 50 45 43 00 42 14 7E 09  58 4C B2 58 53 3A 20 58  |PEC.B.~.XL.XS: X|
00000C30: 48 B2 58 53 3A 20 59 4C  B2 59 53 3A 20 59 48 B2  |H.XS: YL.YS: YH.|
00000C40: 59 53 00 61 14 88 09 41  28 31 2C 31 29 B2 BE 28  |YS.a...A(1,1)..(|
00000C50: 46 49 29 3A 20 41 28 31  2C 32 29 B2 BF 28 46 49  |FI): A(1,2)..(FI|
00000C60: 29 00 81 14 92 09 41 28  32 2C 31 29 B2 AB BF 28  |).....A(2,1)...(|
00000C70: 46 49 29 3A 20 41 28 32  2C 32 29 B2 BE 28 46 49  |FI): A(2,2)..(FI|
00000C80: 29 00 88 14 9C 09 64 34  00 A6 14 A6 09 83 20 22  |).....d4...... "|
00000C90: 43 4F 4D 50 55 54 45 20  46 55 4E 43 54 49 4F 4E  |COMPUTE FUNCTION|
00000CA0: 20 41 52 52 41 59 00 C3  14 B0 09 83 20 22 43 4F  | ARRAY...... "CO|
00000CB0: 4D 50 55 54 45 20 50 49  43 54 55 52 45 20 41 52  |MPUTE PICTURE AR|
00000CC0: 52 41 59 00 D2 14 BA 09  83 20 22 4C 4F 41 44 49  |RAY...... "LOADI|
00000CD0: 4E 47 00 E0 14 C4 09 83  20 22 53 41 56 49 4E 47  |NG...... "SAVING|
00000CE0: 00 F4 14 CE 09 83 20 22  44 52 41 57 20 50 49 43  |...... "DRAW PIC|
00000CF0: 54 55 52 45 00 0C 15 D8  09 83 20 22 43 48 41 4E  |TURE...... "CHAN|
00000D00: 47 45 20 56 49 45 57 50  4F 49 4E 54 00 18 15 E2  |GE VIEWPOINT....|
00000D10: 09 83 20 22 48 45 4C 50  00 24 15 EC 09 83 20 22  |.. "HELP.$.... "|
00000D20: 53 54 4F 50 00 3F 15 F6  09 83 20 22 4C 4F 41 44  |STOP.?.... "LOAD|
00000D30: 20 46 55 4E 43 54 49 4F  4E 20 41 52 52 41 59 00  | FUNCTION ARRAY.|
00000D40: 58 15 00 0A 83 20 22 4C  4F 41 44 20 50 49 43 54  |X.... "LOAD PICT|
00000D50: 55 52 45 20 41 52 41 59  00 69 15 0A 0A 83 20 22  |URE ARAY.i.... "|
00000D60: 44 49 52 45 43 54 4F 52  59 00 84 15 14 0A 83 20  |DIRECTORY...... |
00000D70: 22 52 45 54 55 52 4E 20  54 4F 20 4D 41 49 4E 20  |"RETURN TO MAIN |
00000D80: 4D 45 4E 55 00 9F 15 1E  0A 83 20 22 53 41 56 45  |MENU...... "SAVE|
00000D90: 20 46 55 4E 43 54 49 4F  4E 20 41 52 52 41 59 00  | FUNCTION ARRAY.|
00000DA0: B9 15 28 0A 83 20 22 53  41 56 45 20 50 49 43 54  |..(.. "SAVE PICT|
00000DB0: 55 52 45 20 41 52 52 41  59 00 CA 15 32 0A 83 20  |URE ARRAY...2.. |
00000DC0: 22 44 49 52 45 43 54 4F  52 59 00 E5 15 3C 0A 83  |"DIRECTORY...<..|
00000DD0: 20 22 52 45 54 55 52 4E  20 54 4F 20 4D 41 49 4E  | "RETURN TO MAIN|
00000DE0: 20 4D 45 4E 55 00 00 00  00                       | MENU....       |

......D2 INIT.....D1 FUNC.6...U1.U...10:
 R.V.(20.V).40.I...X(U,V).R..(U1).K.(.Z(
U,V)..(R..(U1).(V.10).2.10).{.2.Y(U,V).V
.10...<.D4.....D1 PERSPEC.....XR . A(1,1
).X(U,V). A(1,2).Y(U,V).....YR . A(2,1).
X(U,V). A(2,2).Y(U,V).....XS.XR.(D.(D.YR
)).....YS.(Z(U,V).E).(D.(D.YR)).....D4.#
.$.D1 FCOMP.V....".";: D.0,0,40,2,32,0: 
D. 0,0,20.S.1,1,160,10.F.8..U.0.20 . S.P
.B.."F";...L.: . V.0.20 . S...V.: D3 FUN
C...`.. V,U...J.....T.D1 PCOMP...~..".";
: D.0,0,40,2,32,0: D. 0,0,20.S.1,1,160,1
0...... U.0.20 . S......"P";.....: . V.0
.20 . S."...:   D3 PERSPEC.5...:   XS(U,
V).XS.H...:   YS(U,V).YS.`.D.:   . XS.XL
 . XL.XS.X.N.:   . XS.XH . XH.XS...X.:  
 . YS.YL . YL.YS.....:   . YS.YH . YH.YS
...... V,U.......E...D3 SCALE.O...D1 D..
Z...D. 0,1...... U.0.20 . S...(.: XA.X0.
XS(U,0).X1...2.: XB.X0.XS(0,U).X1.0.<.: 
YA.Y0.YS(U,0).Y1.G.F.: YB.Y0.YS(0,U).Y1.
Z.P.: . V.S.20 . S.S.Z.:   AX.X0.XS(U,V)
.X1...D.:   BX.X0.XS(V,U).X1...N.:   AY.
Y0.YS(U,V).Y1...X.:   BY.Y0.YS(V,U).Y1.W
...:   D. XA,YA,AX,AY,1.....:   D. XB,YB
,BX,BY,1.....:   XA.AX: XB.BX: YA.AY: YB
.BY... .. V,U.8...D :D)DV..0:DP0:D2 MAIN
.D...D1 INIT.W....".. WORKING...E.H.. F$
(8,2).}.R.. I.1.8:. F$(I,0):....... J.1.
2...... I.1.4......F$(I,J)...... I,J....
.. A(2,2)...... X(20,20) ,Y(20,20), Z(20
,20)...... XS(20,20), YS(20,20)...".D.50
0: E.200: FI.200: S.2.!.,.D1 MAIN...6.U.
0:V.0:.<.@.D3 VENTER.M.J.J.0: D3 TALK.B.
T.. Q.1 . D2 FCOMP.W.^.. Q.2 . D2 PCOMP.
..H.. Q.3 . D2 ....R.. Q.4 . D2 ....|.. 
Q.5 . D2 D....... Q.6 . D2 VIEUW...... Q
.7 . ."NOT IMPLEMENTED":D2 MAIN...... Q.
8 . DI: ......D4.....D1 SCALE.D.... (XH.
XL).(YH.YL) . ."PICTURE GOES FLAT.": D2 
MAIN...B..  X OF YDIMENSIE BEPAALT SCHAD
YG. IN ANDERE RICHTING GED#ERD....L.. (X
H.XL).(YH.YL) . (300.180) . D3 XLIM.Z.V.
. (XH.XL).(YH.YL) . (300.180) . D4.....Y
1.180.(YH.YL): Y0.10.Y1.YL.....X1.Y1: X0
 .160.X1.(XH.XL).2.!...D4.-...D1 XLIM.M.
..X1.300.(XH.XL): X0.10.X1.XL.M...Y1.X1:
 Y0 .100.Y1.(YH.YL).2.T...D4.}.&.D1 ....
0.J.1: D3 TALK...:.. Q.1 . F$."FUNCTION"
.A.D.. Q.2 . F$."PICTURE"...N.. Q.3 . ."
.DIR''$": D2 ....X.. Q.3 . D2 MAIN...B..
".NAME OF " F$" TO LOAD";...L.. Q$.0.V..
 2,8,2,Q$.",S,R".:....2, S.K.... U.0.20 
. S.\.... V.0.20 . S.Z.... 2, X(U,V),Y(U
,V),Z(U,V)...... Q.1 . .2, X(U,V);Y(U,V)
;Z(U,V)...... Q.2 . .2, XS(U,V);YS(U,V).
I.... V,U.P.F. 2...P.. Q.1 . D2 FCOMP...
Z.D2 PCOMP.....D1 ......J.2:D3 TALK.%...
. Q.1 . F$."FUNCTION".>.... Q.2 . F$."PI
CTURE".[.... Q.3 . .".DIR''$": D2 ..O...
. Q.3 . D2 MAIN... ..".NAME OF "F$" TO S
AVE";...*.. Q$...4.. 2,8,2,"@0:".Q$.",S,
W"...>..2, S.M.H.. U.0.20 . S...R.. V.0.
20 . S...\.. Q.1 . . 2, X(U,V);Y(U,V);Z(
U,V).%.F.. Q.2 . . 2, XS(U,V);YS(U,V)./.
P.. V,U.7.Z.  2.C...D2 MAIN.P...D1 VIEUW
.S...."......DISTANCE, (="D".)";:.D.....
."ELEVATION, (="E".)";:.E......"FI, (="F
I".)";:.FI.K...."STEPSIZE(1,2,4,="S".)";
:.S.W...D2 MAIN...J.D1 TALK...T.D :D) DV
.0......".....    AUTOSCALING FUNCTION P
LOTTER.C...."         USING SIMONS BASIC
":..P.... I.1.8:.I.... I "...F.. "F$(I,J
).Q.... I.....D.0,0,40,2,32,0...... "...
  ENTER CHOICE  .....$.D. 2,45.B...D :Q.
DV:D) Q..0.I.8.DI.X.B.D :D) DV.0...L.D4.
..V.D1 VENTER...`.. ENTER NEW VIEUWPOINT
...J.D3 FUNC.#.T.D3 PERSPEC.B.~.XL.XS: X
H.XS: YL.YS: YH.YS.A...A(1,1)..(FI): A(1
,2)..(FI).....A(2,1)...(FI): A(2,2)..(FI
).....D4...... "COMPUTE FUNCTION ARRAY.C
.... "COMPUTE PICTURE ARRAY.R.... "LOADI
NG...D.. "SAVING...N.. "DRAW PICTURE...X
.. "CHANGE VIEWPOINT...... "HELP.$.... "
STOP.?.... "LOAD FUNCTION ARRAY.X.... "L
OAD PICTURE ARAY.I.... "DIRECTORY...... 
"RETURN TO MAIN MENU...... "SAVE FUNCTIO
N ARRAY...(.. "SAVE PICTURE ARRAY.J.2.. 
"DIRECTORY...<.. "RETURN TO MAIN MENU...
.

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL