Einfaches Würfel Programm gibt fehler

[24karatboy]

vorher als ich das randomize in der procedure hatte kam nen ergebnis raus und jetzt nichtmehr