alias current {
  if ($insong) {
    var %pos = $mid($duration($left($insong.pos,-3),3),4,8)
    var %length = $mid($duration($remove($insong.length,$right($insong.length,3)),3),4,8)
    msg $active 4,1[4,1-14,1»15,1»0,1»3,1 4,1G0,1odMP3 0,1«15,1«14,1«4,1-4,1] $iif($sound($insong.fname).title,4[0Song4]0 $sound($insong.fname).title,4[0Song4]0 $replace($$nopath($insong.fname),_,$chr(32))) 4[0Artist4]0 $iif($sound($insong.fname).artist,$sound($insong.fname).artist,-) 4[0Position4]0 %pos $+ / $+ %length 4[0Volume4]0 $+($round($calc(%vol / 13 * 100),0),%)
  }
  else {
    echo -a Not in song.
  }
}