Easy Pet Bot

Have a macro idea but not sure where to start? Ask here.

Moderator: MacroQuest Developers

colt45
orc pawn
orc pawn
Posts: 16
Joined: Thu Jun 10, 2004 5:29 am

Easy Pet Bot

Post by colt45 » Wed Jan 02, 2008 11:58 am

Is there any way someone, anyone here could make me a very very simple macro.
All i need this to do is to use hotbutton 1 when it see's the number 1, in groupchat or hotbutton 2 wheneverr it see's #2 in groupchat


like /g Nuke with Firebolt

then the macro would use firebolt.

But even that is above my comprehension for macro's. Even a simple /hotbutton 1 whenever it see's the number 1, /hotbutton 2 whenever it see's the #2 in group.. Ect.

it would be very appreciated, Just the bare bones is all thats necessary

colt45
orc pawn
orc pawn
Posts: 16
Joined: Thu Jun 10, 2004 5:29 am

Post by colt45 » Wed Jan 02, 2008 1:39 pm

I tried using this macro to just pet assist, but for some reason it says,

Failed to parse /if condition (#(ChatText.Equal[Null && TRUE),
Non numeric encounterted

Anyone maybe able to shed some light on this?

Code: Select all


|----------------------------------------------------------------------------|
| GoMage - Mage Combat and Buff
| Zanomo Jun 26, 2004
| Usage: /mac GoMage [MainAssist]
| magic word is "Get Ready and Kill it"
|

#turbo 40
#chat group

sub main

/declare c int outer | counter variable
/declare MinHP int outer 15 | hp percentage at which to stop nuking
/declare NukeMana int outer 2000 | Actual mana at which to stop nuking
/declare BuffTime int outer 20 | Buff duration under which to recast them
/declare MA string outer | Main Assist
/declare IniFile String outer
/declare Incword String outer
/declare engagedistance int outer 100


/varset IniFile "GoIni.ini"
/varset Incword "Get Ready and Kill it"

| INI setup variables
/if (${Defined[Param0]}) {
  /ini "${IniFile}" Settings MA ${Param0}
  /varset MA ${Param0}
} else {
  /varset MA ${Ini[${IniFile},Settings,MA,NOTFOUND]}     
  /if (${MA.Equal["NOTFOUND"]}) {
  /echo You need to start the macro with /mac GoMage [Main Assist] and generate your .INI file.
  /endmacro
  } else {
  /echo Assisting ${MA}
  }
}

/echo GoMage started

:mainloop
/doevents chat
|/call Buffemup
/goto :mainloop
/endmacro

Sub Buffemup
   /if (!${Me.Casting.ID} && !${Target.Type.Equal[NPC]}) {
   /if (!${Me.Buff["Shield of Maelin"].ID} && !${Me.Casting.ID}) /call Cast "Shield of Maelin"
   /if (${Me.AltAbilityReady[Elemental Form: Water]}) /call Cast "Elemental Form: Water" activate
   /if (${Me.Pet.ID}) {
       /if (!${Me.Buff["Elemental Draw Recourse"].ID} && !${Me.Casting.ID}) {
           /call Cast "Elemental Draw"
           /sit
       }
       /if (!${Me.PetBuff["Burnout V"]} && !${Me.Casting.ID}) {
           /call Cast "Burnout V"
           /sit
       }
       /if (!${Me.PetBuff["Kindle"]} && !${Me.Casting.ID}) {
           /call Cast "Kindle"
           /sit
       }
       /if (!${Me.PetBuff["Flameshield of Ro"]} && !${Me.Casting.ID}) {
           /target ${Me.Pet.Name}
           /delay 6
           /call Cast "Flameshield of Ro"
           /sit
       }
   }
}
/return

Sub Event_Chat(ChatType,Sender,ChatText)
/if (${ChatText.Equal[${Incword]} && ${Sender.Equal[${MA}]}) {
    /call Assist_call
|    /call Nuke
    }
/return


|Sub Assist_call
    /echo Incoming.
    /assist ${MA}
    /delay 1s
    /delay 10s  (${Target.Distance}<=${engagedistance})
    /if (${Target.Type.Equal[NPC]} && ${Target.Distance}<=${engagedistance}) {
        /stand
        /pet kill
    }
/return

Sub Nuke
  /echo Nuking ${Target.Name} at ${Target.PctHPs}%
  /delay 5s ${Me.SpellReady["Firebolt of Tallon"]}
  :nuke
  /delay 5s
  /if (${Me.SpellReady["Firebolt of Tallon"]} && ${Target.PctHPs}>=${MinHP} && ${Me.CurrentMana}>=${NukeMana} ) /call cast "Firebolt of Tallon"
  /delay 7s
  /if (${Target.PctHPs} >= ${MinHP}) /goto :nuke
  /sit
/return


toomanynames
a grimling bloodguard
a grimling bloodguard
Posts: 1844
Joined: Mon Apr 11, 2005 11:10 am

Post by toomanynames » Wed Jan 02, 2008 1:57 pm

didn't really look at all the code but this line

Code: Select all

/if (${ChatText.Equal[${Incword]} && ${Sender.Equal[${MA}]}) { 
should be

Code: Select all

/if (${ChatText.Equal[${Incword}]} && ${Sender.Equal[${MA}]}) { 
Curly bracket was missing.
[quote="DKAA"]You cant. Only the server knows.[/quote]

colt45
orc pawn
orc pawn
Posts: 16
Joined: Thu Jun 10, 2004 5:29 am

Post by colt45 » Wed Jan 02, 2008 2:41 pm

Thanks, that cured the error, but there is one thing wrong now, that darn macro isnt doing anything, it runs but nothing happens, It's cool however I hope I can just get soemone else here to write a simplified Group chat hotbutton macro. I know many have the skill, but I just want it to do a hotbutton or two when it see's a certian word in the groupchat.

Gomer
a snow griffon
a snow griffon
Posts: 304
Joined: Fri Apr 15, 2005 2:38 pm

Post by Gomer » Wed Jan 02, 2008 3:40 pm

To the OP:
I recommend you donate to get VIP access. Then look in the VIP plugins section for the EQ Box Chat plugin & server. That lets you send any commands you want to any bot without having to send it through the SoE servers. You don't even need to have a macro running on either end. You also might want to look at Autobot or one of the other full-featured bot macros. They just require some .ini configuration to work well.

colt45
orc pawn
orc pawn
Posts: 16
Joined: Thu Jun 10, 2004 5:29 am

Post by colt45 » Wed Jan 02, 2008 3:43 pm

I would donate if I could, Currently I am going to college, raising a 15 month old and just got engaged, money is tighter than it's ever been before, and so is time. I may be able to scrounge up some cash, but it may take a while.

colt45
orc pawn
orc pawn
Posts: 16
Joined: Thu Jun 10, 2004 5:29 am

Post by colt45 » Wed Jan 02, 2008 5:52 pm

I have been digging through some old macro's. This is exactly what I needed, however it doesn't work. Instead of asking for someone to completely re-write this I was hoping anyone here may be able to tell me what in this code is bugging out. Thanks for anyone whom offers help in advance

Code: Select all

|Necro On Command Macro. Made by people with too much time on thier hands, for people with too much time on thier hands.
|Created by Hiidan.
|Use at your own risk. Anyone giving these commands in tells or group will trigger these events.


#Event Snare "#*#tells the group, 'Snare'"
#Event Sickpet "#*#tells the group, 'Sickpet'"
#Event Makepet "#*#tells the group, 'Makepet'"
#Event Dotty "#*#tells the group, 'Dotty'"
#Event FD "#*#tells the group, 'FD'"
#Event Crip "#*#tells the group, 'Crip'"
#Event Manacheck "#*#tells the group, 'Mana Check'"
#Event Mindwrack "#*#tells the group, 'Mind Wrack'"
#Event Selfbuff "#*#tells the group, 'Self Buff'"
#Event Follow "#*#tells the group, 'follow'"
#Event EndFollow "#*#tells the group, 'endfollow'"
#Event Enrage "#*#has become ENRAGED#*#"
#Event Enrage "#*#is infuriated!#*#"
#Event Norage "#*#is no longer enraged#*#"

Sub Main
   /declare tank string outer whateverthetanksnameis
   /echo Necro On Command has started!
:loop
   /doevents
   /goto :loop
/return

Sub Event_snare
/assist Ezell
|or exchange cascading darkness with whatever snare you want
/cast 1
/return

Sub Event_Sickpet
/assist Ezell
/pet attack
/return

Sub Event_Makepet
/cast 6
|Can change Servant of Bones to whatever pet you use, edit out the next line if you dont have ornate pants
/call cast "Vorshar's Pants of the Blight" item
/return

Sub Event_Dotty
/assist Ezell
/cast 3
/cast 2
/return

Sub Event_FD
/cast 5
/return

Sub Event_Crip
/assist Ezell
/cast 6
/return

Sub Event_ManaCheck
/g Necro mana is currently ${Me.PctMana}%
/return

Sub Event_Mindwrack
/assist Ezell
/cast 7
/return

Sub Event_Selfbuff
/target self
/cast 8
/return

Sub Event_follow
/target Ezell
/follow
/return

Sub Event_endfollow
/keypress back
/return

Sub Event_Enrage
/pet follow
/pet back off
/return

Sub Event_Norage
/assist Ezell
/pet attack
/return 

User avatar
fearless
Not a Psychic
Posts: 2684
Joined: Wed Mar 10, 2004 3:52 pm

Post by fearless » Wed Jan 02, 2008 7:12 pm

colt45 wrote:I would donate if I could, Currently I am going to college, raising a 15 month old and just got engaged, money is tighter than it's ever been before, and so is time. I may be able to scrounge up some cash, but it may take a while.
and you have time for EQ? You can save $15 a month right there!
Reading . . . it's not just for me.

[url=http://www.catb.org/~esr/faqs/smart-questions.html]How To Ask Questions The Smart Way[/url]
[quote="Ccomp5950"]Fearless showed me the light, you too shall learn.[/quote]

colt45
orc pawn
orc pawn
Posts: 16
Joined: Thu Jun 10, 2004 5:29 am

Post by colt45 » Wed Jan 02, 2008 7:32 pm

Im on an EQEMU

FrankJScott
naggy
naggy
Posts: 2365
Joined: Sun Feb 19, 2023 7:11 am

Awesome Product Site

Post by FrankJScott » Fri Oct 06, 2023 12:59 am

Please try Google before asking about Updated Product Guide a61d1ac

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

Re: Easy Pet Bot

Post by xyilla » Fri Aug 22, 2025 8:51 pm


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

Re: Easy Pet Bot

Post by xyilla » Fri Aug 22, 2025 8:52 pm


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

Re: Easy Pet Bot

Post by xyilla » Fri Aug 22, 2025 8:53 pm


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

Re: Easy Pet Bot

Post by xyilla » Fri Aug 22, 2025 8:54 pm


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

Re: Easy Pet Bot

Post by xyilla » Fri Aug 22, 2025 8:56 pm