#include "random32.h"
static const unsigned long x[8][55] = {
{
    1410651636UL, 3012776752UL, 3497475623UL, 2892145026UL, 1571949714UL,
    3253082284UL, 3489895018UL,  387949491UL, 2597396737UL, 1981903553UL,
    3160251843UL,  129444464UL, 1851443344UL, 4156445905UL,  224604922UL,
    1455067070UL, 3953493484UL, 1460937157UL, 2528362617UL,  317430674UL,
    3229354360UL,  117491133UL,  832845075UL, 1961600170UL, 1321557429UL,
     747750121UL,  545747446UL,  810476036UL,  503334515UL, 4088144633UL,
    2824216555UL, 3738252341UL, 3493754131UL, 3672533954UL,   29494241UL,
    1180928407UL, 4213624418UL,   33062851UL, 3221315737UL, 1145213552UL,
    2957984897UL, 4078668503UL, 2262661702UL,   65478801UL, 2527208841UL,
    1960622036UL,  315685891UL, 1196037864UL,  804614524UL, 1421733266UL,
    2017105031UL, 3882325900UL,  810735053UL,  384606609UL, 2393861397UL
},
{
    249823215UL, 996554382UL, 405646651UL, 90565232UL, 498412416UL,
    2498651335UL, 432465613UL, 11651332UL, 116305432UL, 1984610654UL,
    465413545UL, 50655465UL, 21165513UL, 11654300UL, 54681307UL,
    532512513UL, 506555416UL, 206546013UL, 23684055UL, 57161644UL,
    2213215UL, 70321654UL, 20491651UL, 81346513UL, 81613315UL,
    41321323UL, 1985132133UL, 1068761512UL, 406546833UL, 2777465477UL,
    187900568UL, 706546831UL, 3065465165UL, 344656UL, 2132159811UL,
    60971561UL, 61156156UL, 216761065UL, 33246565UL, 9791566UL,
    3312502554UL, 80616546UL, 687513131UL, 1564686465UL, 37651616UL,
    989643210UL, 706165654UL, 169411681UL, 40651656UL, 1032165468UL,
    606546889UL, 51650665UL, 1065646518UL, 698654161UL, 35416486UL
},
{
    25581315UL, 86405514UL, 10512815UL, 10101989UL, 57106669UL, 
    81904845UL, 77375919UL, 93169520UL, 89556033UL, 59834848UL, 
     8735946UL,  2738049UL, 84201545UL,  9008874UL, 41874139UL, 
    21522130UL, 24605952UL, 62478206UL, 63912001UL, 22298615UL, 
    48812329UL, 16080178UL,  5055855UL, 81881579UL, 83579173UL, 
    58591086UL, 53993947UL, 54725003UL, 29637765UL, 55185610UL, 
     2183616UL, 41804303UL, 42597312UL, 85522505UL, 33689061UL, 
    72243957UL,  4670024UL, 54997336UL, 74359159UL,  4437578UL, 
    93339818UL,  5231023UL, 87438517UL,  7350948UL,   812533UL, 
    76026798UL,  5488233UL, 63864521UL, 90491612UL, 17442028UL, 
    84757058UL, 41469393UL,  8863356UL, 30232597UL, 16408509UL, 
},
{
    55236414UL, 95210507UL, 95052255UL, 41638109UL, 97774256UL, 
    20128957UL, 78297228UL, 27036733UL, 88524796UL, 89757715UL, 
    32489778UL, 35931990UL, 33884574UL, 96016176UL, 67775972UL, 
    21978216UL, 81577167UL, 67961183UL, 51141066UL, 88344485UL, 
    26677932UL, 15028506UL, 71207411UL, 96116770UL, 85146805UL, 
    29322981UL, 28471308UL, 44966342UL, 36267846UL, 75665351UL, 
    90954239UL, 80775207UL, 82090748UL, 39581569UL, 77272538UL, 
    27552398UL, 19777518UL, 96952533UL, 88907962UL, 30027754UL, 
    84777729UL,   627756UL, 39848654UL, 96016425UL, 84654903UL, 
    29691300UL, 58713522UL,  8118312UL, 20098028UL, 64165820UL, 
    58040421UL, 95530527UL, 75465307UL, 11105459UL, 55636200UL, 
},
{
    59080732UL, 28091621UL, 93952090UL, 82903987UL, 64416763UL, 
    54503947UL, 24680524UL,  4498598UL, 68808738UL,   593715UL, 
    75947355UL, 83705617UL,  6452160UL, 45894026UL,  5461877UL, 
    43877477UL, 93469795UL, 42590627UL,  5194026UL, 37136293UL, 
    78123362UL, 14035325UL, 16952571UL, 48384481UL, 70093489UL, 
    52432885UL, 48760856UL,  7663595UL, 46115250UL, 91044173UL, 
    81120058UL, 64687526UL, 84557047UL, 23106751UL, 44246728UL, 
    69618769UL,  1664846UL, 65479903UL, 76975468UL, 27192390UL, 
    57522801UL, 81158920UL, 98833623UL, 99560997UL, 95839353UL, 
    50962895UL, 83808359UL, 19716731UL, 39857375UL, 26683187UL, 
    34831407UL, 61128045UL, 82055393UL, 58079032UL, 54234902UL, 
},
{
    93190456UL, 38367802UL, 80912439UL, 59912190UL, 10543990UL, 
    97115257UL,  1628124UL, 62180101UL, 79128806UL, 80735750UL, 
       79960UL, 44527329UL, 44975902UL,  9317514UL, 91434256UL, 
    34396166UL, 93101185UL, 73074946UL, 55597452UL,  9909806UL, 
    99656022UL,  4351484UL, 26548995UL, 66644048UL, 25638831UL, 
    27067883UL, 87779270UL, 36858645UL, 61332547UL,  4482243UL, 
     5930529UL, 83733064UL, 53912913UL, 56974046UL,  7672552UL, 
    49901153UL, 28274697UL, 32347467UL, 87009638UL, 85416730UL, 
    97792091UL, 93588623UL, 77619910UL, 25619678UL, 41202144UL, 
    22995698UL, 64181090UL,  4065486UL, 28139377UL, 20632873UL, 
    31785025UL, 20475911UL, 47444896UL, 62308619UL, 91240534UL, 
},
{
    25885112UL, 66001829UL, 59963685UL, 30601471UL, 88943853UL, 
    53456778UL, 69492168UL, 54009215UL, 48155587UL, 24708056UL, 
    51504365UL, 97396067UL, 52462959UL, 28149490UL, 57224555UL, 
    50172721UL, 72967201UL, 45409786UL, 43636246UL, 45471916UL, 
    68563107UL, 65072272UL, 76240184UL, 69219751UL, 11112030UL, 
    61380032UL, 86581406UL, 94055611UL, 19294628UL, 57231114UL, 
    55676554UL,   894997UL, 26614030UL, 57512563UL, 28189518UL, 
    90542159UL,  9182925UL,  5737591UL, 77637194UL, 95185248UL, 
    37955047UL, 72299724UL, 98704238UL, 52569456UL, 89514346UL, 
    19965902UL, 56643126UL, 90156293UL, 49607773UL,  7247951UL, 
    21603428UL, 90402530UL, 94037066UL, 44637129UL, 63922669UL, 
},
{
    56964333UL, 14952820UL, 71976653UL, 26257488UL, 41039216UL, 
    37697694UL, 28224922UL, 57492690UL, 58296025UL, 35972307UL, 
    57444015UL, 40093127UL, 92928846UL, 87593379UL, 45372324UL, 
    34409029UL, 51593116UL, 71407826UL, 72922064UL,  8628672UL, 
    93234753UL, 14489331UL,  4179408UL, 56435997UL, 17522852UL, 
    85032861UL, 96707829UL, 58554514UL, 47439715UL, 51071090UL, 
    77787916UL, 44320688UL, 43162155UL, 41008880UL, 45492906UL, 
     9010856UL, 53928882UL, 16202648UL, 48844480UL, 60180553UL, 
    95038075UL, 63176413UL, 55342574UL, 97627221UL,  5521623UL, 
     9011378UL, 98576110UL, 37103710UL, 41894585UL, 99208457UL, 
    87514263UL, 12548173UL, 85262642UL, 33961589UL, 53980295UL, 
}
};

static unsigned long y[8][55];

static int vj, vk;

void init_Random32(void)
{
  int i,j;
  for (i = 0; i < 8; i++)
    for (j = 0; j < 55; j++)
      y[i][j] = x[i][j];
  vj = 24 - 1;
  vk = 55 - 1;
}

unsigned int Random32(int idx)
{
  unsigned long ul = (y[idx][vk] += y[idx][vj]);
  if (--vj < 0)
    vj = 55 - 1;
  if (--vk < 0)
    vk = 55 - 1;
  return ((unsigned int) ul);
}

unsigned int Randcard(int idx)
{
  return Random32(idx) % 13;
}