home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / Resound / ModuleController.m < prev    next >
Encoding:
Text File  |  1992-06-13  |  1.7 KB  |  130 lines
  1.  
  2. #import "ModuleController.h"
  3. #import "Imports.h"
  4.  
  5.  
  6. @implementation ModuleController
  7.  
  8. - init
  9. {
  10.     GoAhead=FALSE;
  11.     return self;
  12. }
  13.  
  14. - TurnOffMenu:sender
  15. {
  16.     [AdjustButton setEnabled:NO];
  17.     return self;
  18. }
  19.  
  20. - TurnOnMenu:sender
  21. {
  22.         [AdjustButton setEnabled:YES];
  23.     return self;
  24. }
  25.  
  26. - Cancelled:sender;
  27. {
  28.     [NXApp stopModal];
  29.     [CompactPanel close];
  30.     GoAhead=FALSE;
  31.     return self;
  32. }
  33.  
  34. - Okayed:sender;
  35. {
  36.     [NXApp stopModal];
  37.     [CompactPanel close];
  38.     GoAhead=TRUE;
  39.     return self;
  40. }
  41.     
  42. - (BOOL) RunCompactPanel:sender
  43. {
  44.     [CompactPanel makeKeyAndOrderFront:self];
  45.     [NXApp runModalFor:CompactPanel];
  46.     return GoAhead;
  47. }
  48.  
  49. - CurrentSound:sender
  50. {
  51.     return [TheFileController CurrentSound:sender];
  52. }
  53.  
  54. - CurrentSoundView:sender
  55. {
  56.     return [TheFileController CurrentSoundView:sender];
  57. }
  58.  
  59. - CurrentWindow:sender
  60. {
  61.     return [TheFileController CurrentWindow:sender];
  62. }
  63.  
  64. - CurrentScrollView:sender
  65. {
  66.     if ([TheFileController CurrentWindow:self]==NULL)
  67.         {return NULL;}
  68.     else
  69.         {return [[TheFileController CurrentWindow:self] contentView];}
  70. }
  71.  
  72. - SoundChanged:ThisSound;
  73. {
  74.     [TheFileController SoundChanged:ThisSound];
  75.     return self;
  76. }
  77.  
  78. - ChangeSelection:sender
  79. {
  80.     [TheEditController ChangeSelection:sender];
  81.     return self;
  82. }
  83.  
  84. - ResetSelection:sender
  85. {
  86.     [TheEditController ResetSelection:sender];
  87.     return self;
  88. }
  89.  
  90. - ChangeInfo:ThisSound
  91. {
  92.     [TheInfoManager ChangeInfo:ThisSound];
  93.     return self;
  94. }
  95.  
  96. - ZoomChanged:sender
  97. {
  98.     [TheEditController ZoomChanged:sender];
  99.     return self;
  100. }
  101.  
  102. - Stop:sender
  103. {
  104.     [TheSoundManager Stop:sender];
  105.     return self;
  106. }
  107.  
  108. - Play:sender
  109. {
  110.     [TheSoundManager Play:sender];
  111.     return self;
  112. }
  113.  
  114. - (BOOL) IsPlaying
  115. {
  116.     return [TheSoundManager IsPlaying];
  117. }
  118.  
  119. - (BOOL) IsRecording
  120. {
  121.     return [TheSoundManager IsRecording];
  122. }
  123.     
  124.     
  125.     
  126.     
  127.     
  128.  
  129. @end
  130.