EJERCICIO (Move Windows)

**********************************************************************
*Objetivo: Mover una ventana
**********************************************************************
define windows ventana from 1,1 to 20,40 title "VENTANA EN MOVIMIENTO"
activate windows ventana
wait "oprima una tecla para continuar" windows
for i=1 to 25
for x=1 to 1000000 && esto sirve para hacer mas lento el movimiento
endfor
* mueve ventana variando la linea desde 1 hasta 25 manteniendo la forma original
move windows ventana to i,1
endfor
wait "oprima una tecla para continuar" windows
deactivate windows ventana
return