proyecto hyperspin by arda, unete

Enhorabuena Rey, veo que va funcionando todo a la perfección. Este hyperspin va a ser el mejor del planeta.

Próximamente podemos mirar como ponerle pantalla de espera a cada juego en particular, sería guapo, pero bueno, también trabajoso.
Un saludo.



Buenas Aseere, ya casi tengo preparado el módulo para Atomiswave, Demul 0.5.7. Lo único que he notado que ocurre es que el emulador tiene problemas cuando lo pones en pantalla completa. Es decir carga bien la rom en pantalla completa pero parpadea toda la pantalla, creo que es cosa del emulador.
Cuando puedas me pasas el de neo geo cd, para hacer el módulo con pantalla de espera, si nadie lo ha hecho todavía. Un saludo.

gracias melu por contestar,probaremos,un saludo.

hola gregorio, supongo ke el emulador tendra problemas, me refiero al demul 0.57,

aki te dejo el modulo de neo geo cd, gracias

;-------------------------------------------------------------------------
; Neo Geo CD
; noeraine-1.2.11
; by Brolly
; 1.0
; To set fullscreen start the emulator outside HS and on the main menu select
; Video Options and set fullscreen to Yes
;-------------------------------------------------------------------------

Run, %Executable% -nogui "%­romPath%%­romName%%­romExtension%", %emuPath%, Hide
Process, WaitClose, %Executable%

ExitApp

CloseProcess:
return

Eres un maquina, muchisimas gracias, ahora mismo lo pongo en pruebas!. Supongo que funcionará, ya te comentare como va el experimento

yujuuuu!!! Esto rula a las mil maravillas!! No tengo palabras Estoy emocionado... Eres un crack. Yo me imaginaria que seria algo asi pero no tengo ni idea de como darle ordenes al hyperlaunch. A ver si encontramos una solucion para que anule el script al salir del juego. Muchas gracias por molestarte por una inmensa minoria que tenemos el i-pac


Rey lo he probado y va perfecto, pero tambien me iba antes sin el ultimo ExitApp, como se comprueba que no sigue el scrip?

Muchas gracias por el tutorial de Xpadder ..

Saludos ¡¡

Buenas Aseere, de momento he conseguido un módulo para que lanze los juegos en el emulador demul 0.57, con su pantalla de espera a la entrada y a la salida y a pantalla completa. De momento está probado en xp, va perfecto. Te lo dejo aquí el módulo y el enlace para que lo pruebes:

www.4shared.com/rar/dXk8-ua7/Atomiswave.html

;----------------------------------------------------------------------------
; Atomiswave
; Demul 0.5.7
; MODIFICADO POR GREGOGAME PARA CARGAR PANTALLA DE ESPERA
;
;
; Notes:
;
;----------------------------------------------------------------------------

;Settings
loadingScreen=1
fullscreenWidth = 800
fullscreenHeight = 600
addsounds=1

if(loadingScreen){
Gui +AlwaysOnTop -Caption +ToolWindow
Gui, Color, Black
logoXPos := A_ScreenWidth/2 - 900 /2
Gui, Add, Picture,x%­logoXPos% y120, %A_ScriptDir%\Modules\Atomiswave\Logo.png
loadXPos := A_ScreenWidth/2 - 500 /2
loadYPos := A_ScreenHeight - 120
Gui, Add, Picture,x%­loadXPos% y%­loadYPos%, %A_ScriptDir%\Modules\Atomiswave\Loading.png
Gui Show, x0 y0 h%A_ScreenHeight% w%A_ScreenWidth%
}

if(addsounds)
{
;sounds go in demul directory change to .mp3 if desired or specify a directory of sounds for "romname"
soundplay, %A_ScriptDir%\Modules\%­systemName%\%­systemName%.mp3
Sleep, 2000
}

demofist := Object("name", "Demolition Fist", "controls", "standard")
dolphin := Object("name", "Dolphin Blue", "controls", "standard")
fotns := Object("name", "Fist of the North Star", "controls", "standard")
ggisuka := Object("name", "Guilty Gear Isuka", "controls", "ggxstyle")
kof11 := Object("name", "King of Fighters 11", "controls", "standard")
kofnw := Object("name", "King of Fighters NeoWave", "controls", "sfstyle")
kofnwj := Object("name", "King of Fighters NeoWave (JAP)", "controls", "sfstyle")
kov7sprt := Object("name", "Knights of Valor - The Seven Spirits", "controls", "standard")
rangrmsn := Object("name", "Ranger Mission", "controls", "lightgun")
rumblef := Object("name", "The Rumble Fish", "controls", "sfstyle")
salmankt := Object("name", "Salary Man Kintaro", "controls", "standard")
sprtshot := Object("name", "Sports Shooting USA", "controls", "lightgun")
vfurlong := Object("name", "Net Select Keiba Victory Furlong", "controls", "standard")
xtrmhunt := Object("name", "Extreme Hunting", "controls", "lightgun")
xtrmhnt2 := Object("name", "Extreme Hunting 2", "controls", "lightgun")

currentName := %­RomName%.name
currentControls := %­RomName%.controls

settingsFile = %emupath%Demul.ini
padFile = %emupath%­padDemul.ini

;All Atomiswave games use standard controls code from what I seen
if(currentControls = "lightgun"){
IniWrite, 131072, %­settingsFile%, PORTB, device
IniWrite, standard, %­padFile%, CONTROL_TYPE, CONTROL_TYPE
}else{
IniWrite, 16777216, %­settingsFile%, PORTB, device
IniWrite, currentControls, %­padFile%, CONTROL_TYPE, CONTROL_TYPE
}

if(currentControls = "standard" || currentControls = "lightgun"){
WriteStandardControls()
}
else if(currentControls = "ggxstyle"){
WriteGGXControls()
}
else if(currentControls = "sfstyle"){
WriteSFStyleControls()
}
else if(currentControls = "lightgun"){
WriteStandardControls()
}

WriteStandardControls(){
IniWrite, 200, %­padFile%, ATOMISWAVE0_0, UP
IniWrite, 208, %­padFile%, ATOMISWAVE0_0, DOWN
IniWrite, 203, %­padFile%, ATOMISWAVE0_0, LEFT
IniWrite, 205, %­padFile%, ATOMISWAVE0_0, RIGHT
IniWrite, 46, %­padFile%, ATOMISWAVE0_0, SHOT1
IniWrite, 18, %­padFile%, ATOMISWAVE0_0, SHOT2
IniWrite, 44, %­padFile%, ATOMISWAVE0_0, SHOT3
IniWrite, 45, %­padFile%, ATOMISWAVE0_0, SHOT4
IniWrite, 21, %­padFile%, ATOMISWAVE0_0, SHOT5
IniWrite, 38, %­padFile%, ATOMISWAVE0_0, START
IniWrite, 39, %­padFile%, ATOMISWAVE0_0, COIN

IniWrite, 72, %­padFile%, ATOMISWAVE0_1, UP
IniWrite, 76, %­padFile%, ATOMISWAVE0_1, DOWN
IniWrite, 75, %­padFile%, ATOMISWAVE0_1, LEFT
IniWrite, 77, %­padFile%, ATOMISWAVE0_1, RIGHT
IniWrite, 50, %­padFile%, ATOMISWAVE0_1, SHOT1
IniWrite, 47, %­padFile%, ATOMISWAVE0_1, SHOT2
IniWrite, 48, %­padFile%, ATOMISWAVE0_1, SHOT3
IniWrite, 45, %­padFile%, ATOMISWAVE0_0, SHOT4
IniWrite, 25, %­padFile%, ATOMISWAVE0_1, SHOT5
IniWrite, 19, %­padFile%, ATOMISWAVE0_1, START
IniWrite, 51, %­padFile%, ATOMISWAVE0_1, COIN
}

WriteGGXControls(){
IniWrite, 18, %­padFile%, ATOMISWAVE0_0, SHOT2
IniWrite, 44, %­padFile%, ATOMISWAVE0_0, SHOT3
IniWrite, 20, %­padFile%, ATOMISWAVE0_0, SHOT4
IniWrite, 21, %­padFile%, ATOMISWAVE0_0, SHOT5

IniWrite, 47, %­padFile%, ATOMISWAVE0_1, SHOT2
IniWrite, 48, %­padFile%, ATOMISWAVE0_1, SHOT3
IniWrite, 24, %­padFile%, ATOMISWAVE0_0, SHOT4
IniWrite, 25, %­padFile%, ATOMISWAVE0_1, SHOT5
}

WriteSFStyleControls(){
IniWrite, 45, %­padFile%, ATOMISWAVE0_0, SHOT2
IniWrite, 21, %­padFile%, ATOMISWAVE0_0, SHOT3
IniWrite, 18, %­padFile%, ATOMISWAVE0_0, SHOT4
IniWrite, 44, %­padFile%, ATOMISWAVE0_0, SHOT5

IniWrite, 49, %­padFile%, ATOMISWAVE0_1, SHOT2
IniWrite, 25, %­padFile%, ATOMISWAVE0_1, SHOT3
IniWrite, 47, %­padFile%, ATOMISWAVE0_0, SHOT4
IniWrite, 48, %­padFile%, ATOMISWAVE0_1, SHOT5
}

IniWrite, %fullscreenWidth%, %emupath%­gpuOglv3.ini, resolution, fWidth
IniWrite, %fullscreenHeight%, %emupath%­gpuOglv3.ini, resolution, fHeight
Run, "C:\hyperspin1.0\Pantallas de Espera\Atomiswave\hypersplash.exe"
Run, "%Emupath%%Executable%" -run=atomiswave -rom=%­RomName%
SetTimer, CheckWin, 2

sizeOrg=
CheckWin:
IfWinNotExist, ahk_class window
{
return
}else{
WinGetPos,,,W,,ahk_class window
if(W != sizeOrg && sizeOrg != ""){
Goto StartGame
}else{
sizeOrg = %­W%
}
}
return

StartGame:
SetTimer, CheckWin, Off
WinActivate ahk_class window
Send !{ENTER}
Gui Destroy
Process, WaitClose, %executable%
return

CloseProcess:
Process, Close, %executable%
sleep, 3500
Process, Close, Hypersplash.exe
ExitApp
return