sine.bas. By Lee Davison. |
sine.basAnother short, not worth zipping, example. This runs faster for the left sweep of the curve because there is less to print.
10 DO 20 FOR A=0 TO TWOPI STEP PI/10 30 PRINT SPC(SIN(A)*18.5+20);"*" 40 NEXT 50 LOOP
Last page update: 4th May, 2004. | e-mail me |