From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,71101e8e33b70bc5
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news3.google.com!news.glorb.com!border1.nntp.dca.giganews.com!nntp.giganews.com!local1.nntp.dca.giganews.com!nntp.comcast.com!news.comcast.com.POSTED!not-for-mail
NNTP-Posting-Date: Sun, 05 Dec 2004 13:11:04 -0600
From: tmoran@acm.org
Newsgroups: comp.lang.ada
Subject: Re: Sound and time
References: <covj48.1g8.1@cs.chip.komp.fan.pl>
X-Newsreader: Tom's custom newsreader
Message-ID: <d4mdnS1zK8rVwC7cRVn-ow@comcast.com>
Date: Sun, 05 Dec 2004 13:11:04 -0600
NNTP-Posting-Host: 67.161.24.234
X-Trace: 
 sv3-yFoSyH5yHR/eRiUHDm1OBMo/IfOe+TlfjSasvOvIQ6hhHPVNY53arBkzX6N9tnRoxuUg0UOfxq/Wtqr!PQWYqGYgxufLT6E+zqMazpVlmoPH+fFBBpoGTJkThjzktxSfkeoD29HsG7lX3Q==
X-Complaints-To: abuse@comcast.net
X-DMCA-Complaints-To: dmca@comcast.net
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint
 properly
X-Postfilter: 1.3.20
Xref: g2news1.google.com comp.lang.ada:6785
Date: 2004-12-05T13:11:04-06:00
List-Id: <comp.lang.ada>

>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.