int64 статический GetBlockValue (интермедиат nHeight, int64 nFees, uint256 prevHash)
{
       Int64 nSubsidy = 10 * МОНЕТКА;

       станд :: строка cseed_str = prevHash.ToString () зиЬзЬг (7,7).
       Const символ * cseed = cseed_str.c_str ();
       длинные семян = hex2long (cseed);
       INT Rand = generateMTRandom (начальное, 800);
       INT rand1 = 0;
       INT rand2 = 0;
       INT rand3 = 0;
       INT rand4 = 0;
       INT rand5 = 0;
       INT rand6 = 0;
       INT rand7 = 0;

      
       если (nHeight < 80 000)    
       {
               nSubsidy = Rand * МОНЕТКА;
       }



       иначе если (nHeight < 160000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (7,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand1 = generateMTRandom (семена, 400);
               если (rand1 < 1)
               nSubsidy = rand1 + 1 * МОНЕТКА;
               иначе если (rand1 > 1)
               nSubsidy = rand1 * МОНЕТКА;
       }
       иначе если (nHeight < 240000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (6,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand2 = generateMTRandom (семена, 300);
               если (rand2 < 2)
               nSubsidy = rand2 + 2 * МОНЕТКА;
               иначе если (rand2 > 2)
               nSubsidy = rand2 * МОНЕТКА;
       }
       иначе если (nHeight < 320000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (7,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand3 = generateMTRandom (семена, 200);
               если (rand3 < 3)
               nSubsidy = rand3 + 3 * МОНЕТКА;
               иначе если (rand3 > 3)
               nSubsidy = rand3 * МОНЕТКА;
       }
       иначе если (nHeight < 400000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (7,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand4 = generateMTRandom (семена, 100);
               если (rand4 < 4)
               nSubsidy = rand4 + 4 * МОНЕТКА;
               иначе если (rand4 > 4)
               nSubsidy = rand4 * МОНЕТКА;
       }
       иначе если (nHeight < 480000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (6,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand5 = generateMTRandom (семена, 50);
               если (rand5 < 5)
               nSubsidy = rand5 + 5 * МОНЕТКА;
               иначе если (rand5 > 5)
               nSubsidy = rand5 * МОНЕТКА;
       }
       иначе если (nHeight < 560000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (7,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand6 = generateMTRandom (семена, 25);
               если (rand6 < 6)
               nSubsidy = rand6 + 6 * МОНЕТКА;
               иначе если (rand6 > 6)
               nSubsidy = rand6 * МОНЕТКА;
       }
       иначе если (nHeight < 600000)      
       {
               cseed_str = prevHash.ToString () зиЬзЬг (7,7).
               cseed = cseed_str.c_str ();
               семян = hex2long (cseed);
               rand1 = generateMTRandom (начальное, 14);
               если (rand7 < 1)
               nSubsidy = rand7 + 7 * МОНЕТКА;
               иначе если (rand7 > 7)
               nSubsidy = rand7 * МОНЕТКА;
       }


        nSubsidy >>= (NHeight / +1000000);

   вернуться nSubsidy;
}