From: "The Librarian" 
Greetings,
I am attempting to write a macro whereby a specific key could toggle two
different instructions.  I have accomplished this by abusing someone
else's code:
snip===============================================================snip
proc ToggleIt()
integer key
Repeat
key = GetKey()
if key == 
InsertText("One")
CReturn()
key = GetKey()
if key == 
InsertText("Two")
CReturn()
endif
endif
Until key == 
end
snip===============================================================snip
However, I'd prefer that the macro stop when ANY other key is depressed.
Lastly, it would be nice if I could type and the  key would
only be invoked when depressed.
Any suggestions?
Happy Holidays!
Skip
---
---------------