+ Responder ao Tópico
Resultados 1 a 5 de 5

Tópico: script do psxmame

  1. #1
    > Moderador amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio Avatar de amaral
    Data de Ingresso
    02/2010
    Localização
    Nova Iguaçu
    Posts
    4.262
    Mentioned
    458 Post(s)
    Tagged
    0 Thread(s)
    Reputação
    335


    alguem pode me ajudar a fazer um script para o psxmame por tempo? tentei adaptar o do snes mas não consegui ,da que o advance menu não passou o nome do jogo

    e tambem não consegui alterar a tecla para sair do emulador alguem pode ajudar?

    "nós devemos amar nossos inimigos"


  2. #2
    Jogador de Virtua Fighter (1994) leonado81 É um desconhecido no momento
    Data de Ingresso
    07/2009
    Posts
    134
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Reputação
    0


    AMARAL,tenho esse do play 1 só que não consegui colocar para funcionar,mas garanto q funciona pq foi o bleachgames q me passou ,é q não tive tempo de testar melhor:


    tenta usar esse outro script no lugar do anterior


    ;ajustas as opções

    AutoItSetOption("MustDeclareVars", 1) ; obriga as declarações das variaveis

    AutoItSetOption("WinTitleMatchMode", 4) ; as janelas são pesquisadas por classes


    ;verifica se o advmenu passou o nome da rom

    If NOT $CmdLine[0] = 1 Then

    MsgBox(0,"Erro","Não foi passado nenhum parametro para o script.")

    Exit ( 0 )

    EndIf


    ;essa linha irá fazer com que a variavel $CM

    ;fique com o caminho completo + o nome da ISO

    $CM = $CmdLine[1]


    ;aqui é verificado se a ISO existe

    If Not FileExists($CM) Then

    MsgBox(0,"Erro","O arquivo " & $CM & @CRLF & "Não foi localizado.")

    Exit 0

    EndIf


    ;executa o emulador

    $executa=ShellExecute("epsxe.exe","", @ScriptDir, "open", @SW_SHOWNORMAL)

    If @error Then

    MsgBox(0,"Erro","Ocorreu um erro ao tentar abrir o emulador")

    Exit 0

    EndIf


    ;envia as teclas para abrir a janela open

    Sleep(1000)

    Send("!{f}")

    Send("o")

    ;aguarda a janela open file

    $espera=WinWaitActive("classname=#32770", "",10)

    Sleep(1000)


    ;digita o caminho na janela file open

    Send($CM)

    Sleep(1000)

    Send("!{a}")

    ;envia um f4 e f2 para executar o jogo

    Send("{F4}")

    Sleep(1000)

    Send("{F2}")


    ;rotina de loop

    Global $TEMPO_RESTANTE, $TEMPO_ATUAL, $TEMPO_DECORRIDO, $AVISADO, $lopping


    ;atualiza de 1 em 1 minuto

    $INTERVALO=0


    ;quando faltar 1 minuto

    $AVISADO=False


    ;verifica quanto tempo tem de ficha

    $TEMPO_RESTANTE=VerificaTempo()


    ;abre o joytokey

    $drive=StringLeft(@ScriptDir,2)

    If Not ProcessExists("joytokey.exe") Then

    $exe_joy = ShellExecute("joytokey.exe", "snes", $drive & "\arcade\joytokey")

    if @error Then

    SplashImageOn("", "..\auxiliar\image\mensa4.gif", 220, 40, -1, -1, 1)

    Sleep(10000)

    SplashOff()

    FechaEmulador()

    Exit(0)

    EndIf

    Else

    Sleep(2000)

    EndIf


    WinWaitActive("classname=EPSXEWIN", "",10)

    HotKeySet("p", "FechaEmulador") ;intala o hotkey, para capturar a tecla "P", saida

    HotKeySet("k", "PegaFicha") ;intala o hotkey, usando a tecla "K" , ficha


    $lopping=1

    $TEMPO_ATUAL=DllCall("kernel32.dll", "int", "GetTickCount")

    While $lopping

    ;atualiza o tempo jogado

    $TEMPO_DECORRIDO=DllCall("kernel32.dll", "int", "GetTickCount")


    ;fecha o emulador quando o tempo da ficha for atingido

    If $TEMPO_RESTANTE <= ($TEMPO_DECORRIDO[0] - $TEMPO_ATUAL[0]) Then

    $TEMPO_RESTANTE=0

    FechaEmulador()

    ExitLoop

    EndIf


    ;atualiza os contadores a cada 1 minuto (600 * 100)

    If $INTERVALO >=600 Then

    GravaTempo()

    $INTERVALO=0

    EndIf


    ;avisa quando faltar somente 1 minuto

    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)


    ;função que irá verificar o estado do emulador e fecha-lo caso necessario

    Func FechaEmulador()

    Local $emulador, $fechou


    ;remove os hotkeys

    HotKeySet("p")

    HotKeySet("k")


    ;envia um ESC para o emulador

    if Not WinActive("classname=EPSXEWIN") Then

    WinActivate ("classname=EPSXEWIN")

    EndIf


    Send("{ESC DOWN}")

    Sleep(100)

    Send("{ESC UP}")


    ;mostra a menssagem

    SplashImageOn("", "..\auxiliar\image\mensa6.gif", 220, 40, -1, -1, 1)

    SoundPlay("..\auxiliar\som\fechaemu.wav",1)

    $fechou=WinWaitClose("classname=EPSXEWIN","", 5)

    if Not $fechou Then

    ProcessClose("zsnesw.exe")

    EndIf


    ;fecha o joytokey

    If ProcessExists("joytokey.exe") Then

    if Not WinActive("classname=TApplication") Then

    WinActivate ("classname=TApplication")

    EndIf

    Send("{LALT}FX")

    EndIf


    ;atualiza o banco de dados

    GravaTempo()

    SplashOff()

    $lopping=0

    EndFunc


    ;função responssavel por armazenar as fichas

    Func PegaFicha()

    Local $atual, $valor, $contador, $calcula, $adiciona

    ;lê os dados atuais

    $atual=$TEMPO_RESTANTE

    $contador=IniRead("..\advmenu.ini","FICHEIRO","CON TADOR","0")

    $valor=IniRead("..\advmenu.ini","CONFIGURACAO","TE MPOPORFICHA","600000")

    $calcula=($atual + Number($valor))

    $adiciona=(Number($contador)+1)

    ;grava os novos valores

    IniWrite("..\advmenu.ini","FICHEIRO","FICHAS",Stri ng($calcula))

    IniWrite("..\advmenu.ini","FICHEIRO","CONTADOR",St ring($adiciona))

    SoundPlay("..\auxiliar\som\coin.wav")

    $TEMPO_RESTANTE=$calcula

    $TEMPO_ATUAL=DllCall("kernel32.dll", "int", "GetTickCount")

    $AVISADO=False

    EndFunc


    ;função responssavel por verificar o tempo pela primeira vez

    Func VerificaTempo()

    Local $atual, $valor, $calcula

    ;lê os dados atuais

    $atual=IniRead("..\advmenu.ini","FICHEIRO","FICHAS ","0")

    $valor=IniRead("..\advmenu.ini","CONFIGURACAO","TE MPOPORFICHA","600000")


    ;atualiza a quantidade de fichas

    $calcula=Number($atual)

    If $calcula <= 30000 Then

    $calcula=30000 ;caso não tenha ficha dá 30 segundos para ver o jogo

    $AVISADO=True

    SoundPlay("..\auxiliar\som\falta30.wav", 1)

    EndIf

    Return $calcula

    EndFunc


    ;função para atualiza o banco de dados

    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",Stri ng($calcula))

    EndIf

    EndFunc


    E para mudar a tecla vc tem q mudar no JOYTOCKEY, então se está na tecla 9(não é o botão 9 do teclado),É DO JOYTOCKEY MESMO, é so colocar em outro botão do JOYTOCKEY o q equivale a tecla 9 DO TECLADO.


  3. #3
    > Moderador amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio amaral Ótima reputação além de muito prestígio Avatar de amaral
    Data de Ingresso
    02/2010
    Localização
    Nova Iguaçu
    Posts
    4.262
    Mentioned
    458 Post(s)
    Tagged
    0 Thread(s)
    Reputação
    335


    eu baixei o emulador psxmame, ele roda normalmente as roms do zinc e eu queria saber tambem se el roda outras roms? vou testar aqui esse script e falo os resultados

    "nós devemos amar nossos inimigos"


  4. #4
    Jogador de Kinect Adventures (2010) peixonauta É um desconhecido no momento
    Data de Ingresso
    07/2019
    Localização
    rio de janeiro
    Posts
    1
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Reputação
    0

    Re: script do psxmame

    ei amigo pode me passar o script do emulador snes

  5. #5
    Jogador de Altered Beast (1989) Wilson755 Seu nome é conhecido por todos Wilson755 Seu nome é conhecido por todos Wilson755 Seu nome é conhecido por todos Wilson755 Seu nome é conhecido por todos Wilson755 Seu nome é conhecido por todos Wilson755 Seu nome é conhecido por todos Avatar de Wilson755
    Data de Ingresso
    02/2018
    Localização
    Macatuba/SP
    Posts
    191
    Posts de Blog
    2
    Mentioned
    18 Post(s)
    Tagged
    0 Thread(s)
    Reputação
    38

    Re: script do psxmame

    Citação Postado originalmente por peixonauta Ver Post
    ei amigo pode me passar o script do emulador snes

    Aqui tem uns exemplos que podem te ajudar

    http://www.arcadebr.com/threads/1940...t=Script+zsnes

    http://www.arcadebr.com/archive/index.php/t-2856.html

+ Responder ao Tópico

Tópicos Similares

  1. COMO ADICIONAR PSXMAME NO ADVMENU...
    Por billygames no fórum ADVMENU
    Respostas: 73
    Último Post: 10/05/2011, 22:06
  2. adicionar psxmame no advmenu
    Por TREBEH no fórum ADVMENU
    Respostas: 3
    Último Post: 20/05/2010, 17:04
  3. Source pSxMAME
    Por mutleey no fórum Dúvidas sobre a compilação
    Respostas: 6
    Último Post: 17/04/2010, 03:47

Marcadores

Permissões de Postagem

  • Você não pode iniciar novos tópicos
  • Você não pode enviar respostas
  • Você não pode enviar anexos
  • Você não pode editar suas mensagens
  • BB Code está Ligado
  • Smilies estão Ligados
  • Código [IMG] está Ligado
  • Código HTML está Desligado