Stuff

####################################################
#             Nick Colouring Script                #
#                  In Progress                     #
#            By Cameron of SwiftIRC                #
####################################################
on *:input:*: {
  if ($left($1,1) != $chr(47)) {
    nc $1-
    haltdef
  }
}

alias nc { 
  var %a = 1
  while ($($+($chr(36),%a),2)) {
    if ($($+($chr(36),%a),2) ison $chan) && ($chan) {
      if (%style == 1) {
        var %text = %text $+($c1,-=,$c2,$upper($left($($+($chr(36),%a),2),1)),,$mid($($+($chr(36),%a),2),2,$calc($len($($+($chr(36),%a),2)) -2)),,$upper($right($($+($chr(36),%a),2),1)),$c1,=-) 
        inc %a
      }
      if (%style == 2) {
        var %text = %text $+(,$c1,«,$c2,$upper($left($($+($chr(36),%a),2),1)),,$mid($($+($chr(36),%a),2),2,$calc($len($($+($chr(36),%a),2)) -2)),,$upper($right($($+($chr(36),%a),2),1)),$c1,») 
        inc %a
      }
    }
    else {
      var %text = %text $($+($chr(36),%a),2)
      inc %a
    }
  }
  msg $active %text
}

alias c1 return %colour1
alias c2 return %colour2
alias setc1 set %colour1  $+ $1
alias setc2 set %colour2  $+ $1
alias style set %style $1