mIRC Büyük harf koruma Addon

19 Nisan 2014 • 19:29 OxiGeN Addonlar

alias capsban { if (%ipban == on) { //Ban -u $+ 900 # $nick 2 } | mode # +b $$1 }

#caps on
on @*:TEXT:*:#: {
  if $me !isop $chan { halt } | if $nick isop $chan { halt }
  if ($len($1-) &lt; 50) || ($nick isop #) return
  var %text = $strip($remove($1-,$chr(32)))
  var %non.caps = $len($removecs(%text,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 %full.line = $len($strip($remove(%text,$chr(32))))
  var %percent = $calc(1 - (%non.caps / %full.line)) 
  if (%percent &gt;= 0.8) {
    /mode $chan +b $address($nick,2) | /kick $chan $nick CAPS LOCK/OFF ( $+ % $+ $calc(%percent * 100) $+ )
    unset %CAPS. $+ $nick 
  }
}

#caps end

alias capsban { if (%ipban == on) { //Ban -u $+ 900 # $nick 2 } | mode # +b $$1 }

#caps on

on @*:TEXT:*:#: {

if $me !isop $chan { halt } | if $nick isop $chan { halt }

if ($len($1-) < 50) || ($nick isop #) return

var %text = $strip($remove($1-,$chr(32)))

var %non.caps = $len($removecs(%text,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 %full.line = $len($strip($remove(%text,$chr(32))))

var %percent = $calc(1 - (%non.caps / %full.line))

if (%percent >= 0.8) {

/mode $chan +b $address($nick,2) | /kick $chan $nick CAPS LOCK/OFF ( $+ % $+ $calc(%percent * 100) $+ )

unset %CAPS. $+ $nick

}

#caps end

Yorum yaz addon, büyük, harf, Koruma, mirc

mIRC Büyük harf koruma Addon

Bir cevap yazın Cevabı iptal et