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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 21 Ocak 2009, 01:10   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 21 Ocak 2009, 01:55   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ban kick kayit




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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...

 
Alıntı ile Cevapla

Alt 21 Ocak 2009, 02:19   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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..

 
Alıntı ile Cevapla

Alt 21 Ocak 2009, 15:03   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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 ?

 
Alıntı ile Cevapla

Alt 22 Ocak 2009, 08:05   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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 *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#: {
msg # $chan kanalinda $nick $ial($banmask,1).nick nickini $banmask adresli banladi.
}

bunlardan yola cikarak bir seyler yapmaya calistim ama code bozuldu.

 
Alıntı ile Cevapla

Alt 22 Ocak 2009, 10:19   #6
Çevrimdışı
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

Alt 22 Ocak 2009, 23:39   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Cevapla

Etiketler
ban, kayit, kick, mirc, mirc download, mirc indir


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

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
Kayit Module ZamaN Unreal IRCd 1 24 Şubat 2012 14:00
KişiseL Ban Koruması (deop - Kick - ban+kick Yapıyor ) LauReLL mIRC Scripting Hazır Kodlar 0 29 Haziran 2007 06:22
Tüm cL0ne'Ları ile Kick veya Kick+Ban... Cappystarjoe mIRC Scripting Hazır Kodlar 12 30 Ağustos 2005 13:13