Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Problem] z While i WEnd, Bot


Rekomendowane odpowiedzi

Opublikowano

Witajcie, napisałem prostego bota, lecz kiedy go testuje wyskakuje mi komunikat :

mpc.png

 

Oto kod z ostatniej linijki:

 

	While 7
 Send("{SPACE down}")
 Sleep(60000)
 Send("{SPACE up}")
 Sleep(2000)
WEnd

 

 

I moje pytanie, czy dobrze jest ustawione? Dla atrybutu "7" ustawiona jest wartość $Button6.

 

A tu cały kod :

 

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Process.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=c:\users\zaku\documents\expbot.kxf
$Form1 = GUICreate("Form1", 615, 438, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 64, 56, 241, 33)
$Button2 = GUICtrlCreateButton("Stop", 120, 288, 241, 41)
$Label1 = GUICtrlCreateLabel("ExpBot v.1.0 by ZakuG for MPC", 72, 392, 338, 35)
GUICtrlSetFont(-1, 14, 800, 0, "Segoe Script")
$Pic2 = GUICtrlCreatePic("D:\strona serwa\images\title\forum1.gif", 0, 0, 609, 33)
$Pic3 = GUICtrlCreatePic("D:\strona serwa\images\right_bg.jpg", 440, 32, 169, 401)
$Pic1 = GUICtrlCreatePic("D:\strona serwa\images\header002.gif", 0, 32, 41, 385)
$Button3 = GUICtrlCreateButton("Autor", 120, 344, 241, 41)
$Label2 = GUICtrlCreateLabel("Czerw. miks na " 1" nieb. na " 2" buff na F1 i ekspienie", 56, 40, 258, 17)
$Label3 = GUICtrlCreateLabel("Buff F1 i F2 poty na 1 i 2 ekspienie", 104, 104, 167, 17)
$Button4 = GUICtrlCreateButton("Start", 64, 128, 241, 33)
$Button5 = GUICtrlCreateButton("Start", 64, 200, 241, 33)
$Label4 = GUICtrlCreateLabel("Ekspienie bez potów i skilli.", 120, 176, 132, 17)
$Label5 = GUICtrlCreateLabel("Stop każdego. Przed wybraniem następnej funkcji wymagany jest restart bota", 64, 264, 367, 17)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
for $Button1=5 to 200
for $Button4=6 to 200
for $Button5=7 to 200
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
 Case $GUI_EVENT_CLOSE
  Exit
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
 Case $GUI_EVENT_CLOSE
  Exit
While 5
 Send("{SPACE down}")
 Send("{1}")
 Send("{2}")
 Send("{1}")
 Send("{2}")
 Send("{F1}")
 Sleep(60000)
 Send("{SPACE up}")
 Sleep(2000)
WEnd
  Case $Button2
_RunDOS("start [url="http://www.mpcforum.pl/user/396986-zakug"]http://www.mpcforum.pl/user/396986-zakug"[/url])
Exit
  Case $Button3
_RunDOS("start [url="http://www.mpcforum.pl/user/396986-zakug"]http://www.mpcforum.pl/user/396986-zakug"[/url])
  While 6
 Send("{SPACE down}")
 Send("{1}")
 Send("{2}")
 Send("{1}")
 Send("{2}")
 Send("{F1}")
 Send("{F2}")
 Sleep(60000)
 Send("{SPACE up}")
 Sleep(2000)
WEnd
While 7
 Send("{SPACE down}")
 Sleep(60000)
 Send("{SPACE up}")
 Sleep(2000)
WEnd

 

 

Poradzi mi ktoś może coś?

 

// Będą warny za brak CODE!

Protecto

Weteran
Opublikowano

Nie rób kilka pętli...bo nie wykona się żadna, tylko jedna.

Po co jakieś While 7,6,5 ???

1329036830-U154499.png
Opublikowano

for $Button1=5 to 200
for $Button4=6 to 200
for $Button5=7 to 200

 

Tego też nie czaję.

1352970251-U713459.png

By Maxiu
"Because limits, like fears, are often just an illusion"

Opublikowano

ammm. Nie lepiej pomiędzy Exit a Case$GUI_EVENT_CLOSE zrobic proste buttony typu.Case $Button1 a na dole psizesz do jakiej funkcji czyli przykładowo func_()

I wszystko powinno chodzić...

 

; nie czajilem tego...
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
 Case $GUI_EVENT_CLOSE
  Exit
Case $Button1
Adlib_1()
Case $Button2
Adlib_2()
Case $Button3
Adlib_3()
Case $Button4
Adlib_4()
Case $Button5
Adlib_5()
EndSwitch
WEnd

 

I pod ten kod odwołuj się do funkcji typu.Chcesz żeby pętla była w buttonie pierwszym to robisz.

Func Adlib_1() ; to jest to odwołanie do funkcji
While1
Pętla która chcesz
Wend
EndFunc

Opublikowano

JA [ cię motylę ] URUKIORA WYJDŹ BO [ maślanisz ] I NIE MASZ POJĘCIA O CZYM

WARTOŚĆ TWOICH POSTÓW JEST UJEMNA

 

 

PS2

Dwie pętle nieskończone nie mają prawa bytu, eot

 

 

@DOWN

Jak ktoś coś źle napisze to go opierdalasz. Wystarczy tylko napisać, że źle mówi i tyle.

A to czasem nie wychodzi dokładnie na to samo?

 

Tak w ogóle, to po co udajesz, że jesteś kobietą skoro wiadomo, że jesteś mężczyzną? Liczysz na jakiś specjalny szacunek lub specjalne traktowanie?

A to czasem nie wychodzi dokładnie na to samo?

Ta sygnatura jest pusta.

Opublikowano

Po co tyle pętli?

Jak one się nigdy nie skończą, nie ma żadnych warunków ani nic.

 

@UP Jak ktoś coś źle napisze to go opierdalasz. Wystarczy tylko napisać, że źle mówi i tyle.

@Edit $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$

Tak w ogóle, to po co udajesz, że jesteś kobietą skoro wiadomo, że jesteś mężczyzną? Liczysz na jakiś specjalny szacunek lub specjalne traktowanie?

obraz24.png


Opublikowano

@UP Jak ktoś coś źle napisze to go opierdalasz. Wystarczy tylko napisać, że źle mówi i tyle.

opierdolić kogoś jest fajniej i na dłużej se zapamięta

 

@Edit $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$

Tak w ogóle, to po co udajesz, że jesteś kobietą skoro wiadomo, że jesteś mężczyzną? Liczysz na jakiś specjalny szacunek lub specjalne traktowanie?

jakby to miało znaczenie

 

@topic, poszucz się i zacznij to od nowa.

  • 4 tygodnie później...

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...