Warum eigentlich nicht so? Spart man sich doch das ganze IF Geraffel ...
aktFeld := ( aktFeld + Wuerfel - 1 ) MOD 16 + 1
Allerdings kann dieses wesentlich eleganter durch eine verkettete Liste dargestellt werden.
16 Feld-Instanzen, die einen Verweis auf den Nachfolger haben.
Die Instanz 1 zeigt auf 2
Die Instanz 2 zeigt auf 3
...
Die Instanz 15 zeigt auf 16
Die Instanz 16 zeigt auf 1
Und schon läuft das rund
Kaum macht man's richtig - schon funktioniert's

Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)