little additions: this version also consider the 200 max value that skill can have.
It also train sense heading and track.
Code: Select all
| - Rangerspells.mac -
| Spells line trainer for rangers (added sens heading and track too)
|
| This macro will let you train and max all your casting lines,sense heading and track.
| It will compare your actual skill level to the max level you can have and train
| only if you can raise the skill.
| When all skills are maxed the character just sit and camp.
|
| Requirements :
| Mem spells as follow :
|
| 1 minor healing (alteration 10 mana)
| 2 burst of fire (evocation 15 mana)
| 3 dance of fireflies (conjuration 10 mana)
| 4 glimpse (divination 5 mana)
| 5 skin like wood (abjuration 10 mana)
|
| Sens heading in doability 1
| Track in doability 2
|
| Target yourself while standing and launch macro.
| when low of mana character sit to meditate.
| When all skills are maxed character just sit and camp.
| Nota: conjuration gonna take you a while as dance of the firelies is a night only spell,
| but once it's maxed it will go fast for the later levels.
|
#define maxiskill v1
Sub Main
/varcalc maxiskill $char(level)*5+5
/if n $maxiskill>200 /varset maxiskill 200
:Begin
/if n $char(skill,alteration)<$maxiskill /cast 1
/if n $char(skill,alteration)<$maxiskill /delay 40
/if n $char(skill,evocation)<$maxiskill /cast 2
/if n $char(skill,evocation)<$maxiskill /delay 50
/if n $char(skill,conjuration)<$maxiskill /cast 3
/if n $char(skill,conjuration)<$maxiskill /delay 80
/if n $char(skill,divination)<$maxiskill /cast 4
/if n $char(skill,divination)<$maxiskill /delay 100
/if n $char(skill,abjuration)<$maxiskill /cast 5
/if n $char(skill,abjuration)<$maxiskill /delay 80
/if n $char(skill,Tracking)<$maxiskill /Doability 2
/if n $char(skill,"Sense Heading")<$maxiskill /Doability 1
/if n $char(mana,pct)<10 /sit
/if n $char(mana,pct)<10 /call meditate
/if n $char(skill,alteration)<$maxiskill /goto :begin
/if n $char(skill,evocation)<$maxiskill /goto :begin
/if n $char(skill,conjuration)<$maxiskill /goto :begin
/if n $char(skill,divination)<$maxiskill /goto :begin
/if n $char(skill,abjuration)<$maxiskill /goto :begin
/if n $char(skill,Tracking)<$maxiskill /goto :begin
/if n $char(skill,"Sense Heading")<$maxiskill /goto :begin
/sit
/camp
/return
Sub meditate
:rest
/delay 10
/if n $char(skill,Tracking)<$maxiskill /Doability 2
/if n $char(skill,"Sense Heading")<$maxiskill /Doability 1
/if n $char(mana,pct)<100 /goto :rest
/stand
/return
now the character is really camping when finished..
Edited again to add track and sens during med


