HP 39gII, User Manual

Page: 271 / 355

Programming 261
c2 can be
0
to
3
(
0
=black,
1
= dark gray,
2
= light gray,
3
= white). c2 is optional. If not specified the background
is not erased.
Example:
This program displays the successive approximations for
using the series for the arctangent(1).
EXPORT RUNPISERIES()
BEGIN
LOCAL sign;
2 K;4 A;
-1 sign;
RECT();
TEXTOUT_P("N=",0,0);
TEXTOUT_P("PI APPROX=",0,30);
REPEAT
A+sign*4/(2*K-1) A;
TEXTOUT_P(K
,35,0,2,0,100,3);
TEXTOUT_P(A
,90,30,2,0,100,3);
sign*-1 sign;
K+1 K;
UNTIL 0;
END;
The program executes until
the user presses O to terminate. The spaces after
K
(the number of the term) and
A
(the current
approximation) in the
TEXTOUT_P
commands are there
to overwrite the previously displayed value.
BLIT and
BLIT_P
Syntax:
BLIT
([ trgtGRB, dx1, dy1, dx2, dy2 ],
srcGRB [ ,sx1, sy1, sx2, sy2, c ])
BLIT_P
([ trgtGRB, dx1, dy1, dx2, dy2 ],
srcGRB [ ,sx1, sy1, sx2, sy2, c ])