El programa siguiente animará los gráficos en WLIST hacia delante y hacia
atrás:
«
WLIST DUP
REVLIST +
OBJ
ANIMATE
»
Almacene este programa en una variable llamada RANI2 (Re-ANImate
versión 2). Para activarlo, presione @RANI2. La animación ahora simula una
ondulación en la superficie del agua quieta que se refleja en las paredes de
un tanque circular. Presione $ para detener la animación.
Ejemplo 2 - Animando trazas de diversas funciones de potencias
Suponga que usted desea animar las trazas de la función f(x) = x
2, 3, 4, en el mismo sistema de ejes. Usted podría utilizar el programa
siguiente:
«
RAD
131 R B 64 R B PDIM
0 2 XRNG 0 20 YRNG
0 4 FOR j
'X^j' STEQ
ERASE
DRAX LABEL DRAW
PICT RCL
NEXT
5 ANIMATE
»
Almacene este programa en una variable llamada PWAN (inglés, PoWer
function ANimation).
@PWAN.
Usted verá la calculadora dibujar cada función individual de la
energía antes de comenzar la animación en la cual las cinco funciones serán
Comenzar programa
Lista WLIST en pantalla, copia adicional
Revertir orden, concatenar 2 listas
Decomponer lista, nivel 1 = 22
Comenzar la animación
Terminar programa
Comenzar programa
Cambiar a radianes
PICT ajustada a 131×64 píxel
Ajustar rangos x y
Lazo con j = 0,1,...,4
Almancenar 'X^j' en variable EQ
Borrar PICT actual
Dibujar ejes, etiquetas, funciones
PICT a la pantalla
Finalizar lazo FOR-NEXT
Animar
Para activar el programa use J (si es necesario)
n
, n = 0, 1,
Página 22-30