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

[pomoc] problem z skryptem


Rekomendowane odpowiedzi

Opublikowano

witam mam problem ze skryptem dopiero co zaczalesm pisac w AutoIT i jestem kompletnie zielony chce napisac cos takiego co rusza mi myszka i klika w podane przez mnie kordy na ekranie

to moj skrypt mogl by ktos go naprawic tak zeby poprwanie dzialal lub powiedzial mi jak mam to zrobic zeby dzialalo prosze o pomoc

Pozdrawiam MrPoland

 

o to skrypt

$enabled = False
HotKeySet("{F7}", "endis")
HotKeySet("{F8}", "end")
Func endis()
   If $enabled = False Then
       $enabled = True
   Else
       $enabled = False
   EndIf
EndFunc   ;==>endis
Func end()
   Exit
EndFunc   ;==>end
;### Tidy Error: next line creates a negative tablevel.
;### Tidy Error: next line creates a negative tablevel for the line after it.
WEnd
While 1
   MouseMove(1067, 598)
   MouseClick("left")
   Sleep(2000)
   MouseMove(432, 534)
   MouseClick("left")
   Sleep(2000) a
   MouseMove(342, 956)
   MouseClick("left")
   Sleep(2000)
   MouseMove(434, 323)
   MouseClick("left")
   Sleep(2000)
   MouseMove(565, 453)
   MouseClick("left")
   Sleep(2000)
   MouseMove(656, 545)
   MouseClick("left")
   Sleep(2000)
   MouseMove(867, 958)
   MouseClick("left")
WEnd

1377531174-U173186.png

Opublikowano

hmmm edytowalem to o tak

$enabled = False
HotKeySet("{F7}", "endis")
HotKeySet("{F8}", "end")
Func endis()
   If $enabled = False Then
       $enabled = True
   Else
       $enabled = False
   EndIf
EndFunc   ;==>endis
Func end()
   Exit
EndFunc   ;==>end
While 1
   MouseMove(1067, 598)
   MouseClick("left")
   Sleep(2000)
   MouseMove(432, 534)
   MouseClick("left")
   Sleep(2000) a
   MouseMove(342, 956)
   MouseClick("left")
   Sleep(2000)
   MouseMove(434, 323)
   MouseClick("left")
   Sleep(2000)
   MouseMove(565, 453)
   MouseClick("left")
   Sleep(2000)
   MouseMove(656, 545)
   MouseClick("left")
   Sleep(2000)
   MouseMove(867, 958)
   MouseClick("left")
WEnd

ale dalej wywala syntax error pomozesz?

@edit dobra zrobilem nie zauwazylem ze wpisalem tam niechaca a niewiem po cu hmmm dobra thx za pomoc :)

1377531174-U173186.png

Opublikowano

A regulamin lokalny wam obcy? Co to za brudne taby w kodzie?

Pamiętajcie: wasz kod jest waszą wizytówką. Tak jak zeszyt jest wizytówką ucznia. Jak w kodzie jest burdel to... sami wiecie.

 

PS Tidy na prawdę pomaga lokalizować błędy.

Opublikowano

Ammm,zrobił bym to inaczej. Ammm a tak wogóle to "a" koło Sleep w pętli While 1 to dla zabawy czy frajdy ? :P

 

HotKeySet("{F5}", "start")
HotKeySet("{F6}","pause")
HotKeySet("{F7}","wyjscie")

While 2
Sleep(100)
WEnd


Func start()
While 1
MouseMove(1067, 598)
MouseClick("left")
Sleep(2000)
MouseMove(432, 534)
MouseClick("left")
Sleep(2000)  ; tu było z jakiejsc racji a 
MouseMove(342, 956)
MouseClick("left")
Sleep(2000)
MouseMove(434, 323)
MouseClick("left")
Sleep(2000)
MouseMove(565, 453)
MouseClick("left")
Sleep(2000)
MouseMove(656, 545)
MouseClick("left")
Sleep(2000)
MouseMove(867, 958)
MouseClick("left")
WEnd
EndFunc


Func wyjscie()
Exit
EndFunc


Func pause()
$Pause = Not $Pause
$Pause = True ; lub then sprawdz to
EndFunc

 

Amm,nie lepiej tak wogóle zrobić to w Koda masz GUI i rozgarnięty kod przy okazji,chyba jakieś tu błędy z funkcją Pause

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...