Someone

on 1:INPUT:#:{
  if ($server == $null) { echo 1 -a 0,1 •15,1•14,1•0,1 $chr(40) $+  $+ $chan $+  $+ $chr(41) Not connected to server. 14,1•15,1•0,1•  | Haltdef }
  if ($gettok($1,1,32) == /write) || ($gettok($1,1,32) == //write) || ($gettok($1,1,32) == //.write) {
    beep
    echo 15 -ai3 1,8 •••1,8 $chr(40) $+ WARNING $+ $chr(41)  $+ $chr(47) $+ write $+  is an Auto-Script Function built in to mIRC. THIS COULD BE A TAKEOVER ATTEMPT. You can not use this command in Deviant mIRC. 1,8•••  
    haltdef
  }
  if ($gettok($1,1,32) == /decode) || ($gettok($1,1,32) == //$decode) || ($gettok($1,1,32) == //.$decode) {
    beep
    echo 15 -ai3 1,8 •••1,8 $chr(40) $+ WARNING $+ $chr(41)  $+ $chr(47) $+ decode $+  is an Auto-Script Function built in to mIRC. THIS COULD BE A TAKEOVER ATTEMPT. You can not use this command in Deviant mIRC. 1,8•••  
    haltdef
  }
  if ($left($1,1) == /) { goto SKIP }
  if (m isin $chan($active).mode) && ($me !isop $chan) && ($me !isvoice $chan) { 
    echo 1 $chan 0,1 •15,1•14,1•0,1 $chr(40) $+  $+ $chan $+  $+ $chr(41) Cannot send to channel. $iif(m isin $chan($active).mode,Channel is Moderated $chr(40) $+ +m $+ $chr(41) $+ .) 14,1•15,1•0,1• 
    HALT
  }
  :SKIP
  if ($left($1,1) != /) {
    if ($1 == $null) { goto END }
    if (%ws.nickcompletion == on) {
      if ($right($1,1) == $chr(58)) {
        set %n 1
        :LOOP
        if ($left($1,-1) isin $nick(#,%n)) {
          .msg # $color2b($ws.open) $+ $color1n($nick(#,%n)) $+ $color2b($ws.close) $+  $2- 
          if ($me isop $chan) { echo -ti2 $chan 12( $+ @ $+ $me $+ 12) $+ : $color2b($ws.open) $+ $color1n($nick(#,%n)) $+ $color2b($ws.close) $+  $2- | haltdef }
          else if ($me isvoice $chan) { echo -ti2 $chan 12( $+ $me $+ 12) $+ : $color2b($ws.open) $+ $color1n($nick(#,%n)) $+ $color2b($ws.close) $+  $2- | haltdef }
          else { echo -ti3 $chan 12( $+ $me $+ 12) $+ : $color2b($ws.open) $+ $color1n($nick(#,%n)) $+ $color2b($ws.close) $+  $2- | haltdef }
          unset %n | goto END
        }
        if (%n == $nick(#,0)) { unset %n | goto NEXT }
        inc %n | goto LOOP
      }
    }
    :NEXT
    .msg # $1- 
    if ($me isop $chan) { echo -ti2 $chan 12( $+ @ $+ $me $+ 12) $+ : $1- | haltdef }
    else if ($me isvoice $chan) { echo -ti2 $chan 12( $+ + $+ $me $+ 12) $+ : $1- | haltdef }
    else { echo -ti3 $chan 12( $+ $me $+ 12) $+ : $1- | haltdef }
  }
  :END
}

on ^*:TEXT:*:#: {
  if ($me isin $1-) {
    if ($nick isop $chan) { echo 7 -ti2 $chan ( $+ @ $+ $nick $+ ) $+ : $1- | haltdef }
    else if ($nick isvoice $chan) { echo 7 -ti2 $chan ( $+ + $+ $nick $+ ) $+ : $1- | haltdef }
    else { echo 7 -i3 $chan <($+ $nick $+ > $ : $1- | haltdef }
    goto END
  }
  if ($nick isop $chan) { echo -i2 $chan $iif(%ws.timestamp == on, $Timestamp) ( $+ @ $+ $nick $+ ) $+ : $1- | haltdef }
  else if ($nick isvoice $chan) { echo -i2 $chan $iif(%ws.timestamp == on, $Timestamp) ( $+ + $+ $nick $+ ) $+ : $1- | haltdef }
  else { echo -i3 $chan $iif(%ws.timestamp == on, $Timestamp) ( $+ $nick $+ ) $+ : $1- | haltdef }
  :END
  haltdef
}