All pastes #501394 Raw Edit

Stuff

public text v1 · immutable
·published 2007-05-22 01:12 UTC
rendered paste body
alias np {

  var %artist
  var %album
  var %title


  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

  say 12[4iTunes12]4 %artist 12-4 %title $iif(%album,12[4 $+ %album $+ 12])

}