
Lib_game

======================================================================================
      .
======================================================================================

init(c: integer) -  .         [=1 -    keyPressed   ]

set_clip(x, y, w, h: integer); -   
x, y -    
w, h -    
,         .
    
set_view_window(x, y, w, h: integer); -    ???
x, y -    
w, h -    
    
refresh; -  .
   repaint.

get_bit(value, mask: integer): integer; -   
  (AND)   value  mask.      -
  value  1.      .. MP   
   : result:=value and mask;

:

======================================================================================
    value       01010111                           value       01010101
              &                                              &
    mask        00000010                           mask        00000010
              =                                              =
    result      00000010                           result      00000000
======================================================================================
    
get_key_states: integer; -     
    KeyPressed  KeyClicked,    
   ,     . 
           1
         get_bit       :

======================================================================================
    UP_PRESSED = 2;             // 00000000 00000010
    LEFT_PRESSED = 4;           // 00000000 00000100
    DOWN_PRESSED = 64;          // 00000000 01000000
    RIGHT_PRESSED = 32;         // 00000000 00100000
    FIRE_PRESSED = 256;         // 00000001 00000000
    GAME_A_PRESSED = 512;       // 00000010 00000000
    GAME_B_PRESSED = 1024;      // 00000100 00000000
    GAME_C_PRESSED = 2048;      // 00001000 00000000
    GAME_D_PRESSED = 4096;      // 00010000 00000000
======================================================================================

show; -   () .
      init     .

pointer_pressed_x: integer; -  X   ,
      

pointer_pressed_y: integer; -  Y   ,
      

pointer_released_x: integer; -  X   ,
       (  )

pointer_released_y: integer; -  Y   ,
       (  )

pointer_dragged_x: integer; -  X   
   

pointer_dragged_y: integer; -  Y   
   

pointer_state: integer; -   ???

======================================================================================
