69 Mensagens de Visitantes

  1. Ver Conversa
    coloquei mas ele fica aberto ainda
    ;função que fecha o emulador.
    Func FechaEmulador()
    ;remove as hotkeys
    HotKeySet("8")

    ProcessClose("contador ALEX TESTE.exe.")


    ;fecha o emulador forçado
    If ProcessExists("game.exe") Then
    ProcessClose("game.exe")
    EndIf

    $lopping = 0
    EndFunc estou usando o seu contador
  2. testei esse contador nos jogos de pcs e dreancast todos os jogos de pc que testei funcionou se não aparecer em alguns jogos tem que verificar a resolução dos jogos.

    ;função que fecha o emulador.
    Func FechaEmulador()
    ;remove as hotkeys
    HotKeySet("8")

    ProcessClose(" o nome do contador.exe")

    ;fecha o emulador forçado
    If ProcessExists("game.exe") Then
    ProcessClose("game.exe")

    EndIf

    $lopping = 0
    EndFunc
  3. Ver Conversa
    sim testei o seu e ficou show agora como q faço pra fechar ele junto ao script de pc pois quando fecgho o advemenu ele fica aberto na barra segue o script de oc se puder ajuadrr agradeço muito ,nao tenho muita coisa a oferecer mas se eu puder ajudar e´so falar .
    ;****************************************
    ;Autoit V3
    ;Autor brbranco
    ;Data 22/04/2008
    ;Objetivo: Controlar o emulador PCGAMES.exe
    ;****************************************

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


    SplashImageOn("", "..\auxiliar\image\logo.bmp", 220, 40, -1, -1, 1)
    Sleep(7000)
    splashOff()

    ;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()

    ;verifica se o advmenu passou o nome da rom
    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


    ;verifica se a rom passada pela macro "%p" existe.
    If Not FileExists($CmdLine[1]) Then
    MsgBox(0,"Erro", "O jogo " & $CmdLine[1] & ", passado pelo advmenu não foi localizado", 15)
    Exit(0)
    EndIf

    ;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

    ;chama o emulador ou jogos de pc
    $EXE_MAME = ShellExecute("" & $CMDLINE[1], @ScriptDir)
    ShellExecute("Mostrar um contador ALEX TESTE.exe.", "", "C:\ARCADE\PCGAMES\roms\Street Fighter X Tekken", "open")
    Sleep(5000)
    SplashOff()
    If @error Then
    ;SplashImageOn("", "..\auxiliar\image\mensa5.gif", 220, 40, -1, -1, 1)
    ;SoundPlay("..\auxiliar\som\erroemuexe.wav")
    SplashOff()
    EXIT (0)
    EndIf


    WinWaitActive("classname=game", "",10)
    HotKeySet("p", "FechaEmulador") ;intala o hotkey, para capturar a tecla "P", saida
    HotKeySet("7", "PegaFicha") ;intala o hotkey, usando a tecla "7ESCMM" , 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 fecha o emulador.
    Func FechaEmulador()
    ;remove as hotkeys
    HotKeySet("8")

    ;fecha o emulador forçado
    If ProcessExists("game.exe") Then
    ProcessClose("game.exe")
    EndIf

    $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

    o q eu pude ajudar a turma foi no sega model 3 e o pcsx2.
  4. esse erro da quando copiase do autoit e posta aqui voce tem o advmenu.ini da multijogos caseira adiciona ficha quando iniciar o contador ele nao mostra o contador 00:00 ja zera e diz que nao tem mas ficha
  5. aqui alex

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=D:\00 BACKUP DE DADOS\00 ARQUIVOS ARCADE\07 Icones\11.ico
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <WinAPI.au3>
    ;ajustas as opções
    AutoItSetOption("WinTitleMatchMode", 4)
    Const $COR1 = 0xf0000000 ;ALPHA,RGB = preto
    Const $COR2 = 0xf0ffffff ;ALPHA,RGB = branco
    Const $COR3 = 0xf0ff0000 ;ALPHA,RGB = vermelho
    AdlibRegister("contador",100) ; aciona a função no intervalo determinado
    local $diminui,$tempo
    While 1
    $tempo=IniRead("C:\ARCADE\advmenu.ini","FICHEIRO", "FICHAS","0"); pega a informação de fichas do advmenu.ini
    $diminui=(Number($tempo)-1000); diminui 1 segundo
    IniWrite("C:\ARCADE\advmenu.ini","FICHEIRO","ficha s",String($diminui)); grava no arquivo ini
    sleep(1000); aguarda 1 segundo
    WEnd
    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=724; 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,$segundos
    $dll_dx=DllOpen(@ScriptDir & "\gpcomms.dll");abre a dll que faz um gancho
    If $dll_dx == -1 Then
    Exit 0
    EndIf
    ;Variaveis das mensagens para tela de 640 x 480 ou menos
    if $Hx = 640 then
    $tfonte1=29 ;tamanho da fonte da fonte de baixo
    $vertical1=453 ; posição vertical da fonte de baixo
    $horizontal1=31; posição horizontal da fonte de baixo
    $tfonte2=29 ;tamanho da fonte da fonte de cima
    $vertical2=453 ; posição vertical da fonte de cima
    $horizontal2=28 ; posição horizontal da fonte de cima
    EndIf
    $tempo=IniRead("C:\ARCADE\advmenu.ini","FICHEIRO", "FICHAS","0"); pega a informação de fichas do advmenu.ini
    $temporizador = "00:00:00"; formato do contador
    $horas = Int($tempo / 3600000); converte o valor em horas
    $minutos =Int(Mod($tempo, 3600000) / 60000 ); converte o valor em minutos
    $segundos =Int(Mod(Mod($tempo, 3600000), 60000) / 1000 ); converte o valor em segundos
    $temporizador = StringFormat("%02d:%02d:%02d", $horas, $minutos, $segundos); informações que serão mostradas no contador
    if $tempo < 60000 then
    ;mostra o contador
    $ret2=DllCall($dll_dx,"int","GPSL_SetTextLineData" ,"int",1,"long",$horizontal1,"long",$vertical1, "str","TEMPO: " & $temporizador, "dword",$COR1,"int",0,"int",$tfonte1,"int",1,"int" ,0)
    $ret2=DllCall($dll_dx,"int","GPSL_ShowText","int", 1,"int",1) ;mostra
    $ret1=DllCall($dll_dx,"int","GPSL_SetTextLineData" ,"int",2,"long",$horizontal2,"long",$vertical2, "str","TEMPO: " & $temporizador, "dword",$COR3,"int",0,"int",$tfonte2,"int",1,"int" ,0)
    $ret1=DllCall($dll_dx,"int","GPSL_ShowText","int", 2,"int",1) ;mostra
    else
    ;mostra o contador
    $ret2=DllCall($dll_dx,"int","GPSL_SetTextLineData" ,"int",1,"long",$horizontal1,"long",$vertical1, "str","TEMPO: " & $temporizador, "dword",$COR1,"int",0,"int",$tfonte1,"int",1,"int" ,0)
    $ret2=DllCall($dll_dx,"int","GPSL_ShowText","int", 1,"int",1) ;mostra
    $ret1=DllCall($dll_dx,"int","GPSL_SetTextLineData" ,"int",2,"long",$horizontal2,"long",$vertical2, "str","TEMPO: " & $temporizador, "dword",$COR2,"int",0,"int",$tfonte2,"int",1,"int" ,0)
    $ret1=DllCall($dll_dx,"int","GPSL_ShowText","int", 2,"int",1) ;mostra
    endif
    if $tempo < 1 then; quando chegar a "0" executa o que estiver abaixo
    IniWrite("C:\ARCADE\advmenu.ini","FICHEIRO","FICHA S","0"); zera o tempo no advmenu.ini
    MsgBox("","", "Seu tempo acabou e o jogo será encerrado...",3); mostra a mensagem
    exit; encerra o script
    endif
    endfunc
  6. Ver Conversa
    alex da uma juda pra mim eu consegui colocar o contador nos jogos de pc ams nao consigo q ele leia os creditos peloadvemenu.ini a galera parece q nao quer ajudar agradeço a atençao.
  7. e amigo nao consegui inicia mas nao aparece as caracteres ai dessa foma nao presta ne como funciona o seu me explica
  8. E ai Michel, tenho dois tipos de contador de tempo, um funciona no ps2, snes e wii e o outro funciona no dreancast e nos jogos de pc esse segundo é sem fundo se ainda não resolvel sobre os contadores e só perguntar os meus estão prontos.
  9. ai amigo me fala uma coisa o script de tempo que voce modificou o fundo ficou com trasparencia e ficou aparescendo so os numeros como voce mudou a cor dos numeros?
Exibindo Mensagens de Visitantes 61 a 69 de 69
Página 7 de 7 PrimeiroPrimeiro ... 3 4 5 6 7
Página 7 de 7 PrimeiroPrimeiro ... 3 4 5 6 7
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=d90bb8bdfee9645f8c1026d6528e72ac
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
69
Mensagem Mais Recente
12/05/2020 23:52
Informações Gerais
Última Atividade
24/12/2019
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 7 de 9 PrimeiroPrimeiro ... 3 4 5 6 7 8 9 ÚltimoÚltimo

02/12/2014


18/11/2014


07/11/2014


05/11/2014


04/11/2014


03/11/2014


02/11/2014



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

10/03/2013


09/03/2013


08/03/2013


06/03/2013


05/03/2013


04/03/2013


27/02/2013


25/02/2013


22/02/2013


21/02/2013


20/02/2013


05/02/2013



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