Kanala girişteki "%" istatistikler.

**L4roXyL** · 07-10-07, 21:40

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.

Kod:

raw 366:*:{

Kod:

 


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 renk olarak ;

[ +o ( 4 ) ||||||||||||||||||||||||||||||||||||||||||||||||| ( %4.54 ) ]
[ +h ( 1 ) ||||||||||||||||||||||||||||||||||||||||||||||||| ( %1.13 ) ]
[ +v ( 4 ) ||||||||||||||||||||||||||||||||||||||||||||||||| ( %4.54 ) ]
[ +q ( 1 ) ||||||||||||||||||||||||||||||||||||||||||||||||| ( %1.13 ) ]
[ +a ( 1 ) ||||||||||||||||||||||||||||||||||||||||||||||||| ( %1.13 ) ]
[ ve ( 77 ) ||||||||||||||||||||||||||||||||||||||||||||||||| ( %87.5 ) ]

Görünüm jpeg olarak ;

Umarım işinize yarıyacaktır.

**Ufkum** · 29-06-08, 00:40

peki bunu kanala mi yaziyor?

**AsLan** · 29-06-08, 00:42

Denemekde Fayda War T$kLér..

29-06-08, 00:42	#3
AsLan Üyelik tarihi: Jun 2008 Yaş: 25 Mesajlar: 206 Konular: 13 Aldığı Teşekkür : 0 NF Puanı : 0 NF Seviyesi :	Denemekde Fayda War T$kLér.. ________________ ßên Nê kåLånå qî† dêrîm , Nêde qîDênê kåL .. kåLåcåk øLån yêrînî , qîdêCêk øLån yøLµnµ ßêLîrLêmî$†îr zå†êN ... ßir Umuttur ya$amak. ßir $anStır ßeni Tanımak..

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
vazgeçen" ve "vazgeçilen"	Su	Şiirler	3	01-10-07 23:26

29-06-08, 00:40	#2
Ufkum Üyelik tarihi: Jun 2008 Yaş: 24 Mesajlar: 2 Konular: 1 Aldığı Teşekkür : 0 NF Puanı : 10 NF Seviyesi :	peki bunu kanala mi yaziyor?

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Input each user name separated by a comma, like so: User1,User2,User3.