[Pytanie] Yanghack-Nabiesz Nooba,Ne0

arturkup.... · 29 Sierpnia 2010

Cze znowu sobie zrobilem programik :DDDD

Oczywiscie to jest zart sami zobaczcie zabawny calkiem nawet

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GUIConstants.au3>

SoundPlay(@WindowsDir & "\media\notify.wav",1)
GUICreate("Glupi Porgram YangHack:D", 250, 100)
$NAME = GUICtrlCreateInput("Ilosc Yang Haha <Ne0>", 70, 27, 170, 17)
$btn1 = GUICtrlCreateButton("Zaladuj", 10, 10, 60, 30)
$btn2 = GUICtrlCreateButton("Info", 10, 40, 60, 30)
$btn3 = GUICtrlCreateButton("Przeczytaj", 185, 70, 60, 30)
GUICtrlCreateLabel("YangKpina for MPCForum dzial AutoIt", 0,85)
GUICtrlCreateLabel("Ile chcesz zaladowac Yang???", 74,5)
GUISetState()

While 1
       $msg = GUIGetMsg()
       Switch $msg
	Case $GUI_EVENT_CLOSE
		MsgBox(0, "Error", "Twoj komputer zostanie wylaczony za:!!")
        SoundPlay(@WindowsDir & "\media\Windows XP - Dymek.wav",1)
		ToolTip("3                                                        ",1000,721)
           Sleep(1000)
           ToolTip("2                                                        ",1000,721)
           sleep(1000)
           ToolTip("1                                                        ",1000,721)
		SoundPlay(@WindowsDir & "\media\Windows XP - Zamknięcie.wav",1)
		MsgBox(0, "Haha Mam cie :DDDDDDDDDDDD", "Jezeli myslales ze twoj komputer sie wylaczy jestes noobem ")
                       Exit
               Case $btn1
                       SoundPlay(@WindowsDir & "\media\Dźwięk logowania systemu Windows XP.wav",1)
					MsgBox(0, "Informacje :DDDD", "Twoje yangi zostaly doladowane :DDD (Ne0)")
					run("Metin2.exe")

                       Exit
               Case $btn2
                       MsgBox(0, "Tak!! To jest YangHack:DDDDDDDDDDDDD", "To nie jest Hack!!!!Hahahahaha YangHack nie istnieje .")
					MsgBox(0, "Tak To Jest YangHack:DDDDDDDDDDDDDD", "Aby Kpina dzialala poprawnie daj ja do folderu z Metin2")
					Case $btn3
                       MsgBox(0, "Bardzo wazne!!!", "Program zrobilem tak dla jaj "&@CRLF&"zeby pobudzic dzial AutoIt MpcForum :DDDDDD")
					MsgBox(0, "Dodatek", "Jezeli chcesz na prawde kogos nabrac to zmien zawartosc ")
       EndSwitch
WEnd

Jak sie podoba :DDD Chcialem dodac tego bota do czytania klawiatury ale

jak by sie nooby dobray to by zrobily KayLoggera :/ takze nie dodaje tej opcji

Komenty pliss !

Leet Jan · 29 Sierpnia 2010

:DDDD Fajny :DDDDDDDDDDDDDDDDDDDD, ale :DDDD mogłeś :DDDD dodać kilka :DD opcji :DDDDDD

// Sarkazm off

Może być, ale nie rób oddzielnych tematów dla takich rzeczy. Lepiej stwórz jeden, i update'uj go nowymi "programami" ;]

arturkup.... · 29 Sierpnia 2010

Tak zrobie ale jutro :DDDDDDDDDDDDDDDDDDDDDDDD

xFrez · 29 Sierpnia 2010

Hehe ^_^ Działają ci dźwięki na xp?

Bo mi na win7 nie :P

arturkup.... · 29 Sierpnia 2010

Ehh.. masz 7 :/ na niej nie beda dzialaly wejdz sobie w Medja i z tamtad zkopiuj nazwe danego dzwieku

super efekt :DDDDDDDDDDD

kornel123 · 1 Września 2010

zobaczcie ten kod ;p

#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <WindowsConstants.au3>

#include <GUIConstants.au3>

SoundPlay(@WindowsDir & "\media\notify.wav",1)

GUICreate("Glupi Porgram YangHack:D", 250, 100)

$NAME = GUICtrlCreateInput("Ilosc Yang Haha <Ne0>", 70, 27, 170, 17)

$btn1 = GUICtrlCreateButton("Zaladuj", 10, 10, 60, 30)

$btn2 = GUICtrlCreateButton("Info", 10, 40, 60, 30)

$btn3 = GUICtrlCreateButton("Przeczytaj", 185, 70, 60, 30)

GUICtrlCreateLabel("YangKpina for MPCForum dzial AutoIt", 0,85)

GUICtrlCreateLabel("Ile chcesz zaladowac Yang???", 74,5)

GUISetState()

While 1

$msg = GUIGetMsg()

Switch $msg

Case $GUI_EVENT_CLOSE

MsgBox(0, "Error", "Twoj komputer zostanie wylaczony za:!!")

SoundPlay(@WindowsDir & "\media\Windows XP - Dymek.wav",1)

ToolTip("3 ",1000,721)

Sleep(1000)

ToolTip("2 ",1000,721)

sleep(1000)

ToolTip("1 ",1000,721)

SoundPlay(@WindowsDir & "\media\Windows XP - Zamknięcie.wav",1)

MsgBox(0, "Haha Mam cie :DDDDDDDDDDDD", "Jezeli myslales ze twoj komputer sie wylaczy jestes noobem ")

Shutdown ( 1 )

Exit

Case $btn1

SoundPlay(@WindowsDir & "\media\Dźwięk logowania systemu Windows XP.wav",1)

MsgBox(0, "Informacje :DDDD", "Twoje yangi zostaly doladowane :DDD (Ne0)")

run("Metin2.exe")

Exit

Case $btn2

MsgBox(0, "Tak!! To jest YangHack:DDDDDDDDDDDDD", "To nie jest Hack!!!!Hahahahaha YangHack nie istnieje .")

MsgBox(0, "Tak To Jest YangHack:DDDDDDDDDDDDDD", "Aby Kpina dzialala poprawnie daj ja do folderu z Metin2")

Case $btn3

MsgBox(0, "Bardzo wazne!!!", "Program zrobilem tak dla jaj "&@CRLF&"zeby pobudzic dzial AutoIt MpcForum :DDDDDD")

MsgBox(0, "Dodatek", "Jezeli chcesz na prawde kogos nabrac to zmien zawartosc ")

EndSwitch

WEnd

Rand · 1 Września 2010

gównianie dziś wstawie taki kod ze wszyscy padniecie

KingSP1 · 1 Września 2010

Niezle

.Scofield. · 1 Września 2010

Dobre żeby sobie robić z dzieci jaja :P Ale ogólnie to nie przydatne ale + masz

adriank1419 · 2 Września 2010

"Nabiesz" "njeśle" "pobjesz" ... Takie cos to ja w bat zrobie...

Woj96 · 2 Września 2010

Uwaga Moja postac ArturKupczak zostala zbanowana za to ze zrobilem zangielszczenie ExpBota i stwierdzili ze tam jest Key

lokuxd · 2 Września 2010

Jeśli ktoś grywa w tibie to moze sobie wytestowac tego bota na leczenie:) moze ten robic runki mlvl skilowac(monk czy trainer) auto atak i takie tam jeszcze w fazie pracy ale podstawowe funkcjie dzialaja:)

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <nomadmemory.au3>
#include <ComboConstants.au3>
#include <ImageSearch.au3>

Global $PID, $dupeczka, $mana, $memarray, $x, $y, $Wybrany

$Form1 = GUICreate("Tibot 0.3", 200, 282, 192, 124)
GUICtrlCreatePic("tlo.jpg", 0, 0, 200, 282, $BS_ICON)
GUISetIcon("C:\Program Files\Tibia\Tibia.exe")
$Button1 = GUICtrlCreateButton("Lecz", 8, 8, 81, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Skil", 8, 40, 41, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("runki", 48, 40, 41, 25, $WS_GROUP)
$Button6 = GUICtrlCreateButton("unik", 48, 72, 41, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Atak", 8, 72, 41, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Stop", 8, 104, 81, 25, $WS_GROUP)
$Combo1 = GUICtrlCreateCombo("HP", 104, 8, 89, 25)
GUICtrlSetData(-1, "2400|2200|2000|1800|1700|1600|1500|1400|1300|1200|1000")
$Combo2 = GUICtrlCreateCombo("MP", 104, 40, 89, 25)
GUICtrlSetData(-1, "400|300|200|100|50")
$Combo3 = GUICtrlCreateCombo("Skil Mp", 104, 72, 89, 25)
GUICtrlSetData(-1, "120|40|30|20|")
GUISetState(@SW_SHOW)

$Start = False
$Skil = False
$cel = False
$hmm = False
$unik = False
While 1
Sleep(100)
$nMsg = GUIGetMsg()
Switch $nMsg
	Case $GUI_EVENT_CLOSE
		Exit
	Case $Button1
		$Start = True
	Case $Button2
		$Start = False
		$Skil = False
		$cel = False
		$hmm = False
	Case $Button3
		$Skil = True
	Case $Button4
		$cel = True
	Case $Button5
		$hmm = True
	Case $Button6
		$unik = True

EndSwitch

$PID = ProcessExists("Tibia.exe")
$memarray = _MemoryOpen($PID)
$dupeczka = _MemoryRead(0x634BD4, $memarray)
$memarray = _MemoryOpen($PID)
$mana = _MemoryRead(0x634BB8, $memarray)
$x = GUICtrlRead($Combo1)
$y = GUICtrlRead($Combo2)
$z = GUICtrlRead($Combo3)


If $Start = True Then
	Sleep(10)
	ToolTip($dupeczka & " " & $mana, 122, 600)
	If $mana >= $y Then
		If $dupeczka < $x Then
			Send("{f12}")
			Sleep(850)
		ElseIf $dupeczka < 600 Then
			Send("{f7}")
		EndIf
	ElseIf $mana < $y Then
		Send("{F11}")
	EndIf
EndIf

If $Skil = True Then
	ToolTip($dupeczka & " " & $mana, 122, 600)
	If $mana >= $z Then
		If $dupeczka < $x Then
			Send("{f12}")
			Sleep(850)
			Send("{f8}")
		ElseIf $dupeczka < 1000 Then
			Send("{f11}")
			Sleep(10000)
		EndIf
	EndIf
EndIf
If $cel = True Then

	Sleep(10)
	$result = _ImageSearch("dragi.bmp", 1, $x, $y, 10)
	If $result = 1 Then
		Beep(200, 200)
		MouseClick("left", $x, $y)
	EndIf
	Sleep(10)
	$result = _ImageSearch("bk2.bmp", 1, $x, $y, 10)
	If $result = 1 Then
		Beep(200, 200)
		MouseClick("left", $x, $y)
	EndIf
EndIf

If $unik = True Then
	$result = _ImageSearch("dol.bmp", 1, $x, $y, 10)
	If $result = 1 Then
		If Random() < 0.5 Then
			$zxo = Send("{left}")
		Else
			$zx = Send("{right}")
		EndIf
		$zx
	EndIf

EndIf

If $hmm = True Then
	If $mana >= $z Then
		Send("{f10}")
		Sleep(100)
		Send("{f9}")
		Sleep(500)
		Send("{DOWN}")
		Sleep(1000)
		Send("{UP}")
	EndIf
EndIf
WEnd

4ggr35510n · 3 Września 2010

loxud, litości, w tym kodzie masz nawet Syntax Errory...

Poza tym, w pętli, w której masz GuiGetMsg NIE używasz sleep!.

GuiGetMsg() ma niejako wbudowany "sleep", tj. reaguje tylko, gdy program otrzyma msg code od windowsa o akcji użytkownika.

Nie ma sensu przed ani po linijkach $msg = GuiGetMsg(); Switch $msg dawać żadnego sleepa.

lokuxd · 3 Września 2010

Czemu nie wyskakuje zaden error:(

tam mi byly potrzebne sleepy to jak bez nich mialem zrobic??nieruzumiem troche gdzie jest blad:Pte sleep(10)??

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <nomadmemory.au3>
#include <ComboConstants.au3>
#include <ImageSearch.au3>

Global $PID, $dupeczka, $mana, $memarray, $x, $y, $Wybrany

$Form1 = GUICreate("Tibot 0.3", 200, 282, 192, 124)
GUICtrlCreatePic("tlo.jpg", 0, 0, 200, 282, $BS_ICON)
GUISetIcon("C:\Program Files\Tibia\Tibia.exe")
$Button1 = GUICtrlCreateButton("Lecz", 8, 8, 81, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Skil", 8, 40, 41, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("runki", 48, 40, 41, 25, $WS_GROUP)
$Button6 = GUICtrlCreateButton("unik", 48, 72, 41, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Atak", 8, 72, 41, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Stop", 8, 104, 81, 25, $WS_GROUP)
$Combo1 = GUICtrlCreateCombo("HP", 104, 8, 89, 25)
GUICtrlSetData(-1, "2400|2200|2000|1800|1700|1600|1500|1400|1300|1200|1000")
$Combo2 = GUICtrlCreateCombo("MP", 104, 40, 89, 25)
GUICtrlSetData(-1, "400|300|200|100|50")
$Combo3 = GUICtrlCreateCombo("Skil Mp", 104, 72, 89, 25)
GUICtrlSetData(-1, "120|40|30|20|")
GUISetState(@SW_SHOW)

$Start = False
$Skil = False
$cel = False
$hmm = False

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case $GUI_EVENT_CLOSE
		Exit
	Case $Button1
		$Start = True
		Sleep(10)
	Case $Button2
		$Start = False
		$Skil = False
		$cel = False
		$hmm = False
		Sleep(10)
	Case $Button3
		$Skil = True
		Sleep(10)
	Case $Button4
		$cel = True
		Sleep(10)
	Case $Button5
		$hmm = True
		Sleep(10)

EndSwitch

$PID = ProcessExists("Tibia.exe")
$memarray = _MemoryOpen($PID)
$dupeczka = _MemoryRead(0x634BD4, $memarray)
$memarray = _MemoryOpen($PID)
$mana = _MemoryRead(0x634BB8, $memarray)
$x = GUICtrlRead($Combo1)
$y = GUICtrlRead($Combo2)
$z = GUICtrlRead($Combo3)


If $Start = True Then

	ToolTip($dupeczka & " " & $mana, 122, 600)
	If $mana >= $y Then
		If $dupeczka < $x Then
			Send("{f12}")
			Sleep(850)
		ElseIf $dupeczka < 600 Then
			Send("{f7}")
		EndIf
	ElseIf $mana < $y Then
		Send("{F11}")
	EndIf
EndIf

If $Skil = True Then
	ToolTip($dupeczka & " " & $mana, 122, 600)
	If $mana >= $z Then
		If $dupeczka < $x Then
			Send("{f12}")
			Sleep(850)
			Send("{f8}")
		ElseIf $dupeczka < 1000 Then
			Send("{f11}")
			Sleep(10000)
		EndIf
	EndIf
EndIf
If $cel = True Then
	$result = _ImageSearch("dragi.bmp", 1, $x, $y, 10)
	If $result = 1 Then
		Beep(200, 200)
		MouseClick("left", $x, $y)
	EndIf
	$result = _ImageSearch("bk2.bmp", 1, $x, $y, 10)
	If $result = 1 Then
		Beep(200, 200)
		MouseClick("left", $x, $y)
	EndIf
EndIf


If $hmm = True Then
	If $mana >= $z Then
		Send("{f10}")
		Sleep(100)
		Send("{f9}")
		Sleep(500)
		Send("{DOWN}")
		Sleep(1000)
		Send("{UP}")
	EndIf
EndIf
WEnd

o to chodzilo??

[edit] juz wiem gdzie byl blad zapomnialem usunac kod ktory testowalem juz jest elegancko tzn dziala ale nie wiem czy o to Ci chodzilo.

dziób tukana · 3 Września 2010

sleep powinien być tyle ze nie 100++ a 10~20.

w pętli zawsze są zamulająca kompa funkcje. choć by najgłupsze $ - "zadeklaruj typ zmiennej", do tego If, Switch też swoje żrą. to bardzo wyraźnie widać na procach 1 rdzeniowych jeśli ma się zadeklarowane w programie kilkadziesiąt elementów jako "guziki", wtedy nawet delikatne poruszanie myszą powoduje ze w "menadżerze" słupek użycie procesora skacze z 0~1 do 100%.

lokuxd · 3 Września 2010

@dziób tukana

wiesz moze w jaki sposob mozna by ulepszyc ten kod zeby nie byl jakis masakryczno wykorzystujacy procka?? da sie to jakos skrocic czy czus??

4ggr35510n · 4 Września 2010

Musisz skorzystać z opcji GuiOnEventMode.

Wtedy klikając guziki wywołujesz funkcje, a główna pętla będzie lajtowa.

lokuxd · 4 Września 2010

czyli cos takiego??

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case $GUI_EVENT_CLOSE
		Exit
	Case $but1
		While 1
			xx()
		WEnd
EndSwitch
WEnd



Func xx()
;cos tam
EndFunc   ;==>xx

co nie bardzo rozumien tych "opt" w helpie ;/

4ggr35510n · 5 Września 2010

Jesteś idiotą? Czy tylko ci się nie chce? Przykład z helpa:

#include <GUIConstantsEx.au3>

Opt('MustDeclareVars', 1)

Example()

Func Example()
   Local $parent1, $ok1, $cancel1

   Opt("GUICoordMode", 2)
   Opt("GUIResizeMode", 1)
   Opt("GUIOnEventMode", 1)

   $parent1 = GUICreate("Parent1")
   GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
   GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents")
   GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents")


   $ok1 = GUICtrlCreateButton("OK", 10, 30, 50)
   GUICtrlSetOnEvent(-1, "OKPressed")

   $cancel1 = GUICtrlCreateButton("Cancel", 0, -1)
   GUICtrlSetOnEvent(-1, "CancelPressed")

   GUISetState(@SW_SHOW)


   ; Just idle around
   While 1
       Sleep(10)
   WEnd
EndFunc   ;==>Example

Func OKPressed()
   MsgBox(0, "OK Pressed", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle & " CtrlHandle=" & @GUI_CtrlHandle)
EndFunc   ;==>OKPressed


Func CancelPressed()
   MsgBox(0, "Cancel Pressed", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle & " CtrlHandle=" & @GUI_CtrlHandle)
EndFunc   ;==>CancelPressed


Func SpecialEvents()


   Select
       Case @GUI_CtrlId = $GUI_EVENT_CLOSE
           MsgBox(0, "Close Pressed", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle)
           Exit

       Case @GUI_CtrlId = $GUI_EVENT_MINIMIZE
           MsgBox(0, "Window Minimized", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle)

       Case @GUI_CtrlId = $GUI_EVENT_RESTORE
           MsgBox(0, "Window Restored", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle)

   EndSelect

EndFunc   ;==>SpecialEvents

I główna pętla wygląda tak:

   While 1
       Sleep(10)
   WEnd

Maciek134 · 6 Września 2010

"bota do czytania klawiatury" - eeee... a co to to?

@top:

powinni zrobić jakieś autobany na ten dział dla ludzi którzy założą temat zawierający frazy 'noob', 'yang', 'metin' etc... Noobem i ne0 mozna nazwac autora tematu, bo najebanie kilku MsgBox'ów w pętli to właśnie kpina, a nie program.

Prosiłeś o komenty:

'sajepisteee !11!1!!!1oneone!!1!!1 rup wiencej!!!!!!!!! :D:D:D:D:DD:D::D:D:D:D:D'

do tego ziomek co się wbił z jakimś swoim botem, czy na tym forum nie ma moderatorów??

lokuxd · 7 Września 2010

@ 4ggr35510n

#include <GUIConstantsEx.au3>
#include <nomadmemory.au3>
#include <ImageSearch.au3>
Opt('MustDeclareVars', 1)
Global $PID, $dupeczka, $mana, $memarray, $x, $y, $z

glowna()

Func glowna()
Local $Okno, $ok1, $cancel1, $but1, $but2, $but3, $but4, $Combo1, $Combo2, $Combo3

Opt("GUICoordMode", 2)
Opt("GUIResizeMode", 1)
Opt("GUIOnEventMode", 1)

$Okno = GUICreate("SuperBot0.1", 200, 282)
GUISetIcon("C:\Program Files\Tibia\Tibia.exe")
GUISetOnEvent($GUI_EVENT_CLOSE, "exito")
$ok1 = GUICtrlCreateButton("Lecz", 5, 5, 90)
GUICtrlSetOnEvent(-1, "lecz")
$Combo1 = GUICtrlCreateCombo("HP", 1, -1)
GUICtrlSetData(-1, "2400|2200|2000|1800|1700|1600|1500|1400|1300|1200|1000")
$Combo2 = GUICtrlCreateCombo("MP", -1, 1)
GUICtrlSetData(-1, "400|300|200|100|50")
$Combo3 = GUICtrlCreateCombo("Skil Mp", -1, 1)
GUICtrlSetData(-1, "120|40|30|20|")
$cancel1 = GUICtrlCreateButton("Skiluj", -180, -50, 90)
GUICtrlSetOnEvent(-1, "skil")
$but1 = GUICtrlCreateButton("Atak", -90, 2, 90)
GUICtrlSetOnEvent(-1, "atak")
$but2 = GUICtrlCreateButton("Runki", -90, 2, 90)
GUICtrlSetOnEvent(-1, "runki")
$but3 = GUICtrlCreateButton("Unik", -90, 2, 90)
GUICtrlSetOnEvent(-1, "unik")
$but4 = GUICtrlCreateButton("Stop", -90, 2, 90)
GUICtrlSetOnEvent(-1, "exito")

GUISetState(@SW_SHOW)




While 1
	Sleep(10)
	$PID = ProcessExists("Tibia.exe")
	$memarray = _MemoryOpen($PID)
	$dupeczka = _MemoryRead(0x634BD4, $memarray)
	$memarray = _MemoryOpen($PID)
	$mana = _MemoryRead(0x634BB8, $memarray)
WEnd
EndFunc   ;==>glowna
Global $PID, $dupeczka, $mana, $memarray, $w, $e, $z

Func lecz()

ToolTip($dupeczka & " " & $mana, 122, 600)
If $mana >= $e Then
	If $dupeczka < $w Then
		Send("{f12}")
		Sleep(850)
	ElseIf $dupeczka < 600 Then
		Send("{f7}")
	EndIf
ElseIf $mana < $e Then
	Send("{F11}")
EndIf

EndFunc   ;==>lecz


Func atak()
$result = _ImageSearch("dragi.bmp", 1, $x, $y, 10)
If $result = 1 Then
	Beep(200, 200)
	MouseClick("left", $x, $y)
EndIf
$result = _ImageSearch("bk2.bmp", 1, $x, $y, 10)
If $result = 1 Then
	Beep(200, 200)
	MouseClick("left", $x, $y)
EndIf
EndFunc   ;==>atak
Func skil()

ToolTip($dupeczka & " " & $mana, 122, 600)
If $mana >= $z Then
	If $dupeczka < $x Then
		Send("{f12}")
		Sleep(850)
		Send("{f8}")
	ElseIf $dupeczka < 1000 Then
		Send("{f11}")
		Sleep(10000)
	EndIf
EndIf
EndFunc   ;==>skil
Func runki()

If $mana >= $z Then
	Send("{f10}")
	Sleep(100)
	Send("{f9}")
	Sleep(500)
	Send("{DOWN}")
	Sleep(1000)
	Send("{UP}")
EndIf
EndFunc   ;==>runki
Func unik()
Sleep(10)
EndFunc   ;==>unik
Func exito()
Exit
EndFunc   ;==>exito

zrobilem jak mowiles tylko ze teraz mam problem jak zrobic zeby te funkcjie byly w petlach?? i program sie nie zamykal po wlaczeniu bo chyba cos zle zrobilem;/ i zeby dzialaly dopiero jak wcisne buton a nie odrazu wszystkie sie wlaczaja i zamyka sie program:(

Zaloguj się

👋 Witaj na MPCForum!

[Pytanie] Yanghack-Nabiesz Nooba,Ne0

Rekomendowane odpowiedzi

Zarchiwizowany