type A_Allegro_Timer is access all Allegro_Timer;
function Al_Create_Timer
( | speed_secs | : double ) return A_Allegro_Timer; |
procedure Al_Destroy_Timer
( | timer | : in out A_Allegro_Timer ); |
procedure Al_Start_Timer
( | timer | : A_Allegro_Timer ); |
procedure Al_Stop_Timer
( | timer | : A_Allegro_Timer ); |
function Al_Get_Timer_Started
( | timer | : A_Allegro_Timer ) return Boolean; |
function Al_Get_Timer_Count
( | timer | : A_Allegro_Timer ) return Integer_64; |
procedure Al_Set_Timer_Count
( | timer | : A_Allegro_Timer; |
count | : Integer_64 ); |
procedure Al_Add_Timer_Count
( | timer | : A_Allegro_Timer; |
diff | : Integer_64 ); |
function Al_Get_Timer_Speed
( | timer | : A_Allegro_Timer ) return double; |
procedure Al_Set_Timer_Speed
( | timer | : A_Allegro_Timer; |
speed_secs | : double ); |
function Al_Get_Timer_Event_Source
( | timer | : A_Allegro_Timer ) return A_Allegro_Event_Source; |