home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / multimedia / scala / HELP / CONTROL1.SCA < prev    next >
Encoding:
Text File  |  1996-05-14  |  2.4 KB  |  95 lines
  1. !ScalaScript
  2. {
  3. Sequence:
  4. :"SubScript"
  5. {
  6. Group:
  7. BoxX.1=139;
  8. BoxY.1=131;
  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\control1.gif",UserPalette(RGBPen(1,0,16777215,12632256,5592405,8553090,11184810)));
  17. pagename="Page Control menu";
  18. pagedescr="Lets you turn a page on or off, and allows you to change its name. ";
  19. descr="Click a button to get information about it!";
  20. title="";
  21. Button(Normal(Box(620,390,19,25,Style(Norm))),Highlight(Box(620,390,19,25,Style(High))),Select(Box(620,390,19,25,Style(Sel)),Use(infobutton)));
  22. Button(Normal(Box(4,420,97,25,Style(Norm))),Highlight(Box(4,420,97,25,Style(High))),Select(Box(4,420,97,25,Style(Sel)),Use(activebutton)));
  23. Button(Normal(Box(106,420,529,25,Style(Norm))),Highlight(Box(106,420,529,25,Style(High))),Select(Box(106,420,529,25,Style(Sel)),Use(nametext)));
  24. 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)));
  25. 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)));
  26. Wait();
  27. Sequence:
  28. Use(SetUp);
  29. Use(DrawBox);
  30. Button(Wipe("BlindsFantasy3",Speed(7),Direction(90)),Normal(Box(BoxX+BoxW+10,BoxY,115,(BoxH/2),Style(Info))));
  31. Text(BoxX+BoxW+20,BoxY+10,"This  screen^nhas  2  layouts",Style(Mid),Wrap(Off,Auto(340)));
  32. Text(BoxX+BoxW+38,BoxY+45,"Page",Style(LayoutText));
  33. Button(MatchSize(On),Normal(Text(BoxX+BoxW+38,BoxY+60,"Element",Style(Layout1))),Highlight(Text(BoxX+BoxW+38,BoxY+60,"Element",Style(Layout2))),Select(Text(BoxX+BoxW+38,BoxY+60,"Element",Style(Layout3)),goto(sub2)));
  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. :activebutton
  45. {
  46. title="Active? button";
  47. text[1]="Turns the page on or off.";
  48. descr=text[1];
  49. block=1;
  50. max=1;
  51. Use(SetPos);
  52. }
  53. :nametext
  54. {
  55. title="Name: text";
  56. text[1]="Changes the page name.";
  57. descr=text[1];
  58. block=1;
  59. max=1;
  60. Use(SetPos);
  61. }
  62. :okbutton
  63. {
  64. title="OK";
  65. text[1]="Accepts changes and exits the Page Control menu.";
  66. descr=text[1];
  67. block=1;
  68. max=1;
  69. Use(SetPos);
  70. }
  71. :cancelbutton
  72. {
  73. title="Cancel";
  74. text[1]="Returns to the Main menu without applying changes.";
  75. descr=text[1];
  76. block=1;
  77. max=1;
  78. Use(SetPos);
  79. }
  80. }
  81. Resources:
  82. :sub1
  83. {
  84. Group:
  85. SubNum="1";
  86. Quit(1);
  87. }
  88. :sub2
  89. {
  90. Group:
  91. SubNum="2";
  92. Quit(1);
  93. }
  94. }
  95.