Zitat:

---

Vorausgesetzt, die Ziel-OS-Version besitzt diese Funktion.

---

Zitat:

---

Nur, wenn man auch IO-Funktionen benutzt. Ich habe extra darauf hingewiesen, daß die angesprochene Funktion nicht typisch ist.

---

code:

---

/*-------------------------------------------------------------------- ------*/
/* Timer.device öffnen                                                      */
/*-------------------------------------------------------------------- ------*/

   struct timerequest *open_timer (long unit)

   {
   struct MsgPort *reply;
   struct timerequest *request;

   if (reply = CreatePort (NULL,0))
      {
      if (request = (struct timerequest *)CreateExtIO (reply,sizeof(struct timerequest)))
         {
         if (OpenDevice ("timer.device",unit,(struct IORequest *)request,0) == 0)
            {
            return (request);
            }
         else
            err = ERR_OPEN_TIMER_FAILED;

         DeleteExtIO ((struct IORequest *)request);
         }
      else
         err = ERR_CANNOT_CREATE_IOREQ;
      DeletePort (reply);
      }
   else
      err = ERR_CANNOT_CREATE_REPLY_PORT;

   return (NULL);
   }

/*-------------------------------------------------------------------- ------*/
/* Timer starten                                                            */
/*-------------------------------------------------------------------- ------*/

   void start_timer (struct timerequest *request,ULONG secs,ULONG micro)

   {
   request->tr_node.io_Command = TR_ADDREQUEST;
   request->tr_time.tv_secs  = secs;
   request->tr_time.tv_micro = micro;
   SendIO ((struct IORequest *)request);
   }

/*-------------------------------------------------------------------- ------*/
/* Auf Timer warten                                                         */
/*-------------------------------------------------------------------- ------*/

   #define wait_timer(timereq) WaitIO((struct IORequest *)(timereq))

/*-------------------------------------------------------------------- ------*/
/* Timer.device schließen                                                   */
/*-------------------------------------------------------------------- ------*/

   void close_timer (struct timerequest *request)

   {
   struct MsgPort *reply;

   if (request)
      {
      reply = request->tr_node.io_Message.mn_ReplyPort;

      AbortIO ((struct IORequest *)request);
      CloseDevice ((struct IORequest *)request);
      DeleteExtIO ((struct IORequest *)request);
      DeletePort (reply);
      }
   }

---