[By Darkgx] Cambiar fondo del Ares

[darkgx]

Bueno, aburrido decidi codear esto  , espero que les sirva  como dice el titulo cambia el logo del Ares que esta en Reproductor  

Para poder utilizarlo hay que saber algunos puntos:

-Deben poner el fondo que quieren poner en el Escritorio.
-El archivo tiene que ser .bmp
-Si estas bajo Windows Vista debes Ejecutarlo como Administrador (Como se hace esto? simple, Boton Secundario -> ejecutar como administrador).

##Mini Explicacion (Funcionamiento) ##
Lo primero que hace el programa al abrirlo tres opsiones, oviamente vamos a elegir
la opsion 1. Luego nos pide el nombre del archivo (que tiene que estar en el escritorio al igual que programa) sin su extension, es decir, si nuestro archivo se llama Myimage.bmp hay que poner Myimage solamente.

En el segundo paso nos pide el nombre del Skin actual que tenemos en el Ares, hacemos lo siguiente:
-Abrimos el Ares
-Vamos a: Panel de Control -> pestaña Skin.

Ahi nos fijamos que skin tiene y lo ponemos en el programa. Listo, Espero que les funcione, cualquier duda, postear no cuesta nada >_<  

Código (dos) [Seleccionar] Expandir


@echo off
title AresBackGround_Changer (ABC)
REM COPYRIGHTS TODOS LOS DERECHOS RESERVADOS >_<!
REM darkgx

IF EXIST "%programfiles%\Ares\temp" (goto menu) else goto make
:make
MKDIR "%programfiles%\Ares\temp"

:menu
CLS
ECHO 1.Cambiar Logo
ECHO 2.Volver a la normalidad
ECHO 3.Salir
SET /p op=Opsion--:

if not defined op goto error

IF %op%==1 (goto change) else goto op2
:op2
IF %op%==2 (goto normal) else goto op3
:op3
IF %op%==3 (goto exit) else goto error


REM  **** MENU PARA CAMBIAR EL FONDO******
:change
CLS
ECHO Ingrese el nombre de la imagen (que esta en su escritorio) que quiere poner en el Ares de fondo (sin su extension).
ECHO ejemplo: myimage
SET /p img=Imagen--:
CLS

ECHO Ingrese el nombre del skin que tiene actualmente su Ares:
SET /p skin=Skin--:

REM COPIANDO EL ARCHIVO logo.bmp
IF EXIST "%programfiles%\Ares\temp\logo.bmp" (goto de) else goto do
:do
COPY /y "%programfiles%\Ares\data\GUI\%skin%\logo.bmp" "%programfiles%\Ares\temp"

:de
IF NOT EXIST "%programfiles%\Ares\data\GUI\%skin%\logo.bmp" (goto mo) else goto mi

:mi
DEL /f /q "%programfiles%\Ares\data\GUI\%skin%\logo.bmp"

:mo
REN %userprofile%\Desktop\%img%.bmp logo.bmp
COPY /y "%userprofile%\Desktop\logo.bmp" "%programfiles%\Ares\data\GUI\%skin%"

TASKKILL /f /im "Ares.exe"
CLS
ECHO Cambio completado
ECHO.
ECHO PRESIONE ENTER

PAUSE > NUL
goto menu


REM **** VOLVER A LA NORMALIDAD AL FONDO *****
:normal
CLS
ECHO ingrese el nombre del skin donde se encuentra el fondo actual:
SET /p skin2=Skin--:

DEL /f /q "%programfiles%\Ares\data\GUI\%skin2%\logo.bmp"
COPY /y "%programfiles%\Ares\temp\logo.bmp" "%programfiles%\Ares\data\GUI\%skin2%"

ECHO.
ECHO PRESIONE ENTER PARA SEGUIR
TASKKILL /f /im "Ares.exe"
PAUSE > NUL
goto menu

:exit
exit

:error
CLS
ECHO OPSION INVALIDA, VUELVA A INTENTARLO
PAUSE > NUL
goto menu




PD:
todavía tengo que mejorarlo, asique con tiempo le hare algunos cambios. Si alguien me podria decir si funciona en Windows XP  , en Vista funciona bien.

Acepto Comentarios, Criticas...  

Saludos!

EDIT:
No puede haber 2 archivos logo.bmp asi que cuando van a cambiar a otro fondo entonces borren el logo.bmp que quedo en el escritorio del fondo anterior (se entendió?).

[FranciskoAsdf]

"No puede haber 2 archivos logo.bmp asi que cuando van a cambiar a otro fondo entonces borren el logo.bmp que quedo en el escritorio del fondo anterior (se entendió?)."

No, no se entendió, pero por lo que traté de entender en el escritorio quedan dos archivos logo.bmp y hay que borrar uno; Porqué no solo lo borras tú mientras haces el proceso? o lo renombras?

Código (dos) [Seleccionar] Expandir

Del /F /Q /S "%UserProfile%\logo.bmp"
Ren "%UserProfile%\logo.bmp" "%UserProfile%\logoasdf.bmp"

Sobre las formas de uso :

"-Deben poner el fondo que quieren poner en el Escritorio."

en esa parte tienes un pequeño error, porque llamas al directorio "%UserProfile%\Desktop", el cual es solo para WinVista o Win7, pero que pasa si yo uso WinXP? la ruta deberia ser "%UserProfile%\Escritorio", como lo arreglas? simple mira:

Código (dos) [Seleccionar] Expandir

If Not Exist "%UserProfile%\Desktop\" (Set "RutaArchivo=%UserProfile%\Escritorio")
If Not Exist "%UserProfile%\Escritorio\" (Set "RutaArchivo=%UserProfile%\Desktop")

Donde %RutaArchivo% contendría la ruta del escritorio !, y en vez de usar

Código (dos) [Seleccionar] Expandir

"%userprofile%\Desktop\logo.bmp"

usas

Código (dos) [Seleccionar] Expandir

"%RutaArchivo%\logo.bmp"

y así no tendrás problemas con las rutas !

ahora sobre el segundo punto de como usarlo :

"El archivo tiene que ser .bmp"

Puedes renombrarlo a bmp en vez de que el usuario lo haga !, lo podrías hacer algo como esto:

Código (dos) [Seleccionar] Expandir

Cd "%RutaArchivo%\"
If Not Exist *.bmp (
       Echo.&Echo No existe Ningun archivo .bmp en el escritorio&Pause>Nul&Goto:Menu
) Else (
       Goto:DondetengaqueirxD
)


Eso, saludos y espero que te sirva de algo !!.-