home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.mdf / Apps / Games / How / How_0.5 / Source / How.m < prev    next >
Encoding:
Text File  |  1992-04-18  |  2.7 KB  |  167 lines
  1.  
  2. /* Generated by Interface Builder */
  3.  
  4. #import "How.h"
  5. #import <appkit/Panel.h> /* Needed for Alertpanel */
  6. #import <appkit/Form.h> /* For the Result Form in the Result panel */
  7.  
  8. @implementation How
  9.  
  10. int TOTAL = 0;
  11.  
  12. - init
  13. {
  14.    [super init];
  15.    return self;
  16.  }
  17.  
  18. - Chosen:sender
  19. /* This is for the button is the Intro panel
  20.  * once the user has chosen a number
  21.  * he will click on this button
  22.  */
  23. {
  24.     TOTAL =0;
  25.     [CardOne orderFront:sender];
  26.     return self;
  27. }
  28.  
  29. - OneYes:sender
  30. /* CardOne answer yes */
  31. {
  32.     [CardOne close];
  33.     TOTAL=TOTAL + 1;
  34.     [CardTwo orderFront:sender];
  35.     return self;
  36. }
  37.  
  38. - OneNo:sender
  39. /* CardOne answer no */
  40. {
  41.     [CardOne close];
  42.     [CardTwo orderFront:sender];
  43.     return self;
  44. }
  45.  
  46.  
  47. - TwoYes:sender
  48. /* CardTwo answer yes */
  49. {
  50.     [CardTwo close];
  51.     TOTAL=TOTAL + 2;
  52.     [CardThree orderFront:sender];
  53.     return self;
  54. }
  55.  
  56. - TwoNo:sender
  57. /* CardTwo answer no */
  58. {
  59.     [CardTwo close];
  60.     [CardThree orderFront:sender];
  61.     return self;
  62. }
  63.  
  64.  
  65. - ThreeYes:sender
  66. /* CardThree answer yes */
  67. {
  68.     [CardThree close];
  69.     TOTAL=TOTAL + 4;
  70.     [CardFour orderFront:sender];
  71.     return self;
  72. }
  73.  
  74. - ThreeNo:sender
  75. /* CardOne answer no */
  76. {
  77.     [CardThree close];
  78.     [CardFour orderFront:sender];
  79.     return self;
  80. }
  81.  
  82.  
  83. - FourYes:sender
  84. /* CardFour answer yes */
  85. {
  86.     [CardFour close];
  87.     TOTAL=TOTAL + 8;
  88.     [CardFive orderFront:sender];
  89.     return self;
  90. }
  91.  
  92. - FourNo:sender
  93. /* CardFour answer no */
  94. {
  95.     [CardFour close];
  96.     [CardFive orderFront:sender];
  97.     return self;
  98. }
  99.  
  100. - FiveYes:sender
  101. /* CardFive answer yes */
  102. {
  103.     [CardFive close];
  104.     TOTAL=TOTAL + 16;
  105.     [CardSix orderFront:sender];
  106.     return self;
  107. }
  108.  
  109. - FiveNo:sender
  110. /* CardFive answer no */
  111. {
  112.     [CardFive close];
  113.     [CardSix orderFront:sender];
  114.     return self;
  115. }
  116.  
  117. - SixYes:sender
  118. /* CardSix answer yes */
  119. {
  120.     [CardSix close];
  121.     TOTAL=TOTAL + 32;
  122.     [CardSeven orderFront:sender];
  123.     return self;
  124. }
  125.  
  126. - SixNo:sender
  127. /* CardSix answer no */
  128. {
  129.     [CardSix close];
  130.     [CardSeven orderFront:sender];
  131.     return self;
  132. }
  133.  
  134.  
  135. - SevenYes:sender
  136. /* CardSeven answer yes */
  137. {
  138.     [CardSeven close];
  139.     TOTAL=TOTAL + 64;
  140.     [ResultForm setIntValue:TOTAL];
  141.     [ResultForm display];
  142.     [Result orderFront:sender];
  143.     return self;
  144. }
  145.  
  146. - SevenNo:sender
  147. /* CardSeven answer no */
  148. {
  149.     [CardSeven close];
  150.     [ResultForm setIntValue:TOTAL];
  151.     [ResultForm display];
  152.     [Result orderFront:sender];
  153.     return self;
  154. }
  155.  
  156.  
  157. - closeInfo:sender
  158. /* This method closes the Info panel and opens and displays the MoreInfo panel */
  159. {
  160.       [Info performClose:sender]; /* This closes the Info panel */
  161.       [MoreInfo orderFront:sender]; /* This displays the MoreInfo panel */
  162.       return self; /* End of closeInfo method */
  163.  }
  164.  
  165.  
  166. @end
  167.