Tekil Mesaj gösterimi
Alt 28 Ocak 2009, 16:13   #6
Çevrimdışı
AzuLa
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Ident Belirleme ve Ban




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ident:join:#: {
  
if $me isop $chan {
    
mode $chan +b $nick
    kick $chan $nick Bad İdent 
!
  }
}

menu nicklist {
  
bad ident
  
.ident ekleauser ident $+($gettok($address($$1,3),1,$asc(@)),@*)
  .
ident silruser ident $+($gettok($address($$1,3),1,$asc(@)),@*)
  .
identleri listele: { var %nicks 1 
    
while (%nicks <= $ulist(*,ident,0)) {
      echo -
a $ulist(*,ident,%nicks)
      
inc %nicks
    
}
  }


Açıklama:

Kodu remote bölümüne ekleyiniz. Atılmasını istediğiniz identileri Kullanıcılar(users olarak da kayıtlı olabilir) bölümüne

Alıntı:
ident:*!ident@*

şeklinde ekleyiniz. Kanala girişlerde bu identlere sahip olanlar atılacaklardır.

Nicklist bölümüne gelince;
nickin üzerine sag tıkladıgınızda "bad ident" seçeneğini göreceksiniz.
"ident ekle" seçeneğine tıkladıgınızda kişinin identini listeye eklemiş olacaksınız.
"ident sil" seçeneğine tıkladıgınızda eğer ident mevcuts listede identi silmiş olacaksınız.
"listele" seçeneğine tıkladığınızda ise eklemiş oldugunuz tüm identleri göreceksiniz. (kanala echo'lar karsı tarafa görünmez.)

Eğer sorun yaşarsanız başlık altında belirtiniz.

DipNot: IrCbaStarD'a yardımı için teşekkür ederim.

+ Ekleme:(Bot İçin)

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: {
  
if $chan == #AzuLon {
    
if $nick isop $chan {
      if $
== !identekle {
        if $
== $null {
          
msg $chan(#AzuLon) Eklenecek ident mask'ını yazmadınız.
        
}
        else {
          
auser ident $2
          msg $chan
(#AzuLon) Eklenen ident mask'ı : $2
        
}
      }
      if $
== !identsil {
        if $
== $null {
          
msg $chan(#AzuLon) Silinecek ident mask'ını yazmadınız.
        
}
        else {
          
ruser ident $
          msg $chan
(#AzuLon) Silinen ident mask'ı : $2
        
}
      }
      if $
== !identlist {
        var %
nicks 1 
        
while (%nicks <= $ulist(*,ident,0)) {
          echo -
a $ulist(*,ident,%nicks)
          
inc %nicks
        
}
      }
    }
    else {
      if !
identiswm ${
        
msg $chan(#AzuLon) Bu Komutu Kullanabilmeniz İçin $chan Kanalın Op Konumunda Olmanız Gerekiyor.
      
}
    }
  }


Kullanılabilecek Komutlar:
Eğer kişi Kanalda Op Konumunda ise ;

!identekle *!ident@* = Belirtilen identi listeye ekler. Eklerken dikkat ediniz, *!ident@* kalıbına uygun olmalı yazacagınız ident.
!identsil *!ident@* = Belirtilen identi listeden siler. Silerken dikkat ediniz, *!ident@* kalıbına uygun olmalı yazacagınız ident.
!identlist = Tüm ident listesini görmenizi sağlar.

Eğer kişi Kanalda Op Konumunda değil ise;

Bu komutları kullanamaz, op olması gerektiğine dair bir mesaj yansıtır.


Çalıştığına Dair Log:
Alıntı:
[16:39:11] <aLias> !identekle
[16:39:11] <~AzuLa> Bu Komutu Kullanabilmeniz İçin #AzuLon Kanalın Op Konumunda Olmanız Gerekiyor.
[16:39:13] <aLias> h
[16:39:21] * AzuLa mod değiştirdi:+o aLias
[16:39:34] <@aLias> !identekle
[16:39:34] <~AzuLa> Eklenecek ident mask'ını yazmadınız.
[16:39:52] <@aLias> !identekle *!silence@*
[16:39:52] <~AzuLa> Eklenen ident mask'ı : *!silence@*
[16:45:40] <@aLias> !identekle *!deniyoruz@*
[16:45:40] <~AzuLa> Eklenen ident mask'ı : *!deniyoruz@*
[16:45:50] <@aLias> !identekle *!identim@*
[16:45:50] <~AzuLa> Eklenen ident mask'ı : *!identim@*
[16:53:42] <@aLias> !identlist
[16:53:42] <~AzuLa> *!silence@*
[16:53:42] <~AzuLa> *!deniyoruz@*
[16:53:42] <~AzuLa> *!identim@*
[16:53:56] <@aLias> !identsil *!identim@*
[16:53:56] <~AzuLa> Silinen ident mask'ı : *!identim@*
[16:54:00] <@aLias> !identlist
[16:54:00] <~AzuLa> *!silence@*
[16:54:00] <~AzuLa> *!deniyoruz@*



Konu AzuLa tarafından (28 Ocak 2009 Saat 17:08 ) değiştirilmiştir. Sebep: Ekleme.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet bizimmekan sohbet odaları