Ctrl key stuck after send containing ^ if BlockInput is on

[mkaidor@…]

If BlockInput is on when a send function is called containing a carrot modifier, the Ctrl key will be stuck on. This was fixed by switching to send( "{ctrlup}foo{ctrldown}" ). Regardless, it really ought to work with send( "\carrot\foo" ). I used the word "carrot" since an actual carrot causes some of the text to superscript in the preview.

Cuplrit code:

Func CtrlSend9( )

Send( "\carrot\9" )

EndFunc

Func HatchGoIterate( $n )

Send( $n & $n & "x" )
MouseClick( "Left" )

EndFunc

Func HatchStartAuto( )

;Start blocking input todai
BlockInput( 1 )

;Get Mouse Position
$Pos = MouseGetPos( )

;Stop what I'm doing
MouseMove( 150 , 150 , 0 )
Send( "{SHIFTDOWN}" )
MouseClick( "LEFT" )
Send( "{SHIFTUP}" )

;- THE PROBLEM IS HERE

;Remember camera position and selected group
CtrlSend9( )
Send( "\carrot\{INSERT}" )

;Center the mouse
MouseMove( 960 , 470 , 0 )

;Do It
For $Group = 8 To 5 Step -1

HatchGoIterate( $Group )

Next

;Stop and go to last important thing
Send( "{INSERT}9" )
MouseMove( $Pos[0] , $Pos[1] , 0 )

;Give me back input
BlockInput( 0 )

EndFunc