mIRC Scripting  
 
  away reklamlari hakkinda 15.03.2025 05:39 (UTC)
   
 
merhaba ;
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 www , 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.

işte kod ;

Kod:
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(www.) <- %: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(www.) <- %:nx 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
}
}
kolay gelsin , iyi çalışmalar
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Bugün 6 ziyaretçi (12 klik) kişi burdaydı!
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol