66 Mensagens de Visitantes

  1. Ver Conversa
    vc sabe como eu asseçar o menu na multijogos depois q eu entar no advem,enu tipo aquele q eu salvo minutos fichas sera q da .
  2. Ver Conversa
    TA AI O VIDEO DO ERRO NO SUPERNES.
    http://www.youtube.com/watch?v=Q1GhAB2DrxU
  3. Ver Conversa
    caras fui fuçando até conseguir valeu mesmo tanto de pc como de ps2 ta no meio da tela embaixo só no znes fica piscando o contador por sera.
  4. Ver Conversa
    como ficaria no seu pois na entendo nada
    func contador()
    ;Variaveis das mensagens para tela de 1024x 768 ou menos
    local $Hx=@DesktopWidth ;Lê a largura da resolução do monitor (Horizontal)
    Local $tfonte1=36 ;tamanho da fonte da fonte de baixo
    Local $vertical1=7; posição vertical da fonte de baixo
    Local $horizontal1=51 ; posição horizontal da fonte de baixo
    Local $tfonte2=36 ;tamanho da fonte da fonte de cima
    Local $vertical2=724; posição vertical da fonte de cima
    Local $horizontal2=48 ; posição horizontal da fonte de cima
    local $dll_dx,$ret1,$ret2,$lbl1
    local $dll_dx,$ret1,$lbl1,$tempo,$temporizador,$horas,$m inutos, onde trocaria ai ta diferente
  5. Na verdade eu fui alterando os valores para ver onde ficava melhor então o contador ando por todas as partes da tela, esse contador.ini e so o contador de ps2 que tem o de pc vc tem que mudar os valores e compilar novamente.
  6. Ver Conversa
    como vc faz esse calculo pra chegar a esse resultado vc sabe.
  7. Ver Conversa
    o contador no suoernes nem aparece parece q o emuladro do brbranco ta 640x480 por favor como vc colocou no meio da tela em baixo eu tentei mudar até sumiu depois coloquei outro no lugar agradeço a atençao,
  8. Ver Conversa
    deu certo ai
  9. Ver Conversa
    estou mandando o setup do emuladro + table e o script é esse
    http://www.2shared.com/fadmin/451450...nball.rar.html


    script

    AutoItSetOption("MustDeclareVars", 1) ; obriga as declarações das variaveis
    AutoItSetOption("WinTitleMatchMode", 4) ; as janelas são pesquisadas por classes
    Local $drive, $exe_joy
    ;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
    Local $CM
    ;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
    ;chama o emulador, o -m= não mostrar a interface gráfica, -j=desabilitar o mouse
    $executa = ShellExecute("Future Pinball.exe", "-m -j " & $CmdLine[1], @ScriptDir, "open", @SW_SHOWNORMAL)
    If @error Then
    MsgBox(0, "Erro", "Ocorreu um erro ao tentar abrir o emulador")
    Exit 0
    EndIf
    Sleep(1000)
    BlockInput(0)
    ;envia as teclas para abrir a janela open
    Sleep(4000)
    Send("!{alt}")
    Sleep(100)
    Send("{down}")
    Sleep(100)
    Send("{down}")
    Sleep(100)
    Send("{enter}")
    ;aguarda a janela open file
    $espera = WinWaitActive("classname=#32770", "", 10)
    Sleep(1000)
    ;digita o caminho na janela file open
    Send($CM)
    Sleep(100)
    Send("{enter}")
    BlockInput(0)
    Sleep(8000)
    Send("{f5}")
    ;rotina de loop
    Global $TEMPO_RESTANTE, $TEMPO_ATUAL, $TEMPO_DECORRIDO, $AVISADO, $lopping, $INTERVALO
    ;atualiza de 1 em 1 minuto
    $INTERVALO = 0
    ;quando faltar 1 minuto
    $AVISADO = False
    ;verifica quanto tempo tem de ficha
    $TEMPO_RESTANTE = VerificaTempo()
    WinWaitActive("classname=Future Pinball", "", 10)
    HotKeySet("j", "FechaEmulador") ;intala o hotkey, para capturar a tecla "J", 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("j")
    HotKeySet("k")
    ;envia um esc para o emulador
    If Not WinActive("classname=Future Pinball") Then
    WinActivate("classname=Future Pinball")
    EndIf
    Sleep(100)
    Send("{F4}")
    Sleep(1000)
    Send("{F4}")
    Sleep(100)
    Local $fechou
    Sleep(100)
    ProcessExists("Future Pinball.exe")
    ProcessClose("Future Pinball.exe")
    ;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("Future Pinball.exe")
    EndIf

    ;atualiza o banco de dados
    GravaTempo()
    SplashOff()
    $lopping = 0
    EndFunc ;==>FechaEmulador
    ;função responssavel por armazenar as fichas
    Func PegaFicha()
    Local $atual, $valor, $contador, $calcula, $adiciona
    ;lê os dados atuais
    $atual = $TEMPO_RESTANTE
    $contador = IniRead("C:\ARCADE\advmenu.ini", "FICHEIRO", "CONTADOR", "0")
    $valor = IniRead("C:\ARCADE\advmenu.ini", "CONFIGURACAO", "TEMPOPORFICHA", "600000")
    $calcula = ($atual + Number($valor))
    $adiciona = (Number($contador) + 1)
    ;grava os novos valores
    IniWrite("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", String($calcula))
    IniWrite("C:\ARCADE\advmenu.ini", "FICHEIRO", "CONTADOR", String($adiciona))
    SoundPlay("C:\ARCADE\auxiliar\som\coin.wav")
    $TEMPO_RESTANTE = $calcula
    $TEMPO_ATUAL = DllCall("kernel32.dll", "int", "GetTickCount")
    $AVISADO = False
    EndFunc ;==>PegaFicha
    ;função responssavel por verificar o tempo pela primeira vez
    Func VerificaTempo()
    Local $atual, $valor, $calcula
    ;lê os dados atuais
    $atual = IniRead("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS ", "0")
    $valor = IniRead("C:\ARCADE\advmenu.ini", "CONFIGURACAO", "TEMPOPORFICHA", "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 ;==>VerificaTempo
    ;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("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", "0")
    Else
    IniWrite("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", String($calcula))
    EndIf
    EndFunc ;==>GravaTempo


    é só instalar e colocar esse script junto da pasta do emulador
  10. Ver Conversa
    pra fechar o future pinball eu tenho q usar 2 vezes o alt+f4 poderia ajudar segue o script

    AutoItSetOption("MustDeclareVars", 1) ; obriga as declarações das variaveis
    AutoItSetOption("WinTitleMatchMode", 4) ; as janelas são pesquisadas por classes
    Local $drive, $exe_joy
    ;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
    Local $CM
    ;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
    Local $executa, $espera
    ;chama o emulador, o -m= não mostrar a interface gráfica, -j=desabilitar o mouse
    $executa = ShellExecute("Future Pinball.exe", "-m -j " & $CmdLine[1], @ScriptDir, "open", @SW_SHOWNORMAL)
    If @error Then
    MsgBox(0, "Erro", "Ocorreu um erro ao tentar abrir o emulador")
    Exit 0
    EndIf
    Sleep(1000)
    BlockInput(0)
    ;envia as teclas para abrir a janela open
    Sleep(4000)
    Send("!{alt}")
    Sleep(100)
    Send("{down}")
    Sleep(100)
    Send("{down}")
    Sleep(100)
    Send("{enter}")
    ;aguarda a janela open file
    $espera = WinWaitActive("classname=#32770", "", 10)
    Sleep(1000)
    ;digita o caminho na janela file open
    Send($CM)
    Sleep(100)
    Send("{enter}")
    BlockInput(0)
    Sleep(8000)
    Send("{f5}")
    ;rotina de loop
    Global $TEMPO_RESTANTE, $TEMPO_ATUAL, $TEMPO_DECORRIDO, $AVISADO, $lopping, $INTERVALO
    ;atualiza de 1 em 1 minuto
    $INTERVALO = 0
    ;quando faltar 1 minuto
    $AVISADO = False
    ;verifica quanto tempo tem de ficha
    $TEMPO_RESTANTE = VerificaTempo()
    WinWaitActive("classname=Future Pinball", "", 10)
    HotKeySet("p", "FechaEmulador") ;intala o hotkey, para capturar a tecla "p", saida
    HotKeySet("5", "PegaFicha") ;intala o hotkey, usando a tecla "5" , 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)
    func FechaEmulador(); função que fecha o emulador e o script

    HotKeySet("p"); remove a hotkey "p"

    Send("!{F4}"); envia um alt + f4

    exit;


    sleep(100)

    if ProcessExists("Future Pinball.exe") Then

    ProcessClose("Future Pinball.exe")

    endif


    ;mostra a menssagem
    SplashImageOn("", "..\auxiliar\image\mensa6.gif", 220, 40, -1, -1, 1)
    SoundPlay("..\auxiliar\som\fechaemu.wav", 1)


    ProcessClose("Future Pinball.exe")


    ;atualiza o banco de dados
    GravaTempo()
    SplashOff()
    $lopping = 0
    EndFunc ;==>FechaEmulador
    ;função responssavel por armazenar as fichas
    Func PegaFicha()
    Local $atual, $valor, $contador, $calcula, $adiciona
    ;lê os dados atuais
    $atual = $TEMPO_RESTANTE
    $contador = IniRead("C:\ARCADE\advmenu.ini", "FICHEIRO", "CONTADOR", "0")
    $valor = IniRead("C:\ARCADE\advmenu.ini", "CONFIGURACAO", "TEMPOPORFICHA", "600000")
    $calcula = ($atual + Number($valor))
    $adiciona = (Number($contador) + 1)
    ;grava os novos valores
    IniWrite("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", String($calcula))
    IniWrite("C:\ARCADE\advmenu.ini", "FICHEIRO", "CONTADOR", String($adiciona))
    SoundPlay("C:\ARCADE\auxiliar\som\coin.wav")
    $TEMPO_RESTANTE = $calcula
    $TEMPO_ATUAL = DllCall("kernel32.dll", "int", "GetTickCount")
    $AVISADO = False
    EndFunc ;==>PegaFicha
    ;função responssavel por verificar o tempo pela primeira vez
    Func VerificaTempo()
    Local $atual, $valor, $calcula
    ;lê os dados atuais
    $atual = IniRead("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS ", "0")
    $valor = IniRead("C:\ARCADE\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 ;==>VerificaTempo
    ;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("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", "0")
    Else
    IniWrite("C:\ARCADE\advmenu.ini", "FICHEIRO", "FICHAS", String($calcula))
    EndIf
    EndFunc ;==>GravaTempo

    agradeço a atençao eu tambem logo estarei em tornando vip.pois o site merece me ajudou muito e continua me ajudando.
Exibindo Mensagens de Visitantes 31 a 40 de 66
Página 4 de 7 PrimeiroPrimeiro 1 2 3 4 5 6 7 ÚltimoÚltimo
Página 4 de 7 PrimeiroPrimeiro 1 2 3 4 5 6 7 ÚltimoÚltimo
Sobre alextecsony

Informações Básicas


Sobre alextecsony
Biografia
https://www.facebook.com/lex.prata
Localização
São Paulo
Ocupação
tec. eletrônica e Info

Assinatura


Contato


Esta Página
http://www.arcadebr.com/members/8429-alextecsony?s=5299155973d514e1d4dc78fc09b39c67
Mensagens Instantâneas

Enviar Mensagem Instantânea a alextecsony Usando...

Estatísticas


Mensagens Totais
Mensagens Totais
170
Mensagens Por Dia
0,06
Último Post
Artigo: Aprenda como instalar o Recalbox no Raspberry Pi 11/01/2019 02:49
Mensagens de Visitantes
Total de Mensagens
66
Mensagem Mais Recente
17/03/2018 15:33
Informações Gerais
Última Atividade
1 Dia Atrás
Data de Ingresso
01/06/2012
Referências
2

7 Amigos

  1. airheadairhead está desconectado

    > Usuário VIP

    airhead
  2. CAPACITORCAPACITOR está desconectado

    Mestre dos Arcades Caseiros

    CAPACITOR
  3. esiocostaesiocosta está desconectado

    Mestre dos Arcades Caseiros

    • Enviar mensagem por MSN para esiocosta
    esiocosta
  4. FLIPER-MANIAFLIPER-MANIA está desconectado

    Jogador de Street Fighter IV (2009)

    FLIPER-MANIA
  5. lindersonlinderson está desconectado

    Jogador de Halo (2001)

    linderson
  6. michel almeidamichel almeida está desconectado

    > Usuário VIP

    michel almeida
  7. vargas310vargas310 está desconectado

    Jogador de Enduro (1983)

    vargas310
Exibindo Amigos 1 a 7 de 7
Página 4 de 9 PrimeiroPrimeiro 1 2 3 4 5 6 7 8 ... ÚltimoÚltimo

07/04/2015


06/04/2015


04/04/2015


28/03/2015


27/03/2015


14/03/2015


07/03/2015


06/03/2015


01/03/2015


27/02/2015


26/02/2015


23/02/2015



Página 4 de 9 PrimeiroPrimeiro 1 2 3 4 5 6 7 8 ... ÚltimoÚltimo
No results to display...
Página 4 de 8 PrimeiroPrimeiro 1 2 3 4 5 6 7 8 ÚltimoÚltimo

30/12/2014


29/12/2014


28/12/2014


26/12/2014


24/12/2014


11/12/2014


06/12/2014


02/12/2014


27/11/2014


25/11/2014


18/11/2014


07/11/2014


06/11/2014


05/11/2014



Página 4 de 8 PrimeiroPrimeiro 1 2 3 4 5 6 7 8 ÚltimoÚltimo