GRAPH IT
FILE INFORMATION
FILENAME(S): GRAPH IT
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-02 16:39:54
APPEARS ON: 1 disk(s)
FILE HASH
fc9293560c2474538b24bff01505c4fee84dd6283cf3234b4f4d39bb8afd97b1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUBLIC DOMAIN | GRAPH IT | PRG | Treasure Chest - Plattfuss | 12 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 32 00 8D 38 33 30 00 1D 08 64 00 96 |....2..830...d..| 00000010: 20 A5 58 28 58 29 B2 58 AC 31 30 AA 33 00 50 08 | .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 08 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 08 82 00 85 20 22 93 58 20 2D 20 |.."...... ".X - | 00000090: 53 54 41 52 54 20 22 3B 41 00 AE 08 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: 08 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 09 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 09 AA 00 8B 20 43 52 B2 30 20 A7 20 |ZR...... CR.0 . | 00000110: 43 52 B2 AB 33 00 33 09 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 09 BE 00 41 B2 31 45 31 30 3A 42 |.X1.F...A.1E10:B| 00000140: B2 AB 31 45 31 30 00 5B 09 C8 00 81 20 58 B2 4C |..1E10.[.... X.L| 00000150: 58 20 A4 20 48 58 20 A9 20 53 58 00 69 09 D2 00 |X . HX . SX.i...| 00000160: 88 20 59 B2 A5 58 28 58 29 00 80 09 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 09 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 09 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 09 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 09 04 01 86 |Y.HI:SY.X1......| 000001D0: 20 50 31 28 31 36 29 00 F5 09 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 0A 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 0A 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 0A 2C 01 83 20 32 35 32 |98,254.D.,.. 252| 00000240: 2C 31 36 30 00 61 0A 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 0A 40 01 83 20 38 2C 34 2C 32 2C 31 00 |1.o.@.. 8,4,2,1.| 00000270: 79 0A 4A 01 8D 20 34 38 30 00 A7 0A 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 0A 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 0A 68 01 82 20 58 00 E0 0A 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 0A 7C 01 8B 20 51 24 B2 22 53 22 20 A7 20 |...|.. Q$."S" . | 000002F0: 80 00 04 0B 81 01 8B 20 51 24 B2 22 46 22 20 A7 |....... Q$."F" .| 00000300: 20 37 37 30 00 0A 0B 86 01 8A 00 3F 0B 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 0B 9A 01 44 44 B2 C2 28 41 44 29 3A 50 54 B2 |Q...DD..(AD):PT.| 00000350: 30 00 67 0B 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 0B 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 0B B8 01 8E 00 A7 0B 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 0B 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 0B D6 01 97 20 41 44 2C 50 | . PT...... AD,P| 000003D0: 31 28 50 4B 29 3A 8E 00 E3 0B E0 01 99 20 22 93 |1(PK):....... ".| 000003E0: 13 22 3B 00 F2 0B EA 01 81 20 59 B2 30 20 A4 20 |.";...... Y.0 . | 000003F0: 32 33 00 19 0C 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 0C 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 0C 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 0C 12 |,CR.3);"...".t..| 00000470: 02 82 20 59 00 8D 0C 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 0C |."..(CD$,CD);...| 00000490: 26 02 81 20 58 B2 30 20 A4 20 33 35 00 C4 0C 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 0C 3A 02 99 20 22 B1 22 3B 00 | 580...:.. ".";.| 000004D0: D7 0C 44 02 82 20 58 00 FF 0C 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 0D 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 0D 62 |CD$,CD).".";.+.b| 00000520: 02 81 20 58 B2 30 20 A4 20 33 35 00 3C 0D 6C 02 |.. X.0 . 35.<.l.| 00000530: 8B 20 58 B2 43 52 20 A7 20 36 35 30 00 5E 0D 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: 0D 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 0D |X.X.SX),1,8);...| 00000580: 8A 02 82 20 58 00 AD 0D 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 0D | .Y-DIV=";SY...| 000005B0: 9E 02 8E 00 D3 0D 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 0D 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 0E 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 0E 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 0E 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 0E 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 0E 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: 0E 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 0E 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 0E 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: 0F 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 0F 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 0F 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 0F 2A 03 |NX(X)=";FX$.h.*.| 00000760: 99 22 52 55 4E 20 13 22 00 8F 0F 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 0F 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 0F 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 0F 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: 10 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 10 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 10 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 10 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: 10 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 10 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 11 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 11 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 11 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 11 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 11 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 11 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 12 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 12 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 12 |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 12 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 12 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:....
> CLICK IMAGE PREVIEW FOR FULL MODAL