Mp3 Player

Please Register to submit score.

Average Score	5.0
Scores Submitted	3
Date Added	Jan 03, 2008
Last Updated	Jan 03, 2008

Introduction

This Is My Simple Mp3 Player Try It. Press alt+r to add this To Remotes.

Grab the Code

;######################
;# Simple Mp3 Player  #  
;#  by IcE^_ ##########  
;#############

on *:start: {
  .set %message1 Off
  .set %message2 Off
  .set %message3 Off
  .set %message4 Off
}

alias SimpleMp3 {
  dialog -mdvo _SimpleMp3 _SimpleMp3
  _list1
}

on *:load: { echo -a 12S2imple 12M2p3 12P2layer 12B2y 12IcE^_ 12L2oaded! }
on *:unload: { echo -a 12S2imple 12M2p3 12P2layer 12B2y 12IcE^_ 12U2nloaded! }

menu status,channel,menubar {
  Simple Mp3 Player:/SimpleMp3
}

dialog _SimpleMp3 {
  title "Simple Mp3 Player By IcE^_"
  size -1 -1 300 180
  box "" 1, 1 -4 298 183,style
  list 2, 2 4 180 180,sort vsbar
  button "Play" 3, 182 4 60 22,left push flat
  button "Stop" 4, 241 4 57 22,left push flat
  button "Forward" 5, 182 25 60 22,left push flat
  button "Back" 6, 241 25 57 22,left push flat
  button "Unpause" 7, 182 46 60 22,left push flat
  button "Pause" 8, 182 46 60 22,left push flat
  button "Mute" 9, 241 46 57 22,left push flat
  button "UnMute" 10, 241 46 57 22,left push flat
  button "Amsg" 11, 182 67 60 22,left push flat
  button "Msg" 12, 241 67 57 22,left push flat
  button "Ame" 13, 182 88 60 22,left push flat
  button "Me" 14, 241 88 57 22,left push flat
  button "Amsg" 15, 182 67 60 22,left push flat
  button "Msg" 16, 241 67 57 22,left push flat
  button "Ame" 17, 182 88 60 22,left push flat
  button "Me" 18, 241 88 57 22,left push flat
  button "+" 19, 182 109 60 22,left push flat
  button "-" 20, 241 109 57 22,left push flat
  button "Mp3 Directory..." 21, 182 130 116 22,left push flat
  button "Ok" 22, 182 151 60 26,ok flat
  button "View" 23, 241 151 57 26,left push flat
  halt
}

on 1:dialog:_SimpleMp3:sclick:11:{ set %message1 On  | .did -h _SimpleMp3 11 | .did -v _SimpleMp3 15 | echo -a  12C2hannel 12A2msg 12M2essage 12O2n }
on 1:dialog:_SimpleMp3:sclick:15:{ set %message1 Off | .did -h _SimpleMp3 15 | .did -v _SimpleMp3 11 | echo -a 12C2hannel 12A2msg 12M2essage 12O2ff }
on 1:dialog:_SimpleMp3:sclick:12:{ set %message2 On  | .did -h _SimpleMp3 12 | .did -v _SimpleMp3 16 | echo -a  12C2hannel 12M2sg 12M2essage 12O2n }
on 1:dialog:_SimpleMp3:sclick:16:{ set %message2 Off | .did -h _SimpleMp3 16 | .did -v _SimpleMp3 12 | echo -a 12C2hannel 12M2sg 12M2essage 12O2ff }
on 1:dialog:_SimpleMp3:sclick:13:{ set %message3 On  | .did -h _SimpleMp3 13 | .did -v _SimpleMp3 17 | echo -a  12C2hannel 12A2me 12M2essage 12O2n }
on 1:dialog:_SimpleMp3:sclick:17:{ set %message3 Off | .did -h _SimpleMp3 17 | .did -v _SimpleMp3 13 | echo -a 12C2hannel 12A2me 12M2essage 12O2ff }
on 1:dialog:_SimpleMp3:sclick:14:{ set %message4 On  | .did -h _SimpleMp3 14 | .did -v _SimpleMp3 18 | echo -a  12C2hannel 12M2e 12M2essage 12O2n }
on 1:dialog:_SimpleMp3:sclick:18:{ set %message4 Off | .did -h _SimpleMp3 18 | .did -v _SimpleMp3 14 | echo -a 12C2hannel 12M2e 12M2essage 12O2ff }
on 1:dialog:_SimpleMp3:sclick:8:{ if (%song != $null) { splay pause | .did -h _SimpleMp3 8 | .did -v _SimpleMp3 7 | echo -a 12M2p3 12P2aused! } }
on 1:dialog:_SimpleMp3:sclick:7:{ splay resume | .did -h _SimpleMp3 7 | .did -v _SimpleMp3 8 | echo -a 12M2p3 12U2npaused! }
on 1:dialog:_SimpleMp3:sclick:10:{ set %volume On | .vol -vu | .did -h _SimpleMp3 10 | .did -v _SimpleMp3 9 }
on 1:dialog:_SimpleMp3:sclick:9:{ set %volume Off  | .vol -vu2 | .did -h _SimpleMp3 9 | .did -v _SimpleMp3 10 }
on 1:dialog:_SimpleMp3:sclick:23:{ echo -a 12M2p3 12/A2msg 12M2essage:12 %message1 | echo -a 12M2p3 12/M2sg 12M2essage:12 %message2
echo -a 12M2p3 12/A2me 12M2essage:12 %message3 | echo -a 12M2p3 12/M2e 12M2essage:12 %message4 }
on 1:dialog:_SimpleMp3:sclick:19:{ vol -vp $calc($vol(master) +3000) }
on 1:dialog:_SimpleMp3:sclick:20:{ vol -vp $calc($vol(master) -3000) }
on 1:dialog:_SimpleMp3:sclick:6:{ splay seek $calc($inmp3.pos - 3000) }
on 1:dialog:_SimpleMp3:sclick:5:{ splay seek $calc($inmp3.pos + 3000) }
on 1:dialog:_SimpleMp3:sclick:4:{ splay stop | .unset %song }

on 1:dialog:_SimpleMp3:sclick:21:{
  set %mp3directory $sdir="Please Select Your Mp3 Directory" | echo -a 12M2p3 12D2irectory 12S2et 12T2o: 12 %mp3directory 
  did -r _SimpleMp3 2
  _list1
}

alias _list1 {
  halt $findfile(%mp3directory,*.mp3,0,40,_list2 $1-)
}

alias _list2 {
  did -a _SimpleMp3 2 $remove($1-,%mp3directory,.mp3) 
}

on 1:dialog:_SimpleMp3:sclick:3:{
  if (%mp3directory != $null) {
    if (%song == $null) { 
      if ($did(_Simplemp3,2).seltext != $null) { set %song $did(_SimpleMp3,2).seltext {
          if (%message1 = On) {
          /amsg 12M2p3 12P2laying 12S2ong: 2[12 $+ $nopath(%song) $+ 2] | .splay %mp3directory $+ %song $+ .mp3 }
        }
        if (%message2 = On) {
        /msg $active $chan 12M2p3 12P2laying 12S2ong: 2[12 $+ $nopath(%song) $+ 2] | .splay %mp3directory $+ %song $+ .mp3 }
      }
      if (%message3 = On) {
      /ame 12M2p3 12P2laying 12S2ong: 2[12 $+ $nopath(%song) $+ 2] | .splay %mp3directory $+ %song $+ .mp3 }
    }
    if (%message4 = On) {
    describe $active 12M2p3 12P2laying 12S2ong: 2[12 $+ $nopath(%song) $+ 2] | .splay %mp3directory $+ %song $+ .mp3 }
  } 
  if (%message1 = Off) {
  .splay %mp3directory $+ %song $+ .mp3 }

if (%message2 = Off) {
  .splay %mp3directory $+ %song $+ .mp3 }

if (%message3 = Off) {
  .splay %mp3directory $+ %song $+ .mp3 }

if (%message4 = Off) {
  .splay %mp3directory $+ %song $+ .mp3 }
}

Comments

(6) RSS

Go to Bottom

DarkDaemon

Comments: 52

mIRC Snippet: Mp3 Player
Posted on Jan 8, 2008 7:52 pm

Kinda messy but other than that good job!

IcE^__

Comments: 37

mIRC Snippet: Mp3 Player
Posted on Jan 17, 2008 12:33 pm

:p :/

IcE^__

Comments: 37

mIRC Snippet: Mp3 Player
Posted on Jan 17, 2008 12:34 pm

In A Few Days I Will Add Here My New Simple Mp3 Player .

Hydroxide

Comments: 9

mIRC Snippet: Mp3 Player
Posted on Jan 30, 2008 7:50 am

10/10

Awesome, and every feature you can think of in there. The only thing I have to edit is the text, As I Really Don't Like It How You Type Like This lol.

IcE^__

Comments: 37

mIRC Snippet: Mp3 Player
Posted on Mar 25, 2008 2:03 pm

Thanks :D

Bouncer

Comments: 121

mIRC Snippet: Mp3 Player
Posted on Apr 28, 2008 8:36 pm

Does anything on this Mp3 player work? No song plays for me. The unmute button should be hidden in the on init event using did -hb $dname 10. But first you need to ADD an on init event. Also the UnPause button needs to be hidden in the same way... Too many errors to list them all.

Mp3 Player

Introduction

Grab the Code

Comments

IcE^__

Contact

Sponsors

		Student Greece
Last seen: Jul 21, 2008 Profile Snippets (11) Images (1) Comments Received (37) Comments Submitted (37)