rendered paste body;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 }
}