home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / MPEG1.SCA < prev    next >
Text File  |  1996-05-14  |  4KB  |  120 lines
  1. !ScalaScript
  2. {
  3. Sequence:
  4. :"SubScript"
  5. {
  6. Group:
  7. BoxX.1=139;
  8. BoxY.1=71;
  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\mpeg.gif",UserPalette(RGBPen(1,0,16777215,12632256,5592405,8553090,11184810)));
  17. pagename="MPEG Menu";
  18. pagedescr="Lets you playback and control options related MPEG video.";
  19. descr="Click a button to get information about it!";
  20. title="";
  21. Button(Normal(Box(620,360,19,25,Style(Norm))),Highlight(Box(620,360,19,25,Style(High))),Select(Box(620,360,19,25,Style(Sel)),Use(infobutton)));
  22. Button(Normal(Box(4,390,207,25,Style(Norm))),Highlight(Box(4,390,207,25,Style(High))),Select(Box(4,390,207,25,Style(Sel)),Use(mpegselector)));
  23. Button(Normal(Box(216,390,207,25,Style(Norm))),Highlight(Box(216,390,207,25,Style(High))),Select(Box(216,390,207,25,Style(Sel)),Use(filempeg)));
  24. Button(Normal(Box(428,390,207,25,Style(Norm))),Highlight(Box(428,390,207,25,Style(High))),Select(Box(428,390,207,25,Style(Sel)),Use(posmpeg)));
  25. Button(Normal(Box(428,420,207,25,Style(Norm))),Highlight(Box(428,420,207,25,Style(High))),Select(Box(428,420,207,25,Style(Sel)),Use(sizempeg)));
  26. Button(Normal(Box(110,450,101,25,Style(Norm))),Highlight(Box(110,450,101,25,Style(High))),Select(Box(110,450,101,25,Style(Sel)),Use(waitmpeg)));
  27. Button(Normal(Box(4,450,101,25,Style(Norm))),Highlight(Box(4,450,101,25,Style(High))),Select(Box(4,450,101,25,Style(Sel)),Use(preview)));
  28. Button(Normal(Box(428,450,101,25,Style(Norm))),Highlight(Box(428,450,101,25,Style(High))),Select(Box(428,450,101,25,Style(Sel)),Use(okbutton)));
  29. 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)));
  30. Wait();
  31. Sequence:
  32. Use(SetUp);
  33. Use(DrawBox);
  34. Resources:
  35. :infobutton
  36. {
  37. title="Information button";
  38. text[1]="Switches Scala into Help mode. ";
  39. descr=text[1];
  40. block=1;
  41. max=1;
  42. Use(SetPos);
  43. }
  44. :mpegselector
  45. {
  46. title="MPEG: selector";
  47. text[1]="Lets you choose one of four MPEG events: Play, Stop, Wait, and None.^n^nMPEG: Play^nMakes the File:, Pos?, Size?, and Wait? buttons available to choose and control MPEG playback.^n^nMPEG: Stop^nStops the currently playing MPEG video.";
  48. text[2]="MPEG: Wait^nControls the flow of the script. Prevents the script from proceeding until a currently-playing MPEG video has finished.^n^nMPEG: None^nDeletes an MPEG event.";
  49. descr=text[1];
  50. block=1;
  51. max=2;
  52. Use(SetPos);
  53. }
  54. :filempeg
  55. {
  56. title="File:";
  57. text[1]="Click to open the File menu and choose a .MPG file to play. The name of the chosen file then appears on the File: button.";
  58. descr=text[1];
  59. block=1;
  60. max=1;
  61. Use(SetPos);
  62. }
  63. :posmpeg
  64. {
  65. title="Pos?";
  66. text[1]="Click to turn on, then use the value control to specify a position offset, in pixels, for the upper left corner of  the MPEG video image. ";
  67. descr=text[1];
  68. block=1;
  69. max=1;
  70. Use(SetPos);
  71. }
  72. :sizempeg
  73. {
  74. title="Size?";
  75. text[1]="Click to turn on, then use the value control to specify a size for the MPEG image. ";
  76. descr=text[1];
  77. block=1;
  78. max=1;
  79. Use(SetPos);
  80. }
  81. :waitmpeg
  82. {
  83. title="Wait?";
  84. text[1]="Controls the flow of a script. When on, Wait? instructs the script to wait until the MPEG event finishes before proceeding. Wait? is on by default.";
  85. descr=text[1];
  86. block=1;
  87. max=1;
  88. Use(SetPos);
  89. }
  90. :preview
  91. {
  92. title="Preview";
  93. text[1]="Lets you preview the current page with the selected MPEG file and settings.";
  94. descr=text[1];
  95. block=1;
  96. max=1;
  97. Use(SetPos);
  98. }
  99. :okbutton
  100. {
  101. title="OK";
  102. text[1]="Accepts editing changes and returns you to the Main or List menu.";
  103. descr=text[1];
  104. block=1;
  105. max=1;
  106. Use(SetPos);
  107. }
  108. :cancelbutton
  109. {
  110. title="Cancel";
  111. text[1]="Closes the MPEG menu and returns you to the Main or List menu without saving any changes to the current page.";
  112. descr=text[1];
  113. block=1;
  114. max=1;
  115. Use(SetPos);
  116. }
  117. }
  118. Resources:
  119. }
  120.