[Neko] Generating random values

[Transdiv]

Hi

I want to fill the array with random values from 0 to 1000, but not sure what 
I'am making wrong with the std libs :


var Values = $amake(5000); 
var ind = 1;

var p1 = $loader.loadprim("[EMAIL PROTECTED]",0);
var p2 = $loader.loadprim("[EMAIL PROTECTED]",2);
var p3 = $loader.loadprim("[EMAIL PROTECTED]",2);
var p4 = $loader.loadprim("[EMAIL PROTECTED]",1);


p2( p1() , 5 );

while ( ind <= 5000 ) {
   Values[ ind ] = p3( p1(), 1000 );
   ind = ind + 1;
}

ind = 1;
while ( ind <= 100 ) {
   $print ( Values[ ind ] , "\n" );
   ind = ind + 1;
}



-- 
Neko : One VM to run them all
(http://nekovm.org)