Function CommandToggleUIInventory()
Dim byteCode() As Byte, strCode As String
strCode = _
            "60" & _
            "8B0D" & AlignDWORD(KO_PTR_DLG) & _
            "BF" & AlignDWORD(KO_PTR_INV) & _
            "FFD7" & _
            "61" & _
            "C3"
Hex2Byte strCode, byteCode
ExecuteRemoteCode byteCode, True
End Function