Tekil Mesaj gösterimi
Alt 22 Ocak 2009, 10:19   #6
Çevrimdışı
AzuLa
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ban kick kayit




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:*: {
  if !
$read(bans.txt,w,$nick) {
    
write bans.txt Banlayan$nick BanMaskı$banmask Kanal$chan Tarih$date $time 
    inc 
$+(%,bans,.,$nick1
  
}
  else {
    
inc $+(%,bans,.,$nick1
  
}
}

on *:text:*:#: {
  
if $chan == #AzuLon {
    
if $nick isop $chan {
      if $
== !banlist {
        
msg $chan(#AzuLon) Ban Listesi Sıralanıyor.
        
var %a 1
        
while %<= $lines(bans.txt) {
          
msg $chan(#AzuLon) $read(bans.txt,%a) 
          
inc %a
        
}
        
msg $chan(#AzuLon) Ban Listesinin Sonu
      
}
      if $
== !banreset {
        
remove bans.txt
        
.unset %bans
        
msg $chan(#AzuLon) Tüm veriler silinmiştir. 
      
}
    }
    else {
      if !
baniswm ${
        
msg $chan(#AzuLon) Bu komutu kullanabilmek için $chan kanalında op konumunda olmalısınız.
        
halt
      
}
    }
  }


Kodun Çalışma Mantığı;

Belirli bir kanal koymadım. Hangi kanalda olursa olsun; her ban atıldığında, atılan banı bans.txt belgesine

Alıntı:
Banlayan: AzuLa BanMaskı: *!*@48A80F5C.82EC3E62.F14932E3.IP Kanal: #ss Tarih: 22/01/2009 - 09:47:59

şeklinde kaydedecek.

Eğer komutları kullanacak kişi kanalda Op (@) ise;

#AzuLon kanalında !banlist yazıldığında bans.txt belgesine kayıtlanmış olan bütün banları sıralayacak.

#AzuLon kanalında !banreset yazıldığında bans.txt belgesindeki tüm verileri silecek.

Eğer bu komutları #AzuLon kanalında Op (@) olmayan biri kullanırsa

Alıntı:
Bu komutu kullanabilmek için #AzuLon kanalında op konumunda olmalısınız.

şeklinde bir mesaj gönderecek.

Açıklama;
Banları kaydederken kanal secmez, hangi kanalda atılırsa atılsın hepsini kaydeder.

Deneme amaçlı komutların kullanılacağı kanalı #AzuLon olarak hazırladım. Siz de komutların hangi kanalda kullanılmasını istiyorsanız #AzuLon olan yerleri #kanaladı olarak değiştiriniz.


Kodun çalıştığına dair log:

#ss kanalında atılan banlar:

Alıntı:
[09:46] * Şu an #ss kanalında bulunuyorsunuz
[09:46] * irc.mIRCIndir.com mod değiştirdi:+nt
[09:47] * AzuLa mod değiştirdi:+b *!*@48A80F5C.82EC3E62.F14932E3.IP
[09:48] * AzuLa mod değiştirdi:+b *!*urkcemirc@*.82EC3E62.F14932E3.IP
[09:48] * AzuLa mod değiştirdi:+b *!*@*.82EC3E62.F14932E3.IP
[09:48] * AzuLa mod değiştirdi:+b sljfgıug!*@*
[09:48] * AzuLa mod değiştirdi:+b sljfgıug*!*@lfdjılfh

#AzuLon kanalında atılan banlar:
Alıntı:
[09:49] * AzuLa mod değiştirdi:+b ffff!*@*
[09:49] * AzuLa mod değiştirdi:+b fffflsfjlkdgh!*@*
[09:49] * AzuLa mod değiştirdi:+b AzuLa!*@*.82EC3E62.F14932E3.IP
[09:50] * AzuLa mod değiştirdi:+b fffflsfjlkdgklf*!*@şsfhg*

#AzuLon kanalındaki komutlar:
Alıntı:
[09:50:18] <Osman> !banlist
[09:50:19] <AzuLa> Ban Listesi Sıralanıyor.
[09:50:19] <AzuLa> Banlayan: AzuLa BanMaskı: *!*@48A80F5C.82EC3E62.F14932E3.IP Kanal: #ss Tarih: 22/01/2009 - 09:47:59
[09:50:19] <AzuLa> Banlayan: AzuLa BanMaskı: *!*urkcemirc@*.82EC3E62.F14932E3.IP Kanal: #ss Tarih: 22/01/2009 - 09:48:02
[09:50:19] <AzuLa> Banlayan: AzuLa BanMaskı: *!*@*.82EC3E62.F14932E3.IP Kanal: #ss Tarih: 22/01/2009 - 09:48:06
[09:50:19] <AzuLa> Banlayan: AzuLa BanMaskı: sljfgıug!*@* Kanal: #ss Tarih: 22/01/2009 - 09:48:21
[09:50:20] <AzuLa> Banlayan: AzuLa BanMaskı: sljfgıug*!*@lfdjılfh Kanal: #ss Tarih: 22/01/2009 - 09:48:35
[09:50:21] <AzuLa> Banlayan: AzuLa BanMaskı: ffff!*@* Kanal: #AzuLon Tarih: 22/01/2009 - 09:49:46
[09:50:24] <AzuLa> Banlayan: AzuLa BanMaskı: fffflsfjlkdgh!*@* Kanal: #AzuLon Tarih: 22/01/2009 - 09:49:49
[09:50:24] <AzuLa> Banlayan: AzuLa BanMaskı: AzuLa!*@*.82EC3E62.F14932E3.IP Kanal: #AzuLon Tarih: 22/01/2009 - 09:49:52
[09:50:29] <AzuLa> Banlayan: AzuLa BanMaskı: fffflsfjlkdgklf*!*@şsfhg* Kanal: #AzuLon Tarih: 22/01/2009 - 09:50:03
[09:50:29] <AzuLa> Ban Listesinin Sonu
[09:51:19] <Osman> !banreset
[09:51:20] <AzuLa> Tüm veriler silinmiştir.
[09:51:26] <Osman> !banlist
[09:51:28] <AzuLa> Ban Listesi Sıralanıyor.
[09:51:28] <AzuLa> Ban Listesinin Sonu
[09:51:34] *** AzuLa mod değiştirdi:-o Osman
[09:51:37] <Osman> !banlist
[09:51:39] <AzuLa> Bu komutu kullanabilmek için #AzuLon kanalında op konumunda olmalısınız.

Kod ile ilgili bir sorun yaşarsanız paylaşabilirsiniz.
İyi forumlar.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet