home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / SOUND4B.SCA < prev    next >
Encoding:
Text File  |  1996-05-14  |  4.7 KB  |  128 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\sound4B.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: None^nThis indicates that none of the mixer functions are selected.";
  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",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)));
  34. 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)));
  35. 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)));
  36. Text(BoxX+BoxW+17,BoxY+58,"Mixer",Style(LayoutText));
  37. Button(MatchSize(On),Normal(Text(BoxX+BoxW+17,BoxY+75,"Mixer: Volume",Face(On,Pen(4)),Font("SHelveticaL",10))),Highlight(Text(BoxX+BoxW+17,BoxY+75,"Mixer: Volume",Face(On,Pen(1)),Font("SHelveticaL",10))),Select(Text(BoxX+BoxW+17,BoxY+75,"Mixer: Volume",Font("SHelveticaL",10)),goto(sub4a)));
  38. Text(BoxX+BoxW+17,BoxY+86,"Mixer: None",Style(LayoutText));
  39. 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)));
  40. Resources:
  41. :infobutton
  42. {
  43. title="Information button";
  44. text[1]="Switches Scala into Help mode. ";
  45. descr=text[1];
  46. block=1;
  47. max=1;
  48. Use(SetPos);
  49. }
  50. :soundtype
  51. {
  52. title="Sound type buttons";
  53. 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.";
  54. descr=text[1];
  55. block=1;
  56. max=1;
  57. Use(SetPos);
  58. }
  59. :panelpopup
  60. {
  61. title="Panel pop-up";
  62. 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.";
  63. descr=text[1];
  64. block=1;
  65. max=1;
  66. Use(SetPos);
  67. }
  68. :preview
  69. {
  70. title="Preview";
  71. text[1]="Lets you test a sound event by viewing the page with the sound event(s) you have added.";
  72. descr=text[1];
  73. block=1;
  74. max=1;
  75. Use(SetPos);
  76. }
  77. :okbutton
  78. {
  79. title="OK";
  80. text[1]="Accepts changes and exits the Sound menu.";
  81. descr=text[1];
  82. block=1;
  83. max=1;
  84. Use(SetPos);
  85. }
  86. :cancelbutton
  87. {
  88. title="Cancel";
  89. text[1]="Returns to the Main or List menu without applying changes.";
  90. descr=text[1];
  91. block=1;
  92. max=1;
  93. Use(SetPos);
  94. }
  95. }
  96. Resources:
  97. :sub1a
  98. {
  99. Group:
  100. SubNum="1a";
  101. Quit(1);
  102. }
  103. :sub2a
  104. {
  105. Group:
  106. SubNum="2a";
  107. Quit(1);
  108. }
  109. :sub3a
  110. {
  111. Group:
  112. SubNum="3a";
  113. Quit(1);
  114. }
  115. :sub4a
  116. {
  117. Group:
  118. SubNum="4a";
  119. Quit(1);
  120. }
  121. :sub4c
  122. {
  123. Group:
  124. SubNum="4c";
  125. Quit(1);
  126. }
  127. }
  128.