Removed keyboard key values...
This commit is contained in:
parent
1dcb8c3f9b
commit
ab3006f2b5
107
source/core.adb
107
source/core.adb
@ -22,113 +22,6 @@ package body core is
|
|||||||
mouse_button_back
|
mouse_button_back
|
||||||
) with convention => c;
|
) with convention => c;
|
||||||
--
|
--
|
||||||
--~key_null : constant integer := 0;
|
|
||||||
--~key_space : constant integer := 32;
|
|
||||||
--~key_apostrophe : constant integer := 39;
|
|
||||||
--~key_comma : constant integer := 44;
|
|
||||||
--~key_minus : constant integer := 45;
|
|
||||||
--~key_period : constant integer := 46;
|
|
||||||
--~key_slash : constant integer := 47;
|
|
||||||
--~key_0 : constant integer := 48;
|
|
||||||
--~key_1 : constant integer := 49;
|
|
||||||
--~key_2 : constant integer := 50;
|
|
||||||
--~key_3 : constant integer := 51;
|
|
||||||
--~key_4 : constant integer := 52;
|
|
||||||
--~key_5 : constant integer := 53;
|
|
||||||
--~key_6 : constant integer := 54;
|
|
||||||
--~key_7 : constant integer := 55;
|
|
||||||
--~key_8 : constant integer := 56;
|
|
||||||
--~key_9 : constant integer := 57;
|
|
||||||
--~key_semicolon : constant integer := 59;
|
|
||||||
--~key_equal : constant integer := 61;
|
|
||||||
--~key_a : constant integer := 65;
|
|
||||||
--~key_b : constant integer := 66;
|
|
||||||
--~key_c : constant integer := 67;
|
|
||||||
--~key_d : constant integer := 68;
|
|
||||||
--~key_e : constant integer := 69;
|
|
||||||
--~key_f : constant integer := 70;
|
|
||||||
--~key_g : constant integer := 71;
|
|
||||||
--~key_h : constant integer := 72;
|
|
||||||
--~key_i : constant integer := 73;
|
|
||||||
--~key_j : constant integer := 74;
|
|
||||||
--~key_k : constant integer := 75;
|
|
||||||
--~key_l : constant integer := 76;
|
|
||||||
--~key_m : constant integer := 77;
|
|
||||||
--~key_n : constant integer := 78;
|
|
||||||
--~key_o : constant integer := 79;
|
|
||||||
--~key_p : constant integer := 80;
|
|
||||||
--~key_q : constant integer := 81;
|
|
||||||
--~key_r : constant integer := 82;
|
|
||||||
--~key_s : constant integer := 83;
|
|
||||||
--~key_t : constant integer := 84;
|
|
||||||
--~key_u : constant integer := 85;
|
|
||||||
--~key_v : constant integer := 86;
|
|
||||||
--~key_w : constant integer := 87;
|
|
||||||
--~key_x : constant integer := 88;
|
|
||||||
--~key_y : constant integer := 89;
|
|
||||||
--~key_z : constant integer := 90;
|
|
||||||
--~key_left_bracket : constant integer := 91;
|
|
||||||
--~key_backslash : constant integer := 92;
|
|
||||||
--~key_right_bracket : constant integer := 93;
|
|
||||||
--~key_grave : constant integer := 96;
|
|
||||||
--~key_escape : constant integer := 256;
|
|
||||||
--~key_enter : constant integer := 257;
|
|
||||||
--~key_tab : constant integer := 258;
|
|
||||||
--~key_backspace : constant integer := 259;
|
|
||||||
--~key_insert : constant integer := 260;
|
|
||||||
--~key_delete : constant integer := 261;
|
|
||||||
--~key_right : constant integer := 262;
|
|
||||||
--~key_left : constant integer := 263;
|
|
||||||
--~key_down : constant integer := 264;
|
|
||||||
--~key_up : constant integer := 265;
|
|
||||||
--~key_page_up : constant integer := 266;
|
|
||||||
--~key_page_down : constant integer := 267;
|
|
||||||
--~key_home : constant integer := 268;
|
|
||||||
--~key_end : constant integer := 269;
|
|
||||||
--~key_caps_lock : constant integer := 280;
|
|
||||||
--~key_scroll_lock : constant integer := 281;
|
|
||||||
--~key_num_lock : constant integer := 282;
|
|
||||||
--~key_print_screen : constant integer := 283;
|
|
||||||
--~key_pause : constant integer := 284;
|
|
||||||
--~key_f1 : constant integer := 290;
|
|
||||||
--~key_f2 : constant integer := 291;
|
|
||||||
--~key_f3 : constant integer := 292;
|
|
||||||
--~key_f4 : constant integer := 293;
|
|
||||||
--~key_f5 : constant integer := 294;
|
|
||||||
--~key_f6 : constant integer := 295;
|
|
||||||
--~key_f7 : constant integer := 296;
|
|
||||||
--~key_f8 : constant integer := 297;
|
|
||||||
--~key_f9 : constant integer := 298;
|
|
||||||
--~key_f10 : constant integer := 299;
|
|
||||||
--~key_f11 : constant integer := 300;
|
|
||||||
--~key_f12 : constant integer := 301;
|
|
||||||
--~key_pad_0 : constant integer := 320;
|
|
||||||
--~key_pad_1 : constant integer := 321;
|
|
||||||
--~key_pad_2 : constant integer := 322;
|
|
||||||
--~key_pad_3 : constant integer := 323;
|
|
||||||
--~key_pad_4 : constant integer := 324;
|
|
||||||
--~key_pad_5 : constant integer := 325;
|
|
||||||
--~key_pad_6 : constant integer := 326;
|
|
||||||
--~key_pad_7 : constant integer := 327;
|
|
||||||
--~key_pad_8 : constant integer := 328;
|
|
||||||
--~key_pad_9 : constant integer := 329;
|
|
||||||
--~key_pad_decimal : constant integer := 330;
|
|
||||||
--~key_pad_divide : constant integer := 331;
|
|
||||||
--~key_pad_multiply : constant integer := 332;
|
|
||||||
--~key_pad_subtract : constant integer := 333;
|
|
||||||
--~key_pad_add : constant integer := 334;
|
|
||||||
--~key_pad_enter : constant integer := 335;
|
|
||||||
--~key_pad_equal : constant integer := 336;
|
|
||||||
--~key_left_shift : constant integer := 340;
|
|
||||||
--~key_left_control : constant integer := 341;
|
|
||||||
--~key_left_alt : constant integer := 342;
|
|
||||||
--~key_left_super : constant integer := 343;
|
|
||||||
--~key_right_shift : constant integer := 344;
|
|
||||||
--~key_right_control : constant integer := 345;
|
|
||||||
--~key_right_alt : constant integer := 346;
|
|
||||||
--~key_right_super : constant integer := 347;
|
|
||||||
--~key_kb_menu : constant integer := 348;
|
|
||||||
--
|
|
||||||
type vessel is record x, y : float; end record with convention => c_pass_by_copy;
|
type vessel is record x, y : float; end record with convention => c_pass_by_copy;
|
||||||
type color is record r, g, b, a : color_range; end record with convention => c_pass_by_copy;
|
type color is record r, g, b, a : color_range; end record with convention => c_pass_by_copy;
|
||||||
type rectangle is record x ,y, width, height : float; end record with convention => c_pass_by_copy;
|
type rectangle is record x ,y, width, height : float; end record with convention => c_pass_by_copy;
|
||||||
|
Loading…
Reference in New Issue
Block a user