on *:ACTIVE:@tooltip: {
  window -a $qt($lactive)
  window -o @tooltip
}
on *:APPACTIVE: if (!$appactive) && ($window(@tooltip)) window -c @tooltip

alias tooltip {
  if ($window(@tooltip)) window -c @tooltip
  var %font = Tahoma, %fontsize = 20, %time = 4, %rgb = 226
  var %x = 1, %long = $gettok($1-,%x,13)
  while ($gettok($1-,%x,13)) {
    if ($len($v1) > $len(%long)) %long = $gettok($1-,%x,13)
    inc %x
  }
  var %w = $width(%long,%font,%fontsize,0,1) + 7, %h = $calc($gettok($1-,0,13) * $height($1-,%font,%fontsize) + 5)
  window -pBhdo +dL @tooltip $mouse.dx $calc($mouse.dy - 20) %w %h
  drawfill -r @tooltip %rgb %rgb 0 0
  drawrect @tooltip 1 0.5 0 0 %w %h
  %x = 1
  while ($gettok($1-,%x,13)) {
    drawtext -p @tooltip 1 %font %fontsize $iif($left($v1,1) == $chr(2),3,4) $iif(%x == 1,1,$calc((%x - 1) * 13)) $gettok($1-,%x,13)
    inc %x
  }
  window -a @tooltip
  .timertip 0 %time window -c @tooltip
}