code icin tesekkur ederim.ama kanala girdiginde bilgiyi vermiyor.!bilgi yazildiginda da statuste hata veriyor.
Ciprix kardes raw ile $chan olmaz dedigi icin bende codeyi ayri yazmaya calistim.ilk basta verdigim code'nin altina sunu ekledim calisiyor.yalniz renk karakteri yuzde degeri vermesini engelliyor sanirim ona bir bakabilirseniz sevinirim.ayrica kanal bilgilerini yuzdelik deger ile verirken user bilgisi disinda digerlerinin nicklerinide yazabilirse memnun olurum.
code'yi son sekli ile bu hale getirdim.hatami da belirtebilirseniz ogrenme adina faydali olacagini dusunuyorum.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
raw 366:*: {
msg $chan $2 4------------------------------------------------------------------------------- Kanal Bilgisi --------------------------------------------------------------------
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) { msg $chan $2 : 5[ 2 Kanal Op'u +o] (4 $nick($2,0,@) 2) 4,1 $+ $str(|, $calc(%op * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%op * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%op * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
if (%hop != 0) { msg $chan $2 : 5[ 2 Yard?mc? Op +h] (4 $nick($2,0,%) 2) 4,1 $+ $str(|, $calc(%hop * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%hop * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%hop * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
if (%vop != 0) { msg $chan $2 : 5[ 2 Kanalda Ses Yetkisi Olan +v] (4 $nick($2,0,+) 2) 4,1 $+ $str(|, $calc(%vop * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%vop * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%vop * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
if (%founder != 0) { msg $chan $2 : 5[ 2 Kanal Sahibi +q] (4 $nick($2,0,~) 2) 4,1 $+ $str(|, $calc(%founder * 50 / %kullan?c?)) $+ 12,1 $+ $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) { msg $chan $2 : 5[ 2 Kanal Süper Op'u +a] 2(4 $nick($2,0,&) 2) 4,1 $+ $str(|, $calc($nick($2,0,&) * 50 / %kullan?c?)) $+ 12,1 $+ $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) { msg $chan $2 : 5[ 2 Normal Kullan?c? User] 2(4 $calc($nick($2,0) - (%op + $nick($2,0,&) + %hop + %vop + %founder)) $+ 2) 4,1 $+ $str(|, $calc(%artakalan * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%artakalan * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%artakalan * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
msg $chan $2 4-------------------------------------------------------------------------- Kanal Bilgisi Sonu -----------------------------------------------------------------
halt
}
on *:text:*:#: {
if ($nick isop $chan) || ($nick == r) {
if $1 == !bilgi {
msg $chan $2 4------------------------------------------------------------------------------- Kanal Bilgisi --------------------------------------------------------------------
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) { msg $chan $2 : 5[ 2 Kanal Op'u +o] (4 $nick($2,0,@) 2) 4,1 $+ $str(|, $calc(%op * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%op * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%op * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
if (%hop != 0) { msg $chan $2 : 5[ 2 Yard?mc? Op +h] (4 $nick($2,0,%) 2) 4,1 $+ $str(|, $calc(%hop * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%hop * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%hop * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
if (%vop != 0) { msg $chan $2 : 5[ 2 Kanalda Ses Yetkisi Olan +v] (4 $nick($2,0,+) 2) 4,1 $+ $str(|, $calc(%vop * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%vop * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%vop * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
if (%founder != 0) { msg $chan $2 : 5[ 2 Kanal Sahibi +q] (4 $nick($2,0,~) 2) 4,1 $+ $str(|, $calc(%founder * 50 / %kullan?c?)) $+ 12,1 $+ $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) { msg $chan $2 : 5[ 2 Kanal Süper Op'u +a] 2(4 $nick($2,0,&) 2)4,1 $+ $str(|, $calc($nick($2,0,&) * 50 / %kullan?c?)) $+ 12,1 $+ $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) { msg $chan $2 : 5[ 2 Normal Kullan?c? User] 2(4 $calc($nick($2,0) - (%op + $nick($2,0,&) + %hop + %vop + %founder)) $+ 2) 4,1 $+ $str(|, $calc(%artakalan * 50 / %kullan?c?)) $+ 12,1 $+ $str(|, $calc(50 - $calc(%artakalan * 50 / %kullan?c?))) 2(4 $+($chr(37),$left($calc(%artakalan * 100 / %kullan?c?),4)) 2 $+ ) $- 5] }
msg $chan $2 4-------------------------------------------------------------------------- Kanal Bilgisi Sonu -----------------------------------------------------------------
halt
}
}
}
23 Aralık 2009, 14:34
Benzer Konular 
Ağaç şeklinde
