Monk trainer: 4 different skill macro + GM Paranoia!! : EQ1 EverQuest 1 Submissions

#chat tell
#event lang "tells you"

Sub Main
/declare OldSkillint int outer
/declare OldSkillmend int outer
/declare OldSkillsneak int outer
/declare OldSkillfd int outer
/declare Gottells int outer
/declare Allowedtells int outer

/varset OldSkillint ${Me.Skill[Intimidation]}
/varset OldSkillmend ${Me.Skill[Mend]}
/varset OldSkillsneak ${Me.Skill[Sneak]}
/varset OldSkillfd ${Me.Skill[Feign Death]}
/varset Gottells 0
| Set this to the number of tells you are comfortable getting while macro is running.
| For everything below the number Allowedtells is set to it just goes AFK. Higher and it camps.
/varset Allowedtells 4

/echo Paranoia level set to ${Allowedtells} tells.
/echo Intimidation currently ${Me.Skill[Intimidation]}
/echo Mend currently ${Me.Skill[Mend]}
/echo Sneak currently ${Me.Skill[Sneak]}
/echo FD currently ${Me.Skill[Feign Death]}
/echo Training begins now Grasshopper!
/popup Training begins NOW Grasshopper!
/echo

:Loop
/doevents
/call CheckGM

|--Mend--|
/if (${Me.AbilityReady["Mend"]}) {
/doability "Mend"
}
/if (${Me.Skill[Mend]}>${OldSkillmend}) {
/echo Skillup! Mend now ${Me.Skill[Mend]}!
/popup Skillup! Mend now ${Me.Skill[Mend]}!
/varset OldSkillmend ${Me.Skill[Mend]}
}

|--Sneak--|
/if (${Me.AbilityReady["Sneak"]}) {
/doability "Sneak"
/delay 1s
/doability "Sneak"
}
/if (${Me.Skill[Sneak]}>${OldSkillsneak}) {
/echo Skillup! Sneak now ${Me.Skill[Sneak]}!
/popup Skillup! Sneak now ${Me.Skill[Sneak]}!
/varset OldSkillsneak ${Me.Skill[Sneak]}
}

|--Feign Death--|
/if (${Me.AbilityReady["Feign Death"]}) {
/doability "Feign Death"
/delay 1s
/sit
/delay 1s
}
/if (${Me.Skill[Feign Death]}>${OldSkillfd}) {
/echo Skillup! FD now ${Me.Skill[Feign Death]}!
/varset OldSkillfd ${Me.Skill[Feign Death]}
}

|--Intimidation--|
/if (${Me.AbilityReady["Intimidation"]}) {
/doability "Intimidation"
}
/if (${Me.Skill[Intimidation]}>${OldSkillint}) {
/echo Skillup! Intimidation now ${Me.Skill[Intimidation]}!
/popup Skillup! Intimidation now ${Me.Skill[Intimidation]}!
/varset OldSkillint ${Me.Skill[Intimidation]}
}

/goto :Loop
/return

Sub Event_Chat
/varcalc Gottells ${Gottells}+1
/if (${Gottells} < ${Allowedtells}) {
/echo Tell recieved, FDing and going AFK for 5 minutes.
/afk I'll be back in like 5-10 mins
:FDLoop
/if (${Me.AbilityReady["Feign Death"]}) {
/doability "Feign Death"
} else {
/goto :FDLoop
}
/delay 300s
/sit
/afk
} else {
/echo Paranoia level reached!!
/popup Paranoia level reached!!
/echo To many tells for my comfort. I think we're being watched. Camping now.
/camp
/beep
/beep
/beep
/endmacro
}
/return

Sub Event_Lang
/varcalc Gottells ${Gottells}+1
/if (${Gottells} < ${Allowedtells}) {
/echo Tell recieved, FDing and going AFK for 5 minutes.
/afk I'll be back in like 5-10 mins
:FDLoop
/if (${Me.AbilityReady["Feign Death"]}) {
/doability "Feign Death"
} else {
/goto :FDLoop
}
/delay 300s
/sit
/afk
} else {
/echo Paranoia level reached!!
/popup Paranoia level reached!!
/echo To many tells for my comfort. I think we're being watched. Camping now.
/camp
/beep
/beep
/beep
/endmacro
}
/return

Sub CheckGM
:GMCheck
/if (${Bool[${Spawn[gm].ID}]}) {
/echo Monk Trainer stopping for 10 minutes, GM in zone.
:FDLoop
/if (${Me.AbilityReady["Feign Death"]}) {
/doability "Feign Death"
} else {
/goto :FDLoop
}
/delay 600s
/goto :GMCheck
}
/return