keybd INPUT yes screen OUTPUT lf swiss11 on ~\n%x,%y 1 nolist inptr \n\N yes 1 yes exponent 5 radians on 4.00000E+00 -4.00000E+00 4.00000E+00 -4.00000E+00 8 8 x,y home Once you have registered MathWeb, use this web to check out the plotting feature. Turn on Plotting and execute the script in this home cell. 3.10000E+01 r 6.65000E+00 theta 6.20000E+01 x 2.18890E+00 x0 0 y -2.40234E+00 y0 0