bindwound.mac - Does bind wound on target until limit

Macro depository for macros written before the user variable changes that broke all of them.

Moderator: MacroQuest Developers

ddh
decaying skeleton
decaying skeleton
Posts: 7
Joined: Sat Aug 31, 2002 6:22 am

bindwound.mac - Does bind wound on target until limit

Post by ddh » Sun Sep 01, 2002 5:10 am

Change bindwound to your doability number and limit to the percent you can bind.

Code: Select all

| bindwound.mac by ddh
| Syntax: /macro bindwound.mac
| Binds the targets wounds to your limit and then ends.
| If no target is present, it assumes you want to bind yourself.
| bindwound contains the number required for /doability
| limit is how much you can bind

#event NoBandages "You can't bandage without bandages, go buy some."
#define bindwound 5
#define limit 50

Sub Main
/stand
/if $target()==false /press f1
/delay 1s
:bindloop
/if n $target(hp,pct)<limit { /doability bindwound 
} else { /endmacro }
/doevents
/delay 5s
/goto :bindloop

Sub Event_NoBandages
 /endmacro
/return
[b]d[/b]igital [b]d[/b]emon [b]h[/b]amster

Plazmic
The One
The One
Posts: 800
Joined: Fri Jun 14, 2002 12:31 am
Contact:

2000831 ;)

Post by Plazmic » Sun Sep 01, 2002 3:46 pm

This will work with the newest MQ:

Code: Select all

| bindwound.mac by ddh 
| Syntax: /macro bindwound.mac 
| Binds the targets wounds to your limit and then ends. 
| If no target is present, it assumes you want to bind yourself. 
| bindwound contains the number required for /doability 
| limit is how much you can bind 

#event NoBandages "You can't bandage without bandages, go buy some." 
#define limit 50 

Sub Main 
   /if n $char(ability,"bind wounds")!=-2 /if n $char(ability,"bind wounds")<1 {
      /echo You must have bind wounds on a /doability.
      /return
   }
   /stand 
   /if $target()==false /press f1 
   /delay 1s 
   /if n $target(hp,pct)<limit /return
   :bindloop 
         /doability bind wounds
         :WaitForBind
            /doevents
         /if n $char(ability,"bind wounds")==-2 /goto :WaitForBind
   /if n $target(hp,pct)<limit /goto :bindloop 
/return

Sub Event_NoBandages 
   /endmacro 
/return 
Notes:
"/doability skill" will find what button skill is on and use it
"$char(ability,skill)" returns:
0 your character has no clue what skill that is
-1 skill is not on a button
-2 skill is on a button but is grayed out
1-10 skill is on button #
- Plazmic

User avatar
rizwank
Huggle Police
Huggle Police
Posts: 524
Joined: Tue Jul 23, 2002 12:07 am
Contact:

Post by rizwank » Sun Sep 01, 2002 5:26 pm

how do you get buttons 7 - 10? only 6 possible on my screen.

lpmko
orc pawn
orc pawn
Posts: 17
Joined: Thu Jun 20, 2002 11:00 pm

i was wondering the same thing...

Post by lpmko » Sun Sep 01, 2002 5:28 pm

maybee combat?

User avatar
Imperfect
Macro Author
Macro Author
Posts: 319
Joined: Fri Jun 14, 2002 1:52 am

Post by Imperfect » Mon Sep 02, 2002 11:45 pm

You have 10 total between combat and normal abilities...

Genoius
a lesser mummy
a lesser mummy
Posts: 49
Joined: Sat Jul 13, 2002 8:20 am

Post by Genoius » Tue Sep 03, 2002 4:47 pm

Mines freezing EQ anytime I try to use the $char(ability,xxx)...are there ways to put them?

IE Bind Wounds=bind, "Bind Wound", bindwound, or all of the above?

I was trying to make a list of what all worked, but after 15 or so crashes, decided I would ask!

Also, where am I to find the newest eqclient.ini? The one I found is not working... :(

Thanks a mill!

---Genoius---

Plazmic
The One
The One
Posts: 800
Joined: Fri Jun 14, 2002 12:31 am
Contact:

Post by Plazmic » Tue Sep 03, 2002 4:56 pm

skills.h in the source.zip has the list of skills as MQ expects them

offsets... check your eqgame.exe's seconds they seem to vary on this version, patch tonight anyway ;(
- Plazmic

Genoius
a lesser mummy
a lesser mummy
Posts: 49
Joined: Sat Jul 13, 2002 8:20 am

Post by Genoius » Tue Sep 03, 2002 5:07 pm

Okay, the single word ones(MEND,TAUNT,etc...) seem to work fine, the multiple worded ones seem to need quotes("Sense Heading", "Bind Wounds", etc...), no alterations to the way they are (ie...making Sense Heading into 1 long word..senseheading).

Any who, just what I got...and the macro is still crashing right off the bat...gonna try a different macro and see if its still doing it!

Thanks again
---Genoius---

Plazmic
The One
The One
Posts: 800
Joined: Fri Jun 14, 2002 12:31 am
Contact:

Post by Plazmic » Tue Sep 03, 2002 5:33 pm

Gotta remember, the /doability stuff was just added, probably has a bug in it...

I know at least 2 I've fixed in $char(ability,xxx) since I released 831
I think what you're hitting was one of them (basically, if the /doability is not a combat one (1-6 vs 7-10) it would hang eq...
- Plazmic

Genoius
a lesser mummy
a lesser mummy
Posts: 49
Joined: Sat Jul 13, 2002 8:20 am

Post by Genoius » Tue Sep 03, 2002 5:38 pm

This eensy weensy one does the same crash:

Code: Select all

Sub Main
      /echo $char(ability,"sense heading")
      /echo $char(ability,"sneak")
      /echo $char(ability,"intimidation")
      /echo $char(ability,"feign death")
      /echo $char(ability,"forage")
      /echo $char(ability,"mend")
/return
Though, when I am in EQ, i can type any one of those "/echo" lines, and get the number. The macro I want to run is this one:

Code: Select all

| SKILLER

Sub Main
   /for v1 0 to 9000
      /if $gm==TRUE /call Crap
      /delay 2
      /if n $char(ability,"sense heading")>0 /doability sense
      /if $gm==TRUE /call Crap
      /delay 2
      /if n $char(ability,"sneak")>0 /doability sneak
      /if $gm==TRUE /call Crap
      /delay 2
      /if n $char(ability,"intimidation")>0 /doability intimidation
      /if $gm==TRUE /call Crap
      /delay 2
      /if n $char(ability,"feign death")>0 /doability feign
      /if $gm==TRUE /call Crap
      /delay 2
      /if n $char(ability,"forage")>0 /doability forage
      /if $gm==TRUE /call Crap
      /delay 2
      /if n $char(ability,"mend")>0 /doability mend
   /next v1
/return

Sub Crap
  /afk Crap, gotta log.  Damn RL again!
  /cleanup
  /sit
  /delay 20
  /camp
  /unload
/return
It freezes up at or before the /echo line, because it does the same thing with or w/o the gm check line(s).

Sorry to be a nuisance! Just trying to find hte problem myself, and coming back and offering more of what I have tried, as well as the re-occuring problem. ;)

---Genoius---

Genoius
a lesser mummy
a lesser mummy
Posts: 49
Joined: Sat Jul 13, 2002 8:20 am

Post by Genoius » Tue Sep 03, 2002 5:39 pm

Going to test the macro with the non-combat ones taken out...maybe be back in a minute with the answer!

---Genoius---

(and my eqgame was 27 seconds fyi!...damn the patch tonight...always on my day/night off!)

Genoius
a lesser mummy
a lesser mummy
Posts: 49
Joined: Sat Jul 13, 2002 8:20 am

Post by Genoius » Tue Sep 03, 2002 5:47 pm

removed the non-combat screen ones(so only skilling doability 7-10 atm with macro). what a great guy you are, Plaz! This going to be the skull ale-nerfing patch tonight so all of us not making 10kpp an hour can finally be set back to our normal selves? Cuz I shur cud use a horsey fer mah ogur or ikssar!


---Genoius---

Isn't it about time this topic was used to flame some poor hapless SOB?