Was looking for Something simple. So I used and Old Macro by GPS_Soldier and modified it. (Future plans for Alcohol Tolernce).
To Beg, I just used a Sol Ro Puppet in my house 
Works awesome. Enjoy. Puppet no longer works.
Works awesome. Enjoy.
Code:
| Original Version 1.0 20JAN15 by GPS_Soldier
| Updated Version 1.0 8/3/18 by DeathLock
| Ensure that you have Bind Wounds button enabled on your Action menu Ctrl+C and add it
#include Ninjadvloot.inc
#turbo
Sub Main
|Replace BANDAGEVENDOR with the name of the bandage vendor from which you will buy banadages from, first name only neeeded.
/declare BandageMerchantName local BANDAGEVENDOR
|Replace XYZ the number of bandages you want to buy each visit to vendor.
/declare BandageCount int local 0
|Replace ABC with skill number you want Bind Wounds to stop at
/declare BwSkill int local 575
|Replace DEF with skill number you want Begging to stop at
/declare BgSkill int local 550
|Replace BEGTARGET with the name of the target you want to beg, you only need to put the first name of the vendor
/declare BeggingTargetName Local Solusek Ro Puppet
:PurchaseBandages
|/echo Entering PurchaseBandages Section
|Purchase Bandages
/if (${Me.Skill[Bind Wound]}>=${BwSkill}) {
/echo Bind Wound is now ${BwSkill}, which is the setting you wanted to stop at.
/echo Ending the macro now.
/Goto :BindWounds
}
/if (${FindItemCount[=Bandages]}==0) {
/target ${BandageMerchantName}
/delay 1s
/call npc "${Target.CleanName}"
/call Buy "Bandages" ${BandageCount}
}
|/echo Leaving PurchaseBandages Section
/goto :CheckSlots
:CheckSlots
|/echo Entering CheckSlots Section
| Check Available Inventory Slots
/if (${Me.FreeInventory} < 23) {
/echo You need to free up 23 Inventory Slots to be on the safe side for this Macro, you only have ${Me.FreeInventory} available.
/echo This macro is now ending so you can free up inventory slots.
/goto :StopMacro
}
/if (${Me.FreeInventory} >=23) {
/echo You have ${Me.FreeInventory} Slots available, you should not have any problems with taking off gear!
/echo Be sure you have an empty container in your FIRST inventory slot.
/echo Be sure there is one random item in the FIRST SLOT of the that container.
}
|/echo Leaving CheckSlots Section
/goto :MoveEquipment
:MoveEquipment
/if (${Me.PctHPs} <= 95) {
/echo Health is low, No need to get NEKKID. Current Bind Wound skill is ${Me.Skill[Bind Wound]}.
|/echo Leaving MoveEquipment Section
/goto :BindWounds
}
|/echo Entering MoveEquipment Section
|This section creates an array holding equipment information by slot, removes it, and then puts it back on the toon
/declare EquipID[22] int local
/declare slot int local
/declare arrayIndex int local
/echo Lets get NEKKID!!
/for slot 0 to 21
/varcalc arrayIndex ${slot}+1
/varset EquipID[${arrayIndex}] ${Me.Inventory[${slot}].ID}
/squelch /unequip ${slot}
/delay 1s
/next slot
/echo Putting all gear back on now!
/for slot 0 to 21
/varcalc arrayIndex ${slot}+1
/squelch /exchange ${EquipID[${arrayIndex}]} ${slot}
/delay 1s
/next slot
/deletevar slot
/deletevar arrayIndex
/deletevar EquipID
|/echo Leaving MoveEquipment Section
/goto :BindWounds
:BindWounds
|/echo Entering BindWounds Section
|Section that binds wounds
/target clear
/delay 1s
/target myself
/delay 1s
:loop
/if (${Me.Skill[Bind Wound]}>=${BwSkill} && ${Me.Skill[Begging]}>=${BgSkill}) {
/echo Bind Wound is now ${BwSkill}, which is the setting you wanted to stop at and last skill to finsih.
/echo Ending the macro now.
|/goto :StopMacro
}
/if (${Me.Skill[Bind Wound]}>=${BwSkill}) {
/echo Bind Wound is now ${BwSkill}, which is the setting you wanted to stop at.
/echo Not binding wound anymore!
}
/if (${FindItem[bandage].ID} && ${Me.PctHPs}<=100 && ${Me.AbilityReady[Bind Wound]} && ${Me.Skill[Bind Wound]}<${BwSkill}) {
/target myself
/doability "Bind Wound"
/delay 3s
}
/if (!${FindItem[bandage].ID}) {
/echo You must get more bandages...
|/echo Leaving BindWounds Section
/goto :PurchaseBandages
}
/delay 3s
/if (${Me.PctHPs} >= 99) && (${Me.Skill[Bind Wound]}<${BwSkill}) {
/echo Health is to high, time to take off gear again. Current Bind Wound skill is ${Me.Skill[Bind Wound]}
|/echo Leaving BindWounds Section
/goto :MoveEquipment
}
/if (${Me.Skill[Begging]}>=${BgSkill} && ${Me.Skill[Bind Wound]}>=${BwSkill}) {
/echo Begging is now ${BgSkill}, which is the setting you wanted to stop at and last skill to finsih.
/echo Ending the macro now.
/goto :StopMacro
}
/if (${Me.Skill[Begging]}>=${BgSkill}) {
/echo Begging is now ${BgSkill}, which is the setting you wanted to stop at.
/echo Not begging anymore!
}
/if ((${Target.Distance}<15)&&(${Me.AbilityReady[Begging]}) && (${Me.Skill[Begging]}<${BgSkill})) {
/target ${BeggingTargetName}
/doability "Begging"
/delay 1s
/target myself
}
/goto :loop
:StopMacro
/deletevar BandageMerchantName
/deletevar BandageCount
/deletevar BwSkill
/deletevar BgSkill
/deletevar BeggingTargetName
/endma
/return
/return
Last edited:
