AutoHotKey - LShift and RShift with arrow key, not working as I expected

Question

>+Right::
    Send % GetKeyState("LShift", "p") ? "+{End}" : "{End}"
    return

code above is what I trie