526 Programming in HP PPL
BEGIN
Xmin:=-0.1;
Xmax:= MAX(D1)+1;
Ymin:= −0.1;
Ymax:= MAX(D2)+1;
STARTVIEW(1,1);
END;
Symb()
BEGIN
SetSample(H1,D1);
SetFreq(H1,D2);
H1Type:=1;
STARTVIEW(0,1);
END;
The ROLLMANY() routine is an adaptation of the program
presented earlier in this chapter. Since you cannot pass
parameters to a program called through a selection from
a custom View menu, the exported variables SIDES and
ROLLS are used in place of the parameters that were used
in the previous versions.
The program above calls two other user programs:
ROLLDIE() and DICESIMVARS(). ROLLDIE()
appears earlier in this chapter. Here is DICESIMVARS.
Create a program with that name and enter the following
code.
The program
DICESIMVARS
EXPORT ROLLS,SIDES;
EXPORT DICESIMVARS()
BEGIN
10 ▶ ROLLS;
6 ▶ SIDES;
END;
1. P r e s s
I, and open DiceSimulation. The note
will appear explaining how the app works.