Имитационное моделирование системы управления с учетом нелинейности «Зона нечувствительности с ограничениями», страница 5

Writeln(f,'*********************************************************');

Writeln(f);

Writeln(f,'   Передаточная функция звена по каналу возмущения:' );

Writeln(f);

Writeln(f,'                          K   ');

Writeln(f,'                 Wf1(p)=------');

Writeln(f,'                        (1+Tp)');

Writeln(f);

Writeln(f,'              где:');

Writeln(f,'               коэффициент передачи Кf1=',Edit10.text);

Writeln(f,'               постоянная времени   Тf1=',Edit11.text);

Writeln(f);

Writeln(f,'*********************************************************');

Writeln(f);

Writeln(f,'            Настройки ПИ-регулятора:');

Writeln(f,'                     К1=',Edit12.text);

Writeln(f,'                     К2=',Edit13.text);

Writeln(f);

Writeln(f,'*********************************************************');

Writeln(f);

Writeln(f,'   Задающее воздействие - ступенчатеое = ',edit6.text);

Writeln(f);

Writeln(f,'*********************************************************');

Writeln(f);

Writeln(f,'       Коэффициенты передачи элементов системы:');

Writeln(f,'         Регулирующий орган: Кро=',Edit16.text);

Writeln(f,'         Исполнительный механизм: Ким=',Edit14.text);

Writeln(f,'         Датчик: Кдат=',Edit15.text);

Writeln(f);

Writeln(f,'*********************************************************');

Writeln(f);

Writeln(f,'        Дискретность: Т0=',ComboBox3.text);

Writeln(f);

Writeln(f,'*********************************************************');

if RadioButton3.Checked=true then//если система линейная

begin

writeln(f,' Переходный процесс по возмущающему воздействию (линейная система)');

goto LSysF1;

end;

if RadioButton3.Checked=false then//если система нелинейная

begin

writeln(f,' Переходный процесс по возмущающему воздействию (нелинейная система)');

goto NelSysF1;

end;

//запись линейной системы

LSysF1:

Writeln(f);

Writeln(f,'        Время           Система            Возмущение    ');

With StringGrid2 do

For I:=1 to N2 do

Writeln(f,'      ',cells[0,I],'   ',cells[1,I],'    ',cells[2,I]);

CloseFile(f);

MessageDlg('Расчет переходного процесса (лин. системы)'#13+

'  по возмущающему воздействию записан !',mtInformation,[mbOK],0);

exit;

//запись нелинейной системы

NelSysF1:

Writeln(f);

Writeln(f,'     Коэффициенты нелинейности регулирующего органа:');

Writeln(f,'                   B1=',Edit3.text);

Writeln(f,'                   B2=',Edit4.text);

Writeln(f,'                   C1=',Edit1.text);

Writeln(f,'                   C1=',Edit2.text);

Writeln(f);

Writeln(f,'          Время         Система          Возмущение   ');

With StringGrid2 do

For I:=1 to N2 do

Writeln(f,'      ',cells[0,I],'   ',cells[1,I],'    ',cells[2,I]);

CloseFile(f);

MessageDlg('Расчет перех. процесса (нелин. системы)'#13+

'по возмущающему воздействию записан !',mtInformation,[mbOK],0);

exit;

end;//3

end;//1

end.

8.Распечатка текстового файла результатов моделирования.

РЕЗУЛЬТАТЫ МОДЕЛИРОВАНИЯ ПЕРЕХОДНОГО ПРОЦЕССА

ПО ВОЗМУЩАЮЩЕМУ ВОЗДЕЙСТВИЮ

Линейная система

Передаточная функция объекта:

-Tau*p

K*e     

Wo(p)=------------(1+Tp)

где:

коэффициент передачи К=5

постоянная времени   Т=10

запаздывание  Tau=30

*********************************************************

Передаточная функция звена по каналу возмущения:

K  

Wf1(p)=-----(1+Tp)

где:

коэффициент передачи Кf1=1

постоянная времени   Тf1=1

*********************************************************

Настройки ПИ-регулятора:

К1=0,0025

К2=0,0024

*********************************************************

Задающее воздействие - ступенчатеое = 2

*********************************************************

Коэффициенты передачи элементов системы:

Регулирующий орган: Кро=1

Исполнительный механизм: Ким=1

Датчик: Кдат=1

*********************************************************

Дискретность: Т0=10

*********************************************************

Переходный процесс по возмущающему воздействию (линейная система)

Время  Система  Возмущение   

0   2,0000    0,0000

10   2,0000    1,9999

20   2,0000    2,0000

30   2,0000    2,0000

40   2,0000    2,0000

50   2,0000    1,9080

60   2,0000    1,7125

70   2,0000    1,4725

80   2,0000    1,2099

90   2,0000    0,9368

100   2,0000    0,6658

110   2,0000    0,4074

120   2,0000    0,1686

130   2,0000    -0,0459