Скрипты Simple-Scada

begin
  if Text1.AsInt = 1 then     // если значение переменной текста = 1, то 
    Text1.Text := 'Автомат'   // изменить текст на 'Автомат'
  else                        // иначе
    Text1.Text := 'Ручной';   // изменить текст на 'Ручной'
end.

begin
  if Sender is TM_Text then   // проверяем, что Sender это текст
    with Sender as TM_Text do // приводим Sender к типу "TM_Text"            
      if AsInt = 1 then       // если значение переменной текста равно 1, то 
        Text := 'Автомат'     // изменить текст на 'Автомат'
      else                    // иначе
        Text := 'Ручной';     // изменить текст на 'Ручной'
end.

begin
  case Text1.AsInt of
    0 : Text1.Text := 'Местн.Пуск';
    1 : Text1.Text := 'Вынос.Пульт';
    2 : Text1.Text := 'Автозапуск';
    3 : Text1.Text := 'Диспетчер';
    4 : Text1.Text := 'Работает';
  end;
end.

begin
  if Sender is TM_Text then   // проверяем, что Sender это текст
    with Sender as TM_Text do // приводим Sender к типу "TM_Text"            
      case AsInt of
        0 : Text := 'Местн.Пуск';
        1 : Text := 'Вынос.Пульт';
        2 : Text := 'Автозапуск';
        3 : Text := 'Диспетчер';
        4 : Text := 'Работает';
      end;
end.

Важно! Для вывода значения переменной лучше использовать компонент "Поле", т.к. он имеет гораздо больше опций для работы со значением. Но если по каким-либо причинам требуется отображать значение переменной в компоненте "Текст", то для этого нужно связать его с переменной, создать новый скрипт с типом события "Универсальный скрипт"(пример ниже) и назначить его на событие OnDataChange нужных объектов.

begin
  if Sender is TM_Text then   // проверяем, что Sender это текст
    with Sender as TM_Text do // приводим Sender к типу "TM_Text"
      Text := AsStr;          // записываем в текст значение основной переменной
end.