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/)
-   -   hoş geldin mesajı (https://www.ircforumlari.net/mirc-scripting-sorunlari/380952-hos-geldin-mesaji.html)

aldanis 04 Şubat 2011 16:12

hoş geldin mesajı
 
yetkili olduğum kanala başka bir yetkili geldiğinde +o durumuna geçerken o kişiy hoş geldin demesini istiyorum


(16:06:34) * ChanServ sets mode: +h X
(16:06:35) <&Analyzer> X su anda kanal yardimci operatoru konumuna gecti.

Şu gibi girişte 3 4 saniye sonra giren yetkili kişiye hoş geldn demesini istiyorum yapabilirmiyiz.

CesuryureK 04 Şubat 2011 16:50

Cevap: hoş geldin mesajı
 
Bunun birden çok yöntemi var ben sana iki tane yol vereceğim. Dilediğin yolu kullanırsın.

Birincisi, chanserv'in giren kişiye verdiği prefix'e göre hoş geldin demeni sağlamak

İkincisi ise, giren kişinin yetki alıp almadığını kontrol ettirip hoş geldin demeni sağlamak

KOD 1:

Kod:

alias flags {
  if $1 == +h { return halfop }
  if $1 == +o { return aop }
  if $1 == +oa { return sop }
  if $1 == +oq { return founder }
}
on *:RAWMODE:#KANAL: {
  if (!$regex($2,/^(CesuryureK|BotNick1|BotNick2|BotNick3)$/i)) && ($nick == ChanServ) {
    if $regex($flags($1),/(aop|sop|founder|halfop)/i) {
      .timer 1 4 msg $chan Hoş Geldin $2
    }
  }
}

öncelikle flags diye bir alias oluşturup chanserv'in kanalda yetki verdiği modeleri alias ile $1 denilen birinci kelime ile eşitleyip sonra onu bir sözcüğe dönüştürdük(return)

Rawmode eventi ile $2 ile bilinen ikinci kelimenin hangi nicklerde çalışmaması gerektiğini belirtip ve bu yetkiyi veren kişi chanserv ise aldığı prefix'in bizim belirlediğimiz prefixler ise aldığı yetkiden 4 saniye sonra hoş geldin demesini sağlıyoruz.

----------------------

KOD 2:

Kod:


on !*:Join:#KANAL: { updatenl | .timer 1 4 kontrol | set -u6 %giren $nick | set -u6 %kanal $chan }
alias kontrol {
if (!$regex(%giren,/^(CesuryureK|BotNick1|BotNick2|BotNick3)$/i)) {
  if ($regex($nick(%kanal,%giren).pnick,@|&|%|~)) { 
    msg %kanal Hoş Geldin %Giren
  }
}
}


bu kod sadece KANAL GİRİŞİNDE çalışacaktır. Join eventimiz kanal girişi olduğunda harekete geçen eventtir.
Kanala giriş olunca 4 saniye sonra yetki alıp almadığını kontrol ettirip almışsa hoş geldin diyecektir.
-----------------------

bu iki koddan dilediğini kullanabilirsin.

Birinci ve ikinci kodda, olaki bot nickleri olur onlarda çalışmamasını istiyorsan o nickleri oraya yazabilirsin.

aldanis 04 Şubat 2011 18:33

Cevap: hoş geldin mesajı
 
bu koda ekleme yapabilirmiyiz 2. sine hoş geldin i 1 kere desin her girmesinde değil

CesuryureK 04 Şubat 2011 22:50

Cevap: hoş geldin mesajı
 
Kod:


on !*:Join:#KANAL: { updatenl | .timer 1 4 kontrol | set -u6 %giren $nick | set -u6 %kanal $chan }
alias kontrol {
if (!$regex(%giren,/^(CesuryureK|BotNick1|BotNick2|BotNick3)$/i)) {
if ($regex($nick(%kanal,%giren).pnick,@|&|%|~)) {
if !$read(Gunluk.txt,w,%giren) {
msg %kanal Hoş Geldin %Giren
write Gunluk.txt %giren
}
}
}
}
on *:Start: { write -c gunluk.txt }

Bir kişiye hoş geldin dedikten sonra bir daha o kişiye hoş geldin diyebilmesi için taki senin scripti kapatıp açman ve ilgili sunucudaki kanala girmen daha sonra o kişinin o kanala giriş yapması gerekecektir.

kısacası, bir kişiye hoş geldikten sonra o kişinin nickini gunluk.txt denilen dosyaya atacak. o kişi tekrar çıkıp girsede hoş geldin demeyecektir. Sen mirci kapatıp açınca o gunluk.txt dosyasındaki nickler sıfırlanacaktır.

Ayisigi1 06 Şubat 2011 16:57

Cevap: hoş geldin mesajı
 
CesurYureK bu remoteye muaf host ekleyebilirmisiniz admin oper gibi onlara demesin hoş geldin diye

CesuryureK 06 Şubat 2011 18:24

Cevap: hoş geldin mesajı
 
Alıntı:

Ayisigi1 Nickli Üyeden Alıntı (Mesaj 1040672783)
CesurYureK bu remoteye muaf host ekleyebilirmisiniz admin oper gibi onlara demesin hoş geldin diye

Kod:


on !*:Join:#KANAL: { updatenl | .timer 1 4 kontrol | set -u6 %giren $nick | set -u6 %kanal $chan }
alias kontrol {
  if (!$regex(%giren,/^(CesuryureK|BotNick1|BotNick2|BotNick3)$/i)) {
    if (!$regex($address(%giren,2),/(Server|Services|Admin|Oper|IRCop|Network)/i)) {
      if ($regex($nick(%kanal,%giren).pnick,@|&|%|~)) {
        if !$read(Gunluk.txt,w,%giren) {
          msg %kanal Hoş Geldin %Giren
          write Gunluk.txt %giren
        }
      }
    }
  }
}
on *:Start: { write -c gunluk.txt }



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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk