00000000: 01 04 1C 04 01 00 8F 20 28 43 29 20 31 39 37 38 |....... (C) 1978|
00000010: 20 47 4C 45 4E 20 46 49 53 48 45 52 00 22 04 02 | GLEN FISHER."..|
00000020: 00 8F 00 4A 04 03 00 8F 20 43 55 52 53 4F 52 28 |...J.... CURSOR(|
00000030: 54 4D 29 20 4D 41 47 41 5A 49 4E 45 2C 20 4A 55 |TM) MAGAZINE, JU|
00000040: 4C 59 20 31 39 37 38 20 23 31 00 6F 04 04 00 8F |LY 1978 #1.o....|
00000050: 20 50 2E 4F 2E 20 42 4F 58 20 35 35 30 2C 20 47 | P.O. BOX 550, G|
00000060: 4F 4C 45 54 41 2C 20 43 41 20 39 33 30 31 37 00 |OLETA, CA 93017.|
00000070: 75 04 05 00 8F 00 82 04 0A 00 86 20 53 51 28 31 |u.......... SQ(1|
00000080: 35 29 00 9D 04 14 00 81 20 49 B2 30 20 A4 20 31 |5)...... I.0 . 1|
00000090: 35 3A 87 20 53 51 28 49 29 3A 82 20 49 00 AB 04 |5:. SQ(I):. I...|
000000A0: 1E 00 43 52 54 B2 33 32 37 36 38 00 D5 04 64 00 |..CRT.32768...d.|
000000B0: 99 20 22 93 11 11 11 11 11 11 49 20 43 41 4E 20 |. ".......I CAN |
000000C0: 50 4C 4F 54 20 46 4F 55 52 20 46 55 4E 43 54 49 |PLOT FOUR FUNCTI|
000000D0: 4F 4E 53 3A 22 00 DB 04 6E 00 99 00 F8 04 78 00 |ONS:"...n.....x.|
000000E0: 99 20 22 20 31 3A 20 53 49 4E 28 58 29 2C 20 30 |. " 1: SIN(X), 0|
000000F0: 3C 3D 58 3C 3D 34 FF 22 00 15 05 82 00 99 20 22 |<=X<=4."...... "|
00000100: 20 32 3A 20 54 41 4E 28 58 29 2C 20 30 3C 3D 58 | 2: TAN(X), 0<=X|
00000110: 3C 3D 34 FF 22 00 3A 05 8C 00 99 20 22 20 33 3A |<=4.".:.... " 3:|
00000120: 20 58 5E 33 2B 58 5E 32 2B 58 2C 2D 31 2E 32 35 | X^3+X^2+X,-1.25|
00000130: 3C 3D 58 3C 3D 30 2E 37 35 22 00 60 05 96 00 99 |<=X<=0.75".`....|
00000140: 20 22 20 34 3A 20 41 20 55 53 45 52 2D 53 50 45 | " 4: A USER-SPE|
00000150: 43 49 46 49 45 44 20 46 55 4E 43 54 49 4F 4E 22 |CIFIED FUNCTION"|
00000160: 00 8E 05 A0 00 99 20 22 20 20 20 20 49 54 20 53 |...... " IT S|
00000170: 48 4F 55 4C 44 20 42 45 20 50 55 54 20 41 54 20 |HOULD BE PUT AT |
00000180: 4C 49 4E 45 53 20 38 30 30 2D 39 39 39 22 00 94 |LINES 800-999"..|
00000190: 05 AA 00 99 00 B1 05 B4 00 85 20 22 50 4C 45 41 |.......... "PLEA|
000001A0: 53 45 20 43 48 4F 4F 53 45 20 4F 4E 45 3A 22 3B |SE CHOOSE ONE:";|
000001B0: 46 00 EE 05 BE 00 8B 20 46 B3 31 20 B0 20 46 B1 |F...... F.1 . F.|
000001C0: 34 20 A7 20 99 20 22 50 4C 45 41 53 45 20 54 59 |4 . . "PLEASE TY|
000001D0: 50 45 20 41 20 4E 55 4D 42 45 52 20 46 52 4F 4D |PE A NUMBER FROM|
000001E0: 20 31 20 54 4F 20 34 22 3A 89 20 31 38 30 00 01 | 1 TO 4":. 180..|
000001F0: 06 C8 00 99 20 22 54 48 41 4E 4B 20 59 4F 55 2E |.... "THANK YOU.|
00000200: 22 00 0D 06 D2 00 54 B2 54 49 AA 35 30 00 1E 06 |".....T.TI.50...|
00000210: DC 00 8B 20 54 49 B3 54 20 A7 20 32 32 30 00 28 |... TI.T . 220.(|
00000220: 06 E6 00 99 20 22 93 22 00 42 06 F0 00 91 20 46 |.... ".".B.... F|
00000230: 20 89 20 35 30 30 2C 36 30 30 2C 37 30 30 2C 38 | . 500,600,700,8|
00000240: 30 30 00 51 06 F4 01 81 20 58 B2 30 20 A4 20 37 |00.Q.... X.0 . 7|
00000250: 39 00 68 06 FE 01 3A 59 B2 32 35 AA 32 30 AC BF |9.h...:Y.25.20..|
00000260: 28 58 AD 32 30 AC FF 29 00 73 06 08 02 8D 20 31 |(X.20..).s.... 1|
00000270: 30 30 30 00 7B 06 12 02 82 20 58 00 86 06 1C 02 |000.{.... X.....|
00000280: 89 20 32 30 30 30 00 95 06 58 02 81 20 58 B2 30 |. 2000...X.. X.0|
00000290: 20 A4 20 37 39 00 A6 06 5D 02 8B 20 58 B2 31 30 | . 79...].. X.10|
000002A0: 20 A7 20 36 35 30 00 BC 06 62 02 3A 59 B2 32 35 | . 650...b.:Y.25|
000002B0: AA 33 AC C0 28 58 AD 32 30 AC FF 29 00 D4 06 6C |.3..(X.20..)...l|
000002C0: 02 3A 8B 20 59 B3 30 20 B0 20 59 B1 34 39 20 A7 |.:. Y.0 . Y.49 .|
000002D0: 20 36 35 30 00 E0 06 80 02 3A 8D 20 31 30 30 30 | 650.....:. 1000|
000002E0: 00 E8 06 8A 02 82 20 58 00 F3 06 94 02 89 20 32 |...... X...... 2|
000002F0: 30 30 30 00 0A 07 BC 02 59 41 B2 32 35 3A 58 41 |000.....YA.25:XA|
00000300: B2 35 30 3A 8D 20 31 35 30 30 00 19 07 BF 02 81 |.50:. 1500......|
00000310: 20 58 B2 30 20 A4 20 37 39 00 2A 07 C1 02 58 31 | X.0 . 79.*...X1|
00000320: B2 28 58 AB 35 30 29 AD 34 30 00 46 07 C6 02 59 |.(X.50).40.F...Y|
00000330: B2 32 35 AA 28 28 58 31 AC 58 31 AA 58 31 29 AC |.25.((X1.X1.X1).|
00000340: 58 31 29 AC 33 30 00 5D 07 D0 02 8B 20 59 B3 30 |X1).30.].... Y.0|
00000350: 20 B0 20 59 B1 34 39 20 A7 20 37 34 30 00 68 07 | . Y.49 . 740.h.|
00000360: DA 02 8D 20 31 30 30 30 00 70 07 E4 02 82 20 58 |... 1000.p.... X|
00000370: 00 7B 07 EE 02 89 20 32 30 30 30 00 8A 07 20 03 |.{.... 2000... .|
00000380: 81 20 58 B2 30 20 A4 20 37 39 00 96 07 2A 03 59 |. X.0 . 79...*.Y|
00000390: B2 58 AD 38 AC 35 00 A1 07 3E 03 8D 20 31 30 30 |.X.8.5...>.. 100|
000003A0: 30 00 A9 07 48 03 82 20 58 00 B4 07 52 03 89 20 |0...H.. X...R.. |
000003B0: 32 30 30 30 00 BA 07 E7 03 80 00 FD 07 E8 03 83 |2000............|
000003C0: 20 33 32 2C 31 32 36 2C 31 32 34 2C 32 32 36 2C | 32,126,124,226,|
000003D0: 31 32 33 2C 39 37 2C 32 35 35 2C 32 33 36 2C 31 |123,97,255,236,1|
000003E0: 30 38 2C 31 32 37 2C 32 32 35 2C 32 35 31 2C 39 |08,127,225,251,9|
000003F0: 38 2C 32 35 32 2C 32 35 34 2C 31 36 30 00 1A 08 |8,252,254,160...|
00000400: ED 03 52 58 B2 B5 28 58 AA 2E 35 29 3A 52 59 B2 |..RX..(X..5):RY.|
00000410: B5 28 34 39 AB 59 AA 2E 35 29 00 3C 08 F2 03 53 |.(49.Y..5).<...S|
00000420: 51 B2 32 AC 28 52 59 20 AF 31 29 AA 28 52 58 20 |Q.2.(RY .1).(RX |
00000430: AF 20 31 29 3A 53 51 B2 32 AE 53 51 00 56 08 FC |. 1):SQ.2.SQ.V..|
00000440: 03 52 58 B2 B5 28 52 58 AD 32 29 3A 52 59 B2 B5 |.RX..(RX.2):RY..|
00000450: 28 52 59 AD 32 29 00 6D 08 06 04 53 50 B2 C2 28 |(RY.2).m...SP..(|
00000460: 43 52 54 AA 34 30 AC 52 59 AA 52 58 29 00 90 08 |CRT.40.RY.RX)...|
00000470: 10 04 81 20 49 49 B2 30 20 A4 20 31 35 3A 8B 20 |... II.0 . 15:. |
00000480: 53 50 B2 53 51 28 49 49 29 20 A7 20 31 30 37 30 |SP.SQ(II) . 1070|
00000490: 00 99 08 1A 04 82 20 49 49 00 B9 08 24 04 49 49 |...... II...$.II|
000004A0: B2 30 3A 8F 20 47 41 52 42 41 47 45 2D 41 53 53 |.0:. GARBAGE-ASS|
000004B0: 55 4D 45 20 42 4C 41 4E 4B 00 D2 08 2E 04 49 49 |UME BLANK.....II|
000004C0: B2 49 49 20 B0 20 53 51 3A 53 50 B2 53 51 28 49 |.II . SQ:SP.SQ(I|
000004D0: 49 29 00 E8 08 38 04 97 20 43 52 54 AA 34 30 AC |I)...8.. CRT.40.|
000004E0: 52 59 AA 52 58 2C 53 50 00 EE 08 42 04 8E 00 09 |RY.RX,SP...B....|
000004F0: 09 DC 05 59 B2 59 41 3A 81 58 B2 30 A4 37 39 3A |...Y.YA:.X.0.79:|
00000500: 8D 20 31 30 30 30 3A 82 58 00 24 09 E6 05 58 B2 |. 1000:.X.$...X.|
00000510: 58 41 3A 81 59 B2 30 A4 34 39 3A 8D 20 31 30 30 |XA:.Y.0.49:. 100|
00000520: 30 3A 82 59 00 2A 09 F0 05 8E 00 36 09 D0 07 54 |0:.Y.*.....6...T|
00000530: B2 54 49 AA 36 30 00 59 09 DA 07 99 20 22 13 11 |.TI.60.Y.... "..|
00000540: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000550: 11 11 11 11 11 11 11 22 3B 00 71 09 E4 07 85 20 |.......";.q.... |
00000560: 22 57 41 4E 54 20 41 4E 4F 54 48 45 52 22 3B 54 |"WANT ANOTHER";T|
00000570: 24 00 80 09 EE 07 54 24 B2 C8 28 54 24 2C 31 29 |$.....T$..(T$,1)|
00000580: 00 93 09 F8 07 8B 20 54 24 B2 22 59 22 20 A7 20 |...... T$."Y" . |
00000590: 31 30 30 00 CB 09 02 08 8B 20 54 24 B3 B1 22 4E |100...... T$.."N|
000005A0: 22 20 A7 20 99 20 22 50 4C 45 41 53 45 20 41 4E |" . . "PLEASE AN|
000005B0: 53 57 45 52 20 27 59 45 53 27 20 4F 52 20 27 4E |SWER 'YES' OR 'N|
000005C0: 4F 27 2E 22 3A 89 20 32 30 32 30 00 D1 09 0C 08 |O'.":. 2020.....|
000005D0: 80 00 EB 09 B8 0B 8F 20 43 55 52 53 4F 52 28 54 |....... CURSOR(T|
000005E0: 4D 29 20 4D 41 47 41 5A 49 4E 45 00 0F 0A C2 0B |M) MAGAZINE.....|
000005F0: 8F 20 50 2E 4F 2E 42 4F 58 20 35 35 30 2C 20 47 |. P.O.BOX 550, G|
00000600: 4F 4C 45 54 41 2C 20 43 41 20 39 33 30 31 37 00 |OLETA, CA 93017.|
00000610: 00 00 |.. |
....... (C) 1978 GLEN FISHER.".....J....
CURSOR(TM) MAGAZINE, JULY 1978 #1.O....
P.O. BOX 550, GOLETA, CA 93017.U.......
... SQ(15)...... I.0 . 15:. SQ(I):. I...
..CRT.32768.U.D.. ".......I CAN PLOT FOU
R FUNCTIONS:"...N.....X.. " 1: SIN(X), 0
<=X<=4."...... " 2: TAN(X), 0<=X<=4.".:.
... " 3: X^3+X^2+X,-1.25<=X<=0.75".`....
" 4: A USER-SPECIFIED FUNCTION"... .. "
IT SHOULD BE PUT AT LINES 800-999"..
.......... "PLEASE CHOOSE ONE:";F......
F.1 . F.4 . . "PLEASE TYPE A NUMBER FROM
1 TO 4":. 180...H.. "THANK YOU."...R.T.
TI.50...... TI.T . 220.(.... ".".B.... F
. 500,600,700,800.Q.... X.0 . 79.H...:Y
.25.20..(X.20..).S.... 1000.{.... X.....
. 2000...X.. X.0 . 79...].. X.10 . 650..
.B.:Y.25.3..(X.20..).T.L.:. Y.0 . Y.49 .
650.....:. 1000...... X...... 2000.....
YA.25:XA.50:. 1500...... X.0 . 79.*.A.X1
.(X.50).40.F.F.Y.25.((X1.X1.X1).X1).30.]
.P.. Y.0 . Y.49 . 740.H.Z.. 1000.P.... X
.{.... 2000... .. X.0 . 79...*.Y.X.8.5..
.>.. 1000...H.. X...R.. 2000............
32,126,124,226,123,97,255,236,108,127,2
25,251,98,252,254,160.....RX..(X..5):RY.
.(49.Y..5).<...SQ.2.(RY .1).(RX . 1):SQ.
2.SQ.V...RX..(RX.2):RY..(RY.2).M...SP.B(
CRT.40.RY.RX)...... II.0 . 15:. SP.SQ(II
) . 1070...... II...$.II.0:. GARBAGE-ASS
UME BLANK.R...II.II . SQ:SP.SQ(II)...8..
CRT.40.RY.RX,SP...B.......Y.YA:.X.0.79:
. 1000:.X.$...X.XA:.Y.0.49:. 1000:.Y.*..
...6.P.T.TI.60.Y.Z.. "..................
.......";.Q.... "WANT ANOTHER";T$.....T$
.H(T$,1)...... T$."Y" . 100.K.... T$.."N
" . . "PLEASE ANSWER 'YES' OR 'NO'.":. 2
020.Q.......... CURSOR(TM) MAGAZINE...B.
. P.O.BOX 550, GOLETA, CA 93017...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL