home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / SOUND2C.SCA < prev    next >
Encoding:
Text File  |  1996-05-14  |  5.9 KB  |  163 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\sound2C.gif",transparent(off));
  18.     title="";
  19. pagename="Sound Menu:MIDI panels";
  20. pagedescr="Lets you control options related to MIDI music files. Use the Panel pop-up to choose from the seven functions available: Play, Wait, Stop, Pause, Resume, Volume and Pan.^n^nMIDI: Wait^nEnsures that the script does not continue until the currently playing MIDI file finishes.";
  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. Wait();
  28. Sequence:
  29. Use(SetUp);
  30. Use(DrawBox);
  31. Button(Wipe("BlindsFantasy3",Speed(7),Direction(90)),Normal(Box(BoxX+BoxW+10,BoxY,115,BoxH,Style(Info))));
  32. Text(BoxX+BoxW+15,BoxY+5,"Sound Screens:",Style(Mid),Justify(Center,Top),Wrap(Off,Auto(340)));
  33. 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)));
  34. Text(BoxX+BoxW+17,BoxY+36,"MIDI",Style(LayoutText));
  35. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+47,"CD",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+47,"CD",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+47,"CD",Style(Layout3)),goto(sub3a)));
  36. 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)));
  37. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+75,"MIDI: Play",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+75,"MIDI: Play",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+75,"MIDI: Play",Style(Layout3)),goto(sub2a)));
  38. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+86,"MIDI: None",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+86,"MIDI: None",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+86,"MIDI: None",Style(Layout3)),goto(sub2b)));
  39. Text(BoxX+BoxW+17,BoxY+97,"MIDI: Wait",Style(LayoutText));
  40. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+108,"MIDI: Stop",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+108,"MIDI: Stop",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+108,"MIDI: Stop",Style(Layout3)),goto(sub2d)));
  41. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+119,"MIDI: Resume",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+119,"MIDI: Resume",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+119,"MIDI: Resume",Style(Layout3)),goto(sub2e)));
  42. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+130,"MIDI: Pause",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+130,"MIDI: Pause",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+130,"MIDI: Pause",Style(Layout3)),goto(sub2f)));
  43. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+141,"MIDI: Volume",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+141,"MIDI: Volume",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+141,"MIDI: Volume",Style(Layout3)),goto(sub2g)));
  44. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+152,"MIDI: Pan",Style(Layout1))),Highlight(Text(BoxX+BoxW+17,BoxY+152,"MIDI: Pan",Style(Layout2))),Select(Text(BoxX+BoxW+17,BoxY+152,"MIDI: Pan",Style(Layout3)),goto(sub2h)));
  45. Resources:
  46. :infobutton
  47. {
  48. title="Information button";
  49. text[1]="Switches Scala into Help mode. ";
  50. descr=text[1];
  51. block=1;
  52. max=1;
  53. Use(SetPos);
  54. }
  55. :soundtype
  56. {
  57. title="Sound type buttons";
  58. 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.";
  59. descr=text[1];
  60. block=1;
  61. max=1;
  62. Use(SetPos);
  63. }
  64. :panelpopup
  65. {
  66. title="Panel pop-up";
  67. 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.";
  68. descr=text[1];
  69. block=1;
  70. max=1;
  71. Use(SetPos);
  72. }
  73. :preview
  74. {
  75. title="Preview";
  76. text[1]="Lets you test a sound event by viewing the page with the sound event(s) you have added.";
  77. descr=text[1];
  78. block=1;
  79. max=1;
  80. Use(SetPos);
  81. }
  82. :okbutton
  83. {
  84. title="OK";
  85. text[1]="Accepts changes and exits the Sound menu.";
  86. descr=text[1];
  87. block=1;
  88. max=1;
  89. Use(SetPos);
  90. }
  91. :cancelbutton
  92. {
  93. title="Cancel";
  94. text[1]="Returns to the Main or List menu without applying changes.";
  95. descr=text[1];
  96. block=1;
  97. max=1;
  98. Use(SetPos);
  99. }
  100. }
  101. Resources:
  102. :sub1a
  103. {
  104. Group:
  105. SubNum="1a";
  106. Quit(1);
  107. }
  108. :sub3a
  109. {
  110. Group:
  111. SubNum="3a";
  112. Quit(1);
  113. }
  114. :sub4a
  115. {
  116. Group:
  117. SubNum="4a";
  118. Quit(1);
  119. }
  120. :sub2a
  121. {
  122. Group:
  123. SubNum="2a";
  124. Quit(1);
  125. }
  126. :sub2b
  127. {
  128. Group:
  129. SubNum="2b";
  130. Quit(1);
  131. }
  132. :sub2d
  133. {
  134. Group:
  135. SubNum="2d";
  136. Quit(1);
  137. }
  138. :sub2e
  139. {
  140. Group:
  141. SubNum="2e";
  142. Quit(1);
  143. }
  144. :sub2f
  145. {
  146. Group:
  147. SubNum="2f";
  148. Quit(1);
  149. }
  150. :sub2g
  151. {
  152. Group:
  153. SubNum="2g";
  154. Quit(1);
  155. }
  156. :sub2h
  157. {
  158. Group:
  159. SubNum="2h";
  160. Quit(1);
  161. }
  162. }
  163.