/ScriptServ

alias checklimit {
  if ($nick(%floatchan,0) == 1) && ($me !isop %floatchan) { .part %floatchan | .timer12312 1 1 /join %floatchan }
  if ($nick(%floatchan,0,o) == 0) && ($me !isop %floatchan) { .notice %floatchan op me cause i'm lame!!! }
  if ($me isop %floatchan) {
    .mode %floatchan +l $calc($nick(%floatchan,0) + %limitvalue) 
  }
}
on 1:JOIN:#:{
  .set %myself $me
  .set %joinednick $nick
  .set %joinedaddress $remove($address($nick,2),*!*@)
  .set %joinedchan $chan
  .checkblacklist
  if ($nick == $me) && ($nick($chan,0) == 1) { .mode $chan +nt }
  if ($me isop %autovoicechan) && ($chan == %autovoicechan) && (%autovoicestatus == enable) { .mode $chan +v $nick }
}
on *:CONNECT:{ 
  .timer123 0 30 /checklimit
}
on *:OP:#:{
  if ($opnick == $me) { .mode $chan +nt }
}
on *:INPUT:#:{
  if ($left($1,1) == /) { return }
  if ($left($1,1) !== /) {  .echo # [2 $+ $asctime(hh:nn:sstt) $+ 2] (4 $+ $me $+ ): $1- | .msg # $1- | halt  }
  /checkautoawaysettings
  if ($away == $false) { .nick $remove($me,%awayhandle) }
}
on *:INPUT:?:{
  if ($left($1,1) == /) { return }
  if ($left($1,1) !== /) {  .echo [2 $+ $asctime(hh:nn:sstt) $+ 2] (4 $+ $me $+ ): $1- | .msg $active $1- | halt  }
  /checkautoawaysettings
  if ($away == $false) { .nick $remove($me,%awayhandle) }
}
alias checkautoawaysettings {
  if (%autoaway == enable) { .timer122 1 3600 /nick $me $+ %awayhandle }
}

alias checkblacklist {
  if ($read(blacklist.txt, w, * $+ %joinedaddress $+ *) !== $null) && (%myself isop %joinedchan) && (%joinednick !== %myself) { .mode %joinedchan +b *!*@ $+ %joinedaddress  | .kick %joinedchan %joinednick ( $+ $me $+ ) 4Blacklisted Address ( $+ $me $+ ) }
}