Sound and time

Sound and time

[maxsio ;D]

Hi. Last time I started learning programming in Ada and now I've to write 
some program, but i've got problem. I'd be brateful if you could help me. 
First of all, I don't know how to generate sound useing speker inside PC. I 
heard something about command sound, but I don't know which packages I need 
to use. Secondly, I don't know how to clear my screan, I mean how to delete 
everything (text) from console. And the last problem which I have is problem 
with measuring time. I want to measure time from last pressed key by user 
and if is higher then 1000ms program will do something. Thanks for help and 
sorry for my poor English.

Greatings maxsio
-- 
maxsio@wp.pl
GG: 1447475
IRC: irc.efnet.pl #osiolek
Motto: W zyciu chodzi o to, by byc troche niemozliwym.

Re: Sound and time

[tmoran]

>First of all, I don't know how to generate sound useing speker inside PC. I
>heard something about command sound, but I don't know which packages I need
>to use. Secondly, I don't know how to clear my screan, I mean how to delete
>everything (text) from console. And the last problem which I have is problem
>with measuring time. I want to measure time from last pressed key by user
>and if is higher then 1000ms program will do something. Thanks for help and
  Measuring time is easy, function Ada.Calendar.Clock returns the current
time so
  Start_Time := Ada.Calendar.Clock;
  Wait_For_User_Action;
  Stop_Time := Ada.Calendar.Clock;
  Elapsed_Duration := Stop_Time - Start_Time;
  if Elapsed_Duration > 1.0 then Do_Something;end if;
will do the job.  Everything else involves an OS call or IO operations
and thus differs depending on what OS you are using.