Rogskill.mac - Skills your roguely abilities

Post your completed (working) macros here. Only for macros using MQ2Data syntax!

Moderator: MacroQuest Developers

User avatar
SukMage
a ghoul
a ghoul
Posts: 88
Joined: Fri Jun 04, 2004 5:08 pm

Rogskill.mac - Skills your roguely abilities

Post by SukMage » Sun Feb 06, 2005 2:04 pm

Jotted this up to skill my rog's abilities.
It works great but the Sub Event_SkillUp is returning an /echo for all the skills each time one goes up. I prolly need to make a Sub Event_Skill(ability) for each to fix that but I haven't yet. You coders that are better than I might be able to tell me a quicker fix though. It's not very pretty but it works.

Code: Select all

|rogskill.mac
|by: SukMage
|6FEB05

#event IntimidationFail "#*#You must have a target to intimidate#*#"
#event BegFail "#*#You must target someone to beg from first#*#" 
#event BegFail "#*#You are too far away to beg#*#" 
#Event SkillUp "#*#You have become better at #*#" 

Sub Main 
   /declare Beg int outer
   /varset Beg ${Me.Skill[Begging]}
   /declare Intimidation int outer
   /varset Intimidation ${Me.Skill[Intimidation]}
   /declare Hide int outer
   /varset Hide ${Me.Skill[Hide]}
   /declare Sneak int outer
   /varset Sneak ${Me.Skill[Sneak]}
   /declare Disarm int outer
   /varset Disarm ${Me.Skill[Disarm Traps]}
   /declare Sense int outer
   /varset Sense ${Me.Skill[Sense Traps]}
   /echo Skilling up roguely abilities.
   :Loop 
      /doevents 
      /if (${Me.AbilityReady[sense traps]}==1) /doability "sense traps"
      /if (${Me.AbilityReady[disarm traps]}==1) /doability "disarm traps"
      /if (${Me.AbilityReady[intimidation]}==1) /doability "intimidation"
      /if (${Me.AbilityReady[begging]}&&${Me.AbilityReady[hide]}==1) /doability "begging",/doability "hide" 
         /delay 1s
         /doability "hide" 
      /if (${Me.AbilityReady[sneak]}==1) /doability "sneak" 
         /delay 1s
         /doability "sneak"
      /goto :Loop 
/end 

Sub event_BegFail 
   /echo You can't beg without a target. Please select an NPC and get close to it. 
/end

Sub event_IntimidationFail
   /echo You can't intimidate without a target. Please select an NPC. 
/end 

Sub Event_SkillUp
      /if (${Me.Skill[begging]}>${BegSkill}) {
         /echo Your Begging Went Up!! It's now ${Me.Skill[begging]}!
         /varset Beg ${Me.Skill[begging]}
         }
      /if (${Me.Skill[hide]}>${HideSkill}) {
         /echo Your Hide Went Up!! It's now ${Me.Skill[hide]}!
         /varset Hide ${Me.Skill[hide]}
         }
      /if (${Me.Skill[sneak]}>${SneakSkill}) {
         /echo Your Sneaking Went Up!! It's now ${Me.Skill[sneak]}!
         /varset Sneak ${Me.Skill[sneak]}
         }
      /if (${Me.Skill[intimidation]}>${IntimidationSkill}) {
         /echo Your Intimidation Went Up!! It's now ${Me.Skill[intimidation]}!
         /varset Intimidation ${Me.Skill[intimidation]}
         }
      /if (${Me.Skill[sense traps]}>${SenseSkill}) {
         /echo Your Sense Traps Went Up!! It's now ${Me.Skill[sense traps]}!
         /varset Sense ${Me.Skill[sense traps]}
         }
      /if (${Me.Skill[disarm traps]}>${DisarmSkill}) {
         /echo Your Disarm Traps Went Up!! It's now ${Me.Skill[disarm traps]}!
         /varset Disarm ${Me.Skill[disarm traps]}
         }
      /return 

xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 4:16 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 5:29 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 5:31 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 5:32 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:45 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:46 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:47 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:49 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:50 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:51 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:52 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:53 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:54 pm


xyilla
naggy
naggy
Posts: 33673
Joined: Sun Feb 23, 2025 5:36 am

Re: Rogskill.mac - Skills your roguely abilities

Post by xyilla » Mon Apr 07, 2025 6:55 pm