;Welcome to CheeseWeasel's Bangin Mp3 Player v1.1 Please read the Bangin_Mp3_Read-Me.txt before using this file
;All code was written by CheeseWeasel
;This is the code for the menu popups, only one menu popup as the main controls are housed in a dialog
menu status,channel,nicklist {
  Bangin Mp3z Soundz System:/mp3z
}
;This is the dialog's actual code. DO NOT EDIT!
dialog bangin_mp3z {
  title "Bangin Mp3 Player v1.1 By CheeseWeasel"
  size -1 -1 235 122
  option dbu
  button "Play", 1, 6 8 37 12, flat
  button "Random", 2, 47 8 37 12, flat
  button "Continous", 3, 88 8 37 12, flat
  button "Play", 4, 6 38 37 12, flat
  button "Random", 5, 47 38 37 12, flat
  button "Continous", 6, 88 38 37 12, flat
  box "Private Play", 7, 3 0 125 27
  box "Public Play", 8, 3 30 125 27
  button "Pause", 9, 6 68 37 12, flat
  button "Stop", 10, 47 68 37 12, flat
  button "Resume", 11, 88 68 37 12, flat
  box "Options", 12, 3 60 125 44
  button "Set Mp3 Directory", 13, 42 86 47 12, flat
  button "Done", 14, 3 106 37 12, flat ok cancel
  edit "Bangin Mp3 Player v1.1 By CheeseWeasel ", 15, 45 106 181 11, disable
  edit "", 16, 130 3 47 10, disable
  edit "", 17, 130 15 47 10, disable
  edit "", 18, 130 27 47 10, disable
  edit "", 19, 130 39 47 10, disable
  edit "", 20, 130 52 47 10, disable
  edit "", 21, 130 65 47 10, disable
  edit "", 22, 130 77 47 10, disable
  edit "", 23, 130 90 47 10, disable
  button "Add", 24, 178 3 15 10, flat
  button "Add", 25, 178 15 15 10, flat
  button "Add", 26, 178 27 15 10, flat
  button "Add", 27, 178 39 15 10, flat
  button "Add", 28, 178 52 15 10, flat
  button "Add", 29, 178 65 15 10, flat
  button "Add", 30, 178 77 15 10, flat
  button "Add", 31, 178 90 15 10, flat
  button "Remove", 32, 195 3 30 10, flat
  button "Remove", 33, 195 15 30 10, flat
  button "Remove", 34, 195 27 30 10, flat
  button "Remove", 35, 195 39 30 10, flat
  button "Remove", 36, 195 52 30 10, flat
  button "Remove", 37, 195 65 30 10, flat
  button "Remove", 38, 195 77 30 10, flat
  button "Remove", 39, 195 90 30 10, flat
}
;this is the alias to open the dialog.
alias mp3z {
  dialog -dm bangin_mp3z bangin_mp3z
}
;these are the button click remotes. DO NOT EDIT!
on *:dialog:bangin_mp3z:sclick:1: {
  unset %admp3
  unset %plplay
  mp3play
}
on *:dialog:bangin_mp3z:sclick:2: {
  unset %admp3
  unset %plplay
  rplay
}
on *:dialog:bangin_mp3z:sclick:3: {
  unset %admp3
  set %plplay $true
  rplay
}
on *:dialog:bangin_mp3z:sclick:4: {
  set %admp3 $true
  unset %plplay
  mp3play
}
on *:dialog:bangin_mp3z:sclick:5: {
  set %admp3 $true
  unset %plplay
  rplay
}
on *:dialog:bangin_mp3z:sclick:6: {
  set %plplay $true
  set %admp3 $true
  rplay
}
on *:dialog:bangin_mp3z:sclick:9: {
  splay pause
}
on *:dialog:bangin_mp3z:sclick:10: {
  splay stop
}
on *:dialog:bangin_mp3z:sclick:11: {
  splay resume
}
on *:dialog:bangin_mp3z:sclick:13: {
  set %mp3dir $$?="Enter Path to Mp3z:"
}
on *:dialog:bangin_mp3z:sclick:24: {
  set %mpchan1 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 16 %mpchan1
}
on *:dialog:bangin_mp3z:sclick:25: {
  set %mpchan2 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 17 %mpchan2
}
on *:dialog:bangin_mp3z:sclick:26: {
  set %mpchan3 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 18 %mpchan3
}
on *:dialog:bangin_mp3z:sclick:27: {
  set %mpchan4 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 19 %mpchan4
}
on *:dialog:bangin_mp3z:sclick:28: {
  set %mpchan5 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 20 %mpchan5
}
on *:dialog:bangin_mp3z:sclick:29: {
  set %mpchan6 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 21 %mpchan6
}
on *:dialog:bangin_mp3z:sclick:30: {
  set %mpchan7 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 22 %mpchan7
}
on *:dialog:bangin_mp3z:sclick:31: {
  set %mpchan8 $$?="Enter Channel eg. #CasualChat"
  did -a bangin_mp3z 23 %mpchan8
}
on *:dialog:bangin_mp3z:sclick:32: {
  unset %mpchan1
  did -r bangin_mp3z 16 %mpchan1
}
on *:dialog:bangin_mp3z:sclick:33: {
  unset %mpchan2
  did -r bangin_mp3z 17 %mpchan2
}
on *:dialog:bangin_mp3z:sclick:34: {
  unset %mpchan3
  did -r bangin_mp3z 18 %mpchan3
}
on *:dialog:bangin_mp3z:sclick:35: {
  unset %mpchan4
  did -r bangin_mp3z 19 %mpchan4
}
on *:dialog:bangin_mp3z:sclick:36: {
  unset %mpchan5
  did -r bangin_mp3z 20 %mpchan5
}
on *:dialog:bangin_mp3z:sclick:37: {
  unset %mpchan6
  did -r bangin_mp3z 21 %mpchan6
}
on *:dialog:bangin_mp3z:sclick:38: {
  unset %mpchan7
  did -r bangin_mp3z 22 %mpchan7
}
on *:dialog:bangin_mp3z:sclick:39: {
  unset %mpchan8
  did -r bangin_mp3z 23 %mpchan8
}
on *:dialog:bangin_mp3z:init:*: {
  did -a bangin_mp3z 16 %mpchan1
  did -a bangin_mp3z 17 %mpchan2
  did -a bangin_mp3z 18 %mpchan3
  did -a bangin_mp3z 19 %mpchan4
  did -a bangin_mp3z 20 %mpchan5
  did -a bangin_mp3z 21 %mpchan6
  did -a bangin_mp3z 22 %mpchan7
  did -a bangin_mp3z 23 %mpchan8
}
;Actualy Playing Code! DO NOT I REPEAT DO NOT EDIT! (unless u know what ur doing and if u knew what u were doing u wouldnt have d/l this cause u'd have made ur own better one!)
;The buttons call aliases to play the mp3z
alias mp3play {
  if (%mp3dir == $null) { set %mp3dir $$?="Enter Path To Mp3z:" }
  if (!$1) var %file = $sfile(%mp3dir,Choose a MP3,Play it!)
  else %file = $1-
  if (%file == $null) { 
    echo -a ......2......12......14......15......
    echo 12 -a You didnt choose a file, choose another 
    echo -a ......2......12......14......15......
    halt
  }
  splay %file
  var %l = $duration($calc($mp3(%file).length / 1000))
  var %br = $mp3(%file).bitrate
  var %len = $bytes($file(" $+ %file $+ ").size).suf
  if ($server != $null) && (%admp3 == $true) {
    if ($me ison %mpchan1) { msg %mpchan1  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan2) { msg %mpchan2  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan3) { msg %mpchan3  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan4) { msg %mpchan4  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan5) { msg %mpchan5  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan6) { msg %mpchan6  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan7) { msg %mpchan7  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan8) { msg %mpchan8  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
  }
  else {
    echo -a ......2......12......14......15......
    echo -a 11-12Now Playing11- 12[11 $+ $nopath(%file) $+ 12] 
    echo -a 11-12Bitrate11- 12[11 $+ %br $+ Kbps12]
    echo -a 11-12Length11- 12[11 $+ %l $+ 12]
    echo -a 11-12Size11- 12[11 $+ %len $+ 12]
    echo -a ......2......12......14......15......
  }
}
alias rplay {
  if (%mp3dir == $null) { set %mp3dir $$?="Enter Path To Mp3z:" }
  set %file $findfile(%mp3dir,*.mp3,$r(1,$findfile(%mp3dir,*.mp3,0)))
  splay %file
  set %l $duration($calc($mp3(%file).length / 1000))
  set %br $mp3(%file).bitrate
  set %len $bytes($file(%file).size).suf
  if ($server != $null) && (%admp3 == $true) {
    if ($me ison %mpchan1) { msg %mpchan1  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan2) { msg %mpchan2  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan3) { msg %mpchan3  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan4) { msg %mpchan4  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan5) { msg %mpchan5  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan6) { msg %mpchan6  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan7) { msg %mpchan7  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
    if ($me ison %mpchan8) { msg %mpchan8  14M12p3z 12[14 $+ $nopath(%file) $+ 12] (14 $+ %l $+ 12/14 $+ %br %+ kbps12/14 $+ %len $+ 12) }
  }

  else { 
    echo -a ......2......12......14......15......
    echo -a 11-12Now Playing11- 12[11 $+ $nopath(%file) $+ 12] 
    echo -a 11-12Bitrate11- 12[11 $+ %br $+ Kbps12]
    echo -a 11-12Length11- 12[11 $+ %l $+ 12]
    echo -a 11-12Size11- 12[11 $+ %len $+ 12]
    echo -a ......2......12......14......15......
  }
}
on *:MP3END:{
  if (%plplay == $true) { /rplay }
}