One thing you can do to increase randomness is adding random simulated layers (I'm guessing this is what it is called in english, don't know the offical name sorry) like so:

Code
PROC
Rand_OneLayer((INTEGER)_maximum,(INTEGER)_rand)
AND
Random(_maximum,_rand1)
AND
DB_RandomShit1(_rand1,1)
AND
Random(_maximum,_rand2)
AND
DB_RandomShit1(_rand2,2)
AND
Random(_maximum,_rand3)
AND
DB_RandomShit1(_rand3,3)
AND
Random(_maximum,_rand4)
AND
DB_RandomShit1(_rand4,4)
AND
Random(4,_sel)
THEN
DB_RandomShit1(_rand,_sel);


This is just an exemple, you can make it "more random" by either increasing its "range" ex.: go all the way to DB_RandomShit(_rand100,100), or increasing its depth, where instead of calling the random function to get the random number, you call a proc just like this one, this way you'd be adding a "layer" to it, something like:

Code
PROC
Rand_TwoLayer((INTEGER)_maximum,_rand)
AND
Rand_OneLayer(_maximum,_rand1)
AND
DB_RandomShit2(_rand1,1)
AND
Rand_OneLayer(_maximum,_rand2)
AND
DB_RandomShit2(_rand2,2)
AND
Rand_OneLayer(_maximum,_rand3)
AND
DB_RandomShit2(_rand3,3)
AND
Rand_OneLayer(_maximum,_rand4)
AND
DB_RandomShit2(_rand4,4)
AND
Random(4,_sel)
THEN
DB_RandomShit2(_rand,_sel);


There are some other ways, but i'm not sure how real and integer conversions work on osiris, i do know that generating random numbers between 0 - 1 will have a better random value, i remember my teacher explained this in linear algebrae but i can't remember so take it with a grain of salt.

Hope it helps laugh