Compucolor.org – Virtual Media

Listing of file='SINE.BAS;01' on disk='vmedia/utility-sector.ccvf'

5 PLOT 12
7 PLOT 29,18
10 PI= 3.14159265
20 PRINT "DEG",,"SINE"
30 PRINT
40 FOR DEG= 0TO 360STEP 15
50 RAD= DEG* PI/ 180
60 PRINT DEG,,SIN (RAD)
70 NEXT DEG
80 PRINT
85 FOR S= 1TO 9000
86 NEXT S
90 LOAD "MENU":RUN