my $randomx=37; # the seed for x
005: my $randomy=1531; # the seed for y

##</code><code>##

$n_randomx=(($randomx*106+1283) % 6075) / 6075; 
...
$randomx=$n_randomx;