Liquid Nitrogen — File Browser
LiquidNitrogen / LiquidNitrogen / mp3player.ini
mp3player.ini — 16.34 KB — Download this file
[script]
n0=;this mp3 player was coded by forefire,
n1=;for this player to work correctly, you must
n2=;have winamp, and your files must be named like this
n3=;Ā Ā artist - name.mp3
n4=;ex:Ā Juvenile - u understand.mp3
n5=;
n6=Menu Channel,Menubar {
n7= mpĀ³ player
n8= .select mpĀ³:{
n9= if (%Mp3Player == $null) { echo -a %version 0No MpĀ³ Player Set }
n10= elseif (%Mp3Player != $null) {
n11= mPlay
n12= }
n13= }
n14= .random mpĀ³:{
n15= if (%Mp3Player == $null) { echo -a %version 0No MpĀ³ Player Set }
n16= elseif (%Mp3Player != $null) {
n17= rplay
n18= }
n19= }
n20= .run mpĀ³ player:{ run %Mp3Player }
n21= .count mpĀ³s:{ Mp3Count }
n22= .make mpĀ³ list: { mp3list }
n23= .set players:{ setplayer }
n24= .set directory:{ setdir }
n25= .$iif(%mpon == on,unload): {
n26= set %mpon off
n27= unload -rs mp3player.ini
n28= }
n29=}
n30=Menu @Mp3 {
n31= .Play:{
n32= if (%Mp3Player == $null) { echo -a %version 0No MpĀ³ Player Set }
n33= elseif (%Mp3Player != $null) {
n34= mPlay
n35= }
n36= }
n37= .Make Mp3 List:{ mp3list }
n38= .Count Mp3s in Dir:{ Mp3Count }
n39= .Set Player:{ setplayer }
n40= .Set Mp Dir:{ setdir }
n41= .Clear This Window:{ clear @Mp3 }
n42=}
n43=on *:load: {
n44= set %mpon on
n45= window -awe @Mp3
n46= echo @Mp3 0....................................................12[0You Just loaded %version MpĀ³ Player12]
n47= echo @Mp3 0.........................12[0This is meant to be used with winamp. if you dont have it, download it now.12]
n48= echo @Mp3 0..................................................................12 http://www.winamp.com
n49= if (%Mp3Dir == $null) { setdir }
n50= if (%Mp3Player == $null) { setplayer }
n51=}
n52=on *:unload: {
n53= set %mpon off
n54= window -awe @Mp3
n55= echo @Mp3 0....................................................12[0You Just loaded %version MpĀ³ Player12]
n56=}
n57=alias dur {
n58= if ($1 < 60) return $round($1-,2) $+ s
n59= else return $replace($duration($1-),secs,s,mins,m,hrs,h,days,d,wks,w,sec,s,min,m,hr,h,day,d,wk,w)
n60=}
n61=alias setdir {
n62= set %Mp3Dir $$sdir="Set Mp3 Directory" $+ \*.mp3
n63= echo -a 12[0mp3 dir %Mp3Dir $+ 12]
n64=}
n65=alias setplayer {
n66= echo -a %version 0please hold... searching for winamp
n67= set %Mp3Player $findfile(C:\,winamp.lnk,1)
n68= if (%mp3player == $null) {
n69= echo -a %version 0couldnt find winamp.lnk... finding winamp.exe
n70= set %Mp3Player $findfile(C:\,winamp.exe,1)
n71= }
n72= echo -a %version 12player set as0 $nopath(%Mp3Player)
n73=}
n74=alias Mp3Count {
n75= echo -a 12[0 $+ $findfile(%mp3dir,*.mp3,0) 0mp3s in %mp3dir $+ 12]
n76=}
n77=alias mp3.br { goto $iif($1 isnum 1-14,$1,0) | :0 | return 112000 | :1 | return 32000 | :2 | return 40000 | :3 | return 48000 | :4 | return 56000 | :5 | return 64000 | :6 | return 80000 | :7 | return 92000 | :8 | return 112000 | :9 | return 128000 | :10 | return 160000 | :11 | return 192000 | :12 | return 224000 | :13 | return 256000 | :14 | return 320000 }
n78=alias mp3.bitrate {
n79= if (($1 == $null) || ($exists($1-) == $false)) return 0
n80= set %_bitrate $read -l1 $1-
n81= if ($pos(%_bitrate,RIFF,1)) { unset %_bitrate | return 128000 }
n82= set %_bitrate $asc($mid(%_bitrate,3,1))
n83= .timer 1 1 unset %_bitrate
n84= return $iif(%_bitrate == $null,128000,$mp3.br($int($calc(%_bitrate / 16))))
n85=}
n86=alias mp3time {
n87= if ($1 == $null) || ($exists($1) == $false) return 0m0s
n88= else { return $dur($round($calc(($lof($1-) * .008) / $remove($mp3.bitrate($1-),000)),0))) }
n89=}
n90=alias mplay {
n91= inc %mp32day 1
n92= if (%Mp3Player == $null) { echo -a 12[0no mpĀ³ player set12] | setplayer }
n93= set %Mp3Song $file="Chose Mp3:" %mp3dir
n94= if (%Mp3Song == $null ) { echo -a 12[0no mpĀ³ selected12] | halt }
n95= run %Mp3Player " $+ %Mp3Song $+ "
n96= if ($gettok(%mp3song,2,32) == -) { set %mp.artist $gettok(%mp3song,1,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,3-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n97= if ($gettok(%mp3song,3,32) == -) { set %mp.artist $gettok(%mp3song,1-2,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,4-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n98= if ($gettok(%mp3song,4,32) == -) { set %mp.artist $gettok(%mp3song,1-3,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,5-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n99= if ($gettok(%mp3song,5,32) == -) { set %mp.artist $gettok(%mp3song,1-4,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,6-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n100= if ($gettok(%mp3song,6,32) == -) { set %mp.artist $gettok(%mp3song,1-5,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,7-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n101= if ($gettok(%mp3song,7,32) == -) { set %mp.artist $gettok(%mp3song,1-6,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,8-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n102= if ($gettok(%mp3song,8,32) == -) { set %mp.artist $gettok(%mp3song,1-7,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,9-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n103= if ($gettok(%mp3song,9,32) == -) { set %mp.artist $gettok(%mp3song,1-8,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,10-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n104= if ($gettok(%mp3song,10,32) == -) { set %mp.artist $gettok(%mp3song,1-9,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,11-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n105= if ($gettok(%mp3song,11,32) == -) { set %mp.artist $gettok(%mp3song,1-10,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,12-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0selected12] $+ 0: $+ %version }
n106= unset %mp3song
n107= unset %mp.*
n108=}
n109=alias mp3list {
n110= if (%mp3dir == $null) { echo -a 12[0no mpĀ³ dir set12] | mp3setup | halt }
n111= echo -a 12[0creating mp3 list12]
n112= .timermp 1 1 mp3lstc START
n113=}
n114=alias mp3lstc {
n115= if ($1 == START) {
n116= %mp3.total = $findfile(%mp3dir,*.mp3,0) | %mp3.num = 0 | %mp3.size = 0
n117= write -c $mircdirmp3-list.txt [Liquid Nitrogen] mp3 list maker
n118= write -i $mircdirmp3-list.txt | write $mircdirmp3-list.txt $str($chr(160),20) -----------------------
n119= write $mircdirmp3-list.txt $str($chr(160),19) list made at $adate $atime
n120= write $mircdirmp3-list.txt $str($chr(160),20) ----------------------- | write -i $mircdirmp3-list.txt
n121= :incl
n122= inc %mp3.num 1 | if (%mp3.num > %mp3.total) { goto end }
n123= else {
n124= write $mircdirmp3-list.txt [Liquid Nitrogen] $nopath($findfile(%mp3dir,*.mp3,%mp3.num)) - $round($calc($lof($findfile(%mp3dir,*.mp3,%mp3.num)) / 1000000),2) MB
n125= %mp3.size = $calc($lof($findfile(%mp3dir,*.mp3,1)) + %mp3.size)
n126= goto incl
n127= }
n128= :end
n129= write -i $mircdirmp3-list.txt | write $mircdirmp3-list.txt $str($chr(160),20) -----------------------
n130= write $mircdirmp3-list.txt $str($chr(160),17) Total: $round($calc(%mp3.size / 1000000),2) MB And $findfile(%mp3dir,*.mp3,0) Files
n131= write $mircdirmp3-list.txt $str($chr(160),20) ----------------------- | write -i $mircdirmp3-list.txt
n132= write $mircdirmp3-list.txt by forefire
n133= echo -a - | echo -a 12[0created mp3list12] }
n134= unset %mp3.*
n135= timermp off
n136= run mp3-list.txt
n137=}
n138=alias rplay {
n139= %mp3.num = $findfile(%mp3dir,*.mp3,0)
n140= set %mp3song $findfile(%mp3dir,*.mp3,$r(1,%mp3.num))
n141= run %Mp3Player " $+ %Mp3Song $+ "
n142= if ($gettok(%mp3song,2,32) == -) { set %mp.artist $gettok(%mp3song,1,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,3-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n143= if ($gettok(%mp3song,3,32) == -) { set %mp.artist $gettok(%mp3song,1-2,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,4-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n144= if ($gettok(%mp3song,4,32) == -) { set %mp.artist $gettok(%mp3song,1-3,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,5-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n145= if ($gettok(%mp3song,5,32) == -) { set %mp.artist $gettok(%mp3song,1-4,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,6-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n146= if ($gettok(%mp3song,6,32) == -) { set %mp.artist $gettok(%mp3song,1-5,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,7-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n147= if ($gettok(%mp3song,7,32) == -) { set %mp.artist $gettok(%mp3song,1-6,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,8-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n148= if ($gettok(%mp3song,8,32) == -) { set %mp.artist $gettok(%mp3song,1-7,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,9-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n149= if ($gettok(%mp3song,9,32) == -) { set %mp.artist $gettok(%mp3song,1-8,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,10-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n150= if ($gettok(%mp3song,10,32) == -) { set %mp.artist $gettok(%mp3song,1-9,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,11-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n151= if ($gettok(%mp3song,11,32) == -) { set %mp.artist $gettok(%mp3song,1-10,32) | set %mp.artist $remove(%mp.artist,%mp3dir) | //set %mp.title $gettok(%mp3song,12-,32) | set %mp.title $remove(%mp.title,.mp3) | ame 12[0mpĀ³12] $+ 0: $+ 12[0artist12: $+ 0 $+ %mp.artist $+ 12] $+ 0: $+ 12[0title12: $+ 0 $+ %mp.title $+ 12] $+ 0: $+ 12[0mb12: $+ 0 $+ $round($calc($file(%mp3song) / 1050000),2)) $+ 12] $+ 0: $+ 12[0length12: $+ 0 $+ $mp3time(%mp3song) $+ 12] $+ 0: $+ 12[0random12] $+ 0: $+ %version }
n152= unset %mp3song
n153= unset %mp.*
n154=}