alias itunes {

  var %artist
  var %album
  var %title
  var %rating
  var %Time


  if (!$com(itunes)) .comopen itunes iTunes.Application
  if ($com(CurrentTrack)) .comclose CurrentTrack
  .echo -q $com(itunes,CurrentTrack,3,dispatch* CurrentTrack)

  .echo -q $com(CurrentTrack,Artist,3)
  %artist = $com(CurrentTrack).result

  .echo -q $com(CurrentTrack,Album,3)
  %album = $com(CurrentTrack).result

  .echo -q $com(CurrentTrack,Name,3)
  %title = $com(CurrentTrack).result

  .echo -q $com(CurrentTrack,Rating,3)
  %Rating = $com(CurrentTrack).result

  .echo -q $com(CurrentTrack,Time,3)
  %Time = $com(CurrentTrack).result

  msg $chan 10[6iTunes10]6 %artist -10 %title $iif(%album,10(6 $+ %album $+ 10)) - 6(10Rating6:10 %Rating $+ 6) - 10(6Length10:6 %Time $+ 10)

}
}
}