home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / SOUND4A.SCA < prev    next >
Encoding:
Text File  |  1996-05-14  |  7.5 KB  |  208 lines

  1. !ScalaScript
  2. {
  3. Sequence:
  4. :"SubScript"
  5. {
  6. Group:
  7. BoxX.1=139;
  8. BoxY.1=37;
  9. BoxX.2=0;
  10. BoxY.2=0;
  11. BoxX=BoxX.1;
  12. BoxY=BoxY.1;
  13. BoxW=360;
  14. BoxH=249;
  15. Descr="Click a button to get information about it!";
  16. Picture("Scala:\help\graphics\soundbak.gif",UserPalette(RGBPen(1,0,16777215,12632256,5592405,8553090,11184810)));
  17. Clip(0,292,"Scala:\help\graphics\sound4A.gif",transparent(off));
  18.     title="";
  19. pagename="Sound Menu:Mixer panel";
  20. pagedescr="Selects the Mixer. Use the Panel pop-up to switch between the Volume and Pan functions.^n^nMixer: Volume^nLets you combine Sample, MIDI, CD and external sound sources and adjust their relative volumes.";
  21. Button(Normal(Box(620,292,19,25,Style(Norm))),Highlight(Box(620,292,19,25,Style(High))),Select(Box(620,292,19,25,Style(Sel)),Use(infobutton)));
  22. Button(Normal(Box(4,322,415,25,Style(Norm))),Highlight(Box(4,322,415,25,Style(High))),Select(Box(4,322,415,25,Style(Sel)),Use(soundtype)));
  23. Button(Normal(Box(426,322,209,25,Style(Norm))),Highlight(Box(426,322,209,25,Style(High))),Select(Box(426,322,209,25,Style(Sel)),Use(panelpopup)));
  24. Button(Normal(Box(4,450,100,25,Style(Norm))),Highlight(Box(4,450,100,25,Style(High))),Select(Box(4,450,100,25,Style(Sel)),Use(preview)));
  25. Button(Normal(Box(429,450,100,25,Style(Norm))),Highlight(Box(429,450,100,25,Style(High))),Select(Box(429,450,100,25,Style(Sel)),Use(okbutton)));
  26. Button(Normal(Box(534,450,101,25,Style(Norm))),Highlight(Box(534,450,101,25,Style(High))),Select(Box(534,450,101,25,Style(Sel)),Use(cancelbutton)));
  27. Button(Normal(Box(4,370,148,22,Style(Norm))),Highlight(Box(4,370,148,22,Style(High))),Select(Box(4,370,148,22,Style(Sel)),Use(mixervolmaster)));
  28. Button(Normal(Box(157,416,149,22,Style(Norm))),Highlight(Box(157,416,149,22,Style(High))),Select(Box(157,416,149,22,Style(Sel)),Use(mixervolsample)));
  29. Button(Normal(Box(157,370,148,22,Style(Norm))),Highlight(Box(157,370,148,22,Style(High))),Select(Box(157,370,148,22,Style(Sel)),Use(mixervolmidi)));
  30. Button(Normal(Box(4,416,148,22,Style(Norm))),Highlight(Box(4,416,148,22,Style(High))),Select(Box(4,416,148,22,Style(Sel)),Use(mixervolumecd)));
  31. Button(Normal(Box(311,370,149,22,Style(Norm))),Highlight(Box(311,370,149,22,Style(High))),Select(Box(311,370,149,22,Style(Sel)),Use(mixervolmic)));
  32. Button(Normal(Box(311,416,149,22,Style(Norm))),Highlight(Box(311,416,149,22,Style(High))),Select(Box(311,416,149,22,Style(Sel)),Use(mixervolline)));
  33. Button(Normal(Box(465,416,170,25,Style(Norm))),Highlight(Box(465,416,170,25,Style(High))),Select(Box(465,416,170,25,Style(Sel)),Use(mixervolfade)));
  34. Button(Normal(Box(109,450,100,25,Style(Norm))),Highlight(Box(109,450,100,25,Style(High))),Select(Box(109,450,100,25,Style(Sel)),Use(midivolwait)));
  35. Wait();
  36. Sequence:
  37. Use(SetUp);
  38. Use(DrawBox);
  39. Button(Wipe("BlindsFantasy3",Speed(7),Direction(90)),Normal(Box(BoxX+BoxW+10,BoxY,115,BoxH,Style(Info))));
  40. Text(BoxX+BoxW+15,BoxY+5,"Sound Screens:",Style(Mid),Justify(Center,Top),Wrap(Off,Auto(340)));
  41. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+25,"Sample",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+25,"Sample",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+25,"Sample",Font("SHelveticaL",10)),goto(sub1a)));
  42. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+36,"MIDI",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+36,"MIDI",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+36,"MIDI",Font("SHelveticaL",10)),goto(sub2a)));
  43. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+47,"CD",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+47,"CD",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+47,"CD",Font("SHelveticaL",10)),goto(sub3a)));
  44. Text(BoxX+BoxW+17,BoxY+58,"Mixer",Style(LayoutText));
  45. Text(BoxX+BoxW+17,BoxY+75,"Mixer: Volume",Style(LayoutText));
  46. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+86,"Mixer: None",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+86,"Mixer: None",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+86,"Mixer: None",Font("SHelveticaL",10)),goto(sub4b)));
  47. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+97,"Mixer: Pan",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+97,"Mixer: Pan",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+97,"Mixer: Pan",Font("SHelveticaL",10)),goto(sub4c)));
  48. Resources:
  49. :infobutton
  50. {
  51. title="Information button";
  52. text[1]="Switches Scala into Help mode. ";
  53. descr=text[1];
  54. block=1;
  55. max=1;
  56. Use(SetPos);
  57. }
  58. :soundtype
  59. {
  60. title="Sound type buttons";
  61. text[1]="Select a type of sound event - Sample, MIDI, CD or Mixer. Each sound type has its own set of control panels. Clicking on a Sound button in the Main or List menus opens the Sound menu and activates the Sound control panel that applies to that event. If no sound event has been defined, Sample is selected.";
  62. descr=text[1];
  63. block=1;
  64. max=1;
  65. Use(SetPos);
  66. }
  67. :panelpopup
  68. {
  69. title="Panel pop-up";
  70. text[1]="Lets you access the control panels for the selected sound type events. ^"None^" on this button indicates that no sound event of that type is defined for the current element or page.^n^nChanges made in the sound settings are not displayed on the column button until you accept them and return to the Main menu, or move to another page.";
  71. descr=text[1];
  72. block=1;
  73. max=1;
  74. Use(SetPos);
  75. }
  76. :preview
  77. {
  78. title="Preview";
  79. text[1]="Lets you test a sound event by viewing the page with the sound event(s) you have added.";
  80. descr=text[1];
  81. block=1;
  82. max=1;
  83. Use(SetPos);
  84. }
  85. :okbutton
  86. {
  87. title="OK";
  88. text[1]="Accepts changes and exits the Sound menu.";
  89. descr=text[1];
  90. block=1;
  91. max=1;
  92. Use(SetPos);
  93. }
  94. :cancelbutton
  95. {
  96. title="Cancel";
  97. text[1]="Returns to the Main or List menu without applying changes.";
  98. descr=text[1];
  99. block=1;
  100. max=1;
  101. Use(SetPos);
  102. }
  103. :mixervolmaster
  104. {
  105. title="Master slider";
  106. text[1]="Adjusts the volume of all sound sources simultaneously and maintains balance from one source to another as determined by the settings in the individual Volume sliders. Default: 75% maximum.";
  107. descr=text[1];
  108. block=1;
  109. max=1;
  110. Use(SetPos);
  111. }
  112. :mixervolsample
  113. {
  114. title="Sample slider";
  115. text[1]="Sets a new volume for the Sample sound source. All samples are affected. Default: maximum.";
  116. descr=text[1];
  117. block=1;
  118. max=1;
  119. Use(SetPos);
  120. }
  121. :mixervolmidi
  122. {
  123. title="MIDI slider";
  124. text[1]="Sets a new volume for the MIDI sound source. Default: maximum.";
  125. descr=text[1];
  126. block=1;
  127. max=1;
  128. Use(SetPos);
  129. }
  130. :mixervolumecd
  131. {
  132. title="CD slider";
  133. text[1]="Sets a new volume for the CD Audio sound source. Default: maximum.";
  134. descr=text[1];
  135. block=1;
  136. max=1;
  137. Use(SetPos);
  138. }
  139. :mixervolmic
  140. {
  141. title="Microphone slider";
  142. text[1]="Sets the volume of a microphone connected to a sound card's MIC input. Default: minimum.";
  143. descr=text[1];
  144. block=1;
  145. max=1;
  146. Use(SetPos);
  147. }
  148. :mixervolline
  149. {
  150. title="Line slider";
  151. text[1]="Sets the volume of a device connected to a sound card's Line input. Default: minimum.";
  152. descr=text[1];
  153. block=1;
  154. max=1;
  155. Use(SetPos);
  156. }
  157. :mixervolfade
  158. {
  159. title="Fade Time";
  160. text[1]="Specifies the number of seconds (from 0 to 99) taken to adjust the volumes of the sources to the required levels. Default: zero. Wait? is available with a Fade Time other than zero.";
  161. descr=text[1];
  162. block=1;
  163. max=1;
  164. Use(SetPos);
  165. }
  166. :midivolwait
  167. {
  168. title="Wait?";
  169. text[1]="Instructs the script to wait until a Fade completes before proceeding. It is on by default.";
  170. descr=text[1];
  171. block=1;
  172. max=1;
  173. Use(SetPos);
  174. }
  175. }
  176. Resources:
  177. :sub1a
  178. {
  179. Group:
  180. SubNum="1a";
  181. Quit(1);
  182. }
  183. :sub2a
  184. {
  185. Group:
  186. SubNum="2a";
  187. Quit(1);
  188. }
  189. :sub3a
  190. {
  191. Group:
  192. SubNum="3a";
  193. Quit(1);
  194. }
  195. :sub4b
  196. {
  197. Group:
  198. SubNum="4b";
  199. Quit(1);
  200. }
  201. :sub4c
  202. {
  203. Group:
  204. SubNum="4c";
  205. Quit(1);
  206. }
  207. }
  208.