HP 49g+, Руководство пользователя, Страница: 740 / 862

Page 22-28
The 11 graphics generated by the program are still available in the stack. If
you want to re-start the animation, simply use: 11 ANIMATE. (Function
ANIMATE is available by using
„°L @)GROB L @ANIMA
). The
animation will be re-started. Press
$
to stop the animation once more.
Notice that the number 11 will still be listed in stack level 1. Press
ƒ
to
drop it from the stack.
Suppose that you want to keep the figures that compose this animation in a
variable. You can create a list of these figures, let’s call it WLIST, by using:
11 „° @)TYPE@ @ LIST ³ ~~wlist~ K
Press
J
to recover your list of variables. The variable
@WLIST
should now be
listed in your soft-menu keys. To re-animate this list of variables you could use
the following program:
«
Start program
WLIST Place list WLIST in stack
OBJ Decompose list, stack level 1 = 11
ANIMATE Start animation
»
End program
Save this program in a variable called RANIM (Re-ANIMate). To run it, press
@RANIM
.
The following program will animate the graphics in WLIST forward and
backwards:
«
Start program
WLIST DUP Place list WLIST in stack, make extra copy
REVLIST + Reverse order, concatenate 2 lists
OBJ Decompose list in elements, level 1 = 22
ANIMATE Start animation
»
End program
Save this program in a variable called RANI2 (Re-ANImate version 2). To run
it, press
@RANI2
. The animation now simulates a ripple in the surface of