This works for me using autohotkey. To get the real right click (down up) to work, you have to do it within the set threshold parameter. Thanks to the AI machines for making it for me. Ensure you wrap this in a #hotif for revit (or other program).
;Orbit change to right-click and drag (from shift-middle button drag)
; Adjust this value to control how long you need to hold RButton for the
; Shift+MButton action to trigger. (in milliseconds)
hold_threshold := 100 ; This line should be at the top level or within a function that is called.
; This hotkey definition should also be at the top level.
*RButton::
{
; Store the time when RButton was pressed
start_time := A_TickCount
; Wait for a short duration
Sleep hold_threshold
; Check if RButton is still down after the delay
if GetKeyState("RButton", "P")
{
; If RButton is still down, it's a "hold"
Send "{Shift Down}"
Send "{MButton Down}"
; Wait for RButton to be released
KeyWait "RButton"
Send "{MButton Up}"
Send "{Shift Up}"
}
else
{
; If RButton was released before the delay, it's a "click"
Send "{RButton}"
}
; No Return needed here unless you want to stop processing THIS hotkey's actions
}
; You might have other hotkeys or functions below this,
; but they should not prematurely end the script's parsing.
; Example of another hotkey (correctly placed):
; F2::
; {
; MsgBox "F2 was pressed."
; }
