Mp3 Player

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	4.5
Scores Submitted	2
Date Added	Jul 23, 2008
Last Updated	Jul 24, 2008
Tags	dialog mirc mp3 player remote

Introduction

This is my Mp3 Player just a simple one i know got the volume idea from ^Neptune's Mp3, anything i should add?

Grab the Code

menu * {
  Mp3 Player: dialog -dmh mp3 mp3
}
dialog Mp3 {
  title "Mp3 Player"
  size -1 -1 155 189
  option dbu
  list 5, 4 24 98 72, size
  button "Play", 1, 7 107 48 10
  button "Pause", 3, 59 107 44 10
  button "Resume", 4, 59 120 44 10
  button "Stop", 2, 7 120 48 10
  button "Directory", 6, 7 131 96 15
  check "Msg to active", 12, 4 174 52 10
  box "Controls", 13, 4 98 102 50
  scroll "", 14, 11 155 86 11, horizontal top range 0 65535
  box "Volume", 15, 4 149 98 23
  edit "", 16, 57 2 97 10, read autohs
  text "Now Playing:", 17, 23 3 34 8
  box "List", 18, 2 16 104 83
}
on *:dialog:Mp3:sclick:*:{
  if ($did == 1) {
    var %mp3msg $did(mp3,12).state
    if (%mp3msg == 0) {
      var %Psong $findfile(%mp3dir,$did(mp3,5).seltext,1)
      did -ra mp3 16 $did(mp3,5).seltext
      splay %Psong
    }
    if (%mp3msg == 1) {    
      var %mp3 $did(mp3,5).seltext
      var %mp3 $did(mp3,5).seltext
      var %Psong $findfile(%mp3dir,$did(mp3,5).seltext,1)
      var %mp3length $gmt($round($calc($mp3(%Psong).length / 1000),0),nn:ss)
      var %mp3bitr $mp3(%Psong).bitrate
      splay %Psong
      did -ra mp3 16 $did(mp3,5).seltext
      msg $active 4,1Now playing0,1:4,1 $remove(%mp3,.mp3) 0,1[4,1Length0,1:4,1 %mp3length 0,1/4,1 Bitrate0,1:4,1 %mp3bitr $+ 0,1]
    }
  }
  if ($did == 2) {
    splay stop
  }
  if ($did == 3) {
    splay pause
  }
  if ($did == 4) {
    splay resume
  }
  if ($did == 6) {
    set %mp3dir $sdir(mIRC,Mp3 Directory)
    did -r mp3 5
    set %mp3num $findfile(%mp3dir, *.mp3,0,did -a mp3 5 $nopath($1-))
  }
}
on *:dialog:mp3:dclick:5:{
  var %mp3msg $did(mp3,12).state
  if (%mp3msg == 1) {
    var %mp3 $did(mp3,5).seltext
    did -ra mp3 16 $did(mp3,5).seltext
    var %Psong $findfile(%mp3dir,$did(mp3,5).seltext,1)
    var %mp3length $gmt($round($calc($mp3(%Psong).length / 1000),0),nn:ss)
    splay %Psong
    msg $active 4,1Now playing0,1:4,1 $remove(%mp3,.mp3) 0,1[4,1Length0,1:4,1 %mp3length 0,1/4,1 Bitrate0,1:4,1 %mp3bitr $+ 0,1]
  }
  if (%mp3msg == 0) { 
    var %mp3 $did(mp3,5).seltext
    did -ra mp3 16 $did(mp3,5).seltext
    var %Psong $findfile(%mp3dir,$did(mp3,5).seltext,1)
    splay %Psong
  }
}
on *:dialog:Mp3:scroll:14:{
  vol -v $did($did).sel 
}

Comments

(10) RSS

Go to Bottom

jamming808

Comments: 2

mIRC Snippet: Mp3 Player
Posted on Jul 25, 2008 2:39 am

what exactly does it do?

napa182

Comments: 1,153

mIRC Snippet: Mp3 Player
Posted on Jul 25, 2008 2:50 am

jamming808 said:

Quote:

what exactly does it do?

um it's an mp3 player for mIRC it plays mp3's

damdempsel

Comments: 21

mIRC Snippet: Mp3 Player
Posted on Jul 28, 2008 1:21 pm

i cant get it work...i opened it up for the music...couldnt get it to actually play it though...

damdempsel

Comments: 21

mIRC Snippet: Mp3 Player
Posted on Jul 28, 2008 1:32 pm

i got it to work...

a careful warchild

Comments: 187

mIRC Snippet: Mp3 Player
Posted on Aug 14, 2008 7:34 pm

Quote:

um it's an mp3 player for mIRC it plays mp3's

lmfao napa

Eugenio

Comments: 1,103

mIRC Snippet: Mp3 Player
Posted on Aug 14, 2008 8:16 pm

rofl well he has a point.....and its not like its got some ridiculous coding name, its called Mp3 Player

Anti

Comments: 305

mIRC Snippet: Mp3 Player
Posted on Aug 14, 2008 8:23 pm

ROFL. maybe hes from another country?

Eugenio

Comments: 1,103

mIRC Snippet: Mp3 Player
Posted on Aug 14, 2008 8:31 pm

lol I spose he could have tested it before he said bollocks then he would have seen what exactly it did

Anti

Comments: 305

mIRC Snippet: Mp3 Player
Posted on Aug 14, 2008 8:33 pm

Lmfao, if he doesnt know what it is, how is he going to test it?

Eugenio

Comments: 1,103

mIRC Snippet: Mp3 Player
Posted on Aug 14, 2008 8:42 pm

ALT + R
copy + paste
right click
open the dialog
once opened he will automatically know its an MP3 player

Mp3 Player

Introduction

Grab the Code

Comments

Storm2108

My Snippet Tags

Contact

Friends (3)

Sponsors


Last seen: Aug 25, 2008 Profile Friends (3) Snippets (6) Images (1) Comments Received (50) Comments Submitted (44) Forum Posts (2)