Page 1 of 1
Quick single spell skill conversion >_<
Posted: Sat May 22, 2004 10:52 am
by Sensay
Hehe can anyone fix this for me? Would be much appreciated, is from a cpl months ago but now I need it again and am lost ><
Just meh simple spell skill getter-upper
Code: Select all
sub Main
:loop
/cast "<Spell name>"
/delay 10s
/if n $char(mana,pct)<=30 /call MedUp
/delay $calc(5+$rand(10))
/goto :loop
/return
Sub MedUp
/sit
:WaitMed
/delay 6s
/if n $char(mana,pct)<=99 /goto :WaitMed
/stand
/return
Thanks ^_^
Posted: Sat May 22, 2004 11:02 am
by Preocts
You're not even going to TRY?! No, go to hell. Download the one that is posted in Depot and be happy.
Posted: Sat May 22, 2004 11:09 am
by Sensay
I did and I messed it up =P
tried looking at the ones that do like all skills consecutivly(sp?) and grabbign code and im getting all kinds fo errors ><
another edit: Scratch this post =) Got a good one workin.
Posted: Sat May 22, 2004 12:34 pm
by Drumstix42
Untested:
Code: Select all
|- spelltrain.mac
|- by Drumstix42
|- 5-22-2004
|----------------------------------------------------
|- Useage:
|- /macro spelltrain <"SpellNameHere">
|- Example:
|- /macro spelltrain "Spirit of Wolf"
|- Requires SpellCast.inc
|- /endmac to stop :P
#include SPELLCAST.inc
/declare iManaMedPct int outer
/declare iManaFullPct int outer
/declare iGemNum int outer
|-- CHANGE TO PERSONAL LIKING ---
/varset iManaMedPct 20 |% mana to start medding at
/varset iManaFullPct 98 |% mana to start casting again
/varset iGemNum 1 |Gem number to mem spell to to train (1-8)
|-- DONE CHANGING STUFF ---
Sub Main
/if (!${Defined[Param0]}) {
/echo You must define a spell!
/echo Useage: /macro spelltrain <"SpellNameHere">
/endmacro
} else {
/echo Training Spell: ${Param0}
/call Training
}
/return
Sub Training
/if (!${Me.Standing}) /stand
/if (!${Target.ID}) /target myself
:MainLoop
/if (${Me.PctMana}>${iManaMedPct}) {
/call cast ${Param0} gem${iGemNum}
/goto :MainLoop
} else {
/echo Low on Mana - Medding until ${iManaFullPct}% mana
/call Medding
}
/return
Sub Medding
:MedLoop
/if (${Me.PctMana}<${iManaFullPct}) {
/echo Medding...
/if (${Me.Standing}) /sit
/delay 7s
/goto :MedLoop
} else {
/echo Done medding.
/call Training
}
/return
Posted: Wed Jun 02, 2004 1:59 pm
by Fuergrissa