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] Prościutki skrypt do lekkiego przerobienia !


Rekomendowane odpowiedzi

Opublikowano

Witam wszystkich. Chciałbym, aby ten skrypt, który zaprezentowałem niżej został podczepiony pod konkretną aplikację (w tym przypadku pod gta_sa.exe), na pewno da się to zrobić. Chodzi mi o to, że autoit wykonuje swoją pracę (czyli naciska spację w określonych odstępach czasowych), pomimo tego, że skrypt jest zminimalizowany.

 

HotKeySet("{END}", "Start")
HotKeySet("{HOME}", "_check")

Local $Stop = False

While 1
	Sleep(100)
WEnd

Func _check()
	If $Stop = False Then
			$Stop = True
	ElseIf $Stop = True Then
			$Stop = False
	EndIf
EndFunc

Func Start()
	Do
			Send("{Space down}")
			Sleep(2000)
		  Send("{space up}")
			Sleep(1200)

	Until $Stop = True
EndFunc

 

Jeżeli byłaby możliwość prosiłbym też o dodanie tutaj linijki, która po 40 minutach zakańcza działanie skryptu. Po prostu wyłącza go.

 

Na pewno dałoby radę to zrobić, o co serdecznie proszę.

 

Pozdrawiam i z góry dziękuję,

walus654321

Opublikowano

tak

 

a żeby wyłączył się po 40 minutach możesz zrobić tak.

 

na początku (albo w funkcji start)

$timer = timerinit()

 

i w pętli programu

 

if timerdiff($timer) > 240000 then exit

Opublikowano

Czyli ma to wyglądać tak?

 

HotKeySet("{END}", "Start")
HotKeySet("{HOME}", "_check")
$name="Grand theft auto San Andreas"  

Local $Stop = False
AdlibRegister("koniec", 40*60*1000)
While 1


Sleep(100)
WEnd

Func _check()
  If $Stop = False Then
	  $Stop = True
  ElseIf $Stop = True Then
	  $Stop = False
  EndIf
EndFunc

Func Start()
  Do
	  ControlSend($name, "Grand theft auto San Andreas", "", "{Space down}")
	  ;Send("{Space down}")
	  Sleep(2000)
	  ControlSend($name, "Grand theft auto San Andreas", "", "{Space up}")
	  ;Send("{space up}")
	  Sleep(1200)

  Until $Stop = True
EndFunc
Func koniec()
	exit
  EndFunc


Exit

 

Niestety, nic się nie dzieje ani na zminimalizowanym, ani na od minimalizowanym skrypt który jest podany w 1 poście działa w 100% ... nie wiem co jest nie tak...

Opublikowano
Opublikowano

Tak jak teraz?

 

HotKeySet("{END}", "Start")
HotKeySet("{HOME}", "_check")

           $name="Grand theft auto San Andreas"   

          Local $Stop = False
         $timer = timerinit()

     While 1
     Sleep(100)
   WEnd

   Func _check()
     If $Stop = False Then
         $Stop = True
     ElseIf $Stop = True Then
         $Stop = False
     EndIf
   EndFunc

   Func Start()
     Do


          ControlSend($name, "[CLASS:Grand theft auto San Andreas]", "", "{Space down}")

         Sleep(2000)
         ControlSend($name, "[CLASS:Grand theft auto San Andreas]", "", "{Space up}")

         Sleep(1200)

      if timerdiff($timer) > 240000 then exit

       Until $Stop = True


    EndFunc

     Func koniec()
       exit
     EndFunc


Exit

Opublikowano

HotKeySet("{END}", "Start")
HotKeySet("{HOME}", "_check")

           $name="[CLASS:Grand theft auto San Andreas]"   

          Local $Stop = False
         $timer = timerinit()

     While 1
     Sleep(100)
   WEnd

   Func _check()
     If $Stop = False Then
         $Stop = True
     ElseIf $Stop = True Then
         $Stop = False
     EndIf
   EndFunc

   Func Start()
     Do


          ControlSend($name, "", "", "{Space down}")

         Sleep(2000)
         ControlSend($name, "", "", "{Space up}")

         Sleep(1200)

      if timerdiff($timer) > 240000 then exit

       Until $Stop = True


    EndFunc

     Func koniec()
       exit
     EndFunc


Exit

teraz

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...