END;
Symb()
BEGIN
H1:= {'D1','D2',1,0,#FF:24h}
STARTVIEW(0,1);
END;
De routine ROLLMANY() is een aanpassing van het programma dat eerder in dit hoofdstuk werd beschreven.
Aangezien u geen parameters kunt doorgeven in een programma dat wordt aangeroepen via een selectie uit
een aangepast menu Weergave, worden de geëxporteerde variabelen SIDES en ROLLS gebruikt in plaats
van de parameters die in de eerdere versies werden gebruikt.
Het bovenstaande programma roept twee andere gebruikersprogramma's aan: ROLLDIE() en DICESIMVARS().
ROLLDIE() werd eerder in dit hoofdstuk beschreven. Hier volgt DICESIMVARS. Maak een programma met deze
naam en voer de volgende code in.
Het programma DICESIMVARS
EXPORT ROLLS,SIDES;
EXPORT DICESIMVARS()
BEGIN
10 ▶ ROLLS;
6 ▶ SIDES;
END;
1.
Druk op
2.
Druk op
het aantal zijden van de dobbelsteen en het aantal worpen instellen en een simulatie uitvoeren.
3.
Selecteer Rollen instellen en voer de waarde 100 in.
622 Hoofdstuk 29 Programmeren in HP PPL
en open DiceSimulation. In de notitie wordt uitgelegd hoe de app werkt.
om het menu voor de aangepaste app te bekijken. Hier kunt u de app resetten (Start),