elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Recuerda que debes registrarte en el foro para poder participar (preguntar y responder)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  [SOURCE] PlayLists
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [SOURCE] PlayLists  (Leído 3,317 veces)
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.874



Ver Perfil
[SOURCE] PlayLists
« en: 29 Noviembre 2012, 18:47 pm »

Bueno,
es una caca de programa porqué es el segundo programa que he hecho, y no he conseguido dejar bien la transparencia del programa ni meter la barra de progreso en un thread, pero está decente para usarse y cumple las condiciones necesarias, y me quedo satisfecho al ver la diferencia entre Batch y Winform XD

El programa sirve para seleccionar una o varias carpetas y añadirlas a la lista de reproducción del reproductor multimedia, ni más, ni menos. (Buena tool para bindearla a un "hot-corner" de la pantalla del PC)

     


Source: http://exoshare.com/download.php?uid=EJJTGEXN





Aquí dejo el "boceto" en Batch por si le sirve a alguien:

Código
  1. @echo off
  2. Title Winamp Auto Playlist Menu v0.1
  3.  
  4. :: Auto-redimensionado
  5. color 07
  6. Nircmd win center ititle "Winamp Auto Playlist Menu" >NUL 2>&1
  7. PUSHD "%~dp0"
  8. Set /a Lines=5
  9. Mode con cols=50 lines=%LINES%
  10. For /D %%# in (*) Do (Call Set /A "Lines+=2" & call Mode con cols=60 lines=%%LINES%%)
  11.  
  12. :Menu
  13. CLS
  14. SET "SELECT=" & SET "NUM="
  15. For /D %%# in (*) Do (Call Set /A "Num+=1" & Call Set "Folder%%NUM%%=%%#" & Call Set "List=%%LIST%%!!%%NUM%%" & Call Echo [%%Num%%] %%# | MORE)
  16. Echo [0] * REPRODUCIR TODO * | MORE
  17. Echo: Seleccione una carpeta para reproducirla...
  18. Set /P select=^>^>
  19. Echo "%SELECT%" | FINDSTR /I "[A-Z]" >NUL && (Goto :Menu) || (Echo "%List%" | FIND ";%SELECT% " >NUL || (Goto :Menu))
  20. If "%SELECT%" equ "0" (Goto :todo)
  21.  
  22. :Play
  23. CLS
  24. Call Echo Carpeta seleccionada: "%%Folder%SELECT%%%" | MORE
  25. Call Echo: [+] Iniciando Winamp...
  26. Call Start /B /D "%ProgramFiles(x86)%\Winamp\" winamp.exe "%CD%\%%Folder%SELECT%%%"
  27. Timeout /T 5 & Exit
  28.  
  29. :TODO
  30. CLS
  31. Call Echo Carpeta seleccionada: * TODAS * | MORE
  32. Call Echo: [+] Iniciando Winamp...
  33. For /D %%# in (*) Do (Call Set "ARG=%%arg%% ^"%CD%\%%#^"")
  34. Call Start /B /D "%ProgramFiles(x86)%\Winamp\" winamp.exe %%arg%%
  35. Timeout /T 10 & Exit


« Última modificación: 29 Noviembre 2012, 19:23 pm por EleKtro H@cker » En línea



Crazy.sx


Desconectado Desconectado

Mensajes: 447



Ver Perfil
Re: [SOURCE] PlayLists
« Respuesta #1 en: 29 Noviembre 2012, 19:12 pm »

Se ve bien, echaré un vistazo. Me mató eso de boceto en batch  ;) jeje -y pensar que yo era amo y señor del batch- :rolleyes:
Saludos.


En línea

Destruir K. LOL
spiritdead

Desconectado Desconectado

Mensajes: 296


Ver Perfil
Re: [SOURCE] PlayLists
« Respuesta #2 en: 29 Noviembre 2012, 21:36 pm »

Bueno,
es una caca de programa porqué es el segundo programa que he hecho, y no he conseguido dejar bien la transparencia del programa ni meter la barra de progreso en un thread, pero está decente para usarse y cumple las condiciones necesarias, y me quedo satisfecho al ver la diferencia entre Batch y Winform XD

El programa sirve para seleccionar una o varias carpetas y añadirlas a la lista de reproducción del reproductor multimedia, ni más, ni menos. (Buena tool para bindearla a un "hot-corner" de la pantalla del PC)

     


Source: http://exoshare.com/download.php?uid=EJJTGEXN





Aquí dejo el "boceto" en Batch por si le sirve a alguien:

Código
  1. @echo off
  2. Title Winamp Auto Playlist Menu v0.1
  3.  
  4. :: Auto-redimensionado
  5. color 07
  6. Nircmd win center ititle "Winamp Auto Playlist Menu" >NUL 2>&1
  7. PUSHD "%~dp0"
  8. Set /a Lines=5
  9. Mode con cols=50 lines=%LINES%
  10. For /D %%# in (*) Do (Call Set /A "Lines+=2" & call Mode con cols=60 lines=%%LINES%%)
  11.  
  12. :Menu
  13. CLS
  14. SET "SELECT=" & SET "NUM="
  15. For /D %%# in (*) Do (Call Set /A "Num+=1" & Call Set "Folder%%NUM%%=%%#" & Call Set "List=%%LIST%%!!%%NUM%%" & Call Echo [%%Num%%] %%# | MORE)
  16. Echo [0] * REPRODUCIR TODO * | MORE
  17. Echo: Seleccione una carpeta para reproducirla...
  18. Set /P select=^>^>
  19. Echo "%SELECT%" | FINDSTR /I "[A-Z]" >NUL && (Goto :Menu) || (Echo "%List%" | FIND ";%SELECT% " >NUL || (Goto :Menu))
  20. If "%SELECT%" equ "0" (Goto :todo)
  21.  
  22. :Play
  23. CLS
  24. Call Echo Carpeta seleccionada: "%%Folder%SELECT%%%" | MORE
  25. Call Echo: [+] Iniciando Winamp...
  26. Call Start /B /D "%ProgramFiles(x86)%\Winamp\" winamp.exe "%CD%\%%Folder%SELECT%%%"
  27. Timeout /T 5 & Exit
  28.  
  29. :TODO
  30. CLS
  31. Call Echo Carpeta seleccionada: * TODAS * | MORE
  32. Call Echo: [+] Iniciando Winamp...
  33. For /D %%# in (*) Do (Call Set "ARG=%%arg%% ^"%CD%\%%#^"")
  34. Call Start /B /D "%ProgramFiles(x86)%\Winamp\" winamp.exe %%arg%%
  35. Timeout /T 10 & Exit

esta bueno :P aunque yo cree mi propio formato de playlists y mi propio reproductor, pero el batch xD es ingenioso
En línea

Facilitador De Tareas - Task Simplifier (FDT)
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
CS source y 1.6
Juegos y Consolas
Juanlu 2 2,752 Último mensaje 18 Junio 2007, 12:19 pm
por kek_500
source de *.exe
Ingeniería Inversa
saliaz 4 4,081 Último mensaje 28 Septiembre 2008, 21:14 pm
por saliaz
Microsoft Groove ha muerto, así puedes mover tu música y playlists a Spotify
Noticias
wolfbcn 0 1,286 Último mensaje 4 Octubre 2017, 02:00 am
por wolfbcn
Programa para pasar playlists de iPod Classic a PC con windows 10
Software
pardillo78 1 1,865 Último mensaje 16 Marzo 2023, 11:04 am
por pardillo78
Ayuda con exportar playlists de iPod Classic a PC Windows 10
Foro Libre
pardillo78 0 1,597 Último mensaje 20 Junio 2023, 10:40 am
por pardillo78
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines