• You've discovered RedGuides, an EverQuest multi-boxing and scripting community 🧙‍♀️⚙️. We want you to play several EQ characters at once, come join us and say hello! 👋

  • A TLP without truebox has thawed (Very Vanilla ready)
    Frostreaver

Modbot Release Idea's for giving pet weps in MB?

FriedFryz

Well-known member
Joined
Oct 13, 2017
RedCents
272¢
Has anyone set up a macro / script inside of Modbot to hand out pet weapons to a freshly summoned pet?

If so, mind sharing the script?

Thanks
 
I've been discussing it with a few others that use ModBot and we all know it will require a script for sure. The furthest I've gotten on how to solve it is here:
I had 2 different thoughts on how to accomplish it. I no longer run a mage in my crew, but I always wanted to have the raid INI hit the raid with mod rods. My thought there is you could have the mage summon up pet items in your start up script, then have a script call after pet is summoned to hand items to the pet. The other way to handle it would be in the buffs section, create a script that is basically just summon item, give item to pet. It should work if you have it call only once and just create 1 per item you want to give to your pet.
 
Here is an old ModBot example. I have personally never used this, and I would definitely change a lot of it. I'd want something semi-simple, yet SAFE (ie, don't delete the wrong thing). And something somewhat generic (for different levels), or at least leaving the possibility of such open in the future. If you get something working, I can also test it out with my mage and work it into one of the upcoming ModBot releases. The community will appreciate it, I am sure! :)

[Script-PetKit]
Commands=64
; this requires 8 events to be setup with AETarType=self cbt idle
; event names - description
; pet
; petweap - this summons the folded pack - example spell Grant Frightforged Armaments
; weapbag - this unfolds the pack - example item Folded Pack of Frightforged Plate
; petarmor - this summons the folded pack - example spell Grant Frightforged Plate
; armorbag - this unfolds the pack - example item Folded Pack of Frightforged Armaments
; petfocus - this summons the folded pack - example spell Grant Nint's Heirlooms
; focusbag - this unfolds the pack - example item Folded Pack of Nint's Heirlooms
; visor
C1=/if (!{Defined[PKPetName]}) /declare PKPetName string outer
C2=/varset PKPetName null
; if we have a pet targeted we'll equip it
C3=/if ({Spawn[{Target.ID}].Type.Equal[pet]}) /varset PKPetName {Target.CleanName}
; if no pet targeted and we have a pet we'll equip it
C4=/if ({PKPetName.Equal[null]} && {Me.Pet.ID}) /varset PKPetName {Me.Pet.CleanName}
; if no pet targeted and no pet of our own make one
C5=/if (!{Me.Pet.ID}) /call CastCall {Me.CleanName} ''cast pet''
C6=/if (!{Me.Pet.ID}) /delay 3s
; if no pet defined yet set the var to the new pet
C7=/if ({PKPetName.Equal[null]} && {Me.Pet.ID}) /varset PKPetName {Me.Pet.CleanName}
; if still no pet let them know and exit
C8=/if ({PKPetName.Equal[null]}) /bc Unable to find a pet to equip
C9=/if ({PKPetName.Equal[null]}) /return
; check for an empty inventory slot
C10=/bc equipping {PKPetName}
; need to check for empty inventory slot
; /if (!${InvSlot[23 - 32].Item.ID}) - updated to check 10 slots
C11=/if (!{Defined[EmptySlot]}) /declare EmptySlot string outer false
C12=/if (!{InvSlot[23].Item.ID}) /varset EmptySlot true
C13=/if (!{InvSlot[24].Item.ID}) /varset EmptySlot true
C14=/if (!{InvSlot[25].Item.ID}) /varset EmptySlot true
C15=/if (!{InvSlot[26].Item.ID}) /varset EmptySlot true
C16=/if (!{InvSlot[27].Item.ID}) /varset EmptySlot true
C17=/if (!{InvSlot[28].Item.ID}) /varset EmptySlot true
C18=/if (!{InvSlot[29].Item.ID}) /varset EmptySlot true
C19=/if (!{InvSlot[30].Item.ID}) /varset EmptySlot true
C20=/if (!{InvSlot[31].Item.ID}) /varset EmptySlot true
C21=/if (!{InvSlot[32].Item.ID}) /varset EmptySlot true
C22=/if ({{EmptySlot.Equal[false]}) /bc no empty slots, sorry no pet kit right now.
C23=/if ({{EmptySlot.Equal[false]}) /return 0
; Allow for more than 30 seconds by setting the timer to 10 minutes
C24=/varset Timer 10m
; summon the pet armor
C25=/bc giving pet armor
C26=/call CastCall {Me.CleanName} ''cast petarmor''
C27=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; unfold the armorbag
C28=/call CastCall {Me.CleanName} ''cast armorbag''
C29=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; hand armor to pet
; adjust the armor below to match those summoned in the bag
C30=/call GiveCheck {PKPetName} ''Frightforged Plate Helm|Frightforged Plate Breastplate|Frightforged Plate Bracers|Summoned: Frightforged Belt''
C31=/call GiveCheck {PKPetName} ''Frightforged Plate Vambraces|Frightforged Plate Gauntlets|Frightforged Plate Greaves|Frightforged Plate Boots''
; delete the Phantom Satchel
; **DANGER** if you are using any Phantom Satchels to store items this could be disastrous
C32=/nomodkey /itemnotify {FindItem[Phantom Satchel].InvSlot} leftmouseup
C33=/delay 5
C34=/if ({Cursor.Name.Equal[Phantom Satchel]}) /destroy
C35=/echo destroyed Phantom Satchel
C36=/delay 1s
;summon the pet weapons
C37=/echo giving pet weapons
C38=/call CastCall {Me.CleanName} ''cast petweap''
C39=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; unfold the weapbag
C40=/call CastCall {Me.CleanName} ''cast weapbag''
C41=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; hand weapon to pet
; adjust the weapons below to match those summoned in the bag
C42=/call GiveCheck {PKPetName} ''Summoned: Frightforged Iceblade|Summoned: Frightforged Iceblade''
; delete the Pouch of Quellious
; **DANGER** if you are using any Pouch of Quellious' to store items this could be disastrous
C43=/nomodkey /itemnotify {FindItem[Pouch of Quellious].InvSlot} leftmouseup
C44=/delay 5
C45=/if ({Cursor.Name.Equal[Pouch of Quellious]}) /destroy
C46=/echo destroyed Pouch of Quellious
C47=/delay 1s
; summon pet focus items
C48=/bc giving pet focus items
C49=/call CastCall {Me.CleanName} ''cast petfocus''
C50=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; unfold the focusbag
C51=/call CastCall {Me.CleanName} ''cast focusbag''
C52=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; hand focus items to pet
; adjust the focus items below to match those summoned in the bag
C53=/call GiveCheck {PKPetName} ''Nint's Linked Bracelet|Nint's Jade Bracelet|Nint's Ridged Earhoop|Nint's Gold Ring''
C54=/call GiveCheck {PKPetName} ''Nint's Woven Shawl|Nint's Satin Choker''
; delete the Phantom Satchel
; **DANGER** if you are using any Phantom Satchels to store items this could be disastrous
C55=/nomodkey /itemnotify {FindItem[Phantom Satchel].InvSlot} leftmouseup
C56=/delay 5
C57=/if ({Cursor.Name.Equal[Phantom Satchel]}) /destroy
C58=/echo destroyed Phantom Satchel
C59=/delay 1s
; summon the visor
C60=/echo giving pet visor
C61=/call CastCall {Me.CleanName} ''cast visor''
C62=/multiline ; /delay 1s ; /autoinventory ; /delay 1s
; hand the visor to pet
; adjust the below to match summoned visor
C63=/call GiveCheck {PKPetName} ''Summoned: Visor of Gobeker''
C64=/bc pet {PKPetName} ready for battle!
 
Hello, i have seen that link but it did not work for me... It did not summon anything so im confuse, giving pet toys automatically work or not?
Also, we can read this on Kissassist Guide:

PetToysOn
0
0/1
0=Off/1=On - Toggles pet toy summoning and gives them to your pets.
Feature should handle all versions of items to give to pets including single, bags and folded bags.
Keeps track of what you give to pet (by pet name) and will reequip when you summon a new pet.
PetToys1-6
NULL
SpellName
Pet weapons in bags must be defined.
Syntax : PetToys=Spell|Weapon 1|Weapon 2
Example:
PetToys1=Grant Visor of Gobeker
PetToys2=Grant Manaforged Armaments|Summoned: Manaforged Fireblade|Summoned: Manaforged Shortsword
PetToys3=Grant Frightforged Plate
PetToys4=Grant Nint's Heirlooms

https://www.redguides.com/community/resources/almars-55-mag.701/
 
You appear lost @proutos. This is woob's world for ModBot users, not the KissAssist forums.
 
Yea ModBot is a little more involved than KissAssist...this is what I came up with and got to work, btw woobs.

C#:
[Script-PetKit]
Commands=29
C1=/if (!{Defined[PKPetName]}) /declare PKPetName string outer
C2=/varset PKPetName null
C3=/if ({Spawn[{Target.ID}].Type.Equal[pet]}) /varset PKPetName {Target.CleanName}
C4=/if ({PKPetName.Equal[null]} && {Me.Pet.ID}) /varset PKPetName {Me.Pet.CleanName}
C5=/if (!{Me.Pet.ID}) /call CastCall {Me.CleanName} ''cast pet''
C6=/if (!{Me.Pet.ID}) /delay 3s
C7=/if ({PKPetName.Equal[null]} && {Me.Pet.ID}) /varset PKPetName {Me.Pet.CleanName}
C8=/if ({PKPetName.Equal[null]}) /bc Unable to find a pet to equip
C9=/if ({PKPetName.Equal[null]}) /return
C10=/bc equipping {PKPetName}
C11=/varset Timer 10m
C12=/call CastCall {Me.CleanName} ''cast petwepa''
C13=/delay {Me.Casting.CastTime.Float}s
C14=/call GiveCheck {PKPetName} ''Summoned: Dagger of the Deep''
C15=/delay 1s
C16=/call CastCall {Me.CleanName} ''cast petwepb''
C17=/delay {Me.Casting.CastTime.Float}s
C18=/call GiveCheck {PKPetName} ''Summoned: Fireblade''
C19=/delay 1s
C20=/call CastCall {Me.CleanName} ''cast petbelt''
C21=/delay {Me.Casting.CastTime.Float}s
C22=/call GiveCheck {PKPetName} ''Summoned: Crystal Belt''
C23=/delay 1s
C24=/call CastCall {Me.CleanName} ''cast petvisor''
C25=/delay {Me.Casting.CastTime.Float}s
C26=/call GiveCheck {PKPetName} ''Summoned: Muzzle of Mardu''
C27=/delay 1s
C28=/bc pet {PKPetName} ready for battle!
C29=/return
 
Thank you, FriedFryz. I have my crew back in the Guild Hall, so I can spend some time tinkering with this.
 
Modbot Release Idea's for giving pet weps in MB?

Users who are viewing this thread

Back
Top
Cart