FIFAParches CommunityConectarse

Primero edito, luego pruebo... ahí creo que juego.

Comparte

descriptionSencillo reproductor de mp3 by Getorz

more_horiz
alias mp3search {
splay $read($mircdir\musica.txt, w, $+(*,$1-,*)) | set %cancion $nopath($read($mircdir\musica.txt, w, $+(*,$1-,*))) | .set %mp3.rand $rand(2,15) | set %mp3.calidad $mp3($read($mircdir\musica.txt, w, $+(*,$1-,*))).bitrate $+ .KpS | set %mp3.time $lof($read($mircdir\musica.txt, w, $+(*,$1-,*))) | set %mp3.artista $mp3($read($mircdir\musica.txt, w, $+(*,$1-,*))).artist | %mp3.time = %mp3.time / 16000 | set %mp3.playing yes | .timer 1 %mp3.time set %mp3.playing no | msg $chan 1Reproduciendo... 14 $nopath($read($mircdir\musica.txt, w, $+(*,$1-,*))) 1• 14 %mp3.artista 1• 14 $duration(%mp3.time) 1 ( 14 $round($calc(($file($read($mircdir\musica.txt, w, $+(*,$1-,*))).size)/1048576),2) $+ Mb 1 - 14 %mp3.calidad 1 )
}

alias mp3list {
var %dir $sdir=\\"Seleciona Directorio MP3"
var %c $findfile(%dir,*.mp3;*.wmv;*.wma;.mpeg,0,write musica.txt $1-)
}

alias mp3view {
var %lin 1
set %lintotal $lines(musica.txt)
echo $color(info) -a *** lista de musica ***
echo $color(info) -a
while (%lin <= %lintotal) { echo $color(info) -a *** $read(musica.txt,%lin) | inc %lin }
echo $color(info) -a
echo $color(info) -a fin de lista
echo $color(info) -a
echo $color(info) -a Canciones totales: 7 $lines(musica.txt)
msg $chan 14 Tengo 1 $lines(musica.txt) 14 canciones
else { halt }
}

alias aleatorio {
splay $read($mircdir\musica.txt) | set %cancion $nopath($read($mircdir\musica.txt)) | .set %mp3.rand $rand(2,15) | set %mp3.calidad $mp3($read($mircdir\musica.txt)).bitrate $+ .KpS | set %mp3.time $lof($read($mircdir\musica.txt)) | set %mp3.artista $mp3($read($mircdir\musica.txt)).artist | %mp3.time = %mp3.time / 16000 | set %mp3.playing yes | .timer 1 %mp3.time set %mp3.playing no | msg $chan 1Reproduciendo... 14 $nopath($read($mircdir\musica.txt, w, $+(*,$1-,*))) 1• 14 %mp3.artista 1• 14 $duration(%mp3.time) 1 ( 14 $round($calc(($file($read($mircdir\musica.txt, w, $+(*,$1-,*))).size)/1048576),2) $+ Mb 1 - 14 %mp3.calidad 1 ) ( 14 Mp3 player Powered By: 1#GeToRzZz- )
unset $read($mircdir\musica.txt)
}

on *:input:*: {
if ($1 == $!rep) { mp3search $2- }
elseif ($1 == $!aleatorio) { aleatorio }
elseif ($1 == $!stop) { splay stop | msg $chan 1parando... 14 %cancion }
elseif ($1 == $!play) { splay resume }
elseif ($1 == $!pause) { splay pause | msg $chan 1pausando... 14 %cancion }
elseif ($1 == $!vol) { run SNDVOL32.EXE }
elseif ($1 == $!winamp) { run C:\Archivos de programa\Winamp\winamp.exe }
elseif ($1 == $!inco) { run C:\Archivos de programa\Winamp\ }
elseif ($1 == $!list) { mp3list }
elseif ($1 == $!view) { /mp3view }
}


-
Creative Commons License

descriptionno rula

more_horiz
ricardo :S el script no rula :s ya hablamos por msn ^^

descriptionRe: Sencillo reproductor de mp3 by Getorz

more_horiz
@Anaking escribió:
ricardo :S el script no rula :s ya hablamos por msn ^^


tienes razon voy hablar con getorzzz aver que sucede

-
Creative Commons License

descriptionProblema arreglado

more_horiz
Alfinal de tanto buscar ya me funciona..

Os dejo la web donde pegue los codigos para que podais escuchar musica atravez del irc Razz

http://www.nomorepasting.com/getpaste.php?pasteid=26433

tambien os digo al final como utilizarlo por si no saveis.

descriptionRe: Sencillo reproductor de mp3 by Getorz

more_horiz
@Anaking escribió:
Alfinal de tanto buscar ya me funciona..

Os dejo la web donde pegue los codigos para que podais escuchar musica atravez del irc Razz

http://www.nomorepasting.com/getpaste.php?pasteid=26433

tambien os digo al final como utilizarlo por si no saveis.

Excelente Muchas Gracias. :amigox: :wsdsdsw:

-
Creative Commons License
Permisos de este foro:
Puedes responder a temas en este foro.
reply