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/)
-   -   30 dk konuşma engelleme (https://www.ircforumlari.net/mirc-scripting-sorunlari/51412-30-dk-konusma-engelleme.html)

Editor 21 Şubat 2008 01:23

30 dk konuşma engelleme
 
S.a hocam öncelikle kolay gelsin

Bunun komutu nedir acaba? Socket olmuyan?
NoMercy> __AZAD__; kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 30 dk. sureyle konusmaniz engellendi.

Simdiden teskkuru birc borc bilirim

KiLL 21 Şubat 2008 01:38

Cevap: 30 dk konuşma engelleme
 
on *:text:*:#:{
var %text $lines(kufur.txt)
while (%text >= 1) {
if $read(kufur.txt,%text) iswm $1- {
ban -u1800 $chan $nick
msg $chan $nick : Kanal ıcındekı argo konusmalarınız yuzunden 30 dk engellendınız.
}
}
}


bunu ekle daha sonra kufur.txt ye engellenmesını ıstedıgın kelımelerı başına ve sonuna * koyarak yaz örn ;

*lan*
*it*
*köpek*

gibi

7610 23 Şubat 2008 19:55

Cevap: 30 dk konuşma engelleme
 
Bunu ben Caps ve Argo uyarısı için denedim ama yaamadım yardımcı olurmusunuz ?

Elimdeki Kodlar şunlar
Argo
Kod:

on *:TEXT:*:#: {
  var %i 1
  while (%i <= $lines(argo.txt)) {
    if ($read(argo.txt,%i) iswm $1-) {
      hinc -m argo $nick 1
      if $hget(argo,$nick) == 1 {  msg $chan   [ U y a r ı ]  :  5Argo konuşmak yasaktır 12 $nick 5 tekrarı halinde kanaldan uzaklaştırılacaksınız.. }
      if $hget(argo,$nick) == 2 {  kick $chan $nick  Argo İcerikli sözler kullanılmaması hakkında uyarılmıştınız.Lütfen Sohbet ortamını bozacak davranışlar sergilemeyin.İyİ SohbetLer. }
      if $hget(argo,$nick) == 3 {  ban -ku600 $chan 4 $nick 2 Argo İcerikli sözler kullanmamaniz konusunda uyarilmistiniz. | hdel argo $nick }
    }
    inc %i
  }
}

Caps
Kod:

on *:text:*:#:{
  if $nick isop $chan { halt }
  if $nick == Mehmet{ halt }
  if ($len($1-) >= 15 ) {
    if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
      var %t = $numtok($1-,32) | while %t { if $gettok($1-,%t,32) ison $chan { halt } | dec %t }
      inc -u30 %bharf. [ $+ [ $nick ] ] 1
      if %bharf. [ $+ [ $nick ] ] == 1 {
        msg $chan  [ U y a r ı ]  :  $nick  Lütfen büyük harf kullanmayınız   
      }
      if %bharf. [ $+ [ $nick ] ] == 2 {
        mode # +b $wildsite | kick $chan  $nick  5 Uyarıları dikkate alsan iyi olur.Buyuk Harf Kullandıgın Icin kanaldan Atıldın.
      }
    }
  }
}


Gurkan 25 Şubat 2008 17:37

Yanıt: 30 dk konuşma engelleme
 
Alıntı:

SaGoPa-mİRCKanka Nickli Üyeden Alıntı (Mesaj 353725)
S.a hocam öncelikle kolay gelsin

Bunun komutu nedir acaba? Socket olmuyan?
NoMercy> __AZAD__; kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 30 dk. sureyle konusmaniz engellendi.

Simdiden teskkuru birc borc bilirim

beyler Kod olarak istememiş arkadaş;

//mode #kanal +b ~q:nick!*@* | /timer 1 1800 /mode #kanal -b ~q:nick!*@* komutu ile yapabilirsin.

SaW 25 Şubat 2008 18:58

Cevap: 30 dk konuşma engelleme
 
Sanırım arkadaşın istediği kişinin kanaldan +b modunun parametresiz haliyle banlanması değil +q parametresiyle konuşmasının engellenmesi..

sadece +b ile banlayınca da evet konuşması engellenmiş olacaktır ama kanaldan çıkarsa tekrar giremeyecektir v.s..
ancak +b modunun +q parametresiyle sadece konuşması engellenmiş diğer kullanabileceği şeylerden mahrum kalmamış demektir.

Şu durumda +b +q:mask kullanılması daha doğrudur.

Spectral 26 Şubat 2008 13:47

Cevap: 30 dk konuşma engelleme
 
Kod:

on @1:text:*:#:{
  if ($nick !isop $chan) {
    if (%>reps_ [ $+ [ $nick ] ] == $1- ) { inc %>repsa_ [ $+ [ $nick ] ] }
    if (%>reps_ [ $+ [ $nick ] ] == $null) { set -u10 %>reps_ [ $+ [ $nick ] ] $1- | inc -u10 %>repsa_ [ $+ [ $nick ] ] }
    if (%>repsa_ [ $+ [ $nick ] ] == 2) {
      mode $chan +b  $address
      /msg $chan $nick (2 Kural ihlali yaptığınız için # kanalından 30 dakika süre ile banlandınız . Bundan sonra kanal genelinde 3 Kullanıcıları Rahatsız  2 eden mesajlar kullanmıyacağınıza inanıyor ve yönetim olarak hoş sohbetler diliyoruz. 3(2 $time - $date 3) 1 | ban -u1800 $chan $address |
    }
  }
}

mode $chan +b $address bunu değiştirdim şu halde denedim
mode $chan +b ~q:+$address zaten +q değil ~q senin söylediğin parametre fakat bu zamanda sanırım bi hata oldu
+b ~q:+$address!*@* şeklinde bir ban atıyor ayrıca 30 dk sonra açma olayıda var ?? :S ban -u kullanılamıyor..
hem +b ~q hemde zamanlı unban nasıl kullanabiliriz ?

Comanche 26 Şubat 2008 18:41

Cevap: 30 dk konuşma engelleme
 
ban -u1800 $+(~q:,$address($nick,2)) yaparsan 30 dk sonra banı acılır.

Spectral 26 Şubat 2008 22:52

Cevap: 30 dk konuşma engelleme
 
on @1:text:*:#:{
if ($nick !isop $chan) {
if (%>reps_ [ $+ [ $nick ] ] == $1- ) { inc %>repsa_ [ $+ [ $nick ] ] }
if (%>reps_ [ $+ [ $nick ] ] == $null) { set -u10 %>reps_ [ $+ [ $nick ] ] $1- | inc -u10 %>repsa_ [ $+ [ $nick ] ] }
if (%>repsa_ [ $+ [ $nick ] ] == 2) {
ban -u1800 $+(~q:,$address($nick,2))
/msg $chan $nick (2 Kural ihlali yaptığınız için # kanalından 30 dakika süre ile banlandınız . Bundan sonra kanal genelinde 3 Kullanıcıları Rahatsız  2 eden mesajlar kullanmıyacağınıza inanıyor ve yönetim olarak hoş sohbetler diliyoruz. 3(2 $time - $date 3) 1 | ban -u1800 $chan $address |
}
}
}
* /ban: invalid parameters (line 6, script3.ini)
;huholmadı sanırım:confused:yada yanlış ekledim ?

detay 26 Şubat 2008 23:30

Cevap: 30 dk konuşma engelleme
 
ban komutu o şekilde ban mask'ı kabul etmez

Kod:

on @1:text:*:#:{
  if ($nick !isop $chan) {
    if (%>reps_ [ $+ [ $nick ] ] == $1- ) { inc %>repsa_ [ $+ [ $nick ] ] }
    if (%>reps_ [ $+ [ $nick ] ] == $null) { set -u10 %>reps_ [ $+ [ $nick ] ] $1- | inc -u10 %>repsa_ [ $+ [ $nick ] ] }
    if (%>repsa_ [ $+ [ $nick ] ] == 2) {
      mode $chan +b $+(~q:,$address($nick,2)) | .timer 1 1800 mode $chan -b $+(~q:,$address($nick,2))
      /msg $chan $nick (2 Kural ihlali yaptığınız için # kanalından 30 dakika süre ile banlandınız . Bundan sonra kanal genelinde 3 Kullanıcıları Rahatsız  2 eden mesajlar kullanmıyacağınıza inanıyor ve yönetim olarak hoş sohbetler diliyoruz. 3(2 $time - $date 3) 1 | ban -u1800 $chan $address |
    }
  }
}

bu sekilde kullan

Spectral 27 Şubat 2008 07:27

Cevap: 30 dk konuşma engelleme
 
sets mode: +b ~q:*!*@4DF981BB.57250860.6F692777.IP
sets mode: +b *!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

2 tane ban atıyor alttakini kaldırmadık mı ? derken buldum :)
| ban -u1800 $chan $address |
var en sonda onu silince düzeltdi :);oki


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

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