Zufallszahl generieren mit RND() ?!?

Hallo,
wenn ich das richtig interpretiere kann der Rnd-Befehl Zufallszahlen generieren,
Nur wenn ich folgendes Listing im Simulator vom AVR-Bascom
starte:


Dim Zufall as word

ziehung:
Zufall = Rnd(5) ' Zufallszahl
print Zufall
waitms 500

goto ziehung

kommt folgendes Ergebnis immer wieder so oft ich das Programm starte, immer
wieder die gleiche Zahlenfolge.

4 3 2 3 0 3 3 2 4 3 3 1
4 3 2 3 0 3 3 2 4 3 3 1
4 3 2 3 0 3 3 2 4 3 3 1
...
....
.....

Wobei ich unter einen Zufallsgenerator mehr verhoffe, hat jemand eine
Lösung und kann mir weiter helfen, sodass ich bei jedem neuen Aufruf
des Labels 'ziehung', neu Werte erhalte zB.

1 4 2 2 3 1 2 2 0 3 2 4
0 2 3 2 4 1 4 4 4 2 1 3
...
....
.....

gruss

Hi, schau die das "help" von RND() an, da steht alles

Genau, in der Hilfe steht alles - z.b. das bei jedem Neustart der RND() Befehl immer wieder die selben Zahlen generiert - das hat mich auch schon leicht verwundert, denn eine Zufallszall ist eine Zufallszahl und der RND() Befehl wird dieser Erwartung alles andere als gerecht...

Ja, das stimmt. Aber du mußt versuchen, die SEED geeignet zu setzen
(z.B. Aktueller Wert irgendeines Timer-Counters)
mfg robert

jo Danke für diese Tips - werde es gleich mal probieren.