Hallo,
Das mit den Bahnhöfen habe ich jetzt mal geändert:
Delphi-Quellcode:
-2 : begin
Inhalt := (Pos+5)DIV 10;
IF Inhalt > 3 then
begin
Inhalt:=0;
inc(Geld,UeberLos);
end;
Pos := Inhalt*10+5;
inc(feldstat[Pos]);
end;
Los muss doch häufiger sein, wenn 1/14.5 der Karten "Rücke vor bis auf Los" und es 6 Felder Ereignis/Gemeinschaftsfelder pro Runde gibt.
Gruß Horst
Edit:
Durch das Verbleiben im Gefängnis, wenn man nicht einen Pasch gewürfelt oder dreimal ausgesetzt hat, sinkt die Anzahl der zusätzlichen Bewegungen von 8% auf 1.8%
Code:
10 Gefängnis 594569 133,58%
24 Opernplatz 295732 16,18%
0 Los 290022 13,94%
18 Wiener Straße 283764 11,48%
19 Berliner Straße 280244 10,10%
20 Frei Parken 279403 9,76%
...
Gesammtanzahl 10181887 statt 10000000