lunes, 25 de enero de 2016

Animación

En este trabajo de basic hemos realizado una animación y estos son los pasos que hay que hacer

do
clg
input "Distancia de un paso ->", y
input "Pasos ->" , x
cls
color green
for y = 1 to x
clg
circle 20+y, 200, 20
next y

input "¿Quiere repetir el proceso ( S / N)?", z$
until z$ = "N"

PRINT "Adiós"

No hay comentarios:

Publicar un comentario