Дипломная работа - Проектирование автоматизированной системы управления процессом измельчения сульфидной руды
Подождите немного. Документ загружается.
Приложение Ж
FUNCTION_BLOCK FB2
TITLE = FB для управления электродвигателем масляного насоса
VAR_INPUT
Start : BOOL :=FALSE;
Stop : BOOL :=FALSE;
Response : BOOL :=FALSE;
Timer_No : Timer;
Response_Time : S5Time;
END_VAR
VAR_OUTPUT
Start_DSP : BOOL :=FALSE;
Stop_DSP : BOOL :=FALSE;
Fault : BOOL :=FALSE;
END_VAR
VAR_IN_OUT
Motor : BOOL :=FALSE;
END_VAR
VAR
Starts : INT;
Start_Edge : BOOL :=FALSE;
Time_bin : Word :=W#16#0
Time_BCD : Word :=W#16#0
END_VAR
BEGIN
NETWORK
TITLE = Запуск/останов и самоудержание
A(
O #Start
O #Motor
)
91
AN #Stop
= #Motor
NETWORK
TITLE = Контроль запуска
A #Motor
L #Response_Time
SD #Timer_No
AN #Motor
R #Timer_No
L #Timer_No
T #Time_bin
LC #Timer_No
Продолжение приложения Ж
T #Time_BCD
A #Timer_No
AN #Response
S #Fault
R #Motor
NETWORK
TITLE = Лампа запуска и сброс отказа
A #Response
= #Start_Dsp
R #Fault
NETWORK
TITLE = Лампа останова
AN #Motor
= #Stop_Dsp
END_FUNCTION_BLOCK
92
Приложение К
FUNCTION FC1
TITLE = Функция ПИД-контура "питание мельницы"
VAR_TEMP
man_on : BOOL:=FALSE;
lmn_r : REAL;
sum : REAL;
lmn_w :WORD;
END_VAR
BEGIN
NETWORK
TITLE = Регулирование руды
A "DB_man".man_on_1 //проверка переключателя ручного
режима
= #man_on
L "DB_data".Ruda_ves
L "DB_data".W_klas
+R
T #sum
CALL "CONT_C" , "DB_PID_1"
COM_RST :=TRUE
MAN_ON :=#man_on
PVPER_ON:=
P_SEL :=
I_SEL :=
INT_HOLD:=
93
I_ITL_ON:=
D_SEL :=
CYCLE :=
SP_INT :="DB_data".zadan_pit //уставка
PV_IN :=#sum //текущее значение
PV_PER :=
MAN :="DB_data".uprav_pit
GAIN :=
TI :=
TD :=
TM_LAG :=
DEADB_W :=1.000000e-001 //мертвая зона
LMN_HLM :=
LMN_LLM :=
PV_FAC :=
Продолжение приложения К
PV_OFF :=
LMN_FAC :=
LMN_OFF :=
I_ITLVAL:=
DISV :=
LMN :=#lmn_r
LMN_PER :=#lmn_w
QLMN_HLM:=
QLMN_LLM:=
LMN_P :=
LMN_I :=
LMN_D :=
PV :=
ER :=
A #man_on
JC n
L #lmn_r
T "DB_data".Speed_konv
L #lmn_w
T "Speed_konv"
JU n
n: NOP 0
NETWORK
TITLE = Регулирование воды
L "DB_data".Speed_konv
L 2.244000e-001
94
*R
T "DB_data".zadan_woda
CALL "CONT_C" , "DB_PID_2"
COM_RST :=TRUE
MAN_ON :=FALSE
PVPER_ON:=
P_SEL :=
I_SEL :=
INT_HOLD:=
I_ITL_ON:=
D_SEL :=
CYCLE :=
SP_INT :="DB_data".zadan_woda
PV_IN :="DB_data".Woda_zagruzka
PV_PER :=
MAN :=
Продолжение приложения К
GAIN :=
TI :=
TD :=
TM_LAG :=
DEADB_W :=1.000000e-001 //мертвая зона
LMN_HLM :=
LMN_LLM :=
PV_FAC :=
PV_OFF :=
LMN_FAC :=
LMN_OFF :=
I_ITLVAL:=
DISV :=
LMN :="DB_data".Klapan_zagruzka
LMN_PER :="Klapan_zagruzka"
QLMN_HLM:=
QLMN_LLM:=
LMN_P :=
LMN_I :=
LMN_D :=
PV :=
ER :=
END_FUNCTION_BLOCK
95
Приложение Л
FUNCTION FC2
TITLE = Функция ПИД-контура "плотность слива"
VAR_TEMP
man_on : BOOL:=FALSE;
lmn_r : REAL;
lmn_w :WORD;
END_VAR
BEGIN
NETWORK
TITLE = Регулирование плотности
A "DB_man".man_on_2 //проверка переключателя ручного
режима
= #man_on
CALL "CONT_C" , "DB_PID_3"
COM_RST :=
MAN_ON :=
PVPER_ON:=
P_SEL :=
I_SEL :=
INT_HOLD:=
I_ITL_ON:=
D_SEL :=
96
CYCLE :=
SP_INT :="DB_data".zadan_plotn //уставка
PV_IN :="DB_data".Plotnomer //текущее значение
PV_PER :=
MAN :=
GAIN :=
TI :=
TD :=
TM_LAG :=
DEADB_W :=1.000000e-001 //мёртвая зона
LMN_HLM :=
LMN_LLM :=
PV_FAC :=
PV_OFF :=
LMN_FAC :=
LMN_OFF :=
I_ITLVAL:=
DISV :=
Продолжение приложения Л
LMN :=#lmn_r
LMN_PER :=#lmn_w
QLMN_HLM:=
QLMN_LLM:=
LMN_P :=
LMN_I :=
LMN_D :=
PV :=
ER :=
A #man_on
JC n
L #lmn_r
T "DB_data".Klapan_razgruzka
L #lmn_w
T "Klapan_razgruzka"
JU n
n: NOP 0
NETWORK
TITLE = Регулирование расхода воды под отсадочную машину
CALL "CONT_C" , "DB_PID_4"
COM_RST :=
97
MAN_ON :=
PVPER_ON:=
P_SEL :=
I_SEL :=
INT_HOLD:=
I_ITL_ON:=
D_SEL :=
CYCLE :=
SP_INT :="DB_data".zadan_om
PV_IN :="DB_data".Woda_OM
PV_PER :=
MAN :=
GAIN :=
TI :=
TD :=
TM_LAG :=
DEADB_W :=1.000000e-001 //мёртвая зона
LMN_HLM :=
LMN_LLM :=
Продолжение приложения Л
PV_FAC :=
PV_OFF :=
LMN_FAC :=
LMN_OFF :=
I_ITLVAL:=
DISV :=
LMN :="DB_data".Klapan_OM
LMN_PER :="Klapan_OM"
QLMN_HLM:=
QLMN_LLM:=
LMN_P :=
LMN_I :=
LMN_D :=
PV :=
ER :=
END_FUNCTION_BLOCK
98
Приложение М
FUNCTION FC3
TITLE = Функция преобразования температуры
VAR_TEMP
err_1 : Word;
temp_1 : INT;
temp_2 : INT;
END_VAR
BEGIN
NETWORK
TITLE = Преобразование температуры
L PIW 314
T #temp_1
CALL "Read Analog Value 464-2"
IN :=#temp_1
HI_LIM :=2.000000e+002
LO_LIM :=0.000000e+000
BIPOLAR:=FALSE
RET_VAL:=#err1
99
OUT :="DB_data".Temper_1
L PIW 316
T #temp_2
CALL "Read Analog Value 464-2"
IN :=#temp_2
HI_LIM :=2.000000e+002
LO_LIM :=0.000000e+000
BIPOLAR:=FALSE
RET_VAL:=#err1
OUT :="DB_data".Temper_2
END_FUNCTION_BLOCK
100