IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2
 
LinkBack Seçenekler Stil
Alt 22 Aralık 2009, 11:34   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
kanal bilgisi..



elimdeki bu code uzun zamandir bende mevcut.bundaki @bilgi penceresini kaldirdim.bilgileri istedigim bir kanala yansittim.simdi elimdeki bir script bot'a bunu eklemek istiyorum.!bilgi yazdigimda code bilgileri kanala yansitabilirmi.ben bir seyler yaptim ama bilgileri vermedi,sadece codeyi yansitti kanala.ikinci olarak ise.kanalda kac op halfop vs.. oldugunu sayi olarak veriyor.kanaldaki user'ler haric diger bilgileri nickleri ilede verebilir mi.simdiden tesekkur ederim.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
raw 366:*:{
  .window -z @bilgi
  .echo @bilgi -------------------------------------------------------------------------------4 $2 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) { .echo @bilgi  $2 Kanal'ı : 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) { .echo @bilgi $2 Kanal'ı :  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) { .echo @bilgi $2 Kanal'ı :  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) { .echo @bilgi $2 Kanal'ı :  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) { .echo @bilgi $2 Kanal'ı :  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) { .echo @bilgi $2 Kanal'ı : 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] }
  .echo @bilgi --------------------------------------------------------------------------4  $2 Kanal'ı Bilgisi Sonu  -----------------------------------------------------------------
  .echo @bilgi 
  halt
}
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 22 Aralık 2009, 22:15   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#:{
  if $1 == !bilgi { 
    raw 366:*: {
      var %chan = $chan
      .privmsg %chan ------4 %chan Kanal'ı Bilgisi -----
      var %op = $nick(%chan,0,@)
      %vop = $nick(%chan,0,+)
      %hop = $nick(%chan,0,%)
      %founder = $nick(%chan,0,~)
      %kullanıcı = $nick(%chan,0)
      %artakalan $calc(%kullanıcı - ($nick(%chan,0,&) + %hop + %vop + %founder + %op))
      if (%op != 0) { privmsg %chan %chan Kanal'ı : (Kanal Operatoru +o) 2(4 $nick(%chan,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 $+ ) $- }
      if (%hop != 0) { privmsg %chan %chan Kanal'ı : (Yardımcı Operator +h) 2(4 $nick(%chan,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 $+ ) $- }
      if (%vop != 0) { privmsg %chan %chan Kanal'ı : (Kanalda Ses Yetkisi Olan  +v) (4 $nick(%chan,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 $+ ) $- }
      if (%founder != 0) { privmsg %chan %chan Kanal'ı : (Kanal Sahibi +q) 2(4 $nick(%chan,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 $+ ) $- }
      if ($nick(%chan,0,&) != 0) { privmsg %chan %chan Kanal'ı : (Kanal Süper Operator +a) 2(4 $nick(%chan,0,&) 2) 4,1 $+ $str(|, $calc($nick(%chan,0,&) * 50 / %kullanıcı)) $+ 12,1 $+ $str(|, $calc(50 - $calc($nick(%chan,0,&) * 50 / %kullanıcı))) 2(4 $+($chr(37),$left($calc($nick(%chan,0,&) * 100 / %kullanıcı),4)) 2 $+ ) $- }
      if (%artakalan != 0) { privmsg %chan %chan Kanal'ı : (Normal Kullanıcı User) 2(4 $calc($nick(%chan,0) - (%op + $nick(%chan,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 $+ ) $- }
      privmsg %chan -----4  %chan Kanal'ı Bilgisi Sonu  -----
      halt
    }
  }
}

İyi Forumlar.

 
Alıntı ile Cevapla

Alt 22 Aralık 2009, 22:17   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



Verdiğin kod çalışmaz sock olarak veriyorsun "privmsg" demişsin vede rawı işleme sokuyorsun ama kanalı $chan ile tanımlıyorsun rawda $chan yoktur..

 
Alıntı ile Cevapla

Alt 23 Aralık 2009, 14:34   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



code icin tesekkur ederim.ama kanala girdiginde bilgiyi vermiyor.!bilgi yazildiginda da statuste hata veriyor.

hata raporu

[12:32] -> Server: 366:*:
-
366:*: Unknown command
-
1 Unknown command

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
    }
  }
}


Konu Mitolojik tarafından (23 Aralık 2009 Saat 15:02 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 23 Aralık 2009, 18:58   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
raw 366:*: {
  msg %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $2 4--------------------------------------------------------------------------   Kanal Bilgisi Sonu  -----------------------------------------------------------------
  halt
}  
on *:text:!bilgi*:#: {  
  if ($nick isop $chan) || ($nick == r) { 
    .set %kanal $chan 
    part $2
    join $2
  }
}

!bilgi #kanal - Raw kodun çalışıyorsa bu verdiğim çalışır

 
Alıntı ile Cevapla

Alt 24 Aralık 2009, 06:02   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



bilgi komutunu eklemeden code guzel calisiyor.bilgi komutunu ekledigimizde part ve join icin yetersiz veya eksik parametre uyarisi yapiyor.

kardes birde yuzdelik verileri verirken, user'ler haric diger bilgileri nickleri ilede verebilir mi.
tesekkur ederim..

 
Alıntı ile Cevapla

Alt 24 Aralık 2009, 07:28   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



!bilgi #KANAL , komutu ile yapıcaksın kanalı belirtmen gerek

 
Alıntı ile Cevapla

Alt 24 Aralık 2009, 07:46   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



CipriX Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
!bilgi #KANAL , komutu ile yapıcaksın kanalı belirtmen gerek

evet kanali belirtiyorum,part yapiyor tekrar ciktigi kanala join olmuyor.hocam part yapmadan raw komutunda aldigi bilgileri komut yazdigimizda okutamazmiyiz kanala..yorduk ama kusura bakmayin lutfen..

 
Alıntı ile Cevapla

Alt 24 Aralık 2009, 08:32   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



Alıntı:
on *:text:!bilgi*:#: {
if ($nick isop $chan) || ($nick == r) {
.set %kanal $chan
hop $2
}
}

bu şekilde değiştirirsen kanaldan /hop #kanal şeklinde çıkacak ve girecektir.

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 24 Aralık 2009, 09:06   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: kanal bilgisi..



PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

raw 366:*: {
  msg %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $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 %kanal $2 4--------------------------------------------------------------------------   Kanal Bilgisi Sonu  -----------------------------------------------------------------
  halt
}  
on *:text:!bilgi*:#: {  
   if ($nick isop $chan) || ($nick == r) { 
     .set %kanal $chan 
     names $2
   }
 } 

Üstteki kodlar tam olarak istediğini yapıcaktır, ek olarak bilgilendirmek isterim bu kanal yüzde istatistik kodunun ilk yazarı SaW arkadaşımızdır, başkaları fikir kendine ait gibi birazcık daha gelişmişini yazıp piyasaya sürmüştür.

 
Alıntı ile Cevapla

Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2

Etiketler
bilgisi, kanal, mirc, mirc download, mirc indir

« önceki Konu | sonraki Konu »

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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık

Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Muaf Kanal/Nick Giriş Çıkış Bilgisi Kanal ve Özelde Komut Yardımı Goemon Conference Room (CR) 4 01 Şubat 2016 02:03
Bu kodu kanaL Kick+ban kanal opLarı icin nasıl düzenleriz Tinba mIRC Scripting Sorunları 4 12 Mart 2013 07:19
Kanal status ve güvenlik bilgisi Mudin mIRC Scripting Hazır Kodlar 0 18 Mart 2011 17:32
kanal a /cs access #kanal list çekinde services gidiyor neden ola bilir :( EEkreMM Servisler 3 07 Ocak 2008 17:39
Kanal Bilgisi(Topic) Nightmare mIRC Scripting Hazır Kodlar 0 31 Mart 2007 20:50




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet instagram takipçi sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org