cinsel kanal koruması yardım - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

DenperaS · 12 Şubat 2009, 02:49

difuzyon ben bunu ekledim fakat herhangi bir tarama yapmadı. user bölümen badkanal olarak ekledim sonra bu kodu herhangi bi txt dosyasına attım ve tanıttım sonra op olduğum kanaldada !cinseltara yazdım ama kimseye whois çekip atmadı sanırım sorun bende. anlatabilirmisin bunu nasıl ekleyeceğiz ve tarama yaptırabileceğim bota

Lucifer · 12 Şubat 2009, 08:31

DenperaS Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

difuzyon ben bunu ekledim fakat herhangi bir tarama yapmadı. user bölümen badkanal olarak ekledim sonra bu kodu herhangi bi txt dosyasına attım ve tanıttım sonra op olduğum kanaldada !cinseltara yazdım ama kimseye whois çekip atmadı sanırım sorun bende. anlatabilirmisin bunu nasıl ekleyeceğiz ve tarama yaptırabileceğim bota

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


#whoisacarmısın on
on @*:join:#:whois $nick | .enable #gecegece
raw 319:*: {
  haltdef
  var %jnk 1
  while $ulist(*,badkanal,%jnk) {
    if $istok($remove($3-,:,+,%,@,&,~,.),$ifmatch,32) { 
      var %x = $comchan($2,0)
      while %x { 
        if ($me isop $comchan($2,%x)) { 
          ban $comchan($2,%x) $2 2
          .kick $comchan($2,%x) $2 10Cinsel İçerikli Kanallarda Bulunduğunuz İçin Bu Kanala Girişiniz Süresiz Olarak Engellenmiştir. 
        }
        dec %x 
      } 
    } 
    inc %jnk
  }
}
#whoisacarmısın end
#gecegece off
raw 311:*:haltdef   
raw 312:*:haltdef
raw 307:*:haltdef
raw 317:*:haltdef
raw 318:*:haltdef | .disable #gecegece
#gecegece end 
alias cinselkanal if $dialog(BadKanal) == $null dialog -m BadKanal BadKanal
dialog BadKanal {
  title "Cinsel Kanal giriş koruma"
  size -1 -1 200 265 
  button "Tamam", 1, 110 200 70 20,ok
  list 2, 10 20 180 135, sort 
  box "Cinsel Kanal", 3, 5 5 190 145 
  edit "#", 4, 10 165 180 20, autohs
  box "Eklenecek #kanal 'ı girin", 5, 5 150 190 45
  button "Ekle", 6, 20 200 70 20
  box "Not:", 7, 5 225 190 35 
  text "Silmek için #kanala çift tıklayın", 8, 25 240 180 45 
}
on *:dialog:BadKanal:dclick:2:{ .ruser badkanal $did(2).seltext | did -d BadKanal 2 $did(2).sel }
on *:dialog:BadKanal:sclick:6:{ if ($did(4) != $null) { did -a BadKanal 2 $did(4) | .auser badkanal $did(4) | did -fr BadKanal 4 } }
on *:dialog:BadKanal:init:*:{ 
  if ($ulist(*,badkanal,0) != $null) { 
    set %cinsel 0
    while (%cinsel < $ulist(*,badkanal,0)) { 
      inc %cinsel 1 
      did -a BadKanal 2 $ulist(*,badkanal,%cinsel) 
    } 
    unset %cinsel 
  } 
} 
menu status,channel {
  .-
  .Cinsel Kanal Korumaları
  ..Korumayı Devreye Al !:.enable #whoisacarmısın | .echo -a 0,4 Cinsel İçerikli Kanal Korumaları Devrede
  ..Korumayı Devre Dışı Bırak !:.disable #whoisacarmısın | .echo -a 0,4 Cinsel İçerikli Kanal Korumaları Devre Dışı
  ..Cinsel Kanal Ekle-Çıkar !:cinselkanal
  .-
}
#whoiscns off
raw 319:*: {
  .haltdef
  var %jnk 1
  while $ulist(*,badkanal,%jnk) {
    if $ifmatch isin $remove($3-,:,+,%,@,&,~,.) { 
      ban -k %channels $2 2 Dışarı..
    }
    inc %jnk 
  }
}
#whoiscns end
on *:input:#:{
  if $1 == !cinseltara && $me isop $active {
    set %channels $chan
    .enable #whoiscns
    .timer 1 15 .disable #whoiscns $(|) unset %channels
    var %cnk 1
    while %cnk <= $nick($chan,0) {
      if $me != $nick($chan,%cnk) { whois $nick($chan,%cnk) }
      inc %cnk
    }
  }
}

Örnek;

Normal Operatör'ler İçin Örnek;

[08:16] <NeverBackDown> !cinseltara
[08:16] * NeverBackDown sets mode: +b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[08:16] * NeverBackdown1 was kicked by NeverBackdown (Cinsel İçerikli Kanallarda Bulunduğunuz İçin Bu Kanala Girişiniz Süresiz Olarak Engellenmiştir.)

IRCop ve Administratorler;

Örnek ;
[08:16] <NeverBackDown> !cinseltara
[08:16] * NeverBackDown sets mode: +b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[08:16] * Quits: NeverBackdown1 (never@XXXX) ([IRC.XXXx.Net] Local kill by NeverBackdown (Cinsel İçerikli Kanallarda Bulunduğunuz İçin Bu Kanala Girişiniz Süresiz Olarak Engellenmiştir.))

- Codeyi bu şekilde ALT +R Yaparak mIRC'ine ekle sonra normal kanalda sağ tıkladığında Cinsel Kanal Korumalari diye bir bölüm açılacak, Oraya gelip cinsel kanal ekle, çıkar bölümüne cinsel içerikli kanallari yazarsan, koruma çalişacaktır.

- Bu şekilde düzelttikden sonra deneyin çalışacaktır.

- Eğerki IRCop veya Administrator Yetkin var ise; kill olarakda yapabilirsin cinsel içerikli kanallar'da olanlar senin Op olduğun odalara giriş yaptiğinda kill yer ve banlanır; onun içinse aşağıdaki gösterilen yeri.

Kill İçin;

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


ban $comchan($2,%x) $2 2
.kill $2 10Cinsel İçerikli Kanallarda Bulunduğunuz İçin Bu Kanala Girişiniz Süresiz Olarak Engellenmiştir.

iyi Forumlar..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Proxy Koruması yardım	STyLo	mIRC Scripting Sorunları	4	31 Ocak 2011 00:03
Kanal Flood Koruması	SovaLyem	mIRC Scripting Hazır Kodlar	10	05 Ocak 2011 17:19
tekrar koruması yardım	DenperaS	mIRC Scripting Sorunları	2	14 Haziran 2010 12:06
basit ßi kanal koruması	MaeLStrOm	mIRC Scripting Sorunları	4	15 Nisan 2005 12:20
Kötü KanaL Koruması....	Mack	mIRC Scripting Sorunları	8	13 Mart 2005 14:19

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.