Share Pastebin
Guest
Public paste!

Cody Mitchell - Now Playing

By: a guest | Mar 20th, 2010 | Syntax: mIRC | Size: 1.56 KB | Hits: 41 | Expires: Never
Copy text to clipboard
  1. alias np.restart {
  2.   if ($com(iTunes)) {
  3.     .comclose iTunes
  4.     .comopen iTunes iTunes.Application
  5.   }
  6.   if ($com(CurrentTrack)) {
  7.     .comclose CurrentTrack
  8.     noop $com(iTunes,CurrentTrack,3,dispatch* CurrentTrack)
  9.   }
  10. }
  11. alias np {
  12.   if (!$com(iTunes)) {
  13.     .comopen iTunes iTunes.Application
  14.   }
  15.   if ($com(CurrentTrack)) {
  16.     .comclose CurrentTrack
  17.   }
  18.   noop $com(iTunes,CurrentTrack,3,dispatch* CurrentTrack)
  19.   noop $com(CurrentTrack,Artist,3)
  20.   .set %Track.Artist $com(CurrentTrack).result
  21.   noop $com(CurrentTrack,Album,3)
  22.   .set %Track.Album $com(CurrentTrack).result
  23.   noop $com(CurrentTrack,Name,3)
  24.   .set %Track.Title $com(CurrentTrack).result
  25.   noop $com(CurrentTrack,Year,3)
  26.   .set %Track.Year $com(CurrentTrack).result
  27.   noop $com(CurrentTrack,Time,3)
  28.   .set %Track.Duration $com(CurrentTrack).result
  29.   noop $com(CurrentTrack,Duration,3)
  30.   .set %Track.Rating $replace($com(CurrentTrack).result,20,*,40,**,60,***,80,****,100,*****)
  31.   noop $com(CurrentTrack,Size,3)
  32.   .set %Track.Size $bytes($com(CurrentTrack).result,m) $+ mb
  33.   noop $com(CurrentTrack,PlayedCount,3)
  34.   .set %Track.PlayCount $com(CurrentTrack).result
  35.   noop $com(CurrentTrack,KindAsString,3)
  36.   .set %Track.Kind $com(CurrentTrack).result
  37.   noop $com(CurrentTrack,BitRate,3)
  38.   .set %Track.BitRate $com(CurrentTrack).result $+ kbps
  39.   noop $com(CurrentTrack,Genre,3)
  40.   .set %Track.Genre $com(CurrentTrack).result
  41.   $iif($isid,return,me) is now playing: %Track.Artist - %Track.Title ~ %Track.Album $iif(%Track.Year != 0,$+($chr(40),%Track.Year,$chr(41)))
  42.   .unset % %Track.*
  43. }