amaral
> Moderador

ok amaral obrigado entao eu ate consegui fazer funcionar com um script aqui q vou te enviar o problema é o seguinte quando entra no emulador do future pinball chama o script e o joytokey, mas o j q é de sair e o k no meu caso da ficha funciona somente quando o future pinball perde o foco se o future pinball entra normal sem perder o foco, o q acontece q as tecla j de sair e k de ficha nao funciona, nao sei pq os outros emuladores vao normal, testei no windows 7 e 10, mas a mesma coisa, mas nao tem a ver com o windows, nao sei o q pode ser, e mesmo sem joytokey so usando o hotkey tmb da na mesma.
da uma olhada ai no script e ve se consegue me ajudar o brigado amaral

;ajustas as opções
AutoItSetOption("WinTitleMatchMode", 4)
AutoItSetOption("RunErrorsFatal", 0)

FileChangeDir(@ScriptDir)
HotKeySet("j", "FechaEmulador") ;intala o hotkey, para capturar a tecla "P", saida
HotKeySet("k", "PegaFicha") ;intala o hotkey, usando a tecla "K" , ficha
HotKeySet("1", "EnviaFicha") ;intala o hotkey, usando a tecla "1", start



;chama o emulador
$executa= ShellExecute("FuturePinball.exe", "/open " &'"' & $CmdLine[1] &'"' &" /play /exit", @SW_SHOWNORMAL)
If @error Then
SplashImageOn("", "..\auxiliar\image\mensa5.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\erroemuexe.wav")
SplashOff()
Exit(0)
EndIf



WinWaitActive("classname=Future Pinball", "",10)



EnviaFicha();

;rotina de loop
GLOBAL $lopping
$lopping=1
While $lopping
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("j")
HotKeySet("k")
HotKeySet("1")


;envia um ESC para o emulador
if Not WinActive("classname=Future Pinball") Then
WinActivate ("classname=Future Pinball")
EndIf

Sleep(100)
Send("!{F4}")
While ProcessExists("FuturePinball.exe")
processClose("FuturePinball.exe")
Wend

;mostra a menssagem
SplashImageOn("", "..\auxiliar\image\mensa6.gif", 220, 40, -1, -1, 1)
SoundPlay("..\auxiliar\som\fechaemu.wav",1)
$fechou=WinWaitClose("classname=Future Pinball","", 5)
if Not $fechou Then
ProcessClose($mamepar1)
EndIf


SplashOff()
;encerra a rotina principal
$lopping=0
EndFunc

;função responssavel por armazenar as fichas
Func PegaFicha()
Local $atual, $valor, $contador, $calcula, $adiciona
;lê os dados atuais
$atual=IniRead("..\advmenu.ini","FICHEIRO","FICHAS ","0")
$contador=IniRead("..\advmenu.ini","FICHEIRO","CON TADOR","0")
$valor=IniRead("..\advmenu.ini","CONFIGURACAO","TE MPOPORFICHA","600000")
$calcula=(Number($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")
EndFunc

;;função responssavel por enviar a ficha para o emulador
Func EnviaFicha()
Local $atual, $valor, $calcula
;lê os dados atuais
$atual=IniRead("e:\arcade\advmenu.ini","FICHEIRO", "FICHAS","0")
$valor=IniRead("e:\arcade\advmenu.ini","CONFIGURAC AO","TEMPOPORFICHA","600000")

;Envia ficha+start
If (Number($atual) > Number($valor) Or Number($atual) = Number($valor)) Then
HotKeySet("1")
Send("{5 down}")
Sleep(100)
Send("{5 up}")
Sleep(300) ; <<<<<< aumente o valor aqui para aumentar o intervalo entre o envio das teclas
Send("{1 down}")
Sleep(100)
Send("{1 up}")
HotKeySet("1", "EnviaFicha")

;atualiza a quantidade de fichas
$calcula = (Number($atual) - Number($valor))
IniWrite("e:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", String($calcula))

Else
SoundPlay("e:\ARCADE\auxiliar\som\semficha.wav") ;informa que não há mais fichas
Return ;sai sem enviar a ficha
EndIf

EndFunc

@ninjitsu12
eu teria que conhecer a estrutura do future pimbal e entender o funcionamento,dessa forma não seria dificil fazer vou baixar aqui e dar uma olhada e te falo

ola amaral blz,vc poderia responder a minha pergunta q eu fiz nas perguntas do autoit? pq esta meio parado e ninguem me responde, a pergunta q eu fiz foi essa

ola amigos, estou precisando de um script quando eu chama-se o future pinball ele abrisse o joytokey e carregasse a configuracao do cfg q se chama pinball e quando eu sair do future pinball o joytokey fecha.
nao sei como fazer qualquer ajuda agradeco Obrigado
Obs estou usando o future pinball no attract mode, nao sei se tem algum argumento q eu possa colocar no cfg do future pinball

Eu estou aqui querendo fazendo um sistema e ajeitando source, amaral vendo os post para ver se consigo deixa ele bom e funcionando direitinho.

cria um topico que vou ajudando

amigo estou com problema no sitema advmenu plus eu tenho tds os arquivos para colocar ela por tempo mas e nao estou conseguindo adicionar acho estou fazendo alguma coisa errda, vc pode me ajudar

meu amigo vc ta no caminho certo

Bonita atitide Caio humildade e respeito com as pessoas, somos sujeitos e acertos somos seres humanos.

Estou aqui, mais uma vez, para lhe dizer que estou muito triste por ter me expressado mal, talvez, e com isso ter chateado você.

Mas dizem que a maior vitória de uma pessoa é reconhecer o seu erro, e eu sei que errei, e reconheço meu erro.

Por isso quero lhe dizer que me arrependo muito de tudo que lhe disse, foi um ato sem pensar. Peço desculpas pelo constrangimento que lhe causei!

modificações no codigo fonte do advmenu plus, tem como enviar? posso configurar e adicionar themas e novos emuladores