home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / SOUND3C.SCA < prev    next >
Encoding:
Text File  |  1996-05-14  |  11.4 KB  |  315 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\sound3C.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: Play MSF^nStarts and stops CD play within tracks based on time rather than track numbers.";
  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(428,356,207,25,Style(Norm))),Highlight(Box(428,356,207,25,Style(High))),Select(Box(428,356,207,25,Style(Sel)),Use(cdplaymsftimein)));
  30. Button(Normal(Box(428,386,207,25,Style(Norm))),Highlight(Box(428,386,207,25,Style(High))),Select(Box(428,386,207,25,Style(Sel)),Use(cdplaymsftimeout)));
  31. Button(Normal(Box(428,416,207,25,Style(Norm))),Highlight(Box(428,416,207,25,Style(High))),Select(Box(428,416,207,25,Style(Sel)),Use(cdplaymsfloops)));
  32. Button(Normal(Box(4,416,206,22,Style(Norm))),Highlight(Box(4,416,206,22,Style(High))),Select(Box(4,416,206,22,Style(Sel)),Use(cdplaymsfvol)));
  33. Button(Normal(Box(216,416,207,25,Style(Norm))),Highlight(Box(216,416,207,25,Style(High))),Select(Box(216,416,207,25,Style(Sel)),Use(cdplaymsffadein)));
  34. Button(Normal(Box(4,370,207,22,Style(Norm))),Highlight(Box(4,370,207,22,Style(High))),Select(Box(4,370,207,22,Style(Sel)),Use(cdplaymsfpan)));
  35. 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(cdplaymsfwait)));
  36. Button(Normal(Box(216,356,207,25,Style(Norm))),Highlight(Box(216,356,207,25,Style(High))),Select(Box(216,356,207,25,Style(Sel)),Use(cdplaymsftrackin)));
  37. Button(Normal(Box(216,386,207,25,Style(Norm))),Highlight(Box(216,386,207,25,Style(High))),Select(Box(216,386,207,25,Style(Sel)),Use(cdplaymsftrackout)));
  38. Wait();
  39. Sequence:
  40. Use(SetUp);
  41. Use(DrawBox);
  42. Button(Wipe("BlindsFantasy3",Speed(7),Direction(90)),Normal(Box(BoxX+BoxW+10,BoxY,115,BoxH,Style(Info))));
  43. Text(BoxX+BoxW+15,BoxY+5,"Sound Screens:",Style(Mid),Justify(Center,Top),Wrap(Off,Auto(340)));
  44. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+25,"Sample",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+25,"Sample",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+25,"Sample",Style(Layout3)),goto(sub1a)));
  45. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+36,"MIDI",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+36,"MIDI",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+36,"MIDI",Style(Layout3)),goto(sub2a)));
  46. Text(BoxX+BoxW+17,BoxY+47,"CD",Style(LayoutText));
  47. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+58,"Mixer",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+58,"Mixer",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+58,"Mixer",Style(Layout3)),goto(sub4a)));
  48. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+75,"CD: Play",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+75,"CD: Play",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+75,"CD: Play",Style(Layout3)),goto(sub3a)));
  49. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+86,"CD: None",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+86,"CD: None",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+86,"CD: None",Style(Layout3)),goto(sub3b)));
  50. Text(BoxX+BoxW+17,BoxY+97,"CD: Play MSF",Style(LayoutText));
  51. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+108,"CD: Sync",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+108,"CD: Sync",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+108,"CD: Sync",Style(Layout3)),goto(sub3d)));
  52. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+119,"CD: Wait",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+119,"CD: Wait",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+119,"CD: Wait",Style(Layout3)),goto(sub3e)));
  53. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+130,"CD: Stop",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+130,"CD: Stop",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+130,"CD: Stop",Style(Layout3)),goto(sub3f)));
  54. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+141,"CD: Pause",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+141,"CD: Pause",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+141,"CD: Pause",Style(Layout3)),goto(sub3g)));
  55. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+152,"CD: Resume",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+152,"CD: Resume",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+152,"CD: Resume",Style(Layout3)),goto(sub3h)));
  56. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+163,"CD: Eject",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+163,"CD: Eject",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+163,"CD: Eject",Style(Layout3)),goto(sub3i)));
  57. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+174,"CD: Read Contents",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+174,"CD: Read Contents",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+174,"CD: Read Contents",Style(Layout3)),goto(sub3j)));
  58. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+185,"CD: Next",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+185,"CD: Next",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+185,"CD: Next",Style(Layout3)),goto(sub3k)));
  59. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+196,"CD: Previous",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+196,"CD: Previous",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+196,"CD: Previous",Style(Layout3)),goto(sub3l)));
  60. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+207,"CD: Volume",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+207,"CD: Volume",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+207,"CD: Volume",Style(Layout3)),goto(sub3m)));
  61. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+218,"CD: Pan",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+218,"CD: Pan",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+218,"CD: Pan",Style(Layout3)),goto(sub3n)));
  62. Resources:
  63. :infobutton
  64. {
  65. title="Information button";
  66. text[1]="Switches Scala into Help mode. ";
  67. descr=text[1];
  68. block=1;
  69. max=1;
  70. Use(SetPos);
  71. }
  72. :cdunit
  73. {
  74. title="CD Unit";
  75. 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.";
  76. descr=text[1];
  77. block=1;
  78. max=1;
  79. Use(SetPos);
  80. }
  81. :newcd
  82. {
  83. title="New CD!";
  84. 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.";
  85. descr=text[1];
  86. block=1;
  87. max=1;
  88. Use(SetPos);
  89. }
  90. :soundtype
  91. {
  92. title="Sound type buttons";
  93. 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.";
  94. descr=text[1];
  95. block=1;
  96. max=1;
  97. Use(SetPos);
  98. }
  99. :panelpopup
  100. {
  101. title="Panel pop-up";
  102. 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.";
  103. descr=text[1];
  104. block=1;
  105. max=1;
  106. Use(SetPos);
  107. }
  108. :preview
  109. {
  110. title="Preview";
  111. text[1]="Lets you test a sound event by viewing the page with the sound event(s) you have added.";
  112. descr=text[1];
  113. block=1;
  114. max=1;
  115. Use(SetPos);
  116. }
  117. :okbutton
  118. {
  119. title="OK";
  120. text[1]="Accepts changes and exits the Sound menu.";
  121. descr=text[1];
  122. block=1;
  123. max=1;
  124. Use(SetPos);
  125. }
  126. :cancelbutton
  127. {
  128. title="Cancel";
  129. text[1]="Returns to the Main or List menu without applying changes.";
  130. descr=text[1];
  131. block=1;
  132. max=1;
  133. Use(SetPos);
  134. }
  135. :cdplaymsftimein
  136. {
  137. title="Time In";
  138. text[1]="Specifies exact starting point for the CD audio segment in minutes, seconds and frames (MSF).";
  139. descr=text[1];
  140. block=1;
  141. max=1;
  142. Use(SetPos);
  143. }
  144. :cdplaymsftimeout
  145. {
  146. title="Time Out";
  147. text[1]="Specifies the exact stopping point of the CD audio segment in minutes, seconds and frames (MSF).";
  148. descr=text[1];
  149. block=1;
  150. max=1;
  151. Use(SetPos);
  152. }
  153. :cdplaymsfloops
  154. {
  155. title="Loops";
  156. text[1]="Defines the number of times (from 1 to 99, or infinite) the CD segment repeats before the next page in the script is displayed or the CD stops.";
  157. descr=text[1];
  158. block=1;
  159. max=1;
  160. Use(SetPos);
  161. }
  162. :cdplaymsfvol
  163. {
  164. title="Volume slider";
  165. text[1]="Adjusts the volume. Default maximum.";
  166. descr=text[1];
  167. block=1;
  168. max=1;
  169. Use(SetPos);
  170. }
  171. :cdplaymsffadein
  172. {
  173. title="Fade In Time";
  174. text[1]="Defines the time in seconds (from 0 to 99) that the sound increases from no sound to the level set by the Volume slider. Wait? is available with a Fade-in Time other than zero.";
  175. descr=text[1];
  176. block=1;
  177. max=1;
  178. Use(SetPos);
  179. }
  180. :cdplaymsfpan
  181. {
  182. title="Pan slider";
  183. text[1]="Sets the left/right balance of the sound. Default centered.";
  184. descr=text[1];
  185. block=1;
  186. max=1;
  187. Use(SetPos);
  188. }
  189. :cdplaymsfwait
  190. {
  191. title="Wait?";
  192. text[1]="Controls the flow of a script. When on, Wait? instructs the script to wait until the CD event finishes before proceeding. Wait? is on by default.";
  193. descr=text[1];
  194. block=1;
  195. max=1;
  196. Use(SetPos);
  197. }
  198. :cdplaymsftrackin
  199. {
  200. title="Track In";
  201. text[1]="Specifies the CD track number at which to begin play.";
  202. descr=text[1];
  203. block=1;
  204. max=1;
  205. Use(SetPos);
  206. }
  207. :cdplaymsftrackout
  208. {
  209. title="Track Out";
  210. text[1]="Specifies the CD track number at which to end play.";
  211. descr=text[1];
  212. block=1;
  213. max=1;
  214. Use(SetPos);
  215. }
  216. }
  217. Resources:
  218. :sub1a
  219. {
  220. Group:
  221. SubNum="1a";
  222. Quit(1);
  223. }
  224. :sub2a
  225. {
  226. Group:
  227. SubNum="2a";
  228. Quit(1);
  229. }
  230. :sub4a
  231. {
  232. Group:
  233. SubNum="4a";
  234. Quit(1);
  235. }
  236. :sub3a
  237. {
  238. Group:
  239. SubNum="3a";
  240. Quit(1);
  241. }
  242. :sub3b
  243. {
  244. Group:
  245. SubNum="3b";
  246. Quit(1);
  247. }
  248. :sub3d
  249. {
  250. Group:
  251. SubNum="3d";
  252. Quit(1);
  253. }
  254. :sub3e
  255. {
  256. Group:
  257. SubNum="3e";
  258. Quit(1);
  259. }
  260. :sub3f
  261. {
  262. Group:
  263. SubNum="3f";
  264. Quit(1);
  265. }
  266. :sub3g
  267. {
  268. Group:
  269. SubNum="3g";
  270. Quit(1);
  271. }
  272. :sub3h
  273. {
  274. Group:
  275. SubNum="3h";
  276. Quit(1);
  277. }
  278. :sub3i
  279. {
  280. Group:
  281. SubNum="3i";
  282. Quit(1);
  283. }
  284. :sub3j
  285. {
  286. Group:
  287. SubNum="3j";
  288. Quit(1);
  289. }
  290. :sub3k
  291. {
  292. Group:
  293. SubNum="3k";
  294. Quit(1);
  295. }
  296. :sub3l
  297. {
  298. Group:
  299. SubNum="3l";
  300. Quit(1);
  301. }
  302. :sub3m
  303. {
  304. Group:
  305. SubNum="3m";
  306. Quit(1);
  307. }
  308. :sub3n
  309. {
  310. Group:
  311. SubNum="3n";
  312. Quit(1);
  313. }
  314. }
  315.