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

Usprawnienie bota w nieprzewidzianych sytuacjach.

Tieru

Przez Tieru
w Niezbędnik Programisty - Archiwum

Rekomendowane odpowiedzi

Tieru Specjalista

Tieru

Opublikowano
Specjalista

Tieru

Opublikowano

Witam,

Dzięki Wam przełamałem wszystkie moje usterki w kodzie i dużo się nauczyłem w krótkim czasie.

Przejdę do sedna sprawy. 

Mam problem i pytania oczywiście.

 

Mój bot działa na przeglądarkowej grze flash na bibliotece ImageSearch wraz z prostymi MouseClick.

 

Teraz gdzie znajduje się kłopot.

Kroki:

Bot wybiera zamek, który chce zaatakować.

Bot ustawia wojsko i narzędzia do ataku.

Bot wysyła atak.

Bot teraz co sekundę sprawdza czy zamek się pali.

Gdy wykryję czy się pali to gasi ten zamek.

 

Teraz bot chce wysłać atak ponownie... podczas któregoś kroku wyskakuje niespodziewanie w grze promocja, którą po prostu trzeba wyłączyć klikając LPM na krzyżyk.

 

Te promocje wyskakują niezależnie... niespodziewanie. 

 

Czy jest jakiś sensowny sposób by napisać bota, który się nie zgubi i będzie potrafił działać godzinami bez pomyłek?

Napisałem również drugiego bota, który potrafi nacisnąć i wykryć te wszystkie promocje w krótkim czasie, ale nawet jak wyłączy to bot zdąży nacisnąć swoją jakąś akcję, a jedna pomyłka zrobi mi z ataku nic skutecznego lub nawet nie wyśle tego ataku.

 

Dziękuję za wszelką pomoc, w temacie jestem cały czas.

 

 

 

Przykład w wymyślonym kodzie:

 

Activate ("Chrome", "Gra")
While 1
MouseClick ("primary", $oboz)
MouseClick ("primary", $potwierdz_atak)
ImageSearch ($znajdz_wojsko)

MouseClick ("primary", $ustaw wojsko)

MouseClick ("primary", $wyslij_atak)

ImageSearch ($czekaj_i_zgas_palacysieoboz)
WEnd
No i teraz w chwili "MouseClick ("primary", $potwierdz_atak)" zdążyła wyskoczyć promocja, bot pominął bardzo ważną akcję i ataku nawet nie wyśle.
Bo gdyby pisać co każdą linijkę ImageSearch na promocje to kod byłby pewnie bardzo zamulony no i znacznie sporo kodu trzeba by pisać, a pewnie i tak nawet to by nic nie dało..?
 
 

Wszystkie poradniki w "O mnie" i na moim profilu YouTube.


51dd70965ae71.png


!!!HIT!!! -- Pełno klientów na DT nawet na najstarszym kompie bez zamuły!


!!!HIT!!! -- Nowa modyfikacja do Metina FastKill


World of Metin2


Ktosiu Znawca

Ktosiu

Opublikowano
Znawca

Ktosiu

Opublikowano

Trzeba przed wykonaniem każdej komendy sprawdzać czy jest reklama

Mózg to nie mydło; nie ubędzie Ci go, gdy go użyjesz.

Tieru Specjalista

Tieru

Opublikowano
Specjalista

Tieru

  • Autor
Opublikowano

Trzeba przed wykonaniem każdej komendy sprawdzać czy jest reklama

Okej, czyli tak jak myślałem, cóż, spróbuję, jeśli będzie sprawnie działać to odezwę się jeszcze.

Dzięki

Wszystkie poradniki w "O mnie" i na moim profilu YouTube.


51dd70965ae71.png


!!!HIT!!! -- Pełno klientów na DT nawet na najstarszym kompie bez zamuły!


!!!HIT!!! -- Nowa modyfikacja do Metina FastKill


World of Metin2


Tieru Specjalista

Tieru

Opublikowano
Specjalista

Tieru

  • Autor
Opublikowano

@Odświeżam

Jeżeli mam tak kod

 

Func wstaw_narzedzia_OSLONA_srodek()
  Sleep ( 500 )
  global $y6 = 0, $x6 = 0
  Local $searchOSLONA1 = _ImageSearch('OSLONA.bmp', 55, $x6, $y6, 99)
If $searchOSLONA1 = 1 Then
 sprawdz()
  MouseClick( "PRIMARY", $x6, $y6, 1, 1 )
 sprawdz()
  MouseClick( "PRIMARY", 781, 417, 1, 1 )
 sprawdz()
  Send("24{ENTER}")
 sprawdz()
  Sleep ( 300 )
  MouseClick( "PRIMARY", $x6, $y6, 1, 1 )
 sprawdz()
  MouseClick( "PRIMARY", 452, 369, 1, 1 )
  Sleep ( 300 )
 sprawdz()
  Send("34{ENTER}")
 sprawdz()
  wyslij_atak()
Else
  MsgBox( 1, "BRAK NARZEDZI", "Nie znalazłem osłon!" )
  Return
EndIf
EndFunc
funkcja sprawdzenia

Func sprawdz()
$CZEKAJ = 400
While 1
global $CORDY = 0, $CORDX = 0
Local $search = _ImageSearch('x3.bmp', 1, $CORDX, $CORDY, 0)
   If $search = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
Sleep( $CZEKAJ )
EndIf

Local $search1 = _ImageSearch('x6.bmp', 1, $CORDX, $CORDY, 0)
   If $search1 = 1 Then

MouseClick( "PRIMARY", $CORDX, $CORDY, 0)
Sleep( $CZEKAJ )
EndIf
Local $search2 = _ImageSearch('x13.bmp', 1, $CORDX, $CORDY, 0)
   If $search2 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search3 = _ImageSearch('x14.bmp', 1, $CORDX, $CORDY, 0)
   If $search3 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search4 = _ImageSearch('x16.bmp', 1, $CORDX, $CORDY, 0)
   If $search4 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search5 = _ImageSearch('x15.bmp', 1, $CORDX, $CORDY, 0)
   If $search5 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search6 = _ImageSearch('x21.bmp', 1, $CORDX, $CORDY, 0)
   If $search6 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search7 = _ImageSearch('x17.bmp', 1, $CORDX, $CORDY, 0)
   If $search7 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search8 = _ImageSearch('x20.bmp', 1, $CORDX, $CORDY, 0)
   If $search8 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search9 = _ImageSearch('x18.bmp', 1, $CORDX, $CORDY, 0)
   If $search9 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search10 = _ImageSearch('x23.bmp', 1, $CORDX, $CORDY, 0)
   If $search10 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search11 = _ImageSearch('x1.bmp', 1, $CORDX, $CORDY, 0)
   If $search11 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search12 = _ImageSearch('x9.bmp', 1, $CORDX, $CORDY, 0)
   If $search12 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search13 = _ImageSearch('x22.bmp', 1, $CORDX, $CORDY, 0)
   If $search13 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search14 = _ImageSearch('x10.bmp', 1, $CORDX, $CORDY, 0)
   If $search14 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search15 = _ImageSearch('x11.bmp', 1, $CORDX, $CORDY, 0)
   If $search15 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search16 = _ImageSearch('x12.bmp', 1, $CORDX, $CORDY, 0)
   If $search16 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search17 = _ImageSearch('x19.bmp', 1, $CORDX, $CORDY, 0)
   If $search17 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search18 = _ImageSearch('x5.bmp', 1, $CORDX, $CORDY, 0)
   If $search18 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf

Local $search19 = _ImageSearch('xx.bmp', 1, $CORDX, $CORDY, 0)
   If $search19 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Sleep ( 20 )
WEnd

EndFunc
Jak mam zrobić by sprawdził i wrócił do punktu z którego skoczył?

Wszystkie poradniki w "O mnie" i na moim profilu YouTube.


51dd70965ae71.png


!!!HIT!!! -- Pełno klientów na DT nawet na najstarszym kompie bez zamuły!


!!!HIT!!! -- Nowa modyfikacja do Metina FastKill


World of Metin2


Tieru Specjalista

Tieru

Opublikowano
Specjalista

Tieru

  • Autor
Opublikowano

W pętli

Nie zauwazylem While 1, czyli zrobic by wykonal raz petle, a reszte zostawic i bedzie tak dzialac ze wroci?

Bo troszke jeszcze nie rozumiem. :/

 

Edit

Napisałem coś takiego... niby działa, dlatego, że zastosowałem na końcu ExitLoop, ciekawe jak się sprawdzi w bocie.

#include <ImageSearch.au3>
HotKeySet( "q", nothing) ; OFF
HotKeySet( "1", Rozpocznij_01) ; OFF
While 1
   Sleep (20)
WEnd

Func Rozpocznij_01() ; WYBRANIE OBOZU NA MAPIE

   			   MsgBox(0, "OK", "1")
   sprawdz()
			  MsgBox(0, "OK", "2")
   sprawdz()
			   MsgBox(0, "OK", "3")
   sprawdz()
			  MsgBox(0, "OK", "4")
   sprawdz()
EndFunc
Func nothing()
   Exit
EndFunc

Func sprawdz()
$CZEKAJ = 400
While 2
global $CORDY = 0, $CORDX = 0
Local $search = _ImageSearch('x3.bmp', 1, $CORDX, $CORDY, 0)
   If $search = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
Sleep( $CZEKAJ )
EndIf

Local $search1 = _ImageSearch('x6.bmp', 1, $CORDX, $CORDY, 0)
   If $search1 = 1 Then

MouseClick( "PRIMARY", $CORDX, $CORDY, 0)
Sleep( $CZEKAJ )
EndIf
Local $search2 = _ImageSearch('x13.bmp', 1, $CORDX, $CORDY, 0)
   If $search2 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search3 = _ImageSearch('x14.bmp', 1, $CORDX, $CORDY, 0)
   If $search3 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search4 = _ImageSearch('x16.bmp', 1, $CORDX, $CORDY, 0)
   If $search4 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search5 = _ImageSearch('x15.bmp', 1, $CORDX, $CORDY, 0)
   If $search5 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search6 = _ImageSearch('x21.bmp', 1, $CORDX, $CORDY, 0)
   If $search6 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search7 = _ImageSearch('x17.bmp', 1, $CORDX, $CORDY, 0)
   If $search7 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search8 = _ImageSearch('x20.bmp', 1, $CORDX, $CORDY, 0)
   If $search8 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search9 = _ImageSearch('x18.bmp', 1, $CORDX, $CORDY, 0)
   If $search9 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search10 = _ImageSearch('x23.bmp', 1, $CORDX, $CORDY, 0)
   If $search10 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search11 = _ImageSearch('x1.bmp', 1, $CORDX, $CORDY, 0)
   If $search11 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search12 = _ImageSearch('x9.bmp', 1, $CORDX, $CORDY, 0)
   If $search12 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search13 = _ImageSearch('x22.bmp', 1, $CORDX, $CORDY, 0)
   If $search13 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search14 = _ImageSearch('x10.bmp', 1, $CORDX, $CORDY, 0)
   If $search14 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search15 = _ImageSearch('x11.bmp', 1, $CORDX, $CORDY, 0)
   If $search15 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search16 = _ImageSearch('x12.bmp', 1, $CORDX, $CORDY, 0)
   If $search16 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search17 = _ImageSearch('x19.bmp', 1, $CORDX, $CORDY, 0)
   If $search17 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search18 = _ImageSearch('x5.bmp', 1, $CORDX, $CORDY, 0)
   If $search18 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf

Local $search19 = _ImageSearch('xx.bmp', 1, $CORDX, $CORDY, 0)
   If $search19 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
ExitLoop
Sleep ( 20 )
WEnd
EndFunc

Wszystkie poradniki w "O mnie" i na moim profilu YouTube.


51dd70965ae71.png


!!!HIT!!! -- Pełno klientów na DT nawet na najstarszym kompie bez zamuły!


!!!HIT!!! -- Nowa modyfikacja do Metina FastKill


World of Metin2


metinplayer Uczeń

metinplayer

Opublikowano
Uczeń

metinplayer

Opublikowano

 

W pętli

Nie zauwazylem While 1, czyli zrobic by wykonal raz petle, a reszte zostawic i bedzie tak dzialac ze wroci?

Bo troszke jeszcze nie rozumiem. :/

 

Edit

Napisałem coś takiego... niby działa, dlatego, że zastosowałem na końcu ExitLoop, ciekawe jak się sprawdzi w bocie.

#include <ImageSearch.au3>
HotKeySet( "q", nothing) ; OFF
HotKeySet( "1", Rozpocznij_01) ; OFF
While 1
   Sleep (20)
WEnd

Func Rozpocznij_01() ; WYBRANIE OBOZU NA MAPIE

   			   MsgBox(0, "OK", "1")
   sprawdz()
			  MsgBox(0, "OK", "2")
   sprawdz()
			   MsgBox(0, "OK", "3")
   sprawdz()
			  MsgBox(0, "OK", "4")
   sprawdz()
EndFunc
Func nothing()
   Exit
EndFunc

Func sprawdz()
$CZEKAJ = 400
While 2
global $CORDY = 0, $CORDX = 0
Local $search = _ImageSearch('x3.bmp', 1, $CORDX, $CORDY, 0)
   If $search = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
Sleep( $CZEKAJ )
EndIf

Local $search1 = _ImageSearch('x6.bmp', 1, $CORDX, $CORDY, 0)
   If $search1 = 1 Then

MouseClick( "PRIMARY", $CORDX, $CORDY, 0)
Sleep( $CZEKAJ )
EndIf
Local $search2 = _ImageSearch('x13.bmp', 1, $CORDX, $CORDY, 0)
   If $search2 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search3 = _ImageSearch('x14.bmp', 1, $CORDX, $CORDY, 0)
   If $search3 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search4 = _ImageSearch('x16.bmp', 1, $CORDX, $CORDY, 0)
   If $search4 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search5 = _ImageSearch('x15.bmp', 1, $CORDX, $CORDY, 0)
   If $search5 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search6 = _ImageSearch('x21.bmp', 1, $CORDX, $CORDY, 0)
   If $search6 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search7 = _ImageSearch('x17.bmp', 1, $CORDX, $CORDY, 0)
   If $search7 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search8 = _ImageSearch('x20.bmp', 1, $CORDX, $CORDY, 0)
   If $search8 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search9 = _ImageSearch('x18.bmp', 1, $CORDX, $CORDY, 0)
   If $search9 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search10 = _ImageSearch('x23.bmp', 1, $CORDX, $CORDY, 0)
   If $search10 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search11 = _ImageSearch('x1.bmp', 1, $CORDX, $CORDY, 0)
   If $search11 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search12 = _ImageSearch('x9.bmp', 1, $CORDX, $CORDY, 0)
   If $search12 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search13 = _ImageSearch('x22.bmp', 1, $CORDX, $CORDY, 0)
   If $search13 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search14 = _ImageSearch('x10.bmp', 1, $CORDX, $CORDY, 0)
   If $search14 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search15 = _ImageSearch('x11.bmp', 1, $CORDX, $CORDY, 0)
   If $search15 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search16 = _ImageSearch('x12.bmp', 1, $CORDX, $CORDY, 0)
   If $search16 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search17 = _ImageSearch('x19.bmp', 1, $CORDX, $CORDY, 0)
   If $search17 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
Local $search18 = _ImageSearch('x5.bmp', 1, $CORDX, $CORDY, 0)
   If $search18 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf

Local $search19 = _ImageSearch('xx.bmp', 1, $CORDX, $CORDY, 0)
   If $search19 = 1 Then

   MouseClick( "PRIMARY", $CORDX, $CORDY, 1, 0)
   Sleep( $CZEKAJ )
EndIf
ExitLoop
Sleep ( 20 )
WEnd
EndFunc

Witam ja bym zrobil coś takiego :

#include <ImageSearch.au3>
HotKeySet( "q", nothing) ; OFF
HotKeySet( "1", Rozpocznij_01) ; OFF

While true
   Sleep (20)
WEnd

Func Rozpocznij_01() ; WYBRANIE OBOZU NA MAPIE
while true  			   
 sprawdz();tu bym umieszczał nazwy funkcji np. do sprawdzenia tej reklamy
  wstaw_narzedzia_OSLONA_srodek() ;przykład dodania innej funkcji 
   sprawdz()
 inna_jakas()
sprawdz()
wend
EndFunc

Func sprawdz()
;bez while bo while jest w Func Rozpocznij_01()
Endfunc

Func wstaw_narzedzia_OSLONA_srodek()
;bez while
EndFunc

Func nothing()
   Exit
EndFunc

Po prostu w funkcji Rozpocznij_01()  z petlą while umieścił bym nazwy innych funkcji do wykonania w pętli w ilości od potrzeb ;) .

Zarchiwizowany

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

Tematy
×
×
  • Dodaj nową pozycję...