'sinewave.bas - This example draws some colorful sine waves
print "Here is a nice spiral and some colorful sine waves."
graphic #sineGraph, 300, 200
#sineGraph cls("black")
#sineGraph place(150, 100)
for x = 1 to 70
#sineGraph color(x*2, x*2, x*2)
#sineGraph go(x*5)
#sineGraph turn(122)
next x
for x = 1 to 300
#sineGraph size(3)
#sineGraph color("blue")
#sineGraph set(x, 85*sin((50+x)/25)+100)
#sineGraph color("green")
#sineGraph set(x, 85*sin((100+x)/25)+100)
#sineGraph color("red")
#sineGraph set(x, 85*sin(x/25)+100)
next x
render #sineGraph
print "Try editing the code to see how you can customize this graphic."
end
Es de la misma empresa de Liberty Basic. El SDK se ejecuta en el propio navegador. El lenguaje es un poco complicado o al menos no se parece mucho al BASIC clásico. No creo sea el mejor entorno para aprender algo con este BASIC. Lleva incorporados algunos ejemplos, un manual en linea y acceso a los foros. Es gratuito. Pero por probarlo nada se pierde.
http://runbasic.wikispaces.com/
http://www.runbasic.com/seaside/go/runbasic?_s=TtQdXoZAtUOVFBUp&_k=ncERkJuP
http://runbasic.proboards.com/
No hay comentarios:
Publicar un comentario
Nota: solo los miembros de este blog pueden publicar comentarios.