clg
fastgraphics
for x = 1 to 4 * 3.14159 step 0.05
y = sin(x)
plot int(20*x), 150 + int(30*y)
next x

refresh

for x = 1 to 4 * 3.14159 step 0.05
y = cos(x)
plot int(20*x), 150 + int(30*y)
next x

refresh

for x = 1 to 4 * 3.14159 step 0.01
y = tan(x)
plot int(20*x), 150 + int(30*y)
next x

refresh