Enhanced BASIC, sine.bas

Enhanced BASIC, sine.bas by Lee Davison
[Back]

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

[e-mail]

Last page update: 4th March, 2003.