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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - giriste özel mesaj code (https://www.ircforumlari.net/mirc-scripting-sorunlari/317037-giriste-ozel-mesaj-code.html)

giriste özel mesaj code

Kod:

on *:join:#Meraklı:{

timer 1 3 kontrol $nick $chan

} 

alias kontrol { 

if ($1 isreg $2) {

.kick #meraklı $2 Kanalda yetkili yok.

} 

}

bunda kanala giren nicki atıyor ben söyle bisi yapmak istemistim "yetkisiz nick kanala girdiginde kanalda yetkili yok ise kanalda yetkili yok diyip onu kanaldan atsin yetkili ise atmasin istemistim."
kanalda yetkili var ise bölümünüde nasi yapciagimi cözemedim. :S
"kanalda yetkili var ise giren nickte yetkisiz ise onu atmasin özeline hoşgeldin desin yetkili biri isede ona hicbisi demesin istemistim." çözemedim :S bot kendini bundan muaf tutabilsin.

Cevap: giriste özel mesaj code

PHP- Kodu:

   on !*:Join:#KANAL: { updatenl | .timer 1 1 kontrol | set -e %girenuser $nick | set -e %kan $chan }
alias kontrol {
  if ($me ishop %kan) && (!$regex($nick(%kan,%girenuser).pnick,@|&|%|~)) && ($nick(%kan,0,h) == 1) && ($nick(%kan,1,h) == $me) && ($nick(%kan,0,o) == 0) {
    kick %kan %girenuser Kanalda Yetkili Yok. 
    unset -u2 %girenuser
    unset -u2 %kan
  }
  elseif ($me isop %kan) && (!$regex($nick(%kan,%girenuser).pnick,@|&|%|~)) && ($nick(%kan,0,o) == 1) && ($nick(%kan,1,o) == $me) && ($nick(%kan,0,h) == 0) {
    kick %kan %girenuser Kanalda Yetkili Yok. 
    unset -u2 %girenuser
    unset -u2 %kan
  }
  elseif (!$regex($nick(%kan,%girenuser).pnick,@|&|%|~)) { .msg %girenuser Hoş Geldin. Kanalda yetkili var. | unset -u2 %kan | unset -u2 %girenuser }
}

Yapman gerekenler
1- kanalda bota halfop veya aop yetkilerinden birini eklemen
2- kodda geçen #KANAL yerine işlem yapacağı kanalı yazman.
-
Kod test edilmiştir.

Cevap: giriste özel mesaj code

Alıntı:

CesuryureK Nickli Üyeden Alıntı (Mesaj 1040324361)

PHP- Kodu:

   on !*:Join:#KANAL: { updatenl | .timer 1 1 kontrol | set -e %girenuser $nick | set -e %kan $chan }
alias kontrol {
  if ($me ishop %kan) && (!$regex($nick(%kan,%girenuser).pnick,@|&|%|~)) && ($nick(%kan,0,h) == 1) && ($nick(%kan,1,h) == $me) && ($nick(%kan,0,o) == 0) {
    kick %kan %girenuser Kanalda Yetkili Yok. 
    unset -u2 %girenuser
    unset -u2 %kan
  }
  elseif ($me isop %kan) && (!$regex($nick(%kan,%girenuser).pnick,@|&|%|~)) && ($nick(%kan,0,o) == 1) && ($nick(%kan,1,o) == $me) && ($nick(%kan,0,h) == 0) {
    kick %kan %girenuser Kanalda Yetkili Yok. 
    unset -u2 %girenuser
    unset -u2 %kan
  }
  elseif (!$regex($nick(%kan,%girenuser).pnick,@|&|%|~)) { .msg %girenuser Hoş Geldin. Kanalda yetkili var. | unset -u2 %kan | unset -u2 %girenuser }
}

Yapman gerekenler
1- kanalda bota halfop veya aop yetkilerinden birini eklemen
2- kodda geçen #KANAL yerine işlem yapacağı kanalı yazman.
-
Kod test edilmiştir.

cok özür dileyerek kanala giren nickler yetkili(+%@&) ise onlarada hoşgeldin sahip diyebilir mi :S ugrastım yapmak icin ama code karisik geldi bozdum hep :S

Cevap: giriste özel mesaj code

PHP- Kodu:

   on !*:Join:#KANAL: { updatenl | .timer 1 1 kontrol | set -e %girenuser $nick | set -e %kan $chan }
alias kontrol {
  if ($me ishop %kan) && (!$regex($nick(%kan,%girenuser).pnick,+|@|&|%|~)) && ($nick(%kan,0,h) == 1) && ($nick(%kan,1,h) == $me) && ($nick(%kan,0,o) == 0) {
    kick %kan %girenuser Kanalda Yetkili Yok. 
    unset -u2 %girenuser
    unset -u2 %kan
  }
  elseif ($me isop %kan) && (!$regex($nick(%kan,%girenuser).pnick,+|@|&|%|~)) && ($nick(%kan,0,o) == 1) && ($nick(%kan,1,o) == $me) && ($nick(%kan,0,h) == 0) {
    kick %kan %girenuser Kanalda Yetkili Yok. 
    unset -u2 %girenuser
    unset -u2 %kan
  }
  elseif (!$regex($nick(%kan,%girenuser).pnick,+|@|&|%|~)) { .msg %girenuser Hoş Geldin. Kanalda yetkili var. | unset -u2 %kan | unset -u2 %girenuser }
elseif ($regex($nick(%kan,%girenuser).pnick,+|@|&|%|~)) { .msg %girenuser Hoş Geldin Sahip | unset -u2 %kan | unset -u2 %girenuser }
}