Help with shift and click!

[Glyph 2]

$Pixely11=0
$Pixely12=0
$Pixely13=800
$Pixely14=600

Global $monsterlook = HotKeySet ( "{pgup}" , "monsterlook" )

;sleep==================================
While 1
sleep(365*24*60*60*1000);1 year :)
WEnd

;====== QuitIt Function =======================
Func QuitIt ()
sleep(1000)
send ("{esc}")
sleep(600)
send ("{up}")
sleep(600)
send ("{enter}")
Global $QuitIt = HotKeySet ( "{END}", "QuitIt" )
  Return
EndFunc

;start========================
Func monsterlook()
AutoItSetOption ( "PixelCoordMode", 2)
    ; look for yellowish square within 20 shade variations ;)
$coordm = PixelSearch( $Pixely11, $Pixely12, $Pixely13, $Pixely14, 0x506D73, 20 )
    If Not @error Then
    Send ("{+ down}")   
MouseClick("left")
        return 1
    EndIf
Send ("{+ up}")
EndFunc

I want it to send shift and mouseclick left at the same time, when one of 20 shades of 0x506D73 are in the screen... can anyone help me?

[darkshadow791 0]

Replace

Send("{+ down}")

with

Send("+{Down}")

[Glyph 2]

Thank you!!!!