Unbenannt

alias mktime {
  var %sec = $1
  if (%sec > 3600) {
    return $time($calc(%sec - 3600))
  }
  if (%sec < 3600) {
    return $gettok($time($calc(%sec)),2-,58)
  }
}
alias say_wa {
  set %mp3.title $dll(r1dll.dll,GetCurrentWinampSong,0),1,45)
  set %mp3.channels $iif($dll(r1dll.dll,GetCurrentWinampSongChannels,0) == 2,Stereo,Mono)
  set %mp3.played $mktime($dll(r1dll.dll,GetCurrentWinampSongElapsedTime,0))
  set %mp3.khz $dll(r1dll.dll,GetCurrentWinampSongKHz,0) $+ kHz - $dll(r1dll.dll,GetCurrentWinampSongKbps,0) $+ kbps
  set %mp3.total $mktime($dll(r1dll.dll,GetCurrentWinampSongTotalTime,0))
  say %mp3.title - %mp3.played von %mp3.total - %mp3.khz - %mp3.channels
}