00000000: 01 04 0A 04 32 00 8D 38 33 30 00 1D 04 64 00 96 |....2..830...d..|
00000010: 20 A5 58 28 58 29 B2 58 AC 31 30 AA 33 00 50 04 | .X(X).X.10.3.P.|
00000020: 6E 00 43 52 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |n.CR$.".........|
00000030: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000040: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 |..............."|
00000050: 00 83 04 78 00 43 44 24 B2 22 11 11 11 11 11 11 |...x.CD$."......|
00000060: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000070: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000080: 11 11 22 00 99 04 82 00 85 20 22 93 58 20 2D 20 |.."...... ".X - |
00000090: 53 54 41 52 54 20 22 3B 41 00 AE 04 8C 00 85 20 |START ";A...... |
000000A0: 22 58 20 2D 20 53 54 4F 50 20 20 22 3B 42 00 EC |"X - STOP ";B..|
000000B0: 04 96 00 8B 20 41 B2 42 20 A7 20 99 20 22 12 54 |.... A.B . . ".T|
000000C0: 48 45 20 56 41 4C 55 45 53 20 4D 55 53 54 20 44 |HE VALUES MUST D|
000000D0: 49 46 46 45 52 22 3A 81 20 49 B2 31 20 A4 20 35 |IFFER":. I.1 . 5|
000000E0: 30 30 3A 82 20 49 3A 89 20 31 33 30 00 02 05 A0 |00:. I:. 130....|
000000F0: 00 50 53 B2 33 35 3A 8D 20 36 39 30 3A 43 52 B2 |.PS.35:. 690:CR.|
00000100: 5A 52 00 15 05 AA 00 8B 20 43 52 B2 30 20 A7 20 |ZR...... CR.0 . |
00000110: 43 52 B2 AB 33 00 33 05 B4 00 99 20 4C 4F 2C 48 |CR..3.3.... LO,H|
00000120: 49 3A 4C 58 B2 4C 4F 3A 48 58 B2 48 49 3A 53 58 |I:LX.LO:HX.HI:SX|
00000130: B2 58 31 00 46 05 BE 00 41 B2 31 45 31 30 3A 42 |.X1.F...A.1E10:B|
00000140: B2 AB 31 45 31 30 00 5B 05 C8 00 81 20 58 B2 4C |..1E10.[.... X.L|
00000150: 58 20 A4 20 48 58 20 A9 20 53 58 00 69 05 D2 00 |X . HX . SX.i...|
00000160: 88 20 59 B2 A5 58 28 58 29 00 80 05 DC 00 88 20 |. Y..X(X)...... |
00000170: 42 B2 28 42 AA 59 AA B6 28 42 AB 59 29 29 AD 32 |B.(B.Y..(B.Y)).2|
00000180: 00 97 05 E6 00 88 20 41 B2 28 41 AA 59 AB B6 28 |...... A.(A.Y..(|
00000190: 41 AB 59 29 29 AD 32 00 B4 05 F0 00 82 20 58 3A |A.Y)).2...... X:|
000001A0: 50 53 B2 32 33 3A 8D 20 37 30 30 3A 43 44 B2 32 |PS.23:. 700:CD.2|
000001B0: 32 AB 5A 52 00 CA 05 FA 00 4C 59 B2 4C 4F 3A 48 |2.ZR.....LY.LO:H|
000001C0: 59 B2 48 49 3A 53 59 B2 58 31 00 D7 05 04 01 86 |Y.HI:SY.X1......|
000001D0: 20 50 31 28 31 36 29 00 F5 05 0E 01 81 20 4A 31 | P1(16)...... J1|
000001E0: B2 30 20 A4 20 31 35 3A 87 20 50 31 28 4A 31 29 |.0 . 15:. P1(J1)|
000001F0: 3A 82 20 4A 31 00 16 06 18 01 83 20 33 32 2C 31 |:. J1...... 32,1|
00000200: 32 34 2C 31 32 36 2C 32 32 36 2C 31 30 38 2C 32 |24,126,226,108,2|
00000210: 32 35 2C 31 32 37 00 36 06 22 01 83 20 32 35 31 |25,127.6.".. 251|
00000220: 2C 31 32 33 2C 32 35 35 2C 39 37 2C 32 33 36 2C |,123,255,97,236,|
00000230: 39 38 2C 32 35 34 00 44 06 2C 01 83 20 32 35 32 |98,254.D.,.. 252|
00000240: 2C 31 36 30 00 61 06 36 01 81 20 4A 31 B2 30 20 |,160.a.6.. J1.0 |
00000250: A4 20 33 3A 87 20 50 32 28 4A 31 29 3A 82 20 4A |. 3:. P2(J1):. J|
00000260: 31 00 6F 06 40 01 83 20 38 2C 34 2C 32 2C 31 00 |1.o.@.. 8,4,2,1.|
00000270: 79 06 4A 01 8D 20 34 38 30 00 A7 06 54 01 81 20 |y.J.. 480...T.. |
00000280: 58 B2 30 20 A4 20 36 38 3A 88 20 59 B2 B6 28 28 |X.0 . 68:. Y..((|
00000290: 48 59 AB A5 58 28 4C 58 AA 28 58 AD 32 29 AC 53 |HY..X(LX.(X.2).S|
000002A0: 58 29 29 AD 53 59 29 00 C1 06 5E 01 8B 20 59 B1 |X)).SY)...^.. Y.|
000002B0: 30 20 AF 20 59 B3 B2 32 35 20 A7 20 8D 20 34 30 |0 . Y..25 . . 40|
000002C0: 30 00 C9 06 68 01 82 20 58 00 E0 06 72 01 A1 20 |0...h.. X...r.. |
000002D0: 51 24 3A 8B 20 51 24 B2 22 22 20 A7 20 33 37 30 |Q$:. Q$."" . 370|
000002E0: 00 F1 06 7C 01 8B 20 51 24 B2 22 53 22 20 A7 20 |...|.. Q$."S" . |
000002F0: 80 00 04 07 81 01 8B 20 51 24 B2 22 46 22 20 A7 |....... Q$."F" .|
00000300: 20 37 37 30 00 0A 07 86 01 8A 00 3F 07 90 01 59 | 770.......?...Y|
00000310: B2 B5 28 32 AC 59 29 3A 41 44 B2 33 32 37 36 38 |..(2.Y):AD.32768|
00000320: 20 AA 20 34 30 AC 28 B5 28 28 59 AA 31 29 AD 32 | . 40.(.((Y.1).2|
00000330: 29 29 20 AA 20 28 33 AA B5 28 58 AD 32 29 29 00 |)) . (3..(X.2)).|
00000340: 51 07 9A 01 44 44 B2 C2 28 41 44 29 3A 50 54 B2 |Q...DD..(AD):PT.|
00000350: 30 00 67 07 A4 01 8B 20 44 44 B2 50 31 28 50 54 |0.g.... DD.P1(PT|
00000360: 29 20 A7 20 34 35 30 00 81 07 AE 01 50 54 B2 50 |) . 450.....PT.P|
00000370: 54 AA 31 3A 8B 20 50 54 B3 31 36 20 A7 20 34 32 |T.1:. PT.16 . 42|
00000380: 30 00 87 07 B8 01 8E 00 A7 07 C2 01 45 58 B2 58 |0...........EX.X|
00000390: AB 32 AC B5 28 58 AD 32 29 3A 45 59 B2 59 AB 32 |.2..(X.2):EY.Y.2|
000003A0: AC B5 28 59 AD 32 29 00 C5 07 CC 01 43 4F B2 50 |..(Y.2).....CO.P|
000003B0: 32 28 45 58 AA 32 AC 45 59 29 3A 50 4B B2 43 4F |2(EX.2.EY):PK.CO|
000003C0: 20 B0 20 50 54 00 D7 07 D6 01 97 20 41 44 2C 50 | . PT...... AD,P|
000003D0: 31 28 50 4B 29 3A 8E 00 E3 07 E0 01 99 20 22 93 |1(PK):....... ".|
000003E0: 13 22 3B 00 F2 07 EA 01 81 20 59 B2 30 20 A4 20 |.";...... Y.0 . |
000003F0: 32 33 00 19 08 F4 01 88 20 41 59 B2 B5 28 31 30 |23...... AY..(10|
00000400: 30 30 AC 28 48 59 AB 28 59 AA 31 29 AC 53 59 29 |00.(HY.(Y.1).SY)|
00000410: AA 2E 35 29 AD 31 30 30 30 00 54 08 FE 01 8B 20 |..5).1000.T.... |
00000420: 59 AB 43 44 B2 35 AC B5 28 28 59 AB 43 44 29 AD |Y.CD.5..((Y.CD).|
00000430: 35 29 20 A7 20 99 20 C8 28 43 52 24 2C 43 52 AA |5) . . .(CR$,CR.|
00000440: 33 29 3B 22 11 DB 22 3B 41 59 3B 22 91 22 3A 89 |3);"..";AY;".":.|
00000450: 20 35 33 30 00 6C 08 08 02 99 20 C8 28 43 52 24 | 530.l.... .(CR$|
00000460: 2C 43 52 AA 33 29 3B 22 11 B3 91 22 00 74 08 12 |,CR.3);"...".t..|
00000470: 02 82 20 59 00 8D 08 1C 02 99 20 22 13 11 1D 1D |.. Y...... "....|
00000480: 1D 22 AA C8 28 43 44 24 2C 43 44 29 3B 00 9C 08 |."..(CD$,CD);...|
00000490: 26 02 81 20 58 B2 30 20 A4 20 33 35 00 C4 08 30 |&.. X.0 . 35...0|
000004A0: 02 8B 20 58 AB 43 52 B2 35 AC B5 28 28 58 AB 43 |.. X.CR.5..((X.C|
000004B0: 52 29 AD 35 29 20 A7 20 99 20 22 DB 22 3B 3A 89 |R).5) . . ".";:.|
000004C0: 20 35 38 30 00 CF 08 3A 02 99 20 22 B1 22 3B 00 | 580...:.. ".";.|
000004D0: D7 08 44 02 82 20 58 00 FF 08 4E 02 8B 20 43 52 |..D.. X...N.. CR|
000004E0: B2 AB 33 20 A7 20 99 20 22 13 11 1D 22 AA C8 28 |..3 . . "..."..(|
000004F0: 43 44 24 2C 43 44 29 3B 22 2E 2E 2E 2E 22 3B 00 |CD$,CD);"....";.|
00000500: 1C 09 58 02 99 20 22 13 11 1D 1D 1D 22 AA C8 28 |..X.. "....."..(|
00000510: 43 44 24 2C 43 44 29 AA 22 11 22 3B 00 2B 09 62 |CD$,CD).".";.+.b|
00000520: 02 81 20 58 B2 30 20 A4 20 33 35 00 3C 09 6C 02 |.. X.0 . 35.<.l.|
00000530: 8B 20 58 B2 43 52 20 A7 20 36 35 30 00 5E 09 76 |. X.CR . 650.^.v|
00000540: 02 8B 20 58 AB 43 52 B3 B1 31 30 AC B5 28 28 58 |.. X.CR..10..((X|
00000550: AB 43 52 29 AD 31 30 29 20 A7 20 36 35 30 00 7D |.CR).10) . 650.}|
00000560: 09 80 02 99 20 A3 58 AA 31 29 3B CA 28 C4 28 4C |.... .X.1);.(.(L|
00000570: 58 AA 58 AC 53 58 29 2C 31 2C 38 29 3B 00 85 09 |X.X.SX),1,8);...|
00000580: 8A 02 82 20 58 00 AD 09 94 02 99 20 22 13 20 20 |... X...... ". |
00000590: 20 12 58 2D 44 49 56 3D 22 3B 53 58 3B 22 92 20 | .X-DIV=";SX;". |
000005A0: 20 20 12 59 2D 44 49 56 3D 22 3B 53 59 00 B3 09 | .Y-DIV=";SY...|
000005B0: 9E 02 8E 00 D3 09 A8 02 8F 20 2A 2A 2A 20 20 53 |......... *** S|
000005C0: 43 41 4C 49 4E 47 20 52 4F 55 54 49 4E 45 20 20 |CALING ROUTINE |
000005D0: 2A 2A 2A 00 EB 09 B2 02 8B 20 41 B1 42 20 A7 20 |***...... A.B . |
000005E0: 54 B2 41 3A 41 B2 42 3A 42 B2 54 00 09 0A BC 02 |T.A:A.B:B.T.....|
000005F0: 58 B2 B6 28 41 AB 42 29 3A 58 31 B2 58 AD 50 53 |X..(A.B):X1.X.PS|
00000600: 3A 45 B2 30 3A 4C 4F B2 30 00 2B 0A C6 02 8B 20 |:E.0:LO.0.+.... |
00000610: 58 31 B3 31 20 A7 20 58 31 B2 58 31 AC 31 30 3A |X1.1 . X1.X1.10:|
00000620: 45 B2 45 AB 31 3A 89 20 37 31 30 00 4F 0A D0 02 |E.E.1:. 710.O...|
00000630: 8B 20 58 31 B1 B2 31 30 20 A7 20 58 31 B2 58 31 |. X1..10 . X1.X1|
00000640: AD 31 30 3A 45 B2 45 AA 31 3A 89 20 37 32 30 00 |.10:E.E.1:. 720.|
00000650: 69 0A DA 02 58 31 B2 B5 28 58 31 29 AA 31 3A 58 |i...X1..(X1).1:X|
00000660: 31 B2 58 31 AC 31 30 AE 45 00 9E 0A E4 02 8B 20 |1.X1.10.E...... |
00000670: 41 AC 42 B1 30 20 A7 20 4C 4F B2 B5 28 41 AD 58 |A.B.0 . LO..(A.X|
00000680: 31 29 3A 4C 4F B2 4C 4F AC 58 31 3A 48 49 B2 4C |1):LO.LO.X1:HI.L|
00000690: 4F AA 50 53 AC 58 31 3A 5A 52 B2 30 3A 8E 00 B8 |O.PS.X1:ZR.0:...|
000006A0: 0A EE 02 4C 4F B2 4C 4F AB 58 31 3A 8B 20 4C 4F |...LO.LO.X1:. LO|
000006B0: B1 41 20 A7 20 37 35 30 00 DC 0A F8 02 48 49 B2 |.A . 750.....HI.|
000006C0: 4C 4F AA 50 53 AC 58 31 3A 5A 52 B2 B5 28 B6 28 |LO.PS.X1:ZR..(.(|
000006D0: 4C 4F AD 58 31 29 AA 2E 35 29 3A 8E 00 FE 0A 02 |LO.X1)..5):.....|
000006E0: 03 8F 20 2A 2A 2A 20 41 55 54 4F 20 46 55 4E 43 |.. *** AUTO FUNC|
000006F0: 54 49 4F 4E 20 49 4E 50 55 54 20 2A 2A 2A 00 23 |TION INPUT ***.#|
00000700: 0B 0C 03 99 22 93 11 11 11 12 54 59 50 45 20 49 |....".....TYPE I|
00000710: 4E 20 59 4F 55 52 20 46 55 4E 43 54 49 4F 4E 11 |N YOUR FUNCTION.|
00000720: 11 11 22 00 3C 0B 16 03 85 20 22 20 20 59 20 3D |..".<.... " Y =|
00000730: 20 20 20 2E 9D 9D 9D 22 3B 46 58 24 00 5B 0B 20 | ....";FX$.[. |
00000740: 03 99 22 93 11 11 11 31 30 30 20 44 45 46 20 46 |.."....100 DEF F|
00000750: 4E 58 28 58 29 3D 22 3B 46 58 24 00 68 0B 2A 03 |NX(X)=";FX$.h.*.|
00000760: 99 22 52 55 4E 20 13 22 00 8F 0B 34 03 97 20 31 |."RUN ."...4.. 1|
00000770: 35 38 2C 32 3A 81 20 49 B2 36 32 33 20 A4 20 36 |58,2:. I.623 . 6|
00000780: 33 32 3A 97 20 49 2C 31 33 3A 82 20 49 3A 80 00 |32:. I,13:. I:..|
00000790: AA 0B 3E 03 8F 20 2A 2A 2A 20 49 4E 53 54 52 55 |..>.. *** INSTRU|
000007A0: 43 54 49 4F 4E 53 20 2A 2A 2A 00 DA 0B 48 03 97 |CTIONS ***...H..|
000007B0: 20 35 39 34 36 38 2C 31 34 3A 99 20 22 93 20 20 | 59468,14:. ". |
000007C0: 20 20 20 20 20 20 20 20 12 20 20 20 20 20 20 20 | . |
000007D0: 20 20 20 20 20 20 20 20 92 22 00 FE 0B 52 03 99 | ."...R..|
000007E0: 20 22 20 20 20 20 20 20 20 20 20 20 12 20 C7 D2 | " . ..|
000007F0: C1 D0 C8 A0 D0 CC CF D4 D4 C5 D2 20 92 22 00 22 |........... ."."|
00000800: 0C 5C 03 99 20 22 20 20 20 20 20 20 20 20 20 20 |.\.. " |
00000810: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000820: 92 22 00 46 0C 66 03 99 20 22 20 20 20 20 20 20 |.".F.f.. " |
00000830: 20 20 20 20 12 20 20 20 20 20 20 20 42 59 20 20 | . BY |
00000840: 20 20 20 20 92 22 00 6A 0C 70 03 99 20 22 20 20 | .".j.p.. " |
00000850: 20 20 20 20 20 20 20 20 12 20 20 20 20 20 20 20 | . |
00000860: 20 20 20 20 20 20 20 20 92 22 00 8E 0C 7A 03 99 | ."...z..|
00000870: 20 22 20 20 20 20 20 20 20 20 20 20 12 20 D4 52 | " . .R|
00000880: 45 56 4F 52 20 20 CC 55 53 54 59 20 92 22 00 B4 |EVOR .USTY ."..|
00000890: 0C 84 03 99 20 22 20 20 20 20 20 20 20 20 20 20 |.... " |
000008A0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000008B0: 92 11 11 22 00 E2 0C 8E 03 99 20 22 20 20 20 20 |..."...... " |
000008C0: D4 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 4C |.HIS PROGRAM WIL|
000008D0: 4C 20 50 4C 4F 54 20 41 20 47 52 41 50 48 20 4F |L PLOT A GRAPH O|
000008E0: 46 22 00 12 0D 98 03 99 20 22 41 4E 59 20 46 55 |F"...... "ANY FU|
000008F0: 4E 43 54 49 4F 4E 20 57 48 49 43 48 20 59 4F 55 |NCTION WHICH YOU|
00000900: 20 44 45 46 49 4E 45 20 55 53 49 4E 47 20 D0 C5 | DEFINE USING ..|
00000910: D4 22 00 41 0D A2 03 99 20 22 53 59 4E 54 41 58 |.".A.... "SYNTAX|
00000920: 2E 20 20 D4 48 45 20 46 55 4E 43 54 49 4F 4E 20 |. .HE FUNCTION |
00000930: 49 53 20 45 4E 54 45 52 45 44 20 41 55 54 4F 2D |IS ENTERED AUTO-|
00000940: 22 00 65 0D AC 03 99 20 22 4D 41 54 49 43 41 4C |".e.... "MATICAL|
00000950: 4C 59 20 49 4E 54 4F 20 54 48 45 20 50 52 4F 47 |LY INTO THE PROG|
00000960: 52 41 4D 2E 22 00 94 0D B6 03 99 20 22 11 11 20 |RAM."...... ".. |
00000970: 20 20 20 D4 48 45 20 46 55 4E 43 54 49 4F 4E 20 | .HE FUNCTION |
00000980: 4D 55 53 54 20 55 53 45 20 27 D8 27 20 41 53 20 |MUST USE '.' AS |
00000990: 54 48 45 22 00 C4 0D C0 03 99 20 22 56 41 52 49 |THE"...... "VARI|
000009A0: 41 42 4C 45 2E 20 20 CF 4E 43 45 20 45 4E 54 45 |ABLE. .NCE ENTE|
000009B0: 52 45 44 20 59 4F 55 20 4D 41 59 20 41 53 4B 20 |RED YOU MAY ASK |
000009C0: 46 4F 52 22 00 EC 0D CA 03 99 20 22 41 4E 59 20 |FOR"...... "ANY |
000009D0: 52 41 4E 47 45 20 4F 46 20 27 D8 27 20 54 4F 20 |RANGE OF '.' TO |
000009E0: 42 45 20 50 4C 4F 54 54 45 44 2E 22 00 1C 0E D4 |BE PLOTTED."....|
000009F0: 03 99 20 22 11 11 20 20 20 20 D0 52 45 53 53 20 |.. ".. .RESS |
00000A00: 27 D3 27 20 54 4F 20 53 54 4F 50 2C 20 27 CE 27 |'.' TO STOP, '.'|
00000A10: 20 54 4F 20 45 4E 54 45 52 20 41 22 00 4D 0E DE | TO ENTER A".M..|
00000A20: 03 99 20 22 4E 45 57 20 52 41 4E 47 45 20 41 4E |.. "NEW RANGE AN|
00000A30: 44 20 27 C6 27 20 54 4F 20 43 48 41 4E 47 45 20 |D '.' TO CHANGE |
00000A40: 54 48 45 20 46 55 4E 43 54 49 4F 4E 22 00 7A 0E |THE FUNCTION".z.|
00000A50: E8 03 99 20 22 11 20 20 20 20 12 20 D0 52 45 53 |... ". . .RES|
00000A60: 53 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 |S SPACE BAR TO C|
00000A70: 4F 4E 54 49 4E 55 45 20 22 3B 00 94 0E F2 03 A1 |ONTINUE ";......|
00000A80: 20 41 24 3A 8B 20 41 24 B3 B1 22 20 22 20 A7 20 | A$:. A$.." " . |
00000A90: 31 30 31 30 00 A5 0E FC 03 97 20 35 39 34 36 38 |1010...... 59468|
00000AA0: 2C 31 32 3A 8E 00 00 00 |,12:.... |
....2..830...D.. .X(X).X.10.3.P.N.CR$.".
......................................."
...X.CD$."..............................
.........."...... ".X - START ";A......
"X - STOP ";B...... A.B . . ".THE VALUE
S MUST DIFFER":. I.1 . 500:. I:. 130...
.PS.35:. 690:CR.ZR...... CR.0 . CR..3.3.
... LO,HI:LX.LO:HX.HI:SX.X1.F...A.1E10:B
..1E10.[.H.. X.LX . HX . SX.I.R.. Y..X(X
)...... B.(B.Y..(B.Y)).2...... A.(A.Y..(
A.Y)).2...... X:PS.23:. 700:CD.22.ZR.J..
.LY.LO:HY.HI:SY.X1.W.... P1(16)...... J1
.0 . 15:. P1(J1):. J1...... 32,124,126,2
26,108,225,127.6.".. 251,123,255,97,236,
98,254.D.,.. 252,160.A.6.. J1.0 . 3:. P2
(J1):. J1.O.@.. 8,4,2,1.Y.J.. 480...T..
X.0 . 68:. Y..((HY..X(LX.(X.2).SX)).SY).
A.^.. Y.0 . Y..25 . . 400.I.H.. X...R..
Q$:. Q$."" . 370...|.. Q$."S" . .......
Q$."F" . 770.......?...Y..(2.Y):AD.32768
. 40.(.((Y.1).2)) . (3..(X.2)).Q...DD.B
(AD):PT.0.G.... DD.P1(PT) . 450.....PT.P
T.1:. PT.16 . 420.........B.EX.X.2..(X.2
):EY.Y.2..(Y.2).E.L.CO.P2(EX.2.EY):PK.CO
. PT.W.V.. AD,P1(PK):....... "..";.....
. Y.0 . 23...... AY..(1000.(HY.(Y.1).SY)
..5).1000.T.... Y.CD.5..((Y.CD).5) . . H
(CR$,CR.3);"..";AY;".":. 530.L.... H(CR$
,CR.3);"...".T.... Y...... ".....".H(CD$
,CD);...&.. X.0 . 35.D.0.. X.CR.5..((X.C
R).5) . . ".";:. 580.O.:.. ".";.W.D.. X.
..N.. CR..3 . . "...".H(CD$,CD);"....";.
..X.. ".....".H(CD$,CD).".";.+.B.. X.0 .
35.<.L.. X.CR . 650.^.V.. X.CR..10..((X
.CR).10) . 650.}.... .X.1);J(D(LX.X.SX),
1,8);...... X...... ". .X-DIV=";SX;".
.Y-DIV=";SY.......S.... *** SCALING R
OUTINE ***...... A.B . T.A:A.B:B.T.....
X..(A.B):X1.X.PS:E.0:LO.0.+.F.. X1.1 . X
1.X1.10:E.E.1:. 710.O.P.. X1..10 . X1.X1
.10:E.E.1:. 720.I.Z.X1..(X1).1:X1.X1.10.
E...... A.B.0 . LO..(A.X1):LO.LO.X1:HI.L
O.PS.X1:ZR.0:......LO.LO.X1:. LO.A . 750
.....HI.LO.PS.X1:ZR..(.(LO.X1)..5):.....
.. *** AUTO FUNCTION INPUT ***.#...."...
..TYPE IN YOUR FUNCTION...".<.... " Y =
....";FX$.[. .."....100 DEF FNX(X)=";
FX$.H.*.."RUN ."...4.. 158,2:. I.623 . 6
32:. I,13:. I:....>.. *** INSTRUCTIONS *
**.Z.H.. 59468,14:. ". .
."...R.. " . GRAPH PLOT
TER .".".\.. " .
.".F.F.. " . BY .".J
.P.. " . ."...Z..
" . TREVOR LUSTY ."...... "
. ..."...... "
THIS PROGRAM WILL PLOT A GRAPH OF"......
"ANY FUNCTION WHICH YOU DEFINE USING PE
T".A.... "SYNTAX. THE FUNCTION IS ENTER
ED AUTO-".E.... "MATICALLY INTO THE PROG
RAM."...... ".. THE FUNCTION MUST USE
'X' AS THE".D.... "VARIABLE. ONCE ENTE
RED YOU MAY ASK FOR"...J.. "ANY RANGE OF
'X' TO BE PLOTTED."...T.. ".. PRESS
'S' TO STOP, 'N' TO ENTER A".M.... "NEW
RANGE AND 'F' TO CHANGE THE FUNCTION".Z.
... ". . PRESS SPACE BAR TO CONTINUE
";...... A$:. A$.." " . 1010...... 59468
,12:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL