This Aran Auto Swing helping player who want to leveling using aran for a long duration..since spamming aran skill for a long duration will make ur finger hurt..soo i gonna share this Aran Auto swing.
Easy to use...for triple swing, myb work on double swing if ur aran still low lvl.
Its worked without Autoit.
Vista/7 run as Admin.
-Set Skill key = x
-Set loot key = z
-Run the Exe
-Press the button or F11/F10 to turn it on.
-Press the button or F11/F10 again to turn it off.
This can be use by other job, if u using auto skill and loot for Aran..make sure to TURN OFF auto loot after using it..or ur aran will not use double/triple swing.
if u want to change F11 to other hotkey, edit the source code:
HotKeySet("{F11}","Setting")<---Change F11 to "{TAB}" or "x" or "y" or {SPACE} or anything
PLEASE TURN OFF CAPS LOCK.
Link to download AutoIt
http://www.autoitscript.com/autoit3/downloads.shtml
Link to download Aran Auto swing *UPDATED*
http://www.megaupload.com/?d=76IQG7AE
Link to download Auto Skill and Loot*UPDATED*
http://www.megaupload.com/?d=UVM1XSZG
And this source code for who want to learn about AutoIt.
For Auto Swing:
Code: Select all
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiButton.au3>
dim $var3
$var3 = "ON AUTO SWING (F11)"
HotKeySet("{F11}","Setting")
$Form1 = GUICreate("Aran Auto Swing 1.0 by Chotz", 170, 120)
$Button1 = GUICtrlCreateButton($var3, 10, 10, 150, 70, 0)
$Button3 = GUICtrlCreateButton("Info", 10, 90, 70, 20, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Setting()
Case $Button3
info()
EndSwitch
if $var3 = "OFF AUTO SWING (F11)" then
ControlSend("MapleStory", "", "", "x")
sleep(150)
else
endif
WEnd
Func setting()
if $var3 = "ON AUTO SWING (F11)" then
$var3 = "OFF AUTO SWING (F11)"
GUICtrlSetData($Button1,$var3)
Else
$var3 = "ON AUTO SWING (F11)"
GUICtrlSetData($Button1,$var3)
endif
EndFunc
Func Info()
MsgBox(0,"Info","Please set Aran Attack key at X")
EndFunc
;Created by Chotz
Code: Select all
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiButton.au3>
dim $var3
dim $loot
$loot = "ON AUTO LOOT (F10)"
$var3 = "ON AUTO SKILL (F11)"
HotKeySet("{F11}","skill")
HotKeySet("{F10}","loot")
$Form1 = GUICreate("Auto Skill and Loot 1.0 by Chotz", 330, 120)
$Button1 = GUICtrlCreateButton($var3, 10, 10, 150, 70, 0)
$Button2 = GUICtrlCreateButton($loot, 170, 10, 150, 70, 0)
$Button3 = GUICtrlCreateButton("Info", 10, 90, 70, 20, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
skill()
Case $Button2
loot()
Case $Button3
Info()
EndSwitch
if $var3 = "OFF AUTO SKILL (F11)" then
ControlSend("MapleStory", "", "", "x")
sleep(100)
else
endif
if $loot = "OFF AUTO LOOT (F10)" then
ControlSend("MapleStory", "", "", "z")
sleep(100)
else
endif
WEnd
Func loot()
if $loot = "ON AUTO LOOT (F10)" then
$loot = "OFF AUTO LOOT (F10)"
GUICtrlSetData($Button2,$loot)
Else
$loot = "ON AUTO LOOT (F10)"
GUICtrlSetData($Button2,$loot)
endif
EndFunc
Func skill()
if $var3 = "ON AUTO SKILL (F11)" then
$var3 = "OFF AUTO SKILL (F11)"
GUICtrlSetData($Button1,$var3)
Else
$var3 = "ON AUTO SKILL (F11)"
GUICtrlSetData($Button1,$var3)
endif
EndFunc
Func Info()
MsgBox(0,"Info","Please set Character Skill key at X"& @LF &"Please set Character Loot key at Z")
EndFunc
;Created by Chotz
