/set %urlpattern \b((?:[a-zA-Z][\w-]+:(?:\/{1,3}|[a-zA-Z0-9%])|www\d{0,3}[.]|[a-zA-Z0-9.\-]+[.][a-zA-Z]{2,4}\/?)(?:[^\s()<>]+|\(([^\s()<>]+|(\([^\s()<>]+\)))*\)){0,}(?:\(([^\s()<>]+|(\([^\s()<>]+\)))*\)|[^\s\!()\[\]{};:\'\"\.\,<>?«»“”‘’]){0,})

;;;-------------
on ^1:TEXT:**:#:{
  if ($chan == #realnews) { var %template [ $+ [ $nick ] ] $strip($2-) }
  else if ($chan == #breakingnews) { var %template [ $+ [ $nick ] ] $strip($3-) }

  var %bgColor
  if ($cnick($nick).color == 1 || $cnick($nick).color == 2 || $cnick($nick).color == 5 || $cnick($nick).color == 10 || $cnick($nick).color == 12) {
    var %bgColor = ,15
  }

  var %template [ $+ [ $nick ] ] < $+ $chr(3) $+ $cnick($nick).color $+ %bgcolor $+ $nick $+ $chr(15) $+ $chr(3) $+ 7> $chr(15) $+ $1-


  if ($nick isop $chan) {
    var %template [ $+ [ $nick ] ] $puttok(%template [ $+ [ $nick ] ], < $+ $chr(2) $+ $chr(3) $+ 13@ $+ $chr(2) $+ $chr(3) $+ $cnick($nick).color $+ %bgcolor $+ $nick $+ $chr(15) $+ $chr(3) $+ 7> $+ $chr(15),1 ,32)
  }
  elseif ($nick isvoice $chan) {
    var %template [ $+ [ $nick ] ] $puttok(%template [ $+ [ $nick ] ], < $+ $chr(2) $+ $chr(3) $+ 11+ $+ $chr(2) $+ $chr(3) $+ $cnick($nick).color $+ %bgcolor $+ $nick $+ $chr(15) $+ $chr(3) $+ 7> $+ $chr(15),1 ,32)
  }

  ; HIGHLIGHT URLS ###
  ; --------------
  if ($chan == #chaosklan) {
    var %urlColor 12,0

    var %wordCount $numtok(%template [ $+ [ $nick ] ],32)
    echo $chan Wordcount: %wordCount
    echo $chan Before Changes: %template [ $+ [ $nick ] ]
    while (%wordCount > 0) {
      echo $chan -------
      var %currentWord $gettok(%template [ $+ [ $nick ] ],%wordCount,32)
      echo $chan Current Word: %currentWord ( $+ %wordCount $+ )
      var %match $regex(url,%currentWord,%urlpattern)

      if (%match >= 1) {
        var %template $+ [ $nick ] $puttok(%template [ $+ [ $nick ] ],%urlColor $+ %currentWord $+ ,%wordCount,32)
        echo $chan 4,1Template Change: %template [ $+ [ $nick ] ]

        if (%wordCount == 2) {
          var %template $+ [ $nick ] $puttok(%template [ $+ [ $nick ] ],%urlColor ASSSSSSSSSSSSSSSSSSSSSSS $+ %currentWord $+ ,2,32)
          echo $chan 4,1Template Change AGAIN: %template [ $+ [ $nick ] ]
        }

      }


      dec %wordCount
      echo $chan -------
    }
    echo $chan Done!!!
    echo $chan .
    echo $chan .
  }

  ; DISPLAY DATA ###
  ; ------------
  echo -i8 $chan %template [ $+ [ $nick ] ]
  halt
}