X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_input_sdl2.inc;h=effe559e475ec78ed53bc6dfe9858e5ea9e1f79b;hb=292e2b4e094da60e0e30512697dd275ff6d5de43;hp=56416e60a7f506d180fd887ea37758c8e71b63c5;hpb=546a929a401a64c32fda3380c3fe71306fd54eb1;p=d2df-sdl.git diff --git a/src/engine/e_input_sdl2.inc b/src/engine/e_input_sdl2.inc index 56416e6..effe559 100644 --- a/src/engine/e_input_sdl2.inc +++ b/src/engine/e_input_sdl2.inc @@ -127,6 +127,7 @@ const IK_T = SDL_SCANCODE_T; IK_Z = SDL_SCANCODE_Z; IK_MINUS = SDL_SCANCODE_MINUS; + IK_NONUSBACKSLASH = SDL_SCANCODE_NONUSBACKSLASH; // TODO: think of something better than this shit IK_LASTKEY = SDL_NUM_SCANCODES-1; @@ -214,8 +215,9 @@ const JOY2_DOWN = JOYH_BEG + 2*e_MaxJoyHats*4 + 0*4 + HAT_DOWN; JOY3_DOWN = JOYH_BEG + 3*e_MaxJoyHats*4 + 0*4 + HAT_DOWN; -function e_InitInput: Boolean; -procedure e_ReleaseInput; +procedure e_Input_Initialize; +procedure e_Input_Finalize; + procedure e_UnpressAllKeys; procedure e_KeyUpDown (key: Integer; down: Boolean); @@ -339,6 +341,7 @@ begin e_KeyNames[IK_DOT] := '.'; e_KeyNames[IK_MINUS] := '-'; e_KeyNames[IK_EQUALS] := '='; + e_KeyNames[IK_NONUSBACKSLASH] := 'NONUSBACKSLASH'; // joysticks for j := 0 to e_MaxJoys-1 do @@ -378,16 +381,15 @@ begin result := i < e_MaxJoys end; -function e_InitInput: Boolean; +procedure e_Input_Initialize; var i: Integer; begin for i := 0 to e_MaxJoys - 1 do e_JoystickAvailable[i] := False; - GenerateKeyNames; - result := True + GenerateKeyNames end; -procedure e_ReleaseInput; +procedure e_Input_Finalize; var i: Integer; begin for i := 0 to e_MaxJoys - 1 do