/ScriptServ

alias away { away $1- | awaypopup $iif($1,$1-,-u) }
alias away_Check { 
  if (($window(@hide_awaypopup).h == 20) && ($temp(idle) < 2400)) && ($data(awayreason) == autoaway) { scid -at1 away }
  elseif ($status == disconnected) && ($window(@hide_awaypopup).h == 20) { awaypopup -u }
  elseif (($window(@hide_awaypopup).h != 20) && ($temp(idle) > 2400) && ($status == connected)) { scid -at1 away autoaway }
}
alias awaypopup {
  if ($1 == -u) { 
    window -ihpoB +dx @hide_awaypopup 0 0 0 0
    ktools DockWindow $window(@hide_awaypopup).hwnd > bottom 3
  }
  else {
    if ($1-) { data awayreason $1- }
    else { data awayreason }
    window -ihpoB +dx @hide_awaypopup 0 0 3000 20
    ktools DockWindow $window(@hide_awaypopup).hwnd > bottom 3
    awaypopup_draw
    window -a @hide_awaypopup
  }
}

alias awaypopup_draw {
  if ($window(@hide_awaypopup)) {
    var %x = 0
    drawrect -fnr @hide_awaypopup $Col(tooltip) 1 1 0 3000 20
    drawpic -sconr @hide_awaypopup 3 1 16 16 5 $Icons
    drawtext -nr @hide_awaypopup 0 arial 11 22 2 You are currently marked away. $data(awayreason)
    drawline -nr @hide_awaypopup $col(shadow) 1 0 18 3000 18
    drawline -nr @hide_awaypopup $col(highlight) 1 0 19 3000 19
    drawline @hide_awaypopup
  }
}