All pastes #558890 Raw Edit

Anonymous

public text v1 · immutable
·published 2007-06-11 15:20 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 [14iTunes]1 %artist -1 %title $iif(%album,(14 $+ %album $+ ))

}


ON *:TEXT:.ntest*:#:{
  if ($chan == #rshelp) { HALT }
  if ($2 == $null) {
    notice $nick $left($1,1) $+ Noob <Nick>
    halt
  }
  if ($2 ison $chan) {  
    /inc %j
    msg $chan 4×12 $nick Has Performed A Noob Test on $2 . $2 Is 4,0 $rand(0,100) $+ % Noob × » %j «
    halt
  }
  else {
    notice $nick Who is $2 $+ ?
  }
}