home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / SOUND3F.SCA < prev    next >
Text File  |  1996-05-14  |  10KB  |  245 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\sound3F.gif",transparent(off));
  18.     title="";
  19. pagename="Sound Menu:CD panels";
  20. pagedescr="Lets you access audio tracks available on standard audio compact discs. Use the Panel pop-up to choose from thirteen functions available: Play, Play MSF, Sync, Wait, Stop, Pause, Resume, Eject, Read Contents, Next, Previous, Volume and Pan.^n^nCD: Stop^nStops the CD currently playing.";
  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(214,450,103,25,Style(Norm))),Highlight(Box(214,450,103,25,Style(High))),Select(Box(214,450,103,25,Style(Sel)),Use(cdunit)));
  23. Button(Normal(Box(322,450,102,25,Style(Norm))),Highlight(Box(322,450,102,25,Style(High))),Select(Box(322,450,102,25,Style(Sel)),Use(newcd)));
  24. 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)));
  25. 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)));
  26. 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)));
  27. 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)));
  28. 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)));
  29. Button(Normal(Box(4,356,208,25,Style(Norm))),Highlight(Box(4,356,208,25,Style(High))),Select(Box(4,356,208,25,Style(Sel)),Use(cdstopfadeout)));
  30. 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(cdstopwait)));
  31. Wait();
  32. Sequence:
  33. Use(SetUp);
  34. Use(DrawBox);
  35. Button(Wipe("BlindsFantasy3",Speed(7),Direction(90)),Normal(Box(BoxX+BoxW+10,BoxY,115,BoxH,Style(Info))));
  36. Text(BoxX+BoxW+15,BoxY+5,"Sound Screens:",Style(Mid),Justify(Center,Top),Wrap(Off,Auto(340)));
  37. 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)));
  38. 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)));
  39. Text(BoxX+BoxW+17,BoxY+47,"CD",Style(LayoutText));
  40. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+58,"Mixer",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+58,"Mixer",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+58,"Mixer",Font("SHelveticaL",10)),goto(sub4a)));
  41. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+75,"CD: Play",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+75,"CD: Play",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+75,"CD: Play",Font("SHelveticaL",10)),goto(sub3a)));
  42. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+86,"CD: None",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+86,"CD: None",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+86,"CD: None",Font("SHelveticaL",10)),goto(sub3b)));
  43. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+97,"CD: Play MSF",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+97,"CD: Play MSF",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+97,"CD: Play MSF",Font("SHelveticaL",10)),goto(sub3c)));
  44. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+108,"CD: Sync",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+108,"CD: Sync",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+108,"CD: Sync",Font("SHelveticaL",10)),goto(sub3d)));
  45. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+119,"CD: Wait",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+119,"CD: Wait",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+119,"CD: Wait",Font("SHelveticaL",10)),goto(sub3e)));
  46. Text(BoxX+BoxW+17,BoxY+130,"CD: Stop",Style(LayoutText));
  47. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+141,"CD: Pause",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+141,"CD: Pause",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+141,"CD: Pause",Font("SHelveticaL",10)),goto(sub3g)));
  48. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+152,"CD: Resume",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+152,"CD: Resume",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+152,"CD: Resume",Font("SHelveticaL",10)),goto(sub3h)));
  49. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+163,"CD: Eject",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+163,"CD: Eject",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+163,"CD: Eject",Font("SHelveticaL",10)),goto(sub3i)));
  50. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+174,"CD: Read Contents",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+174,"CD: Read Contents",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+174,"CD: Read Contents",Font("SHelveticaL",10)),goto(sub3j)));
  51. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+185,"CD: Next",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+185,"CD: Next",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+185,"CD: Next",Font("SHelveticaL",10)),goto(sub3k)));
  52. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+196,"CD: Previous",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+196,"CD: Previous",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+196,"CD: Previous",Font("SHelveticaL",10)),goto(sub3l)));
  53. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+207,"CD: Volume",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+207,"CD: Volume",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+207,"CD: Volume",Font("SHelveticaL",10)),goto(sub3m)));
  54. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+218,"CD: Pan",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+218,"CD: Pan",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+218,"CD: Pan",Font("SHelveticaL",10)),goto(sub3n)));
  55. Resources:
  56. :infobutton
  57. {
  58. title="Information button";
  59. text[1]="Switches Scala into Help mode. ";
  60. descr=text[1];
  61. block=1;
  62. max=1;
  63. Use(SetPos);
  64. }
  65. :cdunit
  66. {
  67. title="CD Unit";
  68. text[1]="If you have more than one CD-ROM drive, or a multi-unit drive, Scala displays an additional button on the CD control panels, CD Unit. You can access different discs in multiple drives by selecting the unit number with this control.";
  69. descr=text[1];
  70. block=1;
  71. max=1;
  72. Use(SetPos);
  73. }
  74. :newcd
  75. {
  76. title="New CD!";
  77. text[1]="Makes Scala read the table of contents of the CD in the drive, so that track numbers and times can be displayed correctly. It should always be used after you change CDs in the drive. All CD control panels have the New CD! button.";
  78. descr=text[1];
  79. block=1;
  80. max=1;
  81. Use(SetPos);
  82. }
  83. :soundtype
  84. {
  85. title="Sound type buttons";
  86. 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.";
  87. descr=text[1];
  88. block=1;
  89. max=1;
  90. Use(SetPos);
  91. }
  92. :panelpopup
  93. {
  94. title="Panel pop-up";
  95. 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.";
  96. descr=text[1];
  97. block=1;
  98. max=1;
  99. Use(SetPos);
  100. }
  101. :preview
  102. {
  103. title="Preview";
  104. text[1]="Lets you test a sound event by viewing the page with the sound event(s) you have added.";
  105. descr=text[1];
  106. block=1;
  107. max=1;
  108. Use(SetPos);
  109. }
  110. :okbutton
  111. {
  112. title="OK";
  113. text[1]="Accepts changes and exits the Sound menu.";
  114. descr=text[1];
  115. block=1;
  116. max=1;
  117. Use(SetPos);
  118. }
  119. :cancelbutton
  120. {
  121. title="Cancel";
  122. text[1]="Returns to the Main or List menu without applying changes.";
  123. descr=text[1];
  124. block=1;
  125. max=1;
  126. Use(SetPos);
  127. }
  128. :cdstopfadeout
  129. {
  130. title="Fade Out Time";
  131. text[1]="Defines the time in seconds (from 0 to 99) that sounds decrease from the level set by the Volume slider to no sound. Default: zero. Wait? is available with a Fade-out Time other than zero.";
  132. descr=text[1];
  133. block=1;
  134. max=1;
  135. Use(SetPos);
  136. }
  137. :cdstopwait
  138. {
  139. title="Wait?";
  140. text[1]="Controls the flow of a script. When on, Wait? instructs the script to wait until a Fade-out event finishes before proceeding. It is on by default.";
  141. descr=text[1];
  142. block=1;
  143. max=1;
  144. Use(SetPos);
  145. }
  146. }
  147. Resources:
  148. :sub1a
  149. {
  150. Group:
  151. SubNum="1a";
  152. Quit(1);
  153. }
  154. :sub2a
  155. {
  156. Group:
  157. SubNum="2a";
  158. Quit(1);
  159. }
  160. :sub4a
  161. {
  162. Group:
  163. SubNum="4a";
  164. Quit(1);
  165. }
  166. :sub3a
  167. {
  168. Group:
  169. SubNum="3a";
  170. Quit(1);
  171. }
  172. :sub3b
  173. {
  174. Group:
  175. SubNum="3b";
  176. Quit(1);
  177. }
  178. :sub3c
  179. {
  180. Group:
  181. SubNum="3c";
  182. Quit(1);
  183. }
  184. :sub3d
  185. {
  186. Group:
  187. SubNum="3d";
  188. Quit(1);
  189. }
  190. :sub3e
  191. {
  192. Group:
  193. SubNum="3e";
  194. Quit(1);
  195. }
  196. :sub3g
  197. {
  198. Group:
  199. SubNum="3g";
  200. Quit(1);
  201. }
  202. :sub3h
  203. {
  204. Group:
  205. SubNum="3h";
  206. Quit(1);
  207. }
  208. :sub3i
  209. {
  210. Group:
  211. SubNum="3i";
  212. Quit(1);
  213. }
  214. :sub3j
  215. {
  216. Group:
  217. SubNum="3j";
  218. Quit(1);
  219. }
  220. :sub3k
  221. {
  222. Group:
  223. SubNum="3k";
  224. Quit(1);
  225. }
  226. :sub3l
  227. {
  228. Group:
  229. SubNum="3l";
  230. Quit(1);
  231. }
  232. :sub3m
  233. {
  234. Group:
  235. SubNum="3m";
  236. Quit(1);
  237. }
  238. :sub3n
  239. {
  240. Group:
  241. SubNum="3n";
  242. Quit(1);
  243. }
  244. }
  245.