Co Jst Żle?

[Cad0s]

Przy Pomocy Kolegów z tego działu edytowałem kod ale coś mi nie działa mógłby ktoś na to spojrzeć??

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

[jackraymund]

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

endselect nie dodałes:P

[Cad0s]

ok jest ok teraz jak zrobić by gdy wciskam Start to on f7??

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

Edytowane 14 Czerwca 2010 przez Cad0s

[jackraymund]

@up

jeszcze raz skopiuj skrypt bo poprawiłem

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

[Cad0s]

NIE DZIAŁA f7 niewiem czemu

[adwi32]

To ci powinno działać przy niektórych linijkach dodałem komenty przeczytaj je

Oczywiście czas działania skryptu możesz zmienić lub wogule go usunąć

#include <GUIConstantsEx.au3>

 

Guicreate("Bot F7",150 ,40)

$przycisk =GUICtrlCreateButton("Start",20,10)

$przycisk2 =GUICtrlCreateButton("Stop",50,10)

$przycisk3 =GUICtrlCreateButton("Exit",80,10)

Guisetstate(@SW_SHOW)

While 1

$msg = GUIGetMsg() ; zmienna która odpowiada a wysyłanie wiadomosci do gu

Select

Case $msg = $GUI_EVENT_CLOSE ; to po to by gui ci sie zamykało bo wcisnieciu x

Exit

EndSelect

Select

Case $msg = $przycisk ; gdy wcisnies przycisk $przycisk pojawia sie MsgBox

$licznik = 0 ; zmienna licznik wynosi na poczatku zero

While $licznik < 60; petla bedzie kontynuwana dopoki zmienna licznik($licznik) jest mniejsza niz zero

$licznik = + 1 ; dodaje do $licznik 1

send("{F7}") ; wysyla F7

Sleep(30000) ;czeka 30 sek

WEnd ;wraca do While i tak w kółko dopoki $licznik nie wyniesie 60 (skrypt bedzie działał pol godziny)

EndSelect

Select

Case $msg = $przycisk3 ; gdy wcisnies przycisk $przycisk pojawia sie MsgBox

Exit ; skrypt sie wyłancza

MsgBox(64,"Bot","Bot Stop")

EndSelect

 

WEnd