Inhaltsverzeichnis
Werbung
MSGBOX("Muss >= 2 sein");
END;
UNTIL SIDES>=2;
END;
VIEWS "Würfe festlegen",SETROLLS()
BEGIN
REPEAT
INPUT(ROLLS,"Anz. Würfe","N = ","Geben Sie
die Anzahl der Würfe an",10);
FLOOR(ROLLS) ROLLS;
IF ROLLS<1 THEN
MSGBOX("Sie müssen eine Zahl im Wert von
>= 1 eingeben");
END;
UNTIL ROLLS>=1;
END;
Plot()
BEGIN
–1 Xmin;
MAX(D1)+1 Xmax;
0 Ymin;
MAX(D2)+1 Ymax;
STARTVIEW(1,1);
END;
Die Routine ROLLMANY() ist die Adaption eines
anderen, weiter oben in diesem Kapitel dargestellten
Programms. Da Sie keine Parameter an ein Programm
weitergeben können, das durch Auswahl in einem
benutzerdefinierten Ansichtenmenü aufgerufen wurde,
werden anstelle der in den vorherigen Versionen
verwendeten Parameter die exportierten Variablen
SIDES und ROLLS verwendet.
Das Programm oben ruft zwei weitere
Benutzerprogramme auf: ROLLDIE() und
Programmieren
275
Werbung
Inhaltsverzeichnis
