Channel Protection

By Remuser on May 26, 2010

This script allow you to set the activ channel to protected channel agains spambots , notices , no remove modes , ctcps , bad words , caps , colours , advertise

All my scripts are setted with bans in Romanian language so you will need to edit the bans reasons...

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Autor : Dorin  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;       proscript@hi2.ro        ;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;    http://ProScript.Hi2.Ro    ;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; notice

#notice on

on *:NOTICE:*:%CSantinotice:{
   If ( $nick isreg $chan ) {
 /kick # $nick 7Notice-ul nu este permis pe4 $chan 7Pentru unban contacteaza un OP 4(+@) 3(4BanTime10 6 4ore3) 
 /msg X ban $chan $address($nick,2) 6 100 2Banned: 7Notice-ul nu este permis pe4 $chan 7Pentru unban contacteaza un OP 4(+@) 3(4BanTime10 6 4ore3) }
}

#notice END

;; advertise

#advertise on

On *:TEXT:*#*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*#*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*#*) 3(4BanTime10 6 4ore3)
  }
}
On *:TEXT:*dchub://*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*dchub://*) 3(4BanTime10 6 4ore3) 
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*dchub://*) 3(4BanTime10 6 4ore3)
  }
}
On *:TEXT:*www.*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*www.*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*www.*) 3(4BanTime10 6 4ore3)
  }
}
On *:TEXT:*http?//*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*www.*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*http?//*) 3(4BanTime10 6 4ore3)
  }
}
On *:TEXT:*ftp?//*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*www.*) 3(4BanTime10 6 4ore3) 
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*ftp?//*) 3(4BanTime10 6 4ore3)
  }
}
On *:TEXT:*/join*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 7Ce 4*/join* 7? Nu exista canal mai fain decat asta ! 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 7Ce 4*/join* 7? Nu exista canal mai fain decat asta ! 3(4BanTime10 6 4ore3)
  }
}
On *:TEXT:*/j*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 7Ce 4*/j* 7? Nu exista canal mai fain decat asta ! 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 7Ce 4*/j* 7? Nu exista canal mai fain decat asta ! 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*#*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*#*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*#*) 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*www.*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*www.*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*www.*) 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*http?//*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*http?//*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*http?//*) 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*ftp?//*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*ftp?//*) 3(4BanTime10 6 4ore3)
    //.msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*ftp?//*) 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*/join*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 7Ce 4*/join* 7? Nu exista canal mai fain decat asta 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 7Ce4 */join* 7? Nu exista canal mai fain decat asta 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*/j*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 7Ce 4*/j* 7? Nu exista canal mai fain decat asta 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 7Ce4 */j* 7? Nu exista canal mai fain decat asta 3(4BanTime10 6 4ore3)
  }
}
On *:ACTION:*dchub://*:%CSantipub: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*dchub://*) 3(4BanTime10 6 4ore3)
    /msg X ban # $address($nick,2) 6 100 2Reclama: 7Nu este permisa pe4 $chan 7Pentru unban contacteaza un OP 4(*dchub://*) 3(4BanTime10 6 4ore3)
  }
}

#advertise END

;; Bad Words

#bw on

On *:TEXT:*pula*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pula*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pula*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*fuck*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fuck*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fuck*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*p?zd*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*p?zd*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pizda*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*coaie*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*coaie*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*coaie*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*mu?e*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mu?e*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*muie*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*fut*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fut*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fut*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*pola*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pola*) (1h)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pula*) 3(4BanTime10 1 4ora3)
  }
}
On *:TEXT:*mui?*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mui?*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*muie*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*pula*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pula*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pula*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*fuck*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fuck*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fuck*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*p?zd*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*p?zd*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*p?zd*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*coaie*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*coaie*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*coaie*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*mu?e*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mu?e*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mu?e*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*mui?*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mui?*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mui?*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*muj?*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*muj*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*muj*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*fut*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fut*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*fut*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*pola*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pola*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*pola*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*curv?*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*curv?*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*curv?*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*sug?*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick  2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*sug?*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*sug?*) 3(4BanTime10 1 4ora3)
  }
}
On *:ACTION:*mata*:%CSantibw: {
  If ( $nick isreg $chan ) {
    /kick # $nick 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mata*) 3(4BanTime10 1 4ora3)
    /msg X ban # $address($nick,2) 1 100 2Limbaj vulgar: 7Ia dute si spalate pe limbutsa.. o ai cam murdara 4(*mata*) 3(4BanTime10 1 4ora3)
  }
}

#bw END

#colorkick on

on 1:TEXT:**:%CSanticulori: {
  if ($nick isreg $chan) {
    /kick # $nick 2 7Intelegem si fara sa subliniezi ! 3(4BanTime10 1 4ora3)
    /msg X ban $chan $address($nick,2) 1 100 7Intelegem si fara sa subliniezi ! 3(4BanTime10 1 4ora3)
  }
  else { goto end }
  :end
}  
on 1:TEXT:**:%CSanticulori: {
  if ($nick isreg $chan) {
    /kick # $nick 7Nu ai voie sa folosesti BOLD pe $chan ! 3(4BanTime10 1 4ora3)
    /msg X ban $chan $address($nick,2) 1 100 7Nu ai voie sa folosesti BOLD pe $chan ! 3(4BanTime10 1 4ora3)
  }
  else { goto end }
  :end
}  
on 1:TEXT:**:%CSanticulori: {
  if ($nick isreg $chan) {
     /kick # $nick 7Fara culori, vopsele, si alte chestii dinastea pe $chan ! 3(4BanTime10 1 4ora3)
    /msg X ban $chan $address($nick,2) 1 100 7Fara culori, vopsele, si alte chestii dinastea pe $chan ! 3(4BanTime10 1 4ora3)
  }
  else { goto end }
  :end
}  

#colorkick end

#ctcpchan on

ctcp 1:*:%CSantictcp: {
  if ($nick isreg $chan) {
     /ban # $nick -ku72000 
     /kick # $nick 2Banned: 7Stop with this CTCP's ! 3(4BanTime10 12 4ore3)
     /msg X ban $chan $address($nick,2) 12 100 7Stop with this CTCP's ! 3(4BanTime10 12 4ore3)
  }
  else { goto end }
  :end
}  

#ctcpchan end

#Caps-kicker on

alias allowedcaps { return 80 }
on @*:TEXT:*:%CSanticaps:{ 
  if ($len($1-) < 20) { return }
  var %caps.letters = $calc($len($1-) + 1 - $len($removecs(A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z)))
  var %caps = $calc($len($1-) - $len($removecs($1-,($1-),A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z)))
  var %caps.percent = $round($calc(%caps / %caps.letters * 100),0)
  if ((%caps.percent > $allowedcaps) && ($nick !isop #)) { 
    .msg X ban $Chan $address($nick,2) 1 100 7In stanga tastaturii ai butonul '4Caps Lock7' - apasa-l cu incredere ! 3(4BanTime10 1 4ora3)
  }
}

#Caps-kicker end

;; Protectia modurilor

#Modes-Pro on

on *:MODE:%CSantimodes:{ 
if (-nt isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-tn isincs $1 && $nick != $me) { .mode $chan +tn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-snt isincs $1 && $nick != $me) { .mode $chan +snt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-nts isincs $1 && $nick != $me) { .mode $chan +nts
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-tns isincs $1 && $nick != $me) { .mode $chan +tns
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-stn isincs $1 && $nick != $me) { .mode $chan +stn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-sn isincs $1 && $nick != $me) { .mode $chan +sn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ns isincs $1 && $nick != $me) { .mode $chan +ns
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-nr isincs $1 && $nick != $me) { .mode $chan +nr
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-rn isincs $1 && $nick != $me) { .mode $chan +rn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-rnt isincs $1 && $nick != $me) { .mode $chan +rnt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-lnt isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-nlt isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ntl isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ltn isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-tln isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-tnl isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ntr isincs $1 && $nick != $me) { .mode $chan +ntr
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ntrs isincs $1 && $nick != $me) { .mode $chan +ntrs
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ntsr isincs $1 && $nick != $me) { .mode $chan +ntsr
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-mtn isincs $1 && $nick != $me) { .mode $chan +mtn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mitn isincs $1 && $nick != $me) { .mode $chan +mitn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-in isincs $1 && $nick != $me) { .mode $chan +in
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mn isincs $1 && $nick != $me) { .mode $chan +mn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-knt isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-nkt isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ntk isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-ktn isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-tkn isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-tnk isincs $1 && $nick != $me) { .mode $chan +nt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
if (-min isincs $1 && $nick != $me) { .mode $chan +min
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mint isincs $1 && $nick != $me) { .mode $chan +mint
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-misn isincs $1 && $nick != $me) { .mode $chan +misn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mirn isincs $1 && $nick != $me) { .mode $chan +mirn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mirnt isincs $1 && $nick != $me) { .mode $chan +mirnt
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-kin isincs $1 && $nick != $me) { .mode $chan +in
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-kirn isincs $1 && $nick != $me) { .mode $chan +rn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-tin isincs $1 && $nick != $me) { .mode $chan +tin
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-itn isincs $1 && $nick != $me) { .mode $chan +itn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mtn isincs $1 && $nick != $me) { .mode $chan +mtn
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-mtin isincs $1 && $nick != $me) { .mode $chan +mtin
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-n isincs $1 && $nick != $me) { .mode $chan +n
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
 }
if (-t isincs $1 && $nick != $me) { .mode $chan +t
.ban -ku3600 $chan $nick 2 4Protectia Modes-urilor: 2Nu ai voie sa te atingi de modurile canalului! 3(4BanTime 1 ora3)
  }
}

#Modes-Pro end

#bid on

on @*:JOIN:%CSantibadident:{ 
  if (*!*fuck*@* iswm $fulladdress) || (*!*sperma*@* iswm $fulladdress) || (*!*coaie*@* iswm $fulladdress) || (*!*laba*@* iswm $fulladdress) || (*!*BITCH*@* iswm $fulladdress) || (*!*Muie*@* iswm $fulladdress) || (*!*SHIT*@* iswm $fulladdress) || (*!*DICK*@* iswm $fulladdress) || (*!*sclav*@* iswm $fulladdress) || (*!*pula*@* iswm $fulladdress) || (*!*pizda*@* iswm $fulladdress) || (*!*fut*@* iswm $fulladdress) || (*!*laba*@* iswm $fulladdress) || (*!*cacat*@* iswm $fulladdress) {
        .ban -ku3600 $chan $nick 2Banned: 3Bad Identd! 2Schimba ident-ul si revin-o 
    .msg x ban # $nick 2Banned: 3Bad Identd! 2Schimba ident-ul si revin-o 
}
}

on @*:PART:%CSantibadident:{ 
  if (*!*fuck*@* iswm $fulladdress) || (*!*sperma*@* iswm $fulladdress) || (*!*coaie*@* iswm $fulladdress) || (*!*laba*@* iswm $fulladdress) || (*!*BITCH*@* iswm $fulladdress) || (*!*Muie*@* iswm $fulladdress) || (*!*SHIT*@* iswm $fulladdress) || (*!*DICK*@* iswm $fulladdress) || (*!*sclav*@* iswm $fulladdress) || (*!*pula*@* iswm $fulladdress) || (*!*pizda*@* iswm $fulladdress) || (*!*fut*@* iswm $fulladdress) || (*!*laba*@* iswm $fulladdress) || (*!*cacat*@* iswm $fulladdress) {
        .ban -ku3600 $chan $nick 2Banned: 3Bad Identd! 2Schimba ident-ul si revin-o 
    .msg x ban # $nick 2Banned: 3Bad Identd! 2Schimba ident-ul si revin-o 
}
}

#bid end

#bdrone on

alias drone {
    if ( $regex($$1,/^(Aldora|Alysia|Amorita|Anita|April|Ara|Aretina|Barbra|Bella|Bettina|Blenda|Briana|Bridget|Camille|Cara|Carla|Carmen|Chelsea|Clarissa|Damita|Danielle|Daria|Diana|Donna|Dora|Doris|Ebony|Eden|Eliza|Emily|Erin|Eve|Evelyn|Faith|Gale|Gilda|Gloria|Haley|Helga|Holly|Ida|Idona|Iris|Isabel|Ivana|Ivory|Janet|Jewel|Joanna|Julie|Juliet|Kacey|Kali|Kara|Kassia|Katie|Katrina|Kyle|Lara|Laura|Linda|Lola|Lolita|Lynn|Maia|Maria|Meggie|Milenia|Mimi|Myra|Naomi|Natalie|Nicole|Nina|Nova|Olga|Olivia|Queen|Rae|Rachel|Raquel|Rita|Rosa|Sharon|Silver|Tara|Ula|Uma|Valda|Valora|Vanessa|Vicky|Violet|Xenia|Xylia|Zenia|Zilya|Zoe)[1-3][0-9]!.*$/) ) { return 1 }
    else { return 0 }
}

on *:join:%CSantidrone:{
    if ( $drone($fulladdress) ) {
        .ban -ku3600 $chan $nick 2SpamBot/Drone Detected  4- 7Daca nu contacteaza un OP pentru unban 3(4BanTime10 1 4ora3)
    .msg x ban # $nick 1 75 2SpamBot/Drone Detected  4- 7Daca nu contacteaza un OP pentru unban 3(4BanTime10 1 4ora3)
        echo -a 14*4*14* 4Y14ou 4H14ave 4B14aned 4A D14rone 4O14n $chan
    }
}

#bdrone end
menu menubar,channel {
.Protectii Canal
 ..Anti Publicitate
  ...Activeaza:.set %CSantipub $addtok(%CSantipub,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra12 Reclama
  ...Dezactiveaza:.unset %CSantipub $remtok(%CSantipub,$active,44) | .echo -a 4Am dezactivat protectia anti 12Reclame 4de pe12 #
 .-
 ..Anti Notice
  ...Activeaza:.set %CSantinotice $addtok(%CSantinotice,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12Notice
  ...Dezactiveaza:.unset %CSantinotice $remtok(%CSantinotice,$active,44) | .echo -a 4Am dezactivat protectia anti 12Notice 4de pe12 #
 .-
 ..Anti Bad Ident
  ...Activeaza:.set %CSantibadident $addtok(%CSantibadident,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12Notice
  ...Dezactiveaza:.unset %CSantibadident $remtok(%CSantibadident,$active,44) | .echo -a 4Am dezactivat protectia anti 12Notice 4de pe12 #
 .-
 ..Anti Drone
  ...Activeaza:.set %CSantidrone $addtok(%CSantidrone,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12Dronelor
  ...Dezactiveaza:.unset %CSantidrone $remtok(%CSantidrone,$active,44) | .echo -a 4Am dezactivat protectia anti 12Drone 4de pe12 #
 .-
 ..Protectia Modes-urilor
  ...Activeaza:.set %CSantimodes $addtok(%CSantimodes,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12Scoaterea Modes-urilor
  ...Dezactiveaza:.unset %CSantimodes $remtok(%CSantimodes,$active,44) | .echo -a 4Am dezactivat protectia anti 12Scoaterea Modes-urilor 4de pe12 #
 .-
 ..Anti Cuvinte obscene
  ...Activeaza:.set %CSantibw $addtok(%CSantibw,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12Cuvintelor obscene
  ...Dezactiveaza:.unset %CSantibw $remtok(%CSantibw,$active,44) | .echo -a 4Am dezactivat protectia anti 12Cuvinte Obscene 4de pe12 #
 .-
 ..Anti Culori
  ...Activeaza:.set %CSanticulori $addtok(%CSanticulori,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12Culorilor
  ...Dezactiveaza:.unset %CSanticulori $remtok(%CSanticulori,$active,44) | .echo -a 4Am dezactivat protectia anti 12Culori 4de pe12 #
 .-
  ..Anti CTCP
   ...Activeaza:.set %CSantictcp $addtok(%CSantictcp,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12CTCP
   ...Dezactiveaza:.unset %CSantictcp $remtok(%CSantictcp,$active,44) | .echo -a 4Am dezactivat protectia anti 12CTCP 4de pe12 #
 .-
  ..Anti CAPS
   ...Activeaza:.set %CSanticaps $addtok(%CSanticaps,$active,44) | .echo -a 4Am adaugat12 # 4in lista de canale protejate contra 12CAPS
   ...Dezactiveaza:.unset %CSanticaps $remtok(%CSanticaps,$active,44) | .echo -a 4Am dezactivat protectia anti 12CAPS 4de pe12 #
}

Remuser

Like Page Follow Author

Comments

Sign in to comment.
fahadmehar   -  Dec 05, 2016

Bro , you need to write this remote in ENGLISH and i like this remote.

 Respond  
rayrayray   -  Jun 19, 2010

Hey,i found a script on here a bit ago, where, i could add anyone to my bot even a guest nick that ant registerd, and they could do any commands, and only channel op's and channel owner, could add them, i have lost the script can some one find it on here and send me the link by email, or even make one for me and send me a email.

 Respond  
napa182   -  May 26, 2010

well keep at it you will get better...

 Respond  
Remuser   -  May 26, 2010

i know little bit , i'm starting this experience with mIRC Scripting...
and how i don't like to copy somebody alse i make it how i know..
i have read mirc.hlp and some tutorials founded on google..
so here i start... that's why i joined this website , to learn more :D it's quite funny how mirc can look afters some scripts are loaded

 Respond  
napa182   -  May 26, 2010

I thought you knew regex cuz you used one in ur snippet. hmm ...
also it don't matter if it kinda works it's better to make the snippet as efficient as possible.
using a crap load of on text/action events seems like a waste, but what ever..
as is 3/10

 Respond  
Remuser   -  May 26, 2010

I don't know Regex so i make who i know... the important is to work no? who like it will edit the bans msg ;)

 Respond  
napa182   -  May 26, 2010

such a bad way to go about this.
you used a alias that uses a regex, but why didn't you make a regex that will take out all them on text , action , and mode events?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.