Nick: impic
XP: 999999
Code: hh31rtd-ffffff3

Source:
<?php
    $myxp 
= isset($_GET['xp']) ? $_GET['xp'] : 'nick';
    
$myname = isset($_GET['nick']) ? $_GET['nick'] : 0;
    
    
$udg_Constent="x";
    
$udg_OriginalSet="3khyirlv8nbd6efm5g902c1as7xjz4uqpowt`~!@#$^&*()-_=+";
    
$udg_NumberSet1="qdrbyujhpl";
    
$udg_NumberSet2="9213568740";
    
$udg_Codesets[0]="osi40hnlx1ctbmap5e8zguj279f3yd6wrkqv`~!@#$^&*()-_=+";
    
$udg_Codesets[1]="fx4cqbpyudrj7ktlmoie13w6gz05v29s8nah`~!@#$^&*()-_=+";
    
$udg_Codesets[2]="osi40hnlx1ctbmap5e8zguj279f3yd6wrkqv`~!@#$^&*()-_=+";
    
$udg_Codesets[3]="hy9asolwf5gk0tmj14i8nbd6xp7vecuqr2z3`~!@#$^&*()-_=+";
    
$udg_Codesets[4]="mgfy7kwcn8xupo0e9sjib2z3h15qr4davtl6`~!@#$^&*()-_=+";
    
$udg_Codesets[5]="7vogm1zsdxw59ykhn4ec2jtf3u8pqra06bil`~!@#$^&*()-_=+";
    
$udg_Codesets[6]="0uh9wir4fz3kpcbyd2a1lt6jnqmge85svox7`~!@#$^&*()-_=+";
    
$udg_Codesets[7]="w3kjaq5ve19ulopcbhyr2dgxfm0s8n7i4t6z`~!@#$^&*()-_=+";
    
$udg_Codesets[8]="ebjoq0zkx2g5sih8a9d31c6ylwpm4fun7tvr`~!@#$^&*()-_=+";
    
$udg_Codesets[9]="fx4cqbpyudrj7ktlmoie13w6gz05v29s8nah`~!@#$^&*()-_=+";
    
$udg_Codesets2[0]="qwe4rtysuiotpashdfgphjk7lzx5cvbbnmq6werutyufiopjasd8fghrjklwzxcgvbnimqwdertyyuioopaasdfkghjvklz2xcvxbnm1qwe0rtymuiozpasndfg9hjkelzxlcvbqnmqcwer3123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[1]="asdffgh0jklmzxcovbn3mqwqerteyuivoparsdf6ghj2klzjxcvbbnm4qwecrtyauiotpasidfg9hjkllzx8cvbznmq5werptyuxiopkasdyfghhjkluzxcwvbn1mqwsertnyuidoh6g0737123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[2]="rbhwyuzxsde7rgyuujb84rf5hy8i90peola923v4bn6geftnyhxcefcothplokl1ijnv34vjqw3redbq76hmplmkiwffgty36yhsfg4a3fg0yu9ypoxpxcvb34gz445667d2as2dlokh086t123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[3]="mnb5vcxnzlkijhgqfdszapo7iuyptre2wqmknbv3cxz8lkjfhgfcdsaepoi1uytbrewlqmnwbvcgxzl0kjh6gfdssapdoiuvytryewq4mnb9vcxozlkujhgxfdsrapojiuyttremwqmhnbva123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[4]="lkjohgf3dsarpoi9uytfrewmqmnebvcdxzlqkjhvgfdwsapgoiu5ytriewqxmnbnvcxlzlkyjhg2fdshaposiuyatrezwqm0nbv8cxz1lkj4hgf7dsatpoiuuytcrewbqmnpbvcjxzpkoiu6123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[5]="jfrnugc7nhgwerirbhf9qwx523gbj6s2df06k7vk2dam12sicvuxherztyxdkoglqwdvytbyvdc8gftujygjdawartyhpolgjgxpswzqqwefhye4asdtvfz1aejckiyoajs0e56365ge3jbs123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[6]="qazjwsx5edc0rfvhtgbqyhnrujm2ikm3olp6qaz4ploiokmvijnkuhb8ygvdtfcardx9esznwaqgqwesfgheyjc1fgel45gwhjbmsdfz3fdbd78o834c6bdf23v7g34ubhjtlo8x5fsydb4p123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[7]="3gbgj8gd9lorlol754dnf74t2bgijk8zik4e1sdb3buy6yh23fgc7yhj7dhh9ok0pl8q3d2m12csgby6ttfwdvhotyb9upzxsdfuthq4w4tk67yp9gd16gh31avlb74f37la07387jb557hv123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[8]="uhf434cj156f856720410983036q75161509159p685i021z21gtgt5vdeyotlmxopqczxfyghtwyuz5xgj81230tyhuqazrujmetfcgtgb2tgvmedchfrsldp8b783n146d85ka869kdt0s123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
$udg_Codesets2[9]="qwejrtybuio9pas5mnb0vcxhzlkqjhg1fdsvapo7iuymtgbpef4e845w3602025l790x568r128i1203568sthb812s4vghapoqggytzhmntiozofgyuefckthqfwec6tghcyujyaz3d456n123`456~789!012@345#678$234^567&890*123(456)789-012_345=678+";
    
    function 
SubStringBJ($str$from$to)
    {
        
$from--;
        
$to--;
        return 
substr($str$from, ($to $from) + 1);
    }

    
$udg_EXP="";
  
$udg_CodesetToUse[1]="";
  
$udg_CodesetToUse[2]="";
  
$udg_RawCode="";
  
$udg_CodesetToUse[1]=(rand(0,9));
  
$udg_CodesetToUse[2]=(rand(0,9));
  
$udg_RawCode=($udg_RawCode.$udg_Constent);
  
$udg_RawCode=($udg_RawCode.SubStringBJ($myname,1,2));
  
$udg_RawCode=($udg_RawCode.SubStringBJ($myname,strlen($myname),strlen($myname)));
  
$udg_RawCode=($udg_RawCode.strlen($myxp));
  
$udg_RawCode=($udg_RawCode."-");
  
$udg_EXP=$myxp;
  
$bj_forwhileAIndex=1;
  
$bj_forwhileAIndexEnd=(6-strlen($myxp));
    while (!(
$bj_forwhileAIndex>$bj_forwhileAIndexEnd))
    {
      
$udg_TempRandom=rand(1,36);
      
$udg_EXP=(SubStringBJ($udg_OriginalSet,$udg_TempRandom,$udg_TempRandom).$udg_EXP);
      
$bj_forwhileAIndex=$bj_forwhileAIndex+1;
    }
  
$udg_RawCode=($udg_RawCode.$udg_EXP);
  
$udg_RawCode=($udg_RawCode.$udg_Constent);
  
//$udg_RawCode=StringCase($udg_RawCode,false);
  
$udg_RawCode=strtolower($udg_RawCode);
  
$udg_CompletedCode="";
  
$bj_forwhileAIndex=1;
  
$bj_forwhileAIndexEnd=strlen($udg_RawCode);
    while (!(
$bj_forwhileAIndex>$bj_forwhileAIndexEnd))
    {
      
$bj_forwhileBIndex=1;
      
$bj_forwhileBIndexEnd=51;
        while (!(
$bj_forwhileBIndex>$bj_forwhileBIndexEnd))
        {
            if(
SubStringBJ($udg_RawCode,$bj_forwhileAIndex,$bj_forwhileAIndex)==SubStringBJ($udg_OriginalSet,$bj_forwhileBIndex,$bj_forwhileBIndex))
            {
              
$udg_TempLetter=SubStringBJ($udg_Codesets2[$udg_CodesetToUse[2]],(($bj_forwhileBIndex*3)+$bj_forwhileBIndex),(($bj_forwhileBIndex*3)+$bj_forwhileBIndex));
              
$udg_For1=1;
                while (!(
$udg_For1>51))
                {
                    if(
$udg_TempLetter==SubStringBJ($udg_OriginalSet,$udg_For1,$udg_For1))
                      
$udg_CompletedCode=($udg_CompletedCode.SubStringBJ($udg_Codesets[$udg_CodesetToUse[1]],$udg_For1,$udg_For1));
                  
$udg_For1=$udg_For1+1;
                }
            }
          
$bj_forwhileBIndex=$bj_forwhileBIndex+1;
        }
      
$bj_forwhileAIndex=$bj_forwhileAIndex+1;
    }
  
$bj_forwhileAIndex=1;
  
$bj_forwhileAIndexEnd=10;
    while (!(
$bj_forwhileAIndex>$bj_forwhileAIndexEnd))
    {
        if(
SubStringBJ($udg_CodesetToUse[1],1,1)==SubStringBJ($udg_NumberSet2,$bj_forwhileAIndex,$bj_forwhileAIndex))
          
$udg_CodesetToUse[1]=SubStringBJ($udg_NumberSet1,$bj_forwhileAIndex,$bj_forwhileAIndex);
        if(
SubStringBJ($udg_CodesetToUse[2],1,1)==SubStringBJ($udg_NumberSet2,$bj_forwhileAIndex,$bj_forwhileAIndex))
          
$udg_CodesetToUse[2]=SubStringBJ($udg_NumberSet1,$bj_forwhileAIndex,$bj_forwhileAIndex);
        
$bj_forwhileAIndex=$bj_forwhileAIndex+1;
    }
  
$udg_CompletedCode=($udg_CodesetToUse[1].($udg_CodesetToUse[2].$udg_CompletedCode));
  
  echo 
'Nick: '.$myname.'<br />XP: '.$myxp.'<br />Code: '.$udg_CompletedCode.'<br /><br />Source: <br />'.highlight_file($_SERVER['DOCUMENT_ROOT'].$_SERVER['PHP_SELF'], true);
    
?>