Page 1 of 5

Auto Skill and Loot

Posted: Fri Oct 01, 2010 9:05 pm
by Chotz
-Add auto skill and loot for other job...just for spam skill.

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
For Auto Skill and Loot:

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

ps: i just got a few post here but im not a leecher :) , dont just leech..go learn something, that why i provide source code for u all.

Re: Aran Auto Swing

Posted: Fri Oct 01, 2010 10:16 pm
by xiangloong
Chotz wrote: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.
i made this using AutoIt, soo i dont know u need to install AutoIt or not to run this Exe..since i soo lazy unistall my AutoIt to testing it without AutoIt.

-Set Aran attack key = x
-Run the Exe
-Press the button or F11 to turn it on.
-Press the button or F11 again to turn it off.

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



Link to download AutoIt
http://www.autoitscript.com/autoit3/downloads.shtml

Link to download Aran Auto swing *Delay 150milisec*
http://www.megaupload.com/?d=0HE93QJC

And this source code for who want to learn about AutoIt.

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", 260, 100)
$Button1 = GUICtrlCreateButton($var3, 53, 15, 150, 70, 0)
GUISetState(@SW_SHOW)
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			Setting()
	EndSwitch
	if $var3 = "OFF AUTO SWING (F11)" then
		ControlSend("MapleStory", "", "", "x")
		sleep(200)
	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
;Created by Chotz

ps: i just got a few post here but im not a leecher :) , dont just leech..go learn something, that why i provide source code for u all.
gratz on ur release^^

Re: Aran Auto Swing

Posted: Fri Oct 01, 2010 10:20 pm
by SoullessSoul
the megaupload cant dl o.0
it giv me this 该文件暂时无法访问。
= ) learning now >.<

Re: Aran Auto Swing

Posted: Fri Oct 01, 2010 10:52 pm
by xiangloong
hei chotz try upload it at mediafire

Re: Aran Auto Swing

Posted: Fri Oct 01, 2010 11:26 pm
by Chotz
Wait mediafire on Maintenance ..
i checked megaupload can access alrealy.

Re: Aran Auto Swing

Posted: Fri Oct 01, 2010 11:34 pm
by SoullessSoul
Ok thx for releasing ><

Re: Aran Auto Swing

Posted: Fri Oct 01, 2010 11:59 pm
by Chotz
just helping other gamers =)
this can be used by other job to spam skill too...

Re: Aran Auto Swing

Posted: Sat Oct 02, 2010 1:08 am
by SoullessSoul
Yeah..i try it dy...kinda nice...
u mean for other job but need edit the script?
Edit: ok found it =) thx for this tut and the source :D

Re: Aran Auto Swing

Posted: Sat Oct 02, 2010 1:15 am
by Chotz
It still can use unedited for other job..but since it for aran it spam the attack button too fast...150milisec..
soo i u need slow spam just edit ;

ControlSend("MapleStory", "", "", "x")
sleep(150)<-----EDIT HERE

Re: Aran Auto Swing

Posted: Sat Oct 02, 2010 1:28 am
by SoullessSoul
Yeah found it =X
try to make 1 Auto Charge for paladin
Edit : Issit possible to make it to Second instead of MS?
I chg base on your script
Credit Chotz
Auto Loot Is In 100Ms chg yourself at the script if u want it faster =)
Untitled.png
Auto Loot.rar