home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Examples / p1-334 < prev    next >
Encoding:
Text File  |  1994-07-08  |  1.1 KB  |  43 lines
  1. #include "os.h"
  2. #include "osbyte.h"
  3.  
  4. extern void Timer_Veneer (void);
  5. extern void *Alarm;
  6.  
  7. extern void Call_Back_Veneer (void);
  8. extern void *Save_Block;
  9. extern void Event_Veneer (void);
  10.  
  11. void add_call_back (void)
  12.  
  13.    /*The code to install the handler only.*/
  14.  
  15. {  os_call_after (200, (void *) &Timer_Veneer, Alarm);
  16. }
  17.  
  18. void call_back_handler (void)
  19.  
  20.    /*Installation code only.*/
  21.  
  22. {  void *old_callbacks, *old_events;
  23.    byte *old_buffer;
  24.    bool shift_pressed;
  25.  
  26.    old_callbacks = os_change_environment (os_HANDLER_CALL_BACK, 
  27.          (void *) &Call_Back_Veneer, 0, Save_Block, NULL, &old_buffer);
  28.    old_events = os_change_environment (os_HANDLER_EVENT, 
  29.          (void *) &Event_Veneer, 0, 0, NULL, NULL);
  30.  
  31.    os_byte (osbyte_ENABLE_EVENT, Event_MouseTransition, SKIP, NULL, NULL);
  32.  
  33.    do os_byte (osbyte_IN_KEY, 0 ^ 0xFF, 0xFF, &shift_pressed, NULL);
  34.    while (!shift_pressed); /*loop until shift*/
  35.  
  36.    os_byte (osbyte_DISABLE_EVENT, Event_MouseTransition, SKIP, NULL, NULL);
  37.  
  38.    os_change_environment (os_HANDLER_EVENT, old_events, 0, 0,
  39.          NULL, NULL);
  40.    os_change_environment (os_HANDLER_CALL_BACK, old_callbacks, 0, old_buffer,
  41.          NULL, NULL);
  42. }
  43.