help: Detecting keystokes?

[Jon100]

Is there a way to detect if a particular key is pressed down?

Id like to pause one macro if the alt key is being pressed, but i dont see any way to detect that.

[ml2517]

Not that I know of. I typically just create a hotkey with /mqpause in it and use that.

[Jon100]

unfortunately that would be too slow and cumbersome. I typically need to 'pause' the macro for a second.

What im trying to do is stop a macro that is moving me so I can cast a spell without interupt. using $char(casting) is too late - by then I have already started to cast the spell and have interupted myself.

What I could like ideally is

Code: Select all

/if $pressed(alt) /goto :mainloop

so I can stop the movement before the spell casting starts.

Any ideas how I can check if a key is pressed?

[wilso132]

It might be possible to add an event where you send yourself a /tell and put that text as the event itself.... then if the event is detected you /pause 10s (or however long you need).

Then hotkey a /tell myself blah... that may work??? (Crappy workaround I know, but it should work.)

Edit: To clarify, put "Talking to yourself again?" as the event.

Here's the code:

Code: Select all

#event talking_to_self "Talking to yourself again?"

Sub Main
	:LOOP
	/doevents
	/goto :LOOP
/return
/end macro

Sub Event_talking_to_self
	/delay 5s
/return

[Jon100]

Thats an interesting idea.

I would have to make a hotkey and send myself a tell every time i want to pause the macro and cast a spell. That would work, but it's a bit messy (and finding another page 1 hotkey would be a problem).

Any other ideas how I might do this? :/

[ml2517]

Only thing I can think of is to maybe press d to duck. Then d to resume.

Something like the code below would work.

Code: Select all

:WaitLoop
/delay 1s
/if $char(state)==DUCK  /goto :WaitLoop

[Jon100]

except you cant cast while ducked. lol

I suppose you could trap the duck, then wait for you to stand and then stop the movement for 2s while the spell casting starts. then use $char(casting) to stop movement until it ends.

still a clumsy solution tho

Any other ideas please?

[ml2517]

Oh I guess I should have read your later comments. You simply need to do this:

Code: Select all

Sub Main
/call CastSpell
/return

Sub CastSpell
[color=red]:Loop
/delay 1
/if $char(ismoving)==TRUE  /goto :Loop[/color]
/cast "Spellname"
:Loop2
/delay 1
/if $char(casting)==TRUE /goto :Loop2
/return

The portion marked in red will make it wait til you stop to cast.