Структура скрипта. 2. Интерфейс (Меню, кнопки, окна).

Этот код скрипта показывает всевозможные меню, кнопки и окна. Всё пустое, кроме кнопок Start, Button, OK и Cancel.
Copy-Paste в Script Manager от звёздочек до звёздочек:

//*********************************************
//This Script was made by senior 10.07.11
class MyDialog : GeModalDialog
 {
 public:
  MyDialog();
    CreateLayout();
  Command(id, msg);
 }
  MyDialog::MyDialog() {super();}
  MyDialog::CreateLayout()
 {
SetTitle("ALL_Menu");
  AddGroupBeginV(1001, BFH_SCALEFIT,1,"group",0);
  AddButton (3000,BFH_CENTER,200,0,"Start");
  AddSeparatorH(0);
  AddStaticText(0,BFH_LEFT,200,0,"That's_ Rock!",0);
  AddSeparatorH(0);
  AddComboBox(2011, BFH_CENTER, 0, 0);
AddItem(2011, 1, "up");
AddItem(2011, 2, "left");
AddItem(2011, 3, "right");
AddItem(2011, 4, "down");
AddSeparatorH(0);
   AddEditNumber(2503,BFH_LEFT,250,0);
   AddSeparatorH(0);
   AddArrowButton(101, 0,0, 0, ARROW_RIGHT);
   AddSeparatorH(0);
   AddButton(102, 0, 0, 0, "Button");
   AddCheckbox(103, 0, 0, 0, "CheckBox");
   AddSeparatorH(0);
   AddEditText(104, 0, 100, 0);
   AddSeparatorH(0);
   AddMultiLineEditText(105, 0, 0, 0, 0);
   AddSeparatorH(0);
   AddEditNumber(106, 0, 100, 0);
   AddSeparatorH(0);
   AddEditNumberArrows(107, 0, 0, 0);
   AddSeparatorH(0);
   AddSlider(108, 0, 0, 0);
   AddSeparatorH(0);
   AddEditSlider(109, 0, 0, 0);
   AddSeparatorH(0);
   AddColorField(110, 0, 130, 20);
   AddSeparatorH(0);
   AddColorChooser(111, 0, 0, 0, 20);
   AddSeparatorH(0);
   AddStaticText(113, 0, 0, 0, "static text", 0);
   AddSeparatorH(0);
   AddPopupButton(114, 0, 30, 0);
AddItem(114, 1, "test 1");
AddItem(114, 1, "test 2");
AddItem(114, 1, "test 3");
   AddSeparatorH(0);
   AddDlgGroup(DR_DLGGROUP_OK | DR_DLGGROUP_CANCEL);
   AddGroupEnd();
 }
  MyDialog::Command(id, msg)
{
switch(id)
{
case 102: // Button
{
println("Button");
 TextDialog("Button",DLG_OK);
return TRUE;
break;
}
case 3000: // Start
{
println("Start");
 TextDialog("Start",DLG_OK);
return TRUE;
break;
}
case 1: // OK
{
println("OK!");
 TextDialog("OK!",DLG_OK);
return TRUE;
break;
}
case 2: // Cancel
{
println("CANCEL");
 TextDialog("CANCEL",DLG_OK);
return FALSE;
break;
}
}
}
  main(doc, op)
 {
var d = new(MyDialog);
         d->Open(1650, 700);
  var result = d->GetResult();   // Get the result of dialog input, OK-TRUE, CANCEL-FALSE
  if(result==FALSE) return;      //Exit if press CANCEL  
 TextDialog("END",DLG_OK);  //Continue if press OK
 }
//****************************************