últimos mensajes de: Geormarsch

Mostrar Mensajes
Páginas: 1 2 3 4 5 6 [7] 8 9 10 11 12 13 14 15 16

61	Programación / Scripting / Re: [Batch] Extraccion de caracteres	en: 15 Febrero 2012, 02:32 am
No entendi mucho me darias otro ejemplo

62	Programación / Scripting / Re: [Batch] Extraccion de caracteres	en: 15 Febrero 2012, 01:25 am
WTF!!!!!!!!!!!!!!!!!!! Citar Código @echo off Call :Expandir "C:\Musica\Melodia.mp3" Pause :Expandir Echo %~nx1 Goto :EOF COMO ? LO HACES :OOOOOOOOOOOOOOOOOOOOOO Aver %~nx1 Es una variable ? xD Quiero un tutorial con eso extraño xddddd y como lo hace para explicar que despues de .... a como pero ah xd..... GRACIAS y Salu2

63	Programación / Scripting / [Batch] Extraccion de caracteres	en: 14 Febrero 2012, 20:12 pm
Hola, necesito extraer Caracteres de una variable (ruta) Código @echo off Set Ruta=C:\Musica\Melodia.mp3 Echo La Cancion es %Ruta% Pause Entonces quiero que al colocar Echo la cancion es %Ruta% me aparezca solo Melodia.mp3 No se si me entienden,pero si yo cambio de ruta me imprima en pantalla solo lo que hay despues del ultimo slash (\) . salu2

64	Programación / Scripting / Re: [Batch] (Aporte) Despertador ( Con musica!!! )	en: 9 Febrero 2012, 02:19 am
Jajaja me paso una anécdota.... Mi teclado tiene entrada para insertaler Audifonos y dije lo voy a probar si realmente funciona ( Tengo el pc serca de mi cama) entonces deje el teclado en la cama con los audifonos fuertes.... lo programe para dormir 1 hora bueno fue un sueño increible...( Soñe con que era el mejor creador de script en batch ) y Derrepente Escuche la Melodia Ahahaha en 1 segundo estaba en pie.... Salu2 PD: El Script que realize yo tiene muchos errores no me di el trabajo de corregirlo...

Programación / Scripting / [Batch] (Aporte) Despertador ( Con musica!!! )

en: 8 Febrero 2012, 21:32 pm

Hola amigos les traigo este aporte un Despertador en batch...
:silbar:

Código

 
@echo off
REM By Geormarsch
REM Visita Foro.Elhacker.net
 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
Color a
 
Title Despertador!
 
Set Tiempo=%Time:~0,5%
 
Set file=C:\Melodia.mp3
 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Menu_Despertador
cls
echo.
Set /p Hora_Despertar= A que hora desea Despertar ^>^>
Goto Verificador
 
:Verificador
cls
Set Tiempo=%Time:~0,5%
If "%Hora_Despertar%"=="%Tiempo%" (Goto Despierta) else (Goto Verificador)
 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Despierta
if exist "%Windir%\Sound.vbs" (del /f /q soun.vbs)
cls
(
echo On Error Resume next
echo Set Sound = CreateObject("WMPlayer.OCX"^)
echo Sound.URL = "%File%"
echo Sound.Controls.play
echo if err.number = 0 then
echo 	do while Sound.currentmedia.duration = 0
echo 	wscript.sleep 100
echo 	loop
echo 	wscript.sleep (int(Sound.currentmedia.duration^)+1^)*1000
echo else
echo	if len("%file%"^) ^< 2  then
echo 		msgbox "No se ha seleccionado ningun archivo ", vbinformation, "Despertador"
echo	else
echo		msgbox "No es posible reproducir el archivo " ^& "%file%", vbinformation, "Despertador"
echo 	end if
echo end if
)>%Windir%\Sound.vbs
cd %Windir%
start Sound.vbs
Goto Menu_Despertador
 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

Es Muy Sencillo Tienes que Setear la Variable : file = Con la ruta de la melodia ( Formatos : Mp3 , wav , mid )
y Luego te pregunta a que hora deseas Despertar... Bueno lo probe dos veces y me gusto....

Ojala les sirva

Salu2

PD: Cualquier mejora o modificacion es bienvenida pero con sus respectivos creditos :xD

66	Programación / Scripting / Re: despertador batch	en: 8 Febrero 2012, 19:41 pm
Cita de: EleKtro H@cker en 8 Febrero 2012, 19:40 pm Yo me referia al VBS del WindowsMediaPlayer xD Lo que hace es Reproducir la cancion seleccionada.... En modo oculto... solo se ve el batch

Programación / Scripting / Re: despertador batch

en: 8 Febrero 2012, 19:19 pm

Te Abre esta Ventana ......... Se me habia olvidado comentarte

Código

@echo off
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
reg delete "HKLM\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f>nul
reg delete "HKCU\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f>nul
 
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Crear_Examinar
(
echo Dim DialogBox
echo Set DialogBox = CreateObject("UserAccounts.CommonDialog.1"^)
echo DialogBox.InitialDir = "%Windir%"
echo DialogBox.Filter = "Archivos de musica MP3,Wav,Mid|*.mp3;*.wav;*.mid"
echo DialogBox.ShowOpen
echo wscript.echo DialogBox.filename
)>%Windir%\CommonDialog.vbs
 
cscript /nologo %Windir%\CommonDialog.vbs>%Windir%\Ruta.txt
Set /p File=<"%Windir%\Ruta.txt"
Goto Ruta
 
:Ruta
cls
echo La ruta es%File%
pause >nul

Es algo asi mas o menos el code

LO PROBE EN WIN XP

Programación / Scripting / Re: despertador batch

en: 8 Febrero 2012, 18:28 pm

Cita de: EleKtro H@cker en 8 Febrero 2012, 18:17 pm

Los archivos están en una carpeta, o en la tal variable X?

y Porque no en una carpeta? sería más simple hacer lo que pides

La variable x como es? Numérica, o como?

X=3 ?

X=C:\archivo1.mp3C:\archivo2.mp3C:\archivo3.mp3 ?

Siguen siendo muy pocos datos XD.

Si tienes los mp3 en una carpeta, lo puedes hacer así:

Código

@Echo OFF
Setlocal enabledelayedexpansion
 
For /F "Tokens=*" %%# In ('Dir /B /S ".\Carpeta\*.mp3"') Do (
	Set /A Num+=1
	Set Song!Num!=%%#
)
 
Echo !Song1!
Echo !Song2!
Echo !Song3!
Echo !Song4!
Echo !Song5!
 
Pause

EDITO:
De todas formas, Para reproducir audio necesitarías usar algún reproductor commandline (Mplayer.exe)

Creo que con el sndrec32.exe de Windows se puede tambien, pero yo no lo tengo xD.

NADA DE MPLAYER aqui.... :laugh:

Código

 
@echo off
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
REM By Geormarsch
Color a
Title Reproductor de musica
mode con cols=120 lines=13
REM No Borrar!!!
reg delete "HKLM\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f>nul
reg delete "HKCU\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f>nul
cls
 
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Menu_
cls
echo.
echo   ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ By Geormarsch ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo   ÛÛ         		               
echo   ÛÛ%File%
echo   ÛÛ     
echo   ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ By Geormarsch ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo.
echo  1.   Seleccionar
echo  2.   Reproducir
echo  3.   Parar
echo.
Set /p Verificar= ^>^> 
If %Verificar%==1 (Goto Abrir)
If %Verificar%==2 (Goto Repro)
If %Verificar%==3 (Goto Parar)
Goto Menu_
 
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Abrir
REM NO MODIFICAR!
(
echo Dim DialogBox
echo Set DialogBox = CreateObject("UserAccounts.CommonDialog.1"^)
echo DialogBox.InitialDir = "%Windir%"
echo DialogBox.Filter = "Archivos de musica MP3,Wav,Mid|*.mp3;*.wav;*.mid"
echo DialogBox.ShowOpen
echo wscript.echo DialogBox.filename
)>%Windir%\CommonDialog.vbs
 
cscript /nologo %Windir%\CommonDialog.vbs>%Windir%\Ruta.txt
Set /p File=<"%Windir%\Ruta.txt"
goto Menu_
 
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Repro
cls
REM NO MODIFICAR!
(
echo On Error Resume next
echo Set Sound = CreateObject("WMPlayer.OCX"^)
echo Sound.URL = "%File%"
echo Sound.Controls.play
echo if err.number = 0 then
echo 	do while Sound.currentmedia.duration = 0
echo 	wscript.sleep 100
echo 	loop
echo 	wscript.sleep (int(Sound.currentmedia.duration^)+1^)*1000
echo else
echo	if len("%file%"^) ^< 2  then
echo 		msgbox "No se ha seleccionado ningun archivo ", vbinformation, "."
echo	else
echo		msgbox "No es posible reproducir el archivo " ^& "%file%", vbinformation, "."
echo 	end if
echo end if
)>%Windir%\Sound.vbs
cd %Windir%
start Sound.vbs
Goto Menu_
 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:Parar
cls
Taskkill /F /IM wscript.exe
cd %Windir%
del /f /q Sound.vbs
del /f /q Ruta.txt
Set "File="
goto menu_
 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

69	Programación / Scripting / [Batch]Mediante....	en: 7 Febrero 2012, 08:19 am
Tengo la siguiente duda.... ¿Se han dado cuenta que en los mensajes que aparecen bajo de losavatar, algunos dicen, me das tu IP? Mi duda es la siguiente, Puedo entrar a un computador en batch sin envio de troyanos? Si alguien sabe como (entrar a una maquina p) me enseñe PD:no se si estoy en sección correcta

70	Programación / Scripting / Re: Ayuda con script	en: 7 Febrero 2012, 04:28 am
Cita de: geormarsch en 7 Febrero 2012, 04:23 am Como un Diccionario de IP ? Bueno si es para un Diccionario de IP Descargate este Script http://www.mediafire.com/?a6760ckcocrcbic Ahora Abres la Version ICE GEN Version Spanish Escribes el numero 6 ( Dice IP ) Ahora Escribes el Numero 1 ( Dice IP ) y Ahora Escribes 3 ( Dice Secuencia) y listo te genera IP´s en el rango 0 y 255 y te los guarda junto con el Archivo... Salu2

Páginas: 1 2 3 4 5 6 [7] 8 9 10 11 12 13 14 15 16