Jump to content

Not Run Auto GUICtrlSetState


Recommended Posts

Pls help not run all GUICtrlSetState, i add time not run

sd

CODE
#include <GUIConstants.au3>

#Include <Date.au3>

Global $Timer1 = 0

Global $Timer2 = 0

Global $Timer3 = 0

Global $Timer4 = 0

Global $Timer5 = 0

Opt("GUICoordMode", 1)

GUICreate("Buffer Silkroad DEK-DEATH") ; TITLE DUR

;Beginning of display

Guictrlcreatelabel ("Programa para Buffer Silkroad DEK-DEATH", 10, 6)

$ssro = GUICtrlCreateButton("START SRO", 260,130, 100,20)

$start = GUICtrlCreateButton("START", 260,150, 100,20)

$exit = GUICtrlCreateButton("EXIT", 260,170, 100,20)

$buff1check = GUICtrlCreateCheckbox("",50,150,25,25)

$buff2check = GUICtrlCreateCheckbox("",50,180,25,25)

$buff3check = GUICtrlCreateCheckbox("",50,210,25,25)

$buff4check = GUICtrlCreateCheckbox("",50,240,25,25)

$buff5check = GUICtrlCreateCheckbox("",50,270,25,25)

$buff1duration = GUICtrlCreateInput("436",87,153,40,20)

$buff2duration = GUICtrlCreateInput("441",87,183,40,20)

$buff3duration = GUICtrlCreateInput("516",87,213,40,20)

$buff4duration = GUICtrlCreateInput("521",87,243,40,20)

$buff5duration = GUICtrlCreateInput("431",87,273,40,20)

$buff1input = GUICtrlCreateInput("1",175,153,35,20)

$buff2input = GUICtrlCreateInput("2",175,183,35,20)

$buff3input = GUICtrlCreateInput("3",175,213,35,20)

$buff4input = GUICtrlCreateInput("4",175,243,35,20)

$buff5input = GUICtrlCreateInput("5",175,273,35,20)

GUISetState ()

GUICtrlCreateGroup ("Buffer Auto", 20, 100, 205, 205)

GUICtrlCreateLabel("Alugo Bot por 30 reais 200h",20,40)

GUICtrlCreateLabel("Coloque o tempo dos buffers. (em seconds)",20,55)

GUICtrlCreateLabel("Selecione os numeros aonde esta os skill",20,70)

GUICtrlCreateLabel("Usar?",40,120)

GUICtrlCreateGroup ("",30, 110, 45, 30)

GUICtrlCreateLabel("Tempo",100,120)

GUICtrlCreateGroup ("",95, 110, 50, 30)

GUICtrlCreateLabel("secs",130,158)

GUICtrlCreateLabel("secs",130,188)

GUICtrlCreateLabel("secs",130,218)

GUICtrlCreateLabel("secs",130,248)

GUICtrlCreateLabel("secs",130,278)

GUICtrlCreateLabel("Slot",180,120)

GUICtrlCreateGroup ("",170, 110, 40, 30)

$buff1slot = GUICtrlCreateUpdown($buff1input)

$buff2slot = GUICtrlCreateUpdown($buff2input)

$buff3slot = GUICtrlCreateUpdown($buff3input)

$buff4slot = GUICtrlCreateUpdown($buff4input)

$buff5slot = GUICtrlCreateUpdown($buff5input)

GUICtrlSetLimit($buff1slot,9,0)

GUICtrlSetLimit($buff2slot,9,0)

GUICtrlSetLimit($buff3slot,9,0)

GUICtrlSetLimit($buff4slot,9,0)

GUICtrlSetLimit($buff5slot,9,0)

;----------------------------------------^^^^^^^^^^^^^^^^^^^^^^^^^^^--------------^^^^^^^^^^^DISPLAY

;Beginning button and functions

While 1

$msg = GUIGetMsg()

Select

Case $msg = $ssro

run("d:/silkroad/silkroad.exe")

;runs sro

Case $msg = $GUI_EVENT_CLOSE

Exitloop

Case $msg = $GUI_EVENT_MINIMIZE

Case $msg = $Exit

Exitloop

Case $msg = $buff1check

if GUICtrlRead($buff1check) = 1 Then

send("{F2}")

GUICtrlSetState($buff1input, $GUI_ENABLE)

GUICtrlSetState($buff1input, $GUI_ENABLE)

Else

GUICtrlSetState($buff1duration, $GUI_DISABLE)

GUICtrlSetState($buff1input, $GUI_DISABLE)

EndIf

Case $msg = $buff2check

if GUICtrlRead($buff2check) = 1 Then

GUICtrlSetState($buff2input, $GUI_ENABLE)

GUICtrlSetState($buff2input, $GUI_ENABLE)

Else

GUICtrlSetState($buff2duration, $GUI_DISABLE)

GUICtrlSetState($buff2input, $GUI_DISABLE)

EndIf

Case $msg = $buff3check

if GUICtrlRead($buff3check) = 1 Then

GUICtrlSetState($buff3input, $GUI_ENABLE)

GUICtrlSetState($buff3input, $GUI_ENABLE)

Else

GUICtrlSetState($buff3duration, $GUI_ENABLE)

GUICtrlSetState($buff3input, $GUI_ENABLE)

EndIf

Case $msg = $buff4check

if GUICtrlRead($buff4check) = 1 Then

GUICtrlSetState($buff4input, $GUI_ENABLE)

GUICtrlSetState($buff4input, $GUI_ENABLE)

Else

GUICtrlSetState($buff4duration, $GUI_DISABLE)

GUICtrlSetState($buff4input, $GUI_DISABLE)

EndIf

Case $msg = $buff5check

if GUICtrlRead($buff5check) = 1 Then

GUICtrlSetState($buff5input, $GUI_ENABLE)

GUICtrlSetState($buff5input, $GUI_ENABLE)

Else

GUICtrlSetState($buff5duration, $GUI_DISABLE)

GUICtrlSetState($buff5input, $GUI_DISABLE)

EndIf

send("{F1}")

EndSelect

$msg = GUIGetMsg()

Select

Case $msg = $start

sleep(1000)

if GUICtrlRead($buff1check) = 1 Then

$duration = GUICtrlRead($buff1duration) * 1000 + 1000

if $Timer1 = 0 Then

;buff started

send("{F2}")

send(GUICtrlRead($buff1input))

send(GUICtrlRead($buff1input))

send(GUICtrlRead($buff1input))

send(GUICtrlRead($buff1input))

$Timer1 = TimerInit()

sleep(3000)

ElseIf TimerDiff($Timer1) > $duration Then

;buff has expired

send(GUICtrlRead($buff1input))

send(GUICtrlRead($buff1input))

send(GUICtrlRead($buff1input))

send(GUICtrlRead($buff1input))

$Timer1 = TimerInit()

sleep(3000)

EndIf

EndIf

;2nd buff

if GUICtrlRead($buff2check) = 1 Then

$duration = GUICtrlRead($buff2duration) * 1000 + 1000

if $Timer2 = 0 Then

;buff started

send(GUICtrlRead($buff2input))

send(GUICtrlRead($buff2input))

send(GUICtrlRead($buff2input))

send(GUICtrlRead($buff2input))

$Timer2 = TimerInit()

sleep(3000)

ElseIf TimerDiff($Timer2) > $duration Then

;Buff expired

send(GUICtrlRead($buff2input))

send(GUICtrlRead($buff2input))

send(GUICtrlRead($buff2input))

send(GUICtrlRead($buff2input))

$Timer2 = TimerInit()

sleep(3000)

EndIf

EndIf

;3rd buff

if GUICtrlRead($buff3check) = 1 Then

$duration = GUICtrlRead($buff3duration) * 1000 + 1000

if $Timer3 = 0 Then

;buff started

send(GUICtrlRead($buff3input))

send(GUICtrlRead($buff3input))

send(GUICtrlRead($buff3input))

send(GUICtrlRead($buff3input))

$Timer3 = TimerInit()

sleep(3000)

ElseIf TimerDiff($Timer3) > $duration Then

;buff has expired

send(GUICtrlRead($buff3input))

send(GUICtrlRead($buff3input))

send(GUICtrlRead($buff3input))

send(GUICtrlRead($buff3input))

$Timer3 = TimerInit()

sleep(3000)

EndIf

EndIf

;4th buff

if GUICtrlRead($buff4check) = 1 Then

$duration = GUICtrlRead($buff4duration) * 1000 + 1000

if $Timer4 = 0 Then

;buff started

send(GUICtrlRead($buff4input))

send(GUICtrlRead($buff4input))

send(GUICtrlRead($buff4input))

send(GUICtrlRead($buff4input))

$Timer4 = TimerInit()

sleep(3000)

ElseIf TimerDiff($Timer4) > $duration Then

;buff has expired

send(GUICtrlRead($buff4input))

send(GUICtrlRead($buff4input))

send(GUICtrlRead($buff4input))

send(GUICtrlRead($buff4input))

$Timer4 = TimerInit()

sleep(3000)

EndIf

EndIf

;5th buff

if GUICtrlRead($buff5check) = 1 Then

$duration = GUICtrlRead($buff5duration) * 1000 + 1000

if $Timer5 = 0 Then

;buff started

send(GUICtrlRead($buff5input))

send(GUICtrlRead($buff5input))

send(GUICtrlRead($buff5input))

send(GUICtrlRead($buff5input))

$Timer5 = TimerInit()

sleep(3000)

send("{F1}")

ElseIf TimerDiff($Timer5) > $duration Then

;buff has expired

send(GUICtrlRead($buff5input))

send(GUICtrlRead($buff5input))

send(GUICtrlRead($buff5input))

send(GUICtrlRead($buff5input))

$Timer5 = TimerInit()

sleep(3000)

send("{F1}")

EndIf

EndIf

EndSelect

WEnd

Link to comment
Share on other sites

Not Run =( pls help

CODE
Case $msg = $buff1check

if GUICtrlRead($buff1check) = 1 Then

send("{F2}")

GUICtrlSetState($buff1input, $GUI_ENABLE)

GUICtrlSetState($buff1input, $GUI_ENABLE)

Else

GUICtrlSetState($buff1duration, $GUI_DISABLE)

GUICtrlSetState($buff1input, $GUI_DISABLE)

EndIf

Case $msg = $buff2check

if GUICtrlRead($buff2check) = 1 Then

GUICtrlSetState($buff2input, $GUI_ENABLE)

GUICtrlSetState($buff2input, $GUI_ENABLE)

Else

GUICtrlSetState($buff2duration, $GUI_DISABLE)

GUICtrlSetState($buff2input, $GUI_DISABLE)

EndIf

Case $msg = $buff3check

if GUICtrlRead($buff3check) = 1 Then

GUICtrlSetState($buff3input, $GUI_ENABLE)

GUICtrlSetState($buff3input, $GUI_ENABLE)

Else

GUICtrlSetState($buff3duration, $GUI_ENABLE)

GUICtrlSetState($buff3input, $GUI_ENABLE)

EndIf

Case $msg = $buff4check

if GUICtrlRead($buff4check) = 1 Then

GUICtrlSetState($buff4input, $GUI_ENABLE)

GUICtrlSetState($buff4input, $GUI_ENABLE)

Else

GUICtrlSetState($buff4duration, $GUI_DISABLE)

GUICtrlSetState($buff4input, $GUI_DISABLE)

EndIf

Case $msg = $buff5check

if GUICtrlRead($buff5check) = 1 Then

GUICtrlSetState($buff5input, $GUI_ENABLE)

GUICtrlSetState($buff5input, $GUI_ENABLE)

Else

GUICtrlSetState($buff5duration, $GUI_DISABLE)

GUICtrlSetState($buff5input, $GUI_DISABLE)

EndIf

send("{F1}")

EndSelect

Link to comment
Share on other sites

PLS HELPPPPPPPPPPPPP

Not Run =( pls help

CODE
Case $msg = $buff1check

if GUICtrlRead($buff1check) = 1 Then

send("{F2}")

GUICtrlSetState($buff1input, $GUI_ENABLE)

GUICtrlSetState($buff1input, $GUI_ENABLE)

Else

GUICtrlSetState($buff1duration, $GUI_DISABLE)

GUICtrlSetState($buff1input, $GUI_DISABLE)

EndIf

Case $msg = $buff2check

if GUICtrlRead($buff2check) = 1 Then

GUICtrlSetState($buff2input, $GUI_ENABLE)

GUICtrlSetState($buff2input, $GUI_ENABLE)

Else

GUICtrlSetState($buff2duration, $GUI_DISABLE)

GUICtrlSetState($buff2input, $GUI_DISABLE)

EndIf

Case $msg = $buff3check

if GUICtrlRead($buff3check) = 1 Then

GUICtrlSetState($buff3input, $GUI_ENABLE)

GUICtrlSetState($buff3input, $GUI_ENABLE)

Else

GUICtrlSetState($buff3duration, $GUI_ENABLE)

GUICtrlSetState($buff3input, $GUI_ENABLE)

EndIf

Case $msg = $buff4check

if GUICtrlRead($buff4check) = 1 Then

GUICtrlSetState($buff4input, $GUI_ENABLE)

GUICtrlSetState($buff4input, $GUI_ENABLE)

Else

GUICtrlSetState($buff4duration, $GUI_DISABLE)

GUICtrlSetState($buff4input, $GUI_DISABLE)

EndIf

Case $msg = $buff5check

if GUICtrlRead($buff5check) = 1 Then

GUICtrlSetState($buff5input, $GUI_ENABLE)

GUICtrlSetState($buff5input, $GUI_ENABLE)

Else

GUICtrlSetState($buff5duration, $GUI_DISABLE)

GUICtrlSetState($buff5input, $GUI_DISABLE)

EndIf

send("{F1}")

EndSelect

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...