debug/test/dos/waitforchar.c

   1 /*
   2     Copyright © 1995-2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <proto/dos.h>
   7
   8 int main()
   9 {
  10   TEXT ch;
  11   BPTR in = Input();
  12   BPTR out = Output();
  13
  14   Printf("Enter a character within 9 seconds:\n");
  15
  16   SetMode(in, 1);
  17
  18   if (WaitForChar(in, 9000000))
  19   {
  20     FPuts(out, "WaitForChar: char arrived\n");
  21     Read(in, &ch, 1); /* Flush the character */
  22   }
  23   else
  24     FPuts(out, "WaitForChar: timeout\n");
  25
  26   SetMode(in, 0);
  27
  28   return 0;
  29 }