The playmp3 script.

derfy · Jul 26, 2005

derfy said:

This will not work unless you change winamp to send '%l %s %f' to mIRC. Also, you need to manually make a hash table and assign it with /hmake -s <hash table name> 1000 and /set %mp3.hash <that name>. Also, /set %mp3.num 1 would help greatly.

This makes a hash table for lusers to lookup full file pathnames on your mp3 spews:

In aliases:

Code:


dmp3-n {
  if ($2 == [Connecting] || $2 == prebuffering || $2 == [Buffer: || $1 &lt; 1) {
    .halt
  }
  if (%mp3.lastplay == $2-) {
    if (%mp3.lastlen != $1) {
      set %mp3.lastlen $1
      .halt
    }
  }
  if (%mp3.lastplay = $2-) { halt }
  if ($1 &lt; 30) { halt }
  set %mp3.lastplay $2-
  set %mp3.lastlen $1
  inc %mp3.played 1
  inc %mp3.totaltime $1
  if ($hfind(%mp3.hash,$pwamp($2-)).data = $null) {
    ; we found no entry, go on and add it
    hadd %mp3.hash %mp3.num $pwamp($2-)
    inc %mp3.num
  }
  {
    var %i = 0
    while (%i &lt; $chan(0)) {
      inc %i
      if ((#mp3 iswm $chan(%i)) || (#playmp3 iswm $chan(%i)) || (#derfy iswm $chan(%i))) { msg $chan(%i) %derf.front .;: $left($gettok($2-,1,58),$calc($len($gettok($2-,1,58))-1)) :;. L: $+ $udur($1) P: $+ %mp3.played - Type '!mp3info $hfind(%mp3.hash,$pwamp($2-),1).data $+ ' for detailed info. }

    }
  }
}

pwamp {
  return $right($gettok($1-,1,58),1) $+ $chr(58) $+ $gettok($1-,2,58)
}

Dave · Jul 26, 2005

another release coming soon

I'll fix some stuff, and release a new copy of the code soon.

--Dave

Log in or Sign up

The playmp3 script.

derfy Administrator

Dave Administrator

Share This Page

Log in or Sign up

The playmp3 script.

derfy Administrator

Dave Administrator

Share This Page

Useful Searches