ArcadeBR Tag: no

Belini em "kawaks no advmenu"

Belini — sáb, 10 jul 2010 19:20:05 +0000

Daniel já achei o que eu queria na versão 1.62 do winkawaks mesmo assim agradeço.

DANIEL NUNES em "kawaks no advmenu"

DANIEL NUNES — sáb, 10 jul 2010 18:03:07 +0000

amigo Belini testei com 1.60 mas tem muitas modificaçoes nestas versoes atualmente sugiro tu utilizar 1.46 e outra ele tambem roda no supernes lembra,
da uma olhada porque ele roda em diversos emuladores

http://www.vgbr.com/forum/index.php?showtopic=40178

Belini em "kawaks no advmenu"

Belini — sáb, 10 jul 2010 10:41:48 +0000

Alguém sabe informar qual versão do kawaks roda o jogo double dragon de luta pois o mame que estou usando não emula bem este jogo.

amaral em "kawaks no advmenu"

amaral — dom, 13 jun 2010 23:52:47 +0000

da uma olhada ai no seu joytokey verifica qual é a tecla de saida esta configurada. eu ja rodei a minha multijogos até em uma placa m863g e não deu problema nenhum

DANIEL NUNES em "kawaks no advmenu"

DANIEL NUNES — qua, 09 jun 2010 01:32:39 +0000

voce testou em outra placa seu script porque dependendo da placa o script não fecha o emulador fica em atraso não sei porque isto acontece eu fiz meu script e ele no meu pc fecha de uma vez agora quando coloco em outra placa parece uma tartaruga. ????? testei o seu ele ficou no mesmo emecilio de fechar ....

amaral em "kawaks no advmenu"

amaral — qua, 28 abr 2010 22:32:24 +0000

o script que eu acabei de alterar aqui esta funcionando perfeitamente e tem mais não precisa de arquivo bat para jogar a kof 98 ou a 2002 é só escolher livremente aqui funcionou segue o script para quem quer testar um abraço

AutoItSetOption("WinTitleMatchMode", 4)
Global $TEMPO_RESTANTE, $TEMPO_ATUAL, $TEMPO_DECORRIDO, $AVISADO, $LOPPING
$INTERVALO = 0
$AVISADO = False
$TEMPO_RESTANTE = VERIFICATEMPO()
If Not $CMDLINE[0] = 1 Then
SplashImageOn("", "..\auxiliar\image\mensa1.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\advfaltajogo.wav", 1)
SplashOff()
Exit (0)
EndIf
If Not FileExists($CMDLINE[1]) Then
SplashImageOn("", "..\auxiliar\image\mensa1.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\advfaltajogo.wav", 1)
SplashOff()
Exit (0)
EndIf
$DRIVE = StringLeft(@ScriptDir, 2)
If Not ProcessExists("joytokey.exe") Then
$EXE_JOY = ShellExecute("joytokey.exe", "multi", $DRIVE & "\arcade\joytokey")
If @error Then
SplashImageOn("", "..\auxiliar\image\mensa4.gif", 220, 40, -1, -1, 1)
Sleep(10000)
SplashOff()
FECHAR()
Exit (0)
EndIf
Else
Sleep(2000)
EndIf
$EXE_MAME = ShellExecute("WinKawaks.exe", $CMDLINE[2] &" " & "-fullscreen")
If @error Then
SplashImageOn("", "..\auxiliar\image\mensa5.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\erroemuexe.wav")
SplashOff()
Exit (0)
EndIf
WinWaitActive("classname=WinKawaks", "", 10)
HotKeySet("{esc}", "Fechar")
HotKeySet("0", "PegaFicha")
$LOPPING = 1
$TEMPO_ATUAL = DllCall("kernel32.dll", "int", "GetTickCount")
While $LOPPING
$TEMPO_DECORRIDO = DllCall("kernel32.dll", "int", "GetTickCount")
If $TEMPO_RESTANTE <= ($TEMPO_DECORRIDO[0] - $TEMPO_ATUAL[0]) Then
$TEMPO_RESTANTE = 0
FECHAR()
ExitLoop
EndIf
If $INTERVALO >= 600 Then
GRAVATEMPO()
$INTERVALO = 0
EndIf
If (($TEMPO_RESTANTE - ($TEMPO_DECORRIDO[0] - $TEMPO_ATUAL[0])) <= 60000) And (Not $AVISADO) Then
SoundPlay("..\auxiliar\som\falta1.wav")
$AVISADO = True
EndIf
$INTERVALO += 1
Sleep(100)
WEnd
Exit (0)
Func FECHAR()
Local $EMULADOR, $FECHOU
HotKeySet("{ESC}")
HotKeySet("0")
If Not WinActive("classname=WinKawaks") Then
WinActivate("classname=WinKawaks")
EndIf
Sleep(100)
Send('{enter}')
Send('!{f4}')
SplashImageOn("", "..\auxiliar\image\mensa6.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\fechaemu.wav", 1)
$FECHOU = WinWaitClose("classname=WinKawaks", "", 5)
If ProcessWait('WinKawaks.exe', 2) Then
ProcessClose("WinKawaks.exe")
EndIf
If ProcessExists("joytokey.exe") Then
If Not WinActive("classname=TApplication") Then
WinActivate("classname=TApplication")
EndIf
Send("{LALT}FX")
EndIf
GRAVATEMPO()
SplashOff()
$LOPPING = 0
EndFunc
Func PEGAFICHA()
Local $ATUAL, $VALOR, $CONTADOR, $CALCULA, $ADICIONA
$ATUAL = $TEMPO_RESTANTE
$CONTADOR = IniRead("..\advmenu.ini", "FICHEIRO", "CONTADOR", "0")
$VALOR = IniRead("..\advmenu.ini", "CONFIGURACAO", "TEMPOPORFICHA", "600000")
$CALCULA = ($ATUAL + Number($VALOR))
$ADICIONA = (Number($CONTADOR) + 1)
IniWrite("..\advmenu.ini", "FICHEIRO", "FICHAS", String($CALCULA))
IniWrite("..\advmenu.ini", "FICHEIRO", "CONTADOR", String($ADICIONA))
SoundPlay("..\auxiliar\som\coin.wav")
$TEMPO_RESTANTE = $CALCULA
$TEMPO_ATUAL = DllCall("kernel32.dll", "int", "GetTickCount")
$AVISADO = False
EndFunc
Func VERIFICATEMPO()
Local $ATUAL, $VALOR, $CALCULA
$ATUAL = IniRead("..\advmenu.ini", "FICHEIRO", "FICHAS", "0")
$VALOR = IniRead("..\advmenu.ini", "CONFIGURACAO", "TEMPOPORFICHA", "600000")
$CALCULA = Number($ATUAL)
If $CALCULA <= 30000 Then
$CALCULA = 30000
$AVISADO = True
SplashImageOn("", "..\auxiliar\image\mensa6.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\bloqueado.wav", 1)
Exit 0
EndIf
Return $CALCULA
EndFunc
Func GRAVATEMPO()
Local $CALCULA
$CALCULA = ($TEMPO_RESTANTE - ($TEMPO_DECORRIDO[0] - $TEMPO_ATUAL[0]))
If $CALCULA < 0 Then
IniWrite("..\advmenu.ini", "FICHEIRO", "FICHAS", "0")
Else
IniWrite("..\advmenu.ini", "FICHEIRO", "FICHAS", String($CALCULA))
EndIf
EndFunc
Local $DLL1, $RET
Sleep(1000)
$DLL1 = DllOpen(@ScriptDir & "\gpcomms.dll")
If $DLL1 <> -1 Then
$RET = DllCall($DLL1, "int", "GPSL_SetTextLineData", "int", 0, "long", 10, "long", 10, "str", "EVIANDO OK...", "dword", -256, "int", 0, "int", 24, "int", 1, "int", 0)
$RET = DllCall($DLL1, "int", "GPSL_ShowText", "int", 0, "int", 1)
EndIf
While 1
Sleep(250)
WEnd

amaral em "kawaks no advmenu"

amaral — qua, 28 abr 2010 20:30:19 +0000

@Belini
o script funcionou beleza, funcionou por tempo mas só falta uma parte, a de fechar o emulador ele volta para o menu mas o emulador continua aberto vou colocar meu script para você dar uma olhada um abração

Func FECHAR()
Local $EMULADOR, $FECHOU
HotKeySet("{ESC}")
HotKeySet("0")
If Not WinActive("classname=WinKawaks") Then
WinActivate("classname=WinKawaks")
EndIf
Sleep(100)
Send("!{F4}")
SplashImageOn("", "..\auxiliar\image\mensa6.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\fechaemu.wav", 1)
$FECHOU = WinWaitClose("classname=WinKawaks", "", 5)
If Not $FECHOU Then
ProcessClose("project64.exe")
EndIf
If ProcessExists("joytokey.exe") Then
If Not WinActive("classname=TApplication") Then
WinActivate("classname=TApplication")
EndIf
Send("{LALT}FX")
EndIf
GRAVATEMPO()
SplashOff()
$LOPPING = 0
EndFunc

amaral em "kawaks no advmenu"

amaral — ter, 27 abr 2010 19:12:18 +0000

eu vou testar e depois te falo como ficou, um abraço

Belini em "kawaks no advmenu"

Belini — ter, 27 abr 2010 13:02:31 +0000

@amaral para conseguir adicionar qualquer emulador no advancemenu antes precisa entender o que cada comando faz no script e também a função das macros no arquivo advmenu.rc, então vamos por partes.

primeiro você deve saber o que uma macro faz:
%s Passa somente o nome da rom sem a extenção. Por exemplo "pacman"
%f Passa o nome da roms com a extenção do arquivo. Por exemplo "pacman.zip"
%p Passa o caminho completo onde se encontra a rom Por exemplo "c:\emu\roms\pacman.zip"

O que é $CMDLINE[0]:
CMDLINE[0] Contém a informação de quantos parâmetros o advancemenu passou para o emulador sendo que cada parâmetro recebe um número ou seja o primeiro parâmetro passado será $CMDLINE[1], o segundo será $CMDLINE[2] e assim por diante neste exemplo $CMDLINE[0] é igual a 2 pois foram passados apenas 2 parâmetros.

agora vamos analisar o primeiro comando do seu script:
If Not $CMDLINE[0] = 1 Then
SplashImageOn("", "..\auxiliar\image\mensa1.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\advfaltajogo.wav", 1)
SplashOff()
Exit (0)
EndIf
Este primeiro comando verifica se foi passado um parâmetro pelo advancemenu ao script e caso não tenha sido passado encerra o script.

Agora o segundo comando do seu script:
If Not FileExists($CMDLINE[1]) Then
SplashImageOn("", "..\auxiliar\image\mensa1.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\advfaltajogo.wav", 1)
SplashOff()
Exit (0)
EndIf
Já este comando verifica se a rom existe pois no seu arquivo rc você esta usando a macro "%p" que passa o caminho completo da rom, caso não exista a rom encerra o script.

Para adicionar o kawakis você precisará usar duas macros "%p e %s" pois no seu script pede o caminho completo da rom para conferir se ela existe já o emulador só precisa do nome da rom sem a extensão para carregar o jogo, sendo assim você terá que colocar as 2 macros no seu arquivo advmenu.rc e também alterar os comandos no seu script veja:

#emulador kawakis
#***********************************************
emulator "kawakis" generic "D:\arcade\kawakis\aukawakis.exe" "%p %s"
emulator_roms "kawakis" "D:\arcade\kawakis\roms"
emulator_altss "kawakis" "D:\ARCADE\snap\kawakis"
#***********************************************

Colquei os endereços do jeito que achei melhor e caso os arquivos estejam em outro lugar mude o endereço, agora que já tem as 2 macros no arquivo advmenu.rc vamos alterar os comandos do script:

If $CMDLINE[0] < 2 Then; se não for passado pelo menos 2 parâmetros encerra o script
SplashImageOn("", "..\auxiliar\image\mensa1.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\advfaltajogo.wav", 1)
SplashOff()
Exit (0)
EndIf

If Not FileExists($CMDLINE[1]) Then; se a rom não existir encerra o script
SplashImageOn("", "..\auxiliar\image\mensa1.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\advfaltajogo.wav", 1)
SplashOff()
Exit (0)
EndIf

agora vamos mudar a linha que executa o emulador, troque os comandos que executam o n64 pelo comando que executa o kawakis veja:

$EXE_MAME = ShellExecute("project64.exe", $CMDLINE[1], @ScriptDir, "open", @SW_SHOWNORMAL); retire esta linha

$EXE_MAME = ShellExecute("WinKawaks.exe", $CMDLINE[2] &" " & "-fullscreen"); coloque esta no lugar da que tirou

Repare que na linha que executa o n64 foi usado $CMDLINE[1] e nesta outra foi usado o $CMDLINE[2] isto porque aqui só precisamos do nome da rom e no n64 precisamos do caminho completo com o nome no final, espero que tenha entendido o processo agora após modificar o script faça a compilação e mude o nome para aukawakis.exe e não se esqueça que ele deve ficar na mesma pasta onde esta o emulador.

amaral em "kawaks no advmenu"

amaral — ter, 27 abr 2010 10:33:50 +0000

a minha multijogos comercial que comecei a projetar graças ao brbranco, sem os arquivos que ele disponibilizou para download eu nunca iria conseguiu, adicionei esses emuladores todos funcionando

#emulador mame
#***********************************************
emulator "ARCADE" generic "D:\arcade\mame\aumame.exe" "%s"
emulator_roms "ARCADE" "D:\ARCADE\MAME\ROMS"
emulator_altss "ARCADE" "D:\ARCADE\snap\mame;..\mng"
emulator_roms_filter "ARCADE" "*.zip"
#***********************************************

#emulador model2
#***********************************************
emulator "MODEL2" generic "D:\arcade\Model2\model2.exe" "%s"
emulator_roms "MODEL2" "D:\arcade\Model2\ROMS"
emulator_altss "MODEL2" "D:\ARCADE\snap\model2"
emulator_roms_filter "MODEL2" "*.zip"
#***********************************************

#emulador cps3
#***********************************************
emulator "CPS3" generic "D:\arcade\CPS3\cps3.exe" "%s"
emulator_roms "CPS3" "D:\arcade\CPS3\roms"
emulator_altss "CPS3" "D:\ARCADE\snap\cps3"
emulator_roms_filter "CPS3" "*.zip"
#***********************************************

#emulador supernes
#***********************************************
emulator "SUPERNES" generic "D:\arcade\ZSNESW\auSnes.exe" "%p"
emulator_roms "SUPERNES" "D:\arcade\ZSNESW\roms"
emulator_altss "SUPERNES" "D:\ARCADE\snap\ZSNESW"
emulator_roms_filter "SUPERNES" "*.SMC"
#***********************************************

#emulador n64
#***********************************************
emulator "n64" generic "D:\arcade\n64\aun64.exe" "%p"
emulator_roms "n64" "D:\arcade\n64\roms"
emulator_altss "n64" "D:\ARCADE\snap\n64"
emulator_roms_filter "n64" "*.zip"
#***********************************************

#emulador megadrive
#***********************************************
emulator "megadrive" generic "D:\arcade\megadrive\augens.exe" "%p"
emulator_roms "megadrive" "D:\arcade\megadrive\roms"
emulator_altss "megadrive" "D:\arcade\snap\megadrive"
emulator_roms_filter "megadrive" "*.zip"
#***********************************************

agora eu queria adicionar o kawaks mas queria colocar ele por tempo, alguem pode me ajudar? com o script?