need help making a casting macro please

[necroman]

Im trying to learn this code crap by looking at other code but its jsut taking me way to long.

I want a mac to cast champion, predator, clereity and str of Diaku, fort and dire. This is obviously for a shammy. he will be in group and i dont need anythign fancy i can make sure all the spells are memmed in a certain spot and i want to be able to swap out group version of spells if more than 2 people in group. I tried to do some of the leg work but just psiing my wheels.
Please help i know somone can write this in like 5 min without thinking. it would also give me a good macro to work off of for feature macs

Here is what i have so far




#event champion "#*#champion spell has worn off#*#"
#event championask "#*#champ now#*#"
#event pantherask "#*#panther now#*#"
#event panther "#*#of the panther spell has worn off#*#"
#event OutOfMana "#*#Insufficient Mana to cast this spell!#*#"
#event NotReady "#*#time not yet met.#*#"
#event Standing "#*#You must be standing to cast a spell#*#"



/if (${Me.State.Equal[Sit]}) /stand

/if ( ${Me.Ducking} ) /keypress duck

:CheckMana
/if (${Me.PctMana}<40) /goto :SitDown

:SitDown
/if (${Me.State.Equal[STAND]}) /sit on

:CastSpell
/call cast gem1 5s
/doevents
/goto :CheckMana

:SitDown
/if (${Me.State.Equal[STAND]}) /sit on



Thanks,
Necroman

 

[Taron]

Please note this is a very basic scratch-up of what you asked for. I'm in the middle of doing things at work, so I removed the spell not ready timer rather than use variables to hold the spell and recast upon need.

Hopefully it gives you something to build on though.

#include spellroutines.inc
#event champion "#*#champion spell has worn off #1#"
#event champion "#1# tells #*#champ now#*#"
#event panther "#1# tells #*#panther now#*#"
#event panther "#*#of the panther spell has worn off #1#"
#event OutOfMana "#*#Insufficient Mana to cast this spell!#*#"
#event Standing "#*#You must be standing to cast a spell#*#"

Sub Main
:loop
/if (${Me.PctMana}<40 && ${Me.State.Equal[STAND]}) /sit on
/doevents
/goto :loop
/return

Sub Event_Champion(Line,Person)
/tar pc ${Person}
:loop
/if (${Me.Casting.ID}) {
  /delay 2s
  /goto :loop
}
/if (${Me.GroupSize}<3) /call Cast "Champion"
/if (${Me.Groupsize}>=3) /call Cast "Champion Group Spell"
/doevents flush
/return

Sub Event_Panther(Line,Person)
/tar pc ${Person}
:loop
/if (${Me.Casting.ID}) {
  /delay 2s
  /goto :loop
}
/if (${Me.GroupSize}<3) /call Cast "Panther spell thing"
/if (${Me.GroupSize}>=3) /call Cast "Panther group spell"
/doevents flush
/return

Sub Event_OutOfMana
/g I don't have enough mana for that spell
/return

Sub Event_Standing
/stand
/return

 

[JimJohnson]

#include Spell_Routines.inc

#Event BuffWornOff "Your #1# spell has worn off of #2#."

Sub Main
:Main

/doevents
/delay 5
/goto :Main
/return


Sub BuffWornOff(SpellWornOff, ChatSender)
   /if (${Spell[${SpellWornOff}].TargetType.Equal["Group v2"]} && ${Me.Buff[${SpellWornOff}].ID}) {
   
   } else {
   /target ${ChatSender}
   /if (${Target.Name.Equal["${ChatSender}"]} && ${Target.Type.Equal["PC"]}) /call Cast "${SpellWornOff}" gem5 10s
   }
/return