Reklam Kontrol icin Hazir Kod

Bu Haz?r Kod ;  " /describe $irc.server.com Reklam Kontrol  " komutuyla sunucudaki tüm clientlere reklam kontrol mesaj? gönderirseniz , reklamc? botlar size direk reklam? ile kar??l?k verecektir. Haz?r kodda mevcut olan  regex sayesinde  w w w  , w- -w -w , w*w*w ve türevleri veyahutta direk reklam www. reklam . com veya irc reklamlar?, ile size mesaj gönderen reklamc? botlara otomatik gline atabileceksiniz.. IRC Networkta reklam kontrolunun daha rahat yap?lmas? aç?s?ndan güzel bir kod.



raw 352:*: {
if serv !isin $6 {
msg $6 Reklam Kontrol
halt
}
}

on *:text:*:?: {
closemsg $nick
if $nick !isop$chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers {
if($regex($1-,/.*?([hH]{1,20}\W*[tT]{1,20}\W*[tT]{1,20}\W*[pP]{1,20}\W*[:.]{1,20}\W*[/\]{1,20}\W*[/\]{1,20})/)) {
gline $nick Reklam sebebi ile uzakla?t?r?ld?n?z.
}
if ($regex($1-,/.*?([wW]{1,20}\W*(v|V|[wW]){1,20}\W*[wW]{1,20}\W*[.]{1,20})/)) {
gline $nick Reklam sebebi ile uzakla?t?r?ld?n?z.
}
if ($regex($1-,/.*?([..]{1,20}\W*[cC]{1,20}\W*[oO]{1,20}\W*[mM]{1,20})/)) {
gline $nick Reklam sebebi ile uzakla?t?r?ld?n?z.
}
if ($regex($1-,/.*?([..]{1,20}\W*[nN]{1,20}\W*(é|&#8364;|[eE]){1,20}\W*[tT]{1,20})/)) {
gline $nick Reklam sebebi ile uzakla?t?r?ld?n?z.
}
if ($regex($1-,/.*?([..]{1,20}\W*(0|[oO]){1,20}\W*[rR]{1,20}\W*[gG]{1,20})/)) {
gline $nick Reklam sebebi ile uzakla?t?r?ld?n?z.
}
if ($regex($1-,/.*?([..]{1,20}\W*[gG]{1,20}\W*(é|&#8364;|[eE]){1,20}\W*[nN]{1,20}\W*[.:]{1,20}\W*[tT]{1,20}\W*[rR]{1,20})/ {  
gline $nick Reklam sebebi ile uzakla?t?r?ld?n?z.
}
}
}