[AutoHotKey] Casting Macro

08/14/2009 11:18 Penakle#1
Code:
;
; AutoHotkey Version: 1.x
; Language:       English
; Platform:       Win9x/NT
; Author:         Keraam
;
; Script Function: Casts Mana Missile and Heal Self. Pauses with the End button and exits with the DELETE key.
;	
;

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.

InputBox, manaMissile, ManaMissile, Hotbar number for Mana Missile?,,,,,,,,1
InputBox, selfHeal, HealSelf, Hotbar number for Heal Self?,,,,,,,,2
InputBox, rest, Rest, Hotbar number for Rest?,,,,,,,,0
InputBox, manaMissileNum, ManaMissileQuantity, How many Mana Missiles?,,,,,,,,18
InputBox, restTime, RestTime, How long to Rest?,,,,,,,,155000
MsgBox, "Click OK then Alt + Tab into Darkfall to start the script."

;SetKeyDelay, 10, 10


WinWaitActive, Darkfall Online
IfWinActive, Darkfall Online
{
	Loop
	{
		Send +1
		Sleep, 2000
		Send {R}   ; To go into combat mode
		Sleep, 500
		HealSelf()
		Loop %manaMissileNum%
		{
			ManaMissile()
		}
		Sleep, 500
		HealSelf()
		Sleep, 2500
		Rest()
		Sleep, 5000
	}
}

End::Pause

Delete::ExitApp	

HealSelf()
{
	global selfHeal
	Sleep, 500
	Send %selfHeal%
	Sleep, 500
	Click
	Sleep, 2400	
}

ManaMissile()
{
	global manaMissile
	Sleep, 500
	Send %manaMissile%
	Sleep, 500
	Click
	Sleep, 2300
}

Rest()
{
	global rest
	global restTime
	Sleep, 2000
	Send {r}
	Sleep, 500
	Send %rest%
	Sleep, 500
	Click
	Sleep, %restTime%
	Send {SPACE}			
	Sleep, 1000
}