[Source] Autoskill metin2

[kris006]

 

#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#include <SendMessage.au3>

AdlibRegister("napis",100)

HotKeySet("{F7}","wyjdz")

HotKeySet("{F5}","start")

HotKeySet("{F6}","pauza")

AdlibRegister("skil1",250)

AdlibRegister("skil2",250)

AdlibRegister("skil3",250)

AdlibRegister("skil4",250)

Global Const $SC_DRAGMOVE = 0xF012

Global $aktywnosc

Global $koord = 180

Global $zmienna = 0

$GUI = GUICreate("AutoSkill", 205, 220, 192, 124,0)

GUISetBkColor(0xFFFFFF)

$labo_1 = GUICtrlCreateLabel("Numer slotu", 10, 14, 60, 17)

$labo_2 = GUICtrlCreateLabel("Opóźnienie w sek", 100, 14, 124, 17)

$slot1 = GUICtrlCreateCheckbox("Slot 1", 10, 38, 49, 17)

$slot2 = GUICtrlCreateCheckbox("Slot 2", 10, 70, 49, 17)

$slot3 = GUICtrlCreateCheckbox("Slot 3", 10, 102, 49, 17)

$slot4 = GUICtrlCreateCheckbox("Slot 4", 10, 134, 49, 17)

$del_1 = GUICtrlCreateInput("0", 106, 38, 81, 21)

guictrlsetstate($del_1,$GUI_DISABLE)

GUICtrlSetBkColor(-1,0xFFFFFF)

GUICtrlSetLimit(-1, 4)

$del_2 = GUICtrlCreateInput("0", 106, 70, 81, 21)

guictrlsetstate($del_2,$GUI_DISABLE)

GUICtrlSetBkColor(-1,0xFFFFFF)

GUICtrlSetLimit(-1, 4)

$del_3 = GUICtrlCreateInput("0", 106, 102, 81, 21)

guictrlsetstate($del_3,$GUI_DISABLE)

GUICtrlSetBkColor(-1,0xFFFFFF)

GUICtrlSetLimit(-1, 4)

$del_4 = GUICtrlCreateInput("0", 106, 134, 81, 21)

guictrlsetstate($del_4,$GUI_DISABLE)

GUICtrlSetBkColor(-1,0xFFFFFF)

GUICtrlSetLimit(-1, 4)

$end1 = GUICtrlCreateLabel("F5 - Start | F7 - Exit | F6 - Pauza", 15, 170, 250, 20)

GUISetState(@SW_SHOW)

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $slot1

If GUICtrlRead($slot1) = $GUI_CHECKED Then

GUICtrlSetState($del_1,$GUI_ENABLE)

Else

GUICtrlSetState($del_1,$GUI_DISABLE)

EndIf

Case $slot2

If GUICtrlRead($slot2) = $GUI_CHECKED Then

GUICtrlSetState($del_2,$GUI_ENABLE)

Else

GUICtrlSetState($del_2,$GUI_DISABLE)

EndIf

Case $slot3

If GUICtrlRead($slot3) = $GUI_CHECKED Then

GUICtrlSetState($del_3,$GUI_ENABLE)

Else

GUICtrlSetState($del_3,$GUI_DISABLE)

EndIf

Case $slot4

If GUICtrlRead($slot4) = $GUI_CHECKED Then

GUICtrlSetState($del_4,$GUI_ENABLE)

Else

GUICtrlSetState($del_4,$GUI_DISABLE)

EndIf

EndSwitch

WEnd

Func skil1()

If $aktywnosc = 1 Then

If GUICtrlRead($slot1) = $GUI_CHECKED Then

Sleep(GUICtrlRead($del_1)*1000)

Send("{1}")

EndIf

EndIf

EndFunc

Func skil2()

If $aktywnosc = 1 Then

If GUICtrlRead($slot2) = $GUI_CHECKED Then

Sleep(GUICtrlRead($del_2)*1000)

Send("{2}")

EndIf

EndIf

EndFunc

Func skil3()

If $aktywnosc = 1 Then

If GUICtrlRead($slot3) = $GUI_CHECKED Then

Sleep(GUICtrlRead($del_3)*1000)

Send("{3}")

EndIf

EndIf

EndFunc

Func skil4()

If $aktywnosc = 1 Then

If GUICtrlRead($slot4) = $GUI_CHECKED Then

Sleep(GUICtrlRead($del_4)*1000)

Send("{4}")

EndIf

EndIf

EndFunc

Func start()

$aktywnosc = 1

WinActivate("METIN2")

EndFunc

Func wyjdz()

Exit

EndFunc

Func pauza()

$aktywnosc = 0

EndFunc

 

[lexox]

jakies dodatkowe biblioteki trzeba pobierać?

[Keniger]

jakies dodatkowe biblioteki trzeba pobierać?

include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#include <SendMessage.au3>

Nie...

[Napolitano]

A gdzie to sie wpisuje zeby dzialalo ?

[GameOverMan]

A gdzie to sie wpisuje zeby dzialalo ?

Musisz pobrać edytor AutoIt:

http://www.autoitscript.com/site/autoit-script-editor/downloads/

Wklejasz i wciskasz F5.

[Keniger]

A najlepiej kompilujesz.