Skip to content

Commit

Permalink
+
Browse files Browse the repository at this point in the history
  • Loading branch information
red-prig committed Feb 2, 2024
1 parent 1dbf803 commit 3381f8e
Showing 1 changed file with 4 additions and 46 deletions.
50 changes: 4 additions & 46 deletions src/ps4_libsceconvertkeycode.pas
Original file line number Diff line number Diff line change
Expand Up @@ -6,57 +6,14 @@ interface

uses
ps4_program,
ps4_libSceIme,
Classes,
SysUtils;

const
SCE_IME_KEYBOARD_TYPE_NONE =0;
SCE_IME_KEYBOARD_TYPE_DANISH =1;
SCE_IME_KEYBOARD_TYPE_GERMAN =2;
SCE_IME_KEYBOARD_TYPE_GERMAN_SW =3;
SCE_IME_KEYBOARD_TYPE_ENGLISH_US =4;
SCE_IME_KEYBOARD_TYPE_ENGLISH_GB =5;
SCE_IME_KEYBOARD_TYPE_SPANISH =6;
SCE_IME_KEYBOARD_TYPE_SPANISH_LA =7;
SCE_IME_KEYBOARD_TYPE_FINNISH =8;
SCE_IME_KEYBOARD_TYPE_FRENCH =9;
SCE_IME_KEYBOARD_TYPE_FRENCH_BR =10;
SCE_IME_KEYBOARD_TYPE_FRENCH_CA =11;
SCE_IME_KEYBOARD_TYPE_FRENCH_SW =12;
SCE_IME_KEYBOARD_TYPE_ITALIAN =13;
SCE_IME_KEYBOARD_TYPE_DUTCH =14;
SCE_IME_KEYBOARD_TYPE_NORWEGIAN =15;
SCE_IME_KEYBOARD_TYPE_POLISH =16;
SCE_IME_KEYBOARD_TYPE_PORTUGUESE_BR =17;
SCE_IME_KEYBOARD_TYPE_PORTUGUESE_PT =18;
SCE_IME_KEYBOARD_TYPE_RUSSIAN =19;
SCE_IME_KEYBOARD_TYPE_SWEDISH =20;
SCE_IME_KEYBOARD_TYPE_TURKISH =21;
SCE_IME_KEYBOARD_TYPE_JAPANESE_ROMAN =22;
SCE_IME_KEYBOARD_TYPE_JAPANESE_KANA =23;
SCE_IME_KEYBOARD_TYPE_KOREAN =24;
SCE_IME_KEYBOARD_TYPE_SM_CHINESE =25;
SCE_IME_KEYBOARD_TYPE_TR_CHINESE_ZY =26;
SCE_IME_KEYBOARD_TYPE_TR_CHINESE_PY_HK=27;
SCE_IME_KEYBOARD_TYPE_TR_CHINESE_PY_TW=28;
SCE_IME_KEYBOARD_TYPE_TR_CHINESE_CG =29;
SCE_IME_KEYBOARD_TYPE_ARABIC_AR =30;
SCE_IME_KEYBOARD_TYPE_THAI =31;
SCE_IME_KEYBOARD_TYPE_CZECH =32;
SCE_IME_KEYBOARD_TYPE_GREEK =33;
SCE_IME_KEYBOARD_TYPE_INDONESIAN =34;
SCE_IME_KEYBOARD_TYPE_VIETNAMESE =35;
SCE_IME_KEYBOARD_TYPE_ROMANIAN =36;
SCE_IME_KEYBOARD_TYPE_HUNGARIAN =37;

type
pSceImeKeyboardType=^SceImeKeyboardType;
SceImeKeyboardType=Integer;

implementation

function ps4_sceConvertKeycodeGetVirtualKeycode(keycode:Word;
keyboardType:SceImeKeyboardType;
keyboardType:Integer;
vkeycode:PWord):Integer; SysV_ABI_CDecl;
begin
Result:=0;
Expand All @@ -74,7 +31,8 @@ function Load_libSceConvertKeycode(Const name:RawByteString):TElf_node;
end;

initialization
ps4_app.RegistredPreLoad('libSceConvertKeycode.prx',@Load_libSceConvertKeycode);
//low priority
ps4_app.RegistredFinLoad('libSceConvertKeycode.prx',@Load_libSceConvertKeycode);

end.

0 comments on commit 3381f8e

Please sign in to comment.