[Psychotech]

насколько помню нужно добавить
randomize;
перед очередным использованием функции рандома - он её обнуляет (или что то в этом роде)