home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.mdf / SourceCode / SliderDualActing / SliderDualActingDemo.m < prev    next >
Encoding:
Text File  |  1993-01-18  |  2.4 KB  |  112 lines
  1.  
  2. /* Generated by Interface Builder */
  3.  
  4. #import "SliderDualActingDemo.h"
  5. #import "SliderDualActing.h"
  6. #import "SliderCellFine.h"
  7. #import <soundkit/Sound.h>
  8. @implementation SliderDualActingDemo
  9. + new
  10. {
  11.     self = [super new];
  12.     [NXApp setDelegate:self];
  13.     return self;
  14. }
  15.  
  16. - appDidInit:sender  // now everything is for sure initialized:
  17. {
  18.     // initialization code could go here as well....
  19.     [[[[fontSlider setUpTarget:self action:@selector(action)]
  20.             setMax:360. allowHigher:YES min:2. allowLower:NO]
  21.             setAltStep:1. whole:YES default:12.]
  22.             setFormat:NO left:3 right:0]; 
  23.     [[[[slider1 setUpTarget:self action:@selector(action) isContinuous:YES]
  24.             setMax:10. allowHigher:YES min:-10. allowLower:YES]
  25.             setAltStep:1. whole:YES default:0.]
  26.             setFormat:NO left:3 right:0]; 
  27.     [[[[slider2 setUpTarget:self action:@selector(action)]
  28.             setMax:1. allowHigher:NO min:-1. allowLower:NO]
  29.             setAltStep:.01 whole:NO default:0.]
  30.             setFormat:NO left:1 right:3]; 
  31.      [[[[slider3 setUpTarget:self action:@selector(action) isContinuous:YES]
  32.             setMax:1000 allowHigher:NO min:0 allowLower:NO]
  33.             setAltStep:20 whole:NO default:500]
  34.             setFormat:NO left:4 right:0]; 
  35.      [[[[slider4 setUpTarget:self action:@selector(action) isContinuous:YES]
  36.             setMax:15. allowHigher:YES min:-15. allowLower:YES]
  37.             setAltStep:1. whole:YES default:0]
  38.             setFormat:NO left:3 right:0]; 
  39.     [[[[slider0 setUpTarget:self action:@selector(action)]
  40.             setMax:360. allowHigher:NO min:-360. allowLower:NO]
  41.             setAltStep:1. whole:YES default:0]
  42.             setFormat:NO left:3 right:0]; 
  43.     [[slider0 window]makeKeyAndOrderFront:self];
  44.     return self;
  45. }
  46.  
  47. - action
  48. {
  49.     // show we have sent a action
  50.     static int num=0;
  51.     static id snd = nil;
  52.     if( [useSoundSwitch state]) {
  53.         if (!snd) snd =[Sound newFromMachO:"clack.snd"];
  54.         [snd play];
  55.     } 
  56.     [textField setIntValue:++num];
  57.     return self;
  58. }
  59.  
  60.  
  61. - setUseSoundSwitch:anObject
  62. {
  63.     useSoundSwitch = anObject;
  64.    return self;
  65. }
  66.  
  67. - setSlider0:anObject
  68. {
  69.     slider0 = anObject;
  70.    return self;
  71. }
  72.  
  73. - setSlider1:anObject
  74. {
  75.     slider1 = anObject;
  76.     return self;
  77. }
  78.  
  79. - setSlider2:anObject
  80. {
  81.     slider2 = anObject;
  82.     return self;
  83. }
  84.  
  85. - setFontSlider:anObject
  86. {
  87.     fontSlider = anObject;
  88.     return self;
  89. }
  90.  
  91. - setSlider3:anObject
  92. {
  93.     slider3 = anObject;
  94.    return self;
  95. }
  96.  
  97. - setSlider4:anObject
  98. {
  99.     slider4 = anObject;
  100.     return self;
  101. }
  102.  
  103. - setTextField:anObject
  104. {
  105.     textField = anObject;
  106.     return self;
  107. }
  108.  
  109.  
  110.  
  111. @end
  112.