BlackHalt writeln (by me or from manual) PHP source Codes ...

BlackHalt Countera2 PHP source

<?php 
// lasiit uz leju    ...
// Atshkjiriibaa no ieprieksheejaa countera shitas PHP
// kods jaagriezh lapas iekshienee
if(!defined('JAANODROSHINA_NEPIEKLJUUSHANA_FAILAM_PA_TAISNO')){
die();
}
// divi galvenie mainiigi kernelji lol
$tagad='counter/'.date('mdY').'.txt';
$vakar='counter/'.date('mdY',mktime(0,0,0,date('m'),date('d')-1,date('Y'))).'.txt';
// iecheko failus    
if(!file_exists($tagad)){
touch($tagad);
chmod($tagad,0666);
}
if(
file_exists($vakar)){
unlink($vakar);
}
// funkcija, kas droshvien ir arii citur lapaa,
// tad otreiz gan nevaig rakstiit
function ip(){
if(
getenv('HTTP_CLIENT_IP')&&strcasecmp(getenv('HTTP_CLIENT_IP'),'unknown'))
$ip=getenv('HTTP_CLIENT_IP');
else if(
getenv('HTTP_X_FORWARDED_FOR')&&strcasecmp(getenv('HTTP_X_FORWARDED_FOR'),'unknown'))
$ip=getenv('HTTP_X_FORWARDED_FOR');
else if(
getenv('REMOTE_ADDR')&&strcasecmp(getenv('REMOTE_ADDR'),'unknown'))
$ip=getenv('REMOTE_ADDR');
else if(isset(
$_SERVER['REMOTE_ADDR'])&&$_SERVER['REMOTE_ADDR']&&strcasecmp($_SERVER['REMOTE_ADDR'],'unknown'))
$ip=$_SERVER['REMOTE_ADDR'];
else
$ip='unknown';
return(
$ip);
}
$ip=true;
$adrese=ip($ip);
//
// raksta failaa IP
$fp=fopen($tagad,'a');
fwrite($fp,"$adrese\n");
fclose($fp);
// shiten ir usleep, bet par to veel zinaatnieki striidas
usleep(1000);
// GO!
$fails=file($tagad);
// unikaalie
$izvilkt=array_unique($fails);
// hosti no unikaalajiem
$hosti=count($izvilkt);
// hiti vienkaarshi no faila rindu skaita
$hiti=count($fails);
// Go bilde!
$platums=58;
$augstums=11;
$bilde=imagecreate($platums,$augstums);
$labais=imagecolorallocate($bilde,255,160,0);
$kreisais=imagecolorallocate($bilde,0,0,0);
$ramis=imagecolorallocate($bilde,0,0,0);
imagefilledrectangle($bilde,0,0,$platums,$augstums,$labais);
imagefilledrectangle($bilde,0,0,27,$augstums,$kreisais);
// hostu pusee ziimee
imagettftext($bilde,13,0,5,7,$labais,'counter/visitor2.ttf',$hosti);
imagettftext($bilde,13,0,3,7,$labais,'counter/visitor2.ttf',$hosti);
imagettftext($bilde,13,0,4,6,$labais,'counter/visitor2.ttf',$hosti);
imagettftext($bilde,13,0,4,8,$labais,'counter/visitor2.ttf',$hosti);
imagettftext($bilde,13,0,4,7,$kreisais,'counter/visitor2.ttf',$hosti);
// hitu pusee ziimee
imagettftext($bilde,13,0,32,7,$kreisais,'counter/visitor2.ttf',$hiti);
imagettftext($bilde,13,0,30,7,$kreisais,'counter/visitor2.ttf',$hiti);
imagettftext($bilde,13,0,31,6,$kreisais,'counter/visitor2.ttf',$hiti);
imagettftext($bilde,13,0,31,8,$kreisais,'counter/visitor2.ttf',$hiti);
imagettftext($bilde,13,0,31,7,$labais,'counter/visitor2.ttf',$hiti);
// ramiiC
imagerectangle($bilde,0,0,$platums-1,$augstums-1,$ramis);
// bildi iebliezh failaa
imagepng($bilde,'counter/counter.png');
imagedestroy($bilde);
// nu? lapaa jaaizsauc:
// <img src="counter/counter.png" alt="counter" />
// done 
?>