Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /*
- int sd;
- //this is going to be our sequence of untempered mt_rand() values.
- //values 0 through 623 are set by mt_srand(), values after that are generated by mt_reload() in sets of 624.
- int[int] s;
- int mt_index = 623;
- //this will be used to track when we need to call mt_reload().
- int random_numbers_left;
- //this is the MT recursion function, maybe?
- int twist(int m, int u,int v){
- return ( m ^ ( ( ( u & 2147483648 ) | ( v & 2147483647 ) ) >> 1 ) ^ ( ( 4294967295 * ( u & 1 ) ) & 2567483615 ) ) ;
- }
- //this is the tempering function. God only knows what it does.
- int temper(int x){
- int s_one;
- s_one = s[x];
- s_one ^= (s_one >> 11);
- s_one ^= (s_one << 7) & 2636928640;
- s_one ^= (s_one << 15) & 4022730752;
- return ( s_one ^ (s_one >> 18) );
- }
- void mt_srand(int seed){
- sd = seed;
- clear(s);
- mt_index = 623;
- random_numbers_left = 0;
- //this is how mt_srand() converts the seed into a 624 word initial condition.
- s[0] = sd & 2147483647;
- for j from 1 to 623{
- s[j] = ( ( 1812433253 * ( s[j-1] ^ ( s[j-1] >> 30 ) )) + j ) & 4294967295 ;
- }
- }
- void mt_reload(){
- //this generates the next 624 terms, which are the first 624 outputs of mt_rand() before tempering, probably? and I don't care about more than that, probably?
- //for i from 0 to 623{
- // s[i+624] = twist(s[i+397],s[i],s[i]);
- for i from mt_index to (mt_index+623){
- s[i+1] = twist(s[i-226],s[i-623],s[i-623]);
- }
- random_numbers_left+= 624;
- }
- //this is going to actually spit out random numbers in the specified range, allegedly.
- int mt_rand(int min, int max){
- mt_index++;
- if(random_numbers_left == 0){
- mt_reload();
- }
- else{
- random_numbers_left--;
- }
- return (min + ( max - min + 1 ) * (( temper(mt_index) >> 1 ) / ( 2147483647 + 1.0))) ;
- }
- //returns the [position]-th number that mt_rand([low],[high]) would return in PHP 5.3 when seeded with [seed]
- int[int] seeded_mt_rand(int seed,int low, int high, int position){
- int[int] ret;
- mt_srand(seed);
- for i from 1 to position{
- ret[i] = mt_rand(low,high);
- }
- return ret;
- }
- */
- //glibc rand()
- int next;
- int but = 2**31;
- int bot = 2**16;
- int[int] s;
- int place = 0;
- void srand(int x){
- clear(s);
- //probably wants to be an unsigned int (i.e. in range [0,2**32-1]) based on php-src/ext/standard/rand.c lines 44-52
- s[0] = x;
- for i from 1 to 30{
- s[i] = (s[i-1] * 16807) % (but-1);
- }
- for i from 31 to 33{
- s[i] = s[i-31];
- }
- for i from 34 to (344){
- s[i] = (s[i-3] + s[i-31]) % (2*but);
- }
- place = 344;
- }
- int rand(int min, int max){
- //LCG stuff:
- //from IBM and C and POSIX
- //next = (1103515245 * next + 12345);
- //next %= but;
- //next &= but-bot;
- //from some other C thing
- //next = (1103515245 * next + 12345);
- //next %= but*2;
- //next &= but-bot;
- //from MS Visual C
- //next = (214013 * next + 2531011);
- //next %= 2*but;
- //next &= but-bot;
- //glibc implementation
- s[place+1] = (s[place-2] + s[place-30]) % (2*but);
- next = s[place+1] >> 1;
- place++;
- return (min + ( max - min + 1 ) * ( next / ( (but -1) + 1.0))) ;
- //return (next);
- }
- int seeded_rand(int seed, int low, int high){
- srand(seed);
- return rand(low, high);
- }
- int[int] array_rand(int[int] source, int num_req)
- {
- int num_avail = source.count();
- int dest_index = 0;
- int source_index = 0;
- int[int] dest; // yes, i know this is a map; didn't see an easy way to dynamically allocate arrays
- if((num_req == 0)||(num_req > num_avail))
- {
- abort("Second argument has to be between 1 and the number of elements in the array");
- }
- while(num_req > 0)
- {
- // the PHP source's version divides by (PHP_RAND_MAX + 1.0), which may or may not be required depending on your RNG
- //float randval = mt_rand(0,2147483647).to_float()/(2147483648).to_float();
- float randval = rand(0,2147483647).to_float()/(2147483648).to_float();
- float chance_of_inclusion = num_req.to_float() / num_avail.to_float();
- if(randval < chance_of_inclusion)
- {
- dest[dest_index]=source_index;
- dest_index += 1;
- num_req -= 1;
- }
- num_avail -= 1;
- source_index += 1;
- }
- return dest; // still a map instead of an array; hopefully that won't cause any problems
- }
- int[int] to_randomize;
- for i from 0 to 169{
- to_randomize[i]=i;
- }
- //mt_srand(426695+10);
- srand(426695+10);
- int[int] randomized = array_rand(to_randomize,4);
- foreach i in randomized{
- print(i+": "+(randomized[i]+1));
- }
- /*we want to see
- 123
- 79
- 115
- 133
- somewhere here because those are the 4 enchantments on the item corresponding to seed 426695+10.
- */
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement