'Esta aplicacion hace parte del curso de robotica para niƱos
'dictado en la universidad sergio arboleda
'Bogota Colombia
'visitanos en:
' www.roboticaenlasergio.wordpress.com
' Este programa genera un conteo ascendente o descendente
'usando la instruccion for
'y seleccionando la dir del conteo con if else y elseif
'tambien se incluyo un delay
'Creamos una ventana de texto
TextWindow.Show()
selecciona:
TextWindow.WriteLine("+ascendente -descendente")
dir=TextWindow.Read()
If dir="+" then
TextWindow.WriteLine("Para arriba")
For a = 0 to 10
TextWindow.WriteLine(a)
Program.Delay(300)
EndFor
ElseIf dir="-" then
TextWindow.WriteLine("Para abajo")
For a = 10 to 0 Step -1
TextWindow.WriteLine(a)
Program.Delay(300)
EndFor
Else
TextWindow.Clear()
TextWindow.WriteLine("opcion invalida")
TextWindow.WriteLine("por favor introduzca +/-")
TextWindow.WriteLine("+ascendente -descendente")
Goto selecciona
EndIf