Up one sine.bas. By Lee Davison. Up to top

Introduction

Another short, not worth zipping, example. This runs faster for the left sweep of the curve because there is less to print.

sine.bas


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 e-mail