;whisper regex
alias wr return @(.*) :([a-zA-Z0-9_]+)\![a-zA-Z0-9_]+@[a-zA-Z0-9_]+.tmi.twitch.tv WHISPER ([a-zA-Z0-9_]+) :(.*)

raw *:*: {
  if ($regex($rawmsg,$wr) > 0) {
    var %nick = $regml(2)
    var %msg = $regml(4)
    var %colornick = $cnick(%nick).color

    ; open query if there is none yet
    if ($window(%nick) == $null) {
      query -n %nick
    }

    ; Show message in query
    echo -itmlbfg %nick $+(<,%colornick,%nick,>) %msg
    haltdef
  }
}

on *:input:?: {
  ; are we on group chat servers?
  if ($serverip == 199.9.253.119 || $serverip == 199.9.253.120) {
    var %recipient = $active
    var %colornick = $cnick($nick).color

    ; Send whisper
    privmsg #jtv .w %recipient $1-

    ; Show message in query
    echo -itmlbfg $active $+(<,%colornick,$nick,>) $1-

    haltdef
  }
}