The program

DICESIMVARS

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.

EXPORT ROLLS,SIDES; EXPORT DICESIMVARS() BEGIN

10 ROLLS;

6SIDES; END;

1.Press I, and open DiceSimulation. The note will appear explaining how the app works.

526

Programming in HP PPL

Page 532
Image 532
HP Prime Graphing NW280AAABA STARTVIEW1,1 END, STARTVIEW0,1 END, Export ROLLS,SIDES Export Dicesimvars Begin, Sides END