Www.Hossohbetci.Com " Degisen Dunyanin Degismeyen Yuzu Seviyeli Hossohbet Adresiniz"
Evet arkadaşlar bunu olayı IRCap ve PNP scriptlerden bilirsiniz.
Ben bunu saw arkadaşımızın desteğini alarak, çok farklı bir kodlama stil'i ile 0'dan yazdım.
Bir takım kişilerde istemişti, zaten.
Codenin amacı ; kanala girdiğiniz'de;
Kanalda'ki Op/protect/founder/halfop sayısını var'lar.
Bunları kanaldaki normal kullanıcı sayısından çıkartır.
Ve bunların değerlerini "%" ifadeyle belirtir.
Ve son olarak artakanaln kullanıcını sayısını yüzdelik ifade ile belirtir.
Eğer kanalda bunlardan herhangi biri yoksa göstermiyecektir.
Buyrun kod.
raw 366:*:{
var %op = $nick($2,0,@), %vop = $nick($2,0,+), %hop = $nick($2,0,%), %founder = $nick($2,0,~), %kullanıcı = $nick($2,0), %artakalan $calc(%kullanıcı - ($nick($2,0,&) + %hop + %vop + %founder + %op))
if (%op != 0) { echo $2 5[ 2+o (4 $nick($2,0,@) 2) 4 $+ $str(|, $calc(%op * 50 / %kullanıcı)) $+ 15 $+ $str(|, $calc(50 - $calc(%op * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc(%op * 100 / %kullanıcı),4)) 2 $+ ) $- 5] }
if (%hop != 0) { echo $2 5[ 2+h (4 $nick($2,0,%) 2) 4 $+ $str(|, $calc(%hop * 50 / %kullanıcı)) $+ 15 $+ $str(|, $calc(50 - $calc(%hop * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc(%hop * 100 / %kullanıcı),4)) 2 $+ ) $- 5] }
if (%vop != 0) { echo $2 5[ 2+v (4 $nick($2,0,+) 2) 4 $+ $str(|, $calc(%vop * 50 / %kullanıcı)) $+ 15 $+ $str(|, $calc(50 - $calc(%vop * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc(%vop * 100 / %kullanıcı),4)) 2 $+ ) $- 5] }
if (%founder != 0) { echo $2 5[ 2+q (4 $nick($2,0,~) 2) 4 $+ $str(|, $calc(%founder * 50 / %kullanıcı)) $+ 15 $+ $str(|, $calc(50 - $calc(%founder * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc(%founder * 100 / %kullanıcı),4)) 2 $+ ) $- 5] }
if ($nick($2,0,&) != 0) { echo $2 5[ 2+a (4 $nick($2,0,&) 2) 4 $+ $str(|, $calc($nick($2,0,&) * 50 / %kullanıcı)) $+ 15 $+ $str(|, $calc(50 - $calc($nick($2,0,&) * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc($nick($2,0,&) * 100 / %kullanıcı),4)) 2 $+ ) $- 5] }
if (%artakalan != 0) { echo $2 5[ 2ve (4 $calc($nick($2,0) - (%op + $nick($2,0,&) + %hop + %vop + %founder)) $+ 2) 4 $+ $str(|, $calc(%artakalan * 50 / %kullanıcı)) $+ 15 $+ $str(|, $calc(50 - $calc(%artakalan * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc(%artakalan * 100 / %kullanıcı),4)) 2 $+ ) $- 5] }
halt
}
Görünüm jpeg olarak ;
FRmda.Com Paylasim Platformu » Sohbet Chat Programları ve Tanıtımı Irc Serverler Msn Yahoo » IRC Shell Hizmeti » mIRC Script ve Sohbet
Kanala girişteki "%" istatistlikler.
