label1,2,3

[jaimekill23]

how to add another label to my script?

 

 

#include "cores.au3"
#include "BlockInputEx.au3"
#include <Misc.au3>
#include <WinAPI.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <WinAPI.au3>
#include <ColorConstantS.au3>

AdlibRegister("clock", 1000)

HotKeySet("1", "fechar")

$creditos = 0
$segundos = 0
$minutos_por_creditos = 60
$ficha = False
$tecla_de_ficha = 67

;temporizador
$form1 = GUICreate("FUNDO", @DesktopWidth, @DesktopHeight, 0, 0, 0X80000000, $WS_EX_LAYERED)
GUISetBkColor($COR_PRETO)
GUICtrlCreateLabel("TEMPO 00:00:00", 616, 0, 200, 30)
GUICtrlSetFont(-1, 16, 800, -1, "DS-Digital")
GUICtrlSetBkColor(-1, $COR_PRETO)
GUICtrlSetColor(-1, $COR_LIMAO)
_WinAPI_SetLayeredWindowAttributes ($form1, $COR_PRETO)
GUISetState(@SW_SHOW, $form1)

While 1
    If     _IsPressed(67) Then $ficha = True
    if Not _IsPressed(67) and $ficha Then
    ;LIBERAR TODAS AS TECLAS
    _BlockInputEx(0)
    $creditos += 1
    $ficha = false

    EndIf

    $segundos += $creditos * ($minutos_por_creditos * 60)
    $creditos = 0
    $minutos = Mod($segundos/60, 60)
    $horas = $segundos/3600
    $display = StringFormat("%02i:%02i:%02i", $horas, $minutos, Mod($segundos,60))
    WinSetOnTop("FUNDO", "", 1)
WEnd

Func clock()
    If $segundos = 35 Then
     SoundPlay(".\auxiliar\som\falta30.wav")
    EndIf

    If $segundos = 1 Then
     Send("2")
    EndIf

    If $segundos > 0 Then
        $segundos -= 1
    Else
     _BlockInputEx(3, "1|2|{NUMPAD7}|{ESC}|{UP}|{DOWN}|{LEFT}|{RIGHT}|{ENTER}")
    EndIf
    GUICtrlSetData(-1, "TEMPO " & $display)
EndFunc

Func fechar()
    _BlockInputEx(0)
    Exit

    EndFunc

Edited March 16, 2021 by jaimekill23

[argumentum]

10 minutes ago, jaimekill23 said:

how to add another label

#include <GUIConstantsEx.au3>

Example()

Func Example()
    GUICreate("My GUI") ; will create a dialog box that when displayed is centered

    GUISetHelp("notepad.exe") ; will run notepad if F1 is typed
    Local $iOldOpt = Opt("GUICoordMode", 2)

    Local $iWidthCell = 70
    GUICtrlCreateLabel("Line 1 Cell 1", 10, 30, $iWidthCell) ; first cell 70 width
    GUICtrlCreateLabel("Line 2 Cell 1", -1, 0) ; next line
    GUICtrlCreateLabel("Line 3 Cell 2", 0, 0) ; next line and next cell
    GUICtrlCreateLabel("Line 3 Cell 3", 0, -1) ; next cell same line
    GUICtrlCreateLabel("Line 4 Cell 1", -3 * $iWidthCell, 0) ; next line Cell1

    GUISetState(@SW_SHOW) ; will display an empty dialog box

    ; Loop until the user exits.
    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                ExitLoop

        EndSwitch
    WEnd

    $iOldOpt = Opt("GUICoordMode", $iOldOpt)
EndFunc   ;==>Example

 

12 minutes ago, jaimekill23 said:

to my script?

I don't believe is your script

Welcome to the forum, to share non game related script.