home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.mdf / SourceCode / Palettes / Clocks / UsingClocksPalette / UsingClocksPaletteController.m < prev   
Encoding:
Text File  |  1992-12-11  |  1.1 KB  |  44 lines
  1. //----------------------------------------------------------------------------------------------------
  2. //
  3. //    UsingClocksPaletteController
  4. //
  5. //    Inherits From:        Object
  6. //
  7. //    Declared In:        UsingClocksPaletteController.h
  8. //
  9. //    Disclaimer
  10. //
  11. //        You may freely copy, distribute and reuse this software and its
  12. //        associated documentation. I disclaim any warranty of any kind, 
  13. //        expressed or implied, as to its fitness for any particular use.
  14. //
  15. //----------------------------------------------------------------------------------------------------
  16. #import "UsingClocksPaletteController.h"
  17. #import "AntiGravity.h"
  18.  
  19.  
  20. @implementation UsingClocksPaletteController
  21.  
  22. - activateAlarm:sender
  23. {
  24.     [alarmClock alarmTimeAndDate: [alarmClock clockTimeAndDate]];
  25.     [alarmClock alarmSecond: 0];
  26.     [alarmClock alarmMinute: [alarmClock alarmMinute] + 1];
  27.     [alarmClock alarmHour: ([alarmClock alarmMinute] == 0 ? [alarmClock alarmHour] + 1 : [        alarmClock alarmHour])];
  28.     [alarmClock enableAlarm: YES];
  29.     [activateButton setEnabled: NO];
  30.     return self;
  31. }
  32.  
  33.  
  34. - antiGravity:sender
  35. {
  36.     PSWAntiGravity ();
  37.     [alarmClock enableAlarm: NO];
  38.     [activateButton setEnabled: YES];
  39.     return self;
  40. }
  41.  
  42.  
  43. @end
  44.