sin.bas

来自「smallbasic for linux」· BAS 代码 · 共 12 行

#!/usr/local/bin/sbrun -g
rem sin,cos

cls
print "sin(x), cos(x)"

line 0,80,159,80
for i=0 to 159
	pset i,80+sin(i*2*pi/160)*60
	pset i,80+cos(i*2*pi/160)*60
next