無変換キーを右Shiftキーにリマップしたいけどできない
根本的に間違ってる気がするけど、どうしていいかわからんからヒントが欲しい

;--------------------------------------------------
;@
vk1D::
send, {RShift Down}
Loop{
if !GetKeyState("vk1D", "P"){
send, {RShift Up}
MsgBox, キーアップ
break
}
}
return
;--------------------------------------------------
;A
vk1D::
send,{RShift Down}
KeyWait, vk1D
send, {RShift Up}
MsgBox, キーアップ
return
;--------------------------------------------------

@A共に
[無変換]だけ押して離すと「キーアップ」が表示される
でも[無変換]を押しながら[a]を押すと「キーアップ」が表示されないし、[A]じゃなくて[a]が入力される