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


 


Tema destacado: PÝldoras formativas en seguridad de la informaciˇn


  Mostrar Mensajes
Páginas: 1 ... 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 [923] 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 ... 1017
9221  Programaciˇn / Scripting / Re: [BATCH]Error con codigo java en: 10 Abril 2012, 08:19
Hola TMarmol

El problema es que no estßs usando la sintaxis correcta. Los slashes son al revÚs:

Código:
javaw -Xmx1024m -Xms1024m -jar C:/minecraft/minecraft.exe

PD:
Si no te funciona prueba asÝ respectivamente de si usas 32 o 64 bit:
Código:
"%programfiles%\Java\jre6\bin\java" -Xmx1024m -Djava.library.path=lib/windows-amd64 -jar c:/bin/tuprograma.jar
Código:
"%programfiles%\Java\jre6\bin\java" -Xmx1024m -Djava.library.path=lib/windows-x86 -jar c:/bin/tuprograma.jar


Salu2!
9222  Sistemas Operativos / Windows / Re: sÝmbolo de sistema (cmd) en: 10 Abril 2012, 08:11
Esos comandos estßn obsoletos, Los encontrarßs en WindowsXP, Pero Windows 7 no los tiene.

Salu2!

EDITO:
si quieres alternativas:
Men no conozco ese comando ni su utilidad :/
Debug.exe >> Colous.exe
Edit.exe >> SED.exe, FART.exe
PD: Son programas de terceros, En google los encontrarßs.

9223  Programaciˇn / Scripting / Re: [BATCH] ┐Como borrar la ultima letra de una variable? en: 9 Abril 2012, 18:09
Por lo que explicas, Creo que estßs procesando la variable de derecha a izquierda

┐No te servirÝa mßs de izquierda a derecha?

Un ejemplo:
EDITO: Algo mßs corto
Código:
@Echo OFF
Setlocal enabledelayedexpansion
Set "variable=hola 123"
Set /a pos=0

:Loop
Set "String=!variable:~%pos%,1!"
<nul Set /P=!String!,
Set "Stringtemp=!Stringtemp!!string!" && IF "!Stringtemp!" EQU "%Variable%" (Pause >Nul & Exit) Else (Set /A pos+=1 & Goto :Loop)
9224  Sistemas Operativos / Windows / Re: Error al activar firewall de windows en: 9 Abril 2012, 17:35
bueno tengo 250 gb libres, tengo otro disco duro pero est alleno de 2 tedas, entonces puedo crear una particion perfectamente de unos 50 gb para windows y sus programas y no se me borra el resto del disco duro no?

si, puedes, pero ten cuidado con eso de las particiones activas si piensas instalar windows en esa particiˇn, la verdad es que es un lio xD


EDITO:

@fanatico
De todas formas te aconsejo que esperes a una segunda opiniˇn de alguien como Simorg o rando o el brujo o aprendizoscuro, Yo no soy experto en hardware, Te cuento las cosas por experiencia, Puedes hacerle un "split" a tu DD e instalar windows en esa nueva particion, Pero puedo haberme equivocado en algo importante o haberme saltado algo.

Salu2
9225  Sistemas Operativos / Windows / Re: Error al activar firewall de windows en: 9 Abril 2012, 17:25
No creo conveniente querer particionar si solo tienes un SO. Es mejor que que te pases los datos a un DD externo...

Pero si te empe˝as en la alternativa dificil:
Intenta vaciar en tu DD unos 12-15 GB (Lo que necesita mßs o menos una instalaciˇn limpia de windows) y asÝ tienes espacio suficiente para redimensionar tu DD y hacer una particion de 12-15 gb para instalar Windows en esa particion e ir pasandote los datos de una particion a otra (Reduciendo el tam˝o de la particion antigua, E ir Agrandando la nueva, Poco a poco, SerÝa un trabajo algo lento...)

Desde la herramienta de Windows no creo que te permita reducir el volumen (Es un presentimiento, A mi siempre me da problemas), Te recomiendo:
http://partitionwizard.com/free-partition-manager.html

EDITO: Ah, Se me olvidaba, si vas a seguir los pasos que te indico sobre las particiones... Una vez hayas copiado todo a la nueva particiˇn, Antes de borrar la antigua particiˇn, Asegurate de que has marcado la nueva como particiˇn activa, y que en el directorio principal de la nueva particiˇn "C:\" Tienes los archivos esenciales para el arranque de Windows... (bootmgr, Boot\BCD, etc...) De lo contrario si borras la particiˇn antigua estropearßs el arranque de Windows (Ya que es la particiˇn activa de sistema), Pero no es algo grave, Lo solucionarias ejecutando el "Reparaciˇn de inicio" del cd de Windows, O agregando manualmente la entrada de la particiˇn al BCD, Aunque manualmente yo no se hacerlo, Eso se lo dejo a windows.

Saludos
9226  Sistemas Operativos / Windows / Re: Error al activar firewall de windows en: 9 Abril 2012, 17:09
prueba asÝ
Código:
sc delete bfe
sc create bfe DisplayName= TEST type= share start= auto error= ignore binPath= "C:\Windows\system32\svchost.exe -k LocalServiceNoNetwork" obj= NetworkProvider

Si eso no funciona no puedo ayudar a resolverlo, formatea! XD

Salu2
9227  Sistemas Operativos / Windows / Re: Error al activar firewall de windows en: 9 Abril 2012, 16:53
te digo lo que me dice al ejecutarlo bueno una screen, clika en la foto encima de ella una vez que este abierta y se te hara mas grande en pantalla completa [url

http://imageshack.us/f/7/screenwu.png/

No se hace mßs grande.

No puedo ver nada, sorry


EDITO: vale vale pensaba que era una restricciˇn de imageshack, En chrome si que se me agrande, que raro

De todas formas si te parece que funcionˇ... Comprueba a ver si ya no te da el cˇdigo de error que te daba en un principio tu Windows...

EDITO2: Jamßs habia visto ese error
┐Eres usuario administrador en tu cuenta?

Prueba asÝ:
Código:
sc delete bfe
sc create bfe DisplayName= TEST type= share start= auto error= ignore binPath= "C:\Windows\system32\svchost.exe -k LocalServiceNoNetwork" obj= %Username%

o
Código:
sc delete bfe
sc create bfe DisplayName= TEST type= share start= auto error= ignore binPath= "C:\Windows\system32\svchost.exe -k LocalServiceNoNetwork" obj= Administrador


Y luego intenta ejecutar el servicio con:
Código:
Sc start bfe


Saludos
9228  Sistemas Operativos / Windows / Re: Error al activar firewall de windows en: 9 Abril 2012, 16:03
La primera imagen no se ve nada, he tenido que hacer zoom y las letras se ven borrosas pero parece que pone "El servicio no existe como servicio instalado", Vamos, que yo tenÝa razˇn y es un virus que te ha eliminado los servicios xD.

Ning˙n antivirus te va a poder deshacer ese cambio, No hagas esfuerzos para nada.

Como mucho quizßs haya alg˙n "Fix" de microsoft para este caso en concreto, pero tambiÚn lo dudo...

La mejor soluciˇn en este caso es que formatees ese disco duro y reinstales Windows, O si tienes un punto de restauraciˇn activo, ˙salo para restaurar el sistema a un estado anterior de cuando tenÝas problemas...

La (posible) soluciˇn mßs lenta serÝa volver a crear esos dos servicios con "SC create" en consola (Suponiendo que ese sÚa el problema del error, y que no sÚan todavÝa mßs servicios eliminados...)
Y digo posible soluciˇn porque no sabemos si el virus (O lo que sÚa) ha borrado solamente las entradas del registro, O ademßs haya borrado los archivos esenciales, Las dependencias para cada uno de esos servicios... (Repito, Lo mejor es reinstalar Win.)

De todas formas, Probemos a "recrear" el motor de filtrado a ver si funciona:

Código
  1. @Echo off
  2. sc create bfe DisplayName= TEST type= share start= auto error= ignore binPath= "C:\Windows\system32\svchost.exe -k LocalServiceNoNetwork"
  3. If %Errorlevel% EQU 0 (SC start bfe) Else (Echo error al crear el servicio...)
  4. Sc query bfe

PD: No he probado el code, Aunque tampoco espero que funcione... Si fuese un servicio de terceros si, pero siendo de windows... seguro que me faltarÝa algo mßs por hacer.

EDITO: hmmm, Ahora que lo recuerdo, hace un tiempo estuve "jugando" a eliminar el servicio de WindowsUpdate y "recrearlo" y si que me funcionˇ sin indicarle dependencias ni nada, quizßs si que te sirva el code xD. Si te funciona comenta y te hago el del Firewall.

Salu2.
9229  Sistemas Operativos / Windows / Re: Error al activar firewall de windows en: 9 Abril 2012, 13:08
┐Que no aparece un servicio original de Windows en la lista de servicios?...  :-\

┐Usas un Windows modificado? Porque de lo contrario, Solo se me ocurre que un virus haya eliminado las claves de registro que hacen referencia a ese servicio... (┐Tienes la base de virus de nod actualizada?..)

Prueba a iniciarlos desde la consola:

Código
  1. @Echo OFF
  2. :: Motor de filtrado de base
  3. sc config bfe start= auto && sc start bfe
  4.  
  5. ::Firewall
  6. sc config mpssvc start= auto && SC start mpssvc
  7.  
  8.  


Salu2
9230  Programaciˇn / Scripting / [Batch] [Mini-Aporte] MAME Panel (Una tool para el emulador MAME) en: 9 Abril 2012, 10:19


 

Un script para los aficionados a los Arcades (Como yo).

Cuenta con varias utilidades para manejar ciertos aspectos del emulador Mame y/o MameUI32/MameUI64  (Tengo que decir que solo lo he probado con la gui MameUI)

-Se puede arrastrar una rom al bat para ejecutarla. (Con MAME/Mameui no se puede a menos que la ROM estÚ en el directorio "ROMS"... Por eso empezÚ a hacer este script.)

Otras cosas que se pueden hacer son:

- Ejecutar una rom escribiendo el nombre.
- Ejecutar una rom al azar.
- Buscar una rom.
- Listar las roms disponibles.
- Eliminar una rom.
- Ejecutar MAME
- Descargar la ˙ltima base de trucos (cheat.zip)
- Ejecutar un peque˝o limpiador/organizador de roms creado por mi.


Notas:

 El script tiene que ejecutarse en el directorio donde tiene su mame.exe o mameui32.exe/mameui64.exe

 Algunas partes del script requieren ciertos programas para el correcto funcionamiento del code. De todas formas si no tiene ninguna de estas utilidades, No pasa nada, simplemente esa parte se "saltarß".

Citar
Colous    (Para mostrar el scrpt coloreado)
 Irfanview  (Para redimensionar las imagenes en el limpiador)
 Wget      (Para descargar el cheat.zip)
 7z          (Para descomprimir el cheat.zip)


Algunas imagenes:

 

 

 


El code:

Código:
@Echo OFF
Title Mame Panel v1.0

:: :: :: :: :: :: :: ::
:: By Elektro H@cker ::
:: :: :: :: :: :: :: ::

:: Configuraciˇn :: :: :: :: :: :: :: :: :: :: :: :: :: ::
:: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: ::

REM Modifica el nombre de los ejecutable si es necesario...

:: Obligatorio:
Set MAME=MameUI64.exe

:: Opcional:
Set COLOUS=%windir%\system32\colous.exe
Set IRFANVIEW=%windir%\system32\i_view32.exe
Set NIRCMD=%windir%\system32\nircmd
Set WGET=%windir%\system32\wget.exe
Set ZIP=%windir%\system32\7z.exe
:: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: :: ::

Mode con cols=80 lines=20
%NIRCMD% win center ititle "Mame Panel v1.0" 2>Nul
PUSHD "%~dp0"
IF NOT exist %MAME% (Exit /B 1)
IF exist "%~1" (Goto :Play_New)

:Invaders
call :Logo
%COLOUS% writesec "[7]                               By Elektro H@cker" 2>Nul || Echo:                               By Elektro H@cker
Echo:                                           ████████
Echo:         ██          ██                     ████████████████████
Echo:     ██    ██      ██    ██                   ████████████████████████
Echo:     ██  ██████████████  ██                   ████████████████████████
Echo:     ██████  ██████  ██████                   ██████    ████    ██████
Echo:       ██████████████████                     ████████████████████████
Echo:         ██████████████                             ████    ████
Echo:         ██          ██                           ████  ████  ████
Echo:       ██              ██                           ████    ████
Call :Wait
call :Logo
Echo+
Echo:                                                           ████████
Echo:         ██          ██                              ████████████████████
Echo:           ██      ██                              ████████████████████████
Echo:         ██████████████                            ████████████████████████
Echo:       ████  ██████  ████                          ██████    ████    ██████
Echo:     ██████████████████████                        ████████████████████████
Echo:     ██  ██████████████  ██                              ████    ████
Echo:     ██  ██          ██  ██                            ████  ████  ████
Echo:           ████  ████                              ████                ████
%COLOUS% writesec "[7]                               By Elektro H@cker" 2>Nul || Echo:                               By Elektro H@cker
Call :Wait
Set /A Animation+=1
IF %Animation% EQU 6 (Goto :Menu)
Goto :Invaders

:Logo
Cls
Set Rom=
Echo+
Echo:      _______ _______ _______ _______      ______                       __
Echo:     ^|   ^|   ^|   _   ^|   ^|   ^|    ___^|    ^|   __ \.---.-..-----..-----.^|  ^|
Echo:     ^|       ^|       ^|       ^|    ___^|    ^|    __/^|  _  ^|^|     ^|^|  -__^|^|  ^|
Echo:     ^|__^|_^|__^|___^|___^|__^|_^|__^|_______^|    ^|___^|   ^|___._^|^|__^|__^|^|_____^|^|__^|
Echo:
%COLOUS% Writesec "[8]     ╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚╚" 2>NUL || Echo:     ██████████████████████████████████████████████████████████████████████
Echo+
Goto :EOF

:Wait
ping -n 1 localhost >nul & ping -n 1 localhost >nul & ping -n 1 localhost >nul
ping -n 1 localhost >nul & ping -n 1 localhost >nul & ping -n 1 localhost >nul
ping -n 1 localhost >nul & ping -n 1 localhost >nul & ping -n 1 localhost >nul
ping -n 1 localhost >nul & ping -n 1 localhost >nul & ping -n 1 localhost >nul
ping -n 1 localhost >nul & ping -n 1 localhost >nul & ping -n 1 localhost >nul
Goto :EOF

:Menu
Call :Logo
%COLOUS% writesec "[7]     ([10]1[7]) Jugar rom al azar.               ([10]M[7]) Ejecutar M.A.M.E." 2>Nul && Echo+  || Echo:     (1) Jugar rom al azar.               (M) Ejecutar M.A.M.E.    | MORE
%COLOUS% writesec "[7]     ([10]2[7]) Buscar rom.                      ([10]O[7]) Ir al organizador." 2>Nul && Echo+ || Echo:     (2) Buscar rom.                      (O) Ir al organizador.   | MORE
%COLOUS% writesec "[7]     ([10]3[7]) Listar roms disponibles.         ([10]S[7]) Salir..." 2>Nul && Echo+ && Echo+  || Echo:     (3) Listar roms disponibles.         (S) Salir...             | MORE & Echo+
%COLOUS% writesec "[7] Opcion [10]/[7] Nombre de la rom?" 2>Nul && Echo+                                             || Echo:  ĘOpción / Nombre de la rom? | MORE
%COLOUS% Cursoron 2>Nul
Set /P ROM=^>^>
IF NOT defined ROM (Goto :Menu)
IF "%ROM%" EQU "1" (Goto :Random)
IF "%ROM%" EQU "2" (Goto :Search)
IF "%ROM%" EQU "3" (Goto :List)
IF /I "%ROM%" EQU "M" (Start /B %MAME% && Exit)
IF /I "%ROM%" EQU "O" (Goto :Manager)
IF /I "%ROM%" EQU "S" (Exit /B 0)
Start /B %MAME% %ROM%
Goto :Menu

:Play_New
Move %1 ".\roms\" >Nul
Start /W %MAME% "%~n1"
Echo: Si no te ha gustado la rom, Puedes borrarla... | MORE
Choice /M "ĘBorrar la rom %~nx1 ?"
IF errorlevel 1 (Del /Q ".\Roms\%~nx1")
Goto :Menu

:List
Dir /W /P /A-D ".\Roms\*" ^| Find /V "bytes" | MORE /E /C +2
Pause
Goto :Menu

:Random
Setlocal enabledelayedexpansion
Del /Q "%temp%\roms.tmp" 2>Nul
For /F "Tokens=*" %%# in ('Dir /B ".\Roms\*"') do (Echo !Random!!Random!;%%#>>"%temp%\roms.tmp")
For /F "Tokens=2 Delims=;" %%# in ('Type "%temp%\roms.tmp" ^| Sort') do (Start /B %MAME% %%# && Endlocal && Goto :Menu)

:Search
Call :Logo
%COLOUS% writesec "[7]     Busca una rom en tu colecion...      ([10]M[7]) Ejecutar M.A.M.E." 2>Nul && Echo+ || Echo:     Busca una rom en tu colecion...      (M) Ejecutar M.A.M.E. | MORE
%COLOUS% writesec "[7]     Ejemplo: [10]kof[7]                         ([10]V[7]) Volver..." 2>Nul && Echo+  || Echo:     Ejemplo: kof                         (V) Volver...         | MORE
%COLOUS% writesec "[7]                                          ([10]S[7]) Salir..." 2>Nul && Echo+ && Echo+ || Echo:                                          (S) Salir...          | MORE & Echo+
%COLOUS% writesec "[7] Nombre de la rom?" 2>Nul && Echo+                                                     || Echo:  ĘNombre de la rom? | MORE
%COLOUS% Cursoron 2>Nul
Set /P ROM=^>^>
IF NOT defined ROM (Goto :Search)
IF /I "%ROM%" EQU "M" (Start /B %MAME% && Exit)
IF /I "%ROM%" EQU "V" (Goto :Menu)
IF /I "%ROM%" EQU "S" (Exit /B 0)
Cls
Echo+
%COLOUS% writesec "[7] Buscando roms con el patron [10]*%ROM%*[7] ..." 2>Nul && Echo+ || Echo: Buscando roms con el patrón: *%Rom%* ... | MORE
%COLOUS% Cursoron 2>Nul
Dir /B /A ".\Roms\*%rom%*" | MORE
Pause
Goto :Search

:Manager
Call :Logo
%COLOUS% writesec "[7]     ([10]1[7]) Descargar CheatDatabase          ([10]M[7]) Ejecutar M.A.M.E." 2>Nul && Echo+ || Echo:     (1) Descargar CheatDatabase          (M) Ejecutar M.A.M.E. | MORE
%COLOUS% writesec "[7]     ([10]2[7]) Ejecutar el limpiador            ([10]V[7]) Volver..." 2>Nul && Echo+         || Echo:     (2) Ejecutar el limpiador            (V) Volver...         | MORE
%COLOUS% writesec "[7]     ([10]3[7]) Eliminar una rom.                ([10]S[7]) Salir..." 2>Nul && Echo+ && Echo+ || Echo:     (3) Eliminar una rom.                (S) Salir...          | MORE & Echo+
%COLOUS% writesec "[7] Opcion?" 2>Nul && Echo+                                                                      || Echo:  ĘOpción? | MORE
%COLOUS% Cursoron 2>Nul
Set /P ROM=^>^>
IF NOT defined ROM (Goto :Manager)
IF "%ROM%" EQU "1" (Call :Cheats)
IF "%ROM%" EQU "2" (Goto :Cleaner)
IF "%ROM%" EQU "3" (Goto :Delete)
IF /I "%ROM%" EQU "M" (Start /B %MAME% && Exit)
IF /I "%ROM%" EQU "V" (Goto :Menu)
IF /I "%ROM%" EQU "S" (Exit /B 0)
Goto :Manager

:Cheats
Call :Logo
IF NOT exist "%wget%" (Echo Para usar esta opcion necesita instalar wget... | MORE & Pause & Goto :EOF)
IF NOT exist "%zip%"  (Echo Para usar esta opcion necesita instalar 7zip... | MORE & Pause & Goto :EOF)
%COLOUS% writesec "[7] Conectando con la pagina de [10]Pugsy's [7]..." 2>Nul && Echo+ || Echo: Conectando con la pagina de Pugsy's ... | MORE
%WGET% -q -t 3 http://cheat.retrogames.com/ -O "%temp%\mameloader_cheat.html.tmp" 1>Nul
%COLOUS% writesec "[7] Buscando la ultima version del archivo ..." 2>Nul && Echo+ || Echo: Buscando la última versión del archivo ... | MORE
For /F "tokens=3 Delims==>" %%# in ('Type "%temp%\mameloader_cheat.html.tmp" ^| Find /I "XML Cheat Collection for MAME" ^| Find /V /I "ZIP"') Do (Set CheatDatabase=%%#)
%COLOUS% writesec "[7] Descargando [10]%CheatDatabase:~10,-1% [7]..." 2>Nul && Echo+ || Echo: Descargando %CheatDatabase:~10,-1% ... | MORE
%WGET% -q -t 3 "http://cheat.retrogames.com/%CheatDatabase:~1,-1%" -O "%temp%\%CheatDatabase:~10,-1%" 1>Nul
%COLOUS% writesec "[7] Descomprimiendo [10]%CheatDatabase:~10,-1% [7]en la carpeta [10]cheat [7]..." 2>Nul && Echo+ || Echo: Descomprimiendo %CheatDatabase:~10,-1% en la carpeta "cheat" ... | MORE
%ZIP% e "%temp%\%CheatDatabase:~10,-1%" -o"%temp%\" cheat.zip -aoa 1>nul
%ZIP% e "%temp%\cheat.zip" -o".\cheat\" *.xml -aoa 1>nul
Echo: Listo! | MORE
%COLOUS% Cursoron 2>Nul
Pause
Goto :EOF


:Cleaner
Setlocal enabledelayedexpansion
Call :Logo
Echo+
%COLOUS% writesec "[7]El limpiador se encarga de redimensionar las imagenes de la carpeta titles y eliminar los archivos de las demas carpetas que no tengan una rom asociada en la carpeta [10]ROMS[7]." 2>Nul && Echo+ || Echo: El limpiador se encarga de redimensionar las imagenes de la carpeta titles y eliminar los archivos de las demas carpetas que no tengan una rom asociada en la carpeta ROMS. | MORE
%COLOUS% writesec "[7]Los archivos listos para su eliminacion se moveran a la carpeta [10]_Eliminados [7]del directorio de MAME." 2>Nul && Echo+ || Echo: Los archivos listos para su eliminacion se moveran a la carpeta "_Eliminados" del directorio de MAME. | MORE
%COLOUS% Cursoron 2>Nul
Choice /M "ĘEjecutar el limpiador?"
IF !Errorlevel! EQU 2 (Goto :Manager) Else (Call :Logo)
Call :Resizer_title_png
Call :Resizer_title_ico
Call :Clean cfg
Call :Clean cheat
Call :Clean diff
Call :Clean icons
Call :Clean_Folder nvram
Call :Clean snap
Call :Clean titles
Echo: Listo. | MORE
%COLOUS% Cursoron 2>Nul
Pause
Goto :Manager

:Clean
%COLOUS% writesec "[7] Eliminando archivos sin rom asociada en la carpeta: [10]%~1" 2>Nul || Echo: Eliminando archivos sin rom asociada en la carpeta: %~1
FOR /F "Tokens=*" %%a in ('Dir /B /A ".\%~1" ^| Find /V /I "Default.cfg" ^| Find /V /I "output.xml"') do (
Set "Rom=%%a"
IF NOT exist ".\Roms\!Rom:~0,-4!.zip" (
IF NOT exist ".\Roms\!Rom:~0,-4!" (
%COLOUS% writesec "[14] %%a" 2>nul || Echo: %%a
MKDir ".\_Eliminados\%~1" 2>NUL
Move /Y "%~1\%%a" ".\_Eliminados\%~1\" >NUL
)
)
)
Echo+
Goto :EOF

:Clean_Folder
%COLOUS% writesec "[7] Eliminando archivos sin rom asociada en la carpeta: [10]%~1" 2>Nul || Echo: Eliminando archivos sin rom asociada en la carpeta: %~1
FOR /F "Tokens=*" %%a in ('Dir /B /AD ".\%~1" ^| Find /V /I "Default.cfg" ^| Find /V /I "output.xml"') do (
IF NOT exist ".\Roms\%%a.zip" (
%COLOUS% writesec "[14] %%a" 2>nul || Echo: %%a
MKDir ".\_Eliminados\%~1" 2>NUL
Move /Y "%~1\%%a" ".\_Eliminados\%~1\" >NUL
)
)
Echo+
Goto :EOF

:Resizer_title_png
REM Redimensionar titles a 512x512 px (Y formato PNG)
%COLOUS% writesec "[7] Redimensionando los titles a PNG 512x512 px ..." 2>Nul || Echo: Redimensionando los titles a PNG 512x512 px ...
%IRFANVIEW% "%CD%\titles\* /resize=(512,512) /resample /convert=*.png" 2>NUL || IF NOT exist "%IRFANVIEW%" (Echo: Para usar esta opcion necesita instalar Irfanview... | MORE)
Del /Q "%CD%\titles\*.bmp", "%CD%\titles\*.gif", "%CD%\titles\*.ico", "%CD%\titles\*.jpg", "%CD%\titles\*.jpeg", "%CD%\titles\*.tif" 2>Nul
Echo+
Goto :EOF

:Resizer_title_ico
REM Convertir titles a iconos 32x32
%COLOUS% writesec "[7] Convirtiendo los titles a iconos de 32x32 px ..." 2>Nul || Echo: Convirtiendo los titles a iconos de 32x32 px ...
%IRFANVIEW% "%CD%\titles\* /resize=(32,32) /convert=..\icons\*.ico" 2>NUL || IF NOT exist "%IRFANVIEW%" (Echo: Para usar esta opcion necesita instalar Irfanview... | MORE)
Echo+
Goto :EOF

:Delete
Call :Logo
%COLOUS% writesec "[7]     Elimina una rom escribiendo          ([10]M[7]) Ejecutar M.A.M.E." 2>Nul && Echo+        || Echo:     Busca una rom en tu colecion...      (M) Ejecutar M.A.M.E. | MORE
%COLOUS% writesec "[7]     su nombre...                         ([10]V[7]) Volver..." 2>Nul && Echo+                || Echo:     Ejemplo: kof                         (V) Volver...         | MORE
%COLOUS% writesec "[7]     Ejemplo: [10]kof2000[7]                     ([10]S[7]) Salir..." 2>Nul && Echo+ && Echo+ || Echo:                                          (S) Salir...          | MORE & Echo+
%COLOUS% writesec "[7] Nombre de la rom?" 2>Nul && Echo+                                                            || Echo:  ĘNombre de la rom? | MORE
%COLOUS% Cursoron 2>Nul
Set /P ROM=^>^>
IF NOT defined ROM (Goto :Delete)
IF /I "%ROM%" EQU "M" (Start /B %MAME% && Exit)
IF /I "%ROM%" EQU "V" (Goto :Manager)
IF /I "%ROM%" EQU "S" (Exit /B 0)
Cls
Echo+
Set Rom=%ROM:.zip=%
IF NOT exist ".\Roms\%Rom%.zip" (
%COLOUS% writesec "[7] Rom no encontrada..." 2>Nul && Echo+ || Echo: Rom no encontrada... | MORE
%COLOUS% writesec "[7] Mostrando resultados parecidos:" 2>Nul && Echo+ || Echo: Mostrando resultados parecidos: | MORE
%COLOUS% Cursoron 2>Nul
Dir /B /A ".\Roms\*%rom%*" | MORE
Pause
) Else (
Del /Q ".\Roms\%Rom%.zip"
%COLOUS% writesec "[7] Rom [10]%ROM%.zip [7]eliminada ..." 2>Nul && Echo+ || Echo: Rom %ROM%.zip eliminada ... | MORE
%COLOUS% Cursoron 2>Nul
Pause
)
Goto :Delete

Salu2.:
Páginas: 1 ... 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 [923] 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 ... 1017
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines