birçok arkadaşımızın forumda online oldukları süre icerisinde sordukları soruların %30'unu oluşturan bir konu ( away mesajları )
bildiğiniz üzere güvenlik botlarını aşabilmek için birçok inviter acılımı mevcut'tur bunların yanı sıra trojanlarda da mevcut olan away mesajlarını nasıl engeleriz diye soranlara bir cevap hazırladım bu cevap alt'taki kod'dur
çalışma mantığına gelince kanala girişlerde her user'in mesajlarını kontrol eder. Mesajları regex ile kontrol eder
com , net vs vs vs bunların ulaşabilecek en son hallerine kadar yasaklanmıştır. kullanıcı modları icerisinde (+o=IRCOP) flag'ı mevcut ise ceza-i işlemlerinde gline kullanır , eğer ki kişi kanalda operator ise kickban uygular.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias _? { var %¦:- $address($1,5) | var %£.¨ $active | mode %£.¨ +b %¦:- }
on *:join:#: { whois $nick }
raw *:*: {
var %? $3- , %¦ $numeric,%. o , %• $usermode , %:nx $2
if %¦ == 301 {
if ($regex(%?,/.*?([hH]{1,5}\W*[tT]{1,5}\W*[tT]{1,5}\W*[pP]{1,5}\W*[:.]{1,5}\W*[/\]{1,5}\W*[/\]{1,5})/)) {
if %. isincs %• {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(http://) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop $%£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(http://) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?((vv|v|V|VV|[wW]){1,5}\W*(vv|v|V|VV|[wW]){1,5}\W*(vv|v|V|VV|[wW]){1,5}\W*[.]{1,5})/)) {
if %. isincs %• {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?([.:]{1,20}\W*[cC]{1,5}\W*[oO]{1,5}\W*[mM]{1,5})/)) {
if %. isincs %• {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.com) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.com) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?([.:]{1,5}\W*[nN]{1,5}\W*(é|€|[eE]){1,5}\W*[tT]{1,5})/)) {
if %. isincs %• {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.net) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.net) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?([.:]{1,20}\W*(0|[oO]){1,20}\W*[rR]{1,20}\W*[gG]{1,20})/)) {
if %. isincs %• {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.org) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a - %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
halt
}
}