[Delphi] Creare un programma per LANCIARE i DADI

[lyllo]

domanda strana vero?

sapete mica come si fa creare un programma che lanci dei dadi a varie facce casualmente?

[a2000]

in 3D con urti a parete ?

[a2000]

a "filo di ferro" è semplice.

[lyllo]

semplicemente un programma che dopo aver scelto il numero delle facce del dado ed il numero dedi dadi da tirare, dia il valore numerico di ogni dado in una casella e il valore totale...

[cionci]

Guarda le funzioni randomize e random (se non sbaglio)...

[lyllo]

si grazie.

come evito che venga scelto lo 0?

[cionci]

Se mi fai un esempio (non me lo ricordo) di come si chiama la funzione random te lo dico...

[lyllo]

var numero:integer;
begin
  randomize;
  nuumero:=random(6);
end;

random prende un numero casuale tra 0 e 6..
come tolgo lo 0?
randomize serve e ce lo devo mettere.

[cionci]

Randomize; //lo devi chiamare una volta sola all'inizio del programma

int := 1 + Random(6); //in int finiscono nuemri da 1 a 6

[mjordan]

Originally posted by "cionci"

Randomize; //lo devi chiamare una volta sola all'inizio del programma

int := 1 + Random(6); //in int finiscono nuemri da 1 a 6

1 + random(5) altrimenti si ottiene 7

[lyllo]

ok grazie