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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   ban kick kayit (https://www.ircforumlari.net/mirc-scripting-sorunlari/173378-ban-kick-kayit.html)

QkLa 21 Ocak 2009 01:10

ban kick kayit
 
S'a

atilan zline gline vs.bunlari @windows pencerinde gosteren bir code kullaniyordum.bunu txt icerisine kayit edecek ve ozele 1oku komutu ile yazdiracak bir codeye cevirdik.kanaldaki ban ve kickleride kayit edip ozelde gorevliler ve ahmet nicki !!listele dediginde detayli sekilde banlari listeleyecek bir code ariyorum.elimde su code var.ama buradaki tum komutlari oplar ve ahmet nicki kullanacak sekilde editleyebilirmiyiz.ozellikle /sifirla komutunu !sifirla seklinde komut haline getirebilirmiyiz.(bot icin)

on *:kick:#KANAL:{
if !$read(nikler.txt,w,$nick) {
write nikler.txt $nick
inc $+(%,nikler,.,$nick)
}
else {
inc $+(%,nikler,.,$nick)
}
}
on *:text:*:#KANAL:{
if $nick == ahmet && $1 == !list {
var %i 1
while %i <= $lines(nikler.txt) {
msg $chan $read(nikler.txt,%i) => $($+(%,nikler,.,$read(nikler.txt,%i)),2)
inc %i
}
}
if !bilgi* iswm $1- {
if $2 == $null {
if !$read(nikler.txt,w,$nick) {
msg $chan Listede nickin yok $nick
}
else {
msg $chan $nick toplam $($+(%,nikler,.,$nick),2) ban atmissin
}
}
else {
if !$read(nikler.txt,w,$2) {
msg $chan Listede $2 nicki kayitli degil
}
else {
msg $chan $2 toplam $($+(%,nikler,.,$2),2) ban atmis
}
}
}
}
alias sifirla { .remove nikler.txt | .unset %nikler* }
!list => Sadece sen kullanirsin bütün listeyi verir
!bilgi => Bunu yazan nickin ban sayisini verir
!bilgi Nick => Bunu yazan nickin ban sayisini verir..

Difuzyon 21 Ocak 2009 01:55

Cevap: ban kick kayit
 
Kod:

on *:kick:#KANAL:{
  if !$read(nikler.txt,w,$nick) {
    write nikler.txt $nick
    inc $+(%,nikler,.,$nick) 1
  }
  else {
    inc $+(%,nikler,.,$nick) 1
  }
}
on *:text:*:?:{
  if $nick == ahmet || $nick isop #KANAL {
    if $1 == !sifirla { .remove nikler.txt | .unset %nikler* | msg $nick Tüm veriler silinmiştir. }
    if $1 == !list {
      var %i 1
      while %i <= $lines(nikler.txt) {
        msg $nick $read(nikler.txt,%i) => $($+(%,nikler,.,$read(nikler.txt,%i)),2)
        inc %i
      }
    }
    if !bilgi == $1 {
      if !$2 && $read(nikler.txt,w,$+(*,$nick,*)) { msg $nick $nick toplam $($+(%,nikler,.,$nick),2) ban atmis }
      if $2 && $read(nikler.txt,w,$+(*,$2,*)) { msg $nick $2 toplam $($+(%,nikler,.,$2),2) ban atmis }
      if $2 && !$read(nikler.txt,w,$+(*,$2,*)) { msg $nick Listede $2 nicki kayitli degil }
      if !$2 && !$read(nikler.txt,w,$+(*,$nick,*)) { msg $nick $nick nickiniz listede kayıtlı değil }
    }
  }
}

#Kanal yerine yazmayı unutmayın.Bu komuttan ahmet nicki ve #Kanal'daki oplar yararlanabilir.
Özelden işlem yapacak şekilde düzenledim.Uygulanabilir komutlar :
!list
!bilgi
!bilgi nick
!sifirla

İyi forumlar...

QkLa 21 Ocak 2009 02:19

Cevap: ban kick kayit
 
gercektende kullanisli bir code olmus.emeginize saglik.peki bu nikler dosyasina ban kick atanlari attigi kisileri ip adresi ile birlikte gosterebilirmi tarih saat gibi vss. detayli bilgi yani.

tesekkur ederim..

GemLik 21 Ocak 2009 15:03

Cevap: ban kick kayit
 
1den fazla kanal için uygulatabilirmisiz mesela chat sohbet muhabbet de aynı anda kick ve banları sayacak mesela chat ve sohbette op olan nicklerin banlarını toplayacak vericek chat de 5 attı sohbete 3 !list çekince nicke toplam 8 vermesini yaptırabilirmiyiz ?

QkLa 22 Ocak 2009 08:05

Cevap: ban kick kayit
 
S'a

bu codeye gore banlanan kimselerin kayit edildigi txt dosyasinda banlanan ve banlayan tarihleri ile birlikte yer alabilirmi.

on *:kick:#: {
//msg # $chan kanalinda $nick $knick nickini kickledi.
}
on *:ban:#: {
msg # $chan kanalinda $nick $ial($banmask,1).nick nickini $banmask adresli banladi.
}

bunlardan yola cikarak bir seyler yapmaya calistim ama code bozuldu.

AzuLa 22 Ocak 2009 10:19

Cevap: ban kick kayit
 
PHP- Kodu:

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.

q0kh4n01 22 Ocak 2009 23:39

Cevap: ban kick kayit
 
bilmem farkındamısın [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] başarınla çok dikkat çekiyosun ;)


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 08:46.

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