Buff Bot

07/19/2004 09:40 Lowfyr#1
Requirements: AC-Tools

Code:
SetActiveWindow FFXiAPP 

Constants 
//Change this to 1 if you wish to log out then back in after a certin numbers on loops\\ 
Log = 0 
//Set how many loops you want to run before you log out then back in here\\ 
Loops = 0 
//Change the 0 to a 1 if you wish to work that spell NOTE: Only one spell at a time\\ 
Cure = 0 
Protect = 0 
BlazeSpikes = 0 
//Set your Mp here\\ 
Mp = 0 
//Dont change anything below this line\\ 
Spell = 0 
Casts = 0 
Rest = 0 
RestCheck = 0 
LogCheck = 0 
End 

If $Cure = 1 
SetConst Spell = 8 
End 

If $Protect = 1 
SetConst Spell = 7 
End 

If $BlazeSpikes = 1 
SetConst Spell = 8 
End 

Compute $Casts = $MP DIV $Spell 
Compute $Rest = $MP + 20 //Thx methodical for this one. 

Call WhatSpell 

Procedure WhatSpell 
If $Cure = 1 
Call Cure 
End 
If $Protect = 1 
Call Protect 
End 
If $BlazeSpikes = 1 
Call BlazeSpikes 
End 
End 

Procedure Cure 
Keys /ma "Cure" <me> 
Keys {Return} 
Delay 8 sec 
Inc $RestCheck 
If $RestCheck = $Casts 
Call Rest 
End 
Call Cure 
End 

Procedure BlazeSpikes 
Keys /ma "Blaze Spikes" <me> 
Keys {Return} 
Delay 8 sec 
Inc $RestCheck 
If $RestCheck = $Casts 
Call Rest 
End 
Call BlazeSpikes 
End 

Procedure Protect 
Keys /ma "Protect" <me> 
Keys {Return} 
Delay 8 sec 
Inc $RestCheck 
If $RestCheck = $Casts 
Call Rest 
End 
Call Protect 
End 

Procedure Rest 
Inc $LogCheck 
SetConst RestCheck = 0 
Keys /heal 
Keys {Return} 
Delay $Rest sec 
Keys /heal 
Keys {Return} 
Delay 1 sec 
If $Logcheck = $Casts and $Log = 1 
Call LogoutLogBackIn 
End 
If $Log = 0 
SetConst Logcheck = 0 
Call WhatSpell 
End 
End 

//Credit for this Procedure goes to the maker/s of the Aeris Fishing Bot\\ 
Procedure LogoutLogBackIn 
delay 200 
keys /logout 
delay 200 
keys {RETURN} 
Delay 40 sec 
Keys {RETURN} 
Delay 6 sec 
Keys {RETURN} 
Delay 5 sec 
Keys {RETURN} 
Delay 40 Sec 
Exit 
Call WhatSpell 
End