Главная | Обратная связь | Поможем написать вашу работу!
МегаЛекции

Показатели экономической эффективности инвестиционного проекта





Динамические методы расчета предполагают учет фактора времени и
расчет денежных потоков в различные периоды реализации проекта.

К обобщающим показателям динамических методов расчета относятся:

– интегральный экономический эффект (NPV);

– индекс доходности;

– внутренний коэффициент эффективности;

– максимальный денежный отток;

– период возврата капитальных вложений и срок окупаемости.

NPV (чистая текущая стоимость проекта) определяется путем вычисления разности совокупного дохода за весь период функционирования проекта и всех видов расходов, суммированных за тот же период с учетом дисконтирования.

Результаты расчета NPV представлены в таблице 5.12.

Таблица 5.12.

Денежные потоки

Денежные потоки годы
1. Денежный поток от инвестиционной деятельности:
1.1. Затраты на НИР (КНИР), руб. 50804,2
1.2. Затраты на комплектующие и оборудование (Кнов), руб. 142860,0
1.3. Итого: денежный поток от инвестиционной деятельности, руб. 193664,2
2. Денежный поток от операционной деятельности:
2.1. Увеличение дохода за счет внедрения АСУ, руб. 2159980,2 2159980,2
2.1.1. Увеличение объема выручки, руб.
2.1.2. Экономия на себестоимости, руб. 1194680,2 1194680,2
2.2. Изменение затрат, руб. в т.ч.
2.2.1. Амортизация оборудования, руб.
2.3 Прирост валовой прибыли, руб. 865005,2 865005,2
2.4. Налог на прибыль (24 %), руб. 207601,25 207601,25
2.5. Прирост чистой прибыли, руб. 657403,95 657403,95
2.6. Итого: сальдо операционной деятельности, руб. 681213,95 681213,95
3. Чистый денежный поток (ЧДП), руб. -193664,2 681213,95 681213,95
4. ЧДП нарастающим итогом, руб. -193664,2 487549,75 1168763,7
5. Коэффициент дисконтирования 15% 0,87 0,756
6. Дисконтированный денежный поток, руб. -193664,2 592656,14 514997,75
7. Дисконтированный денежный поток нарастающим итогом (NPV), руб. -193664,2 398991,94 913989,69

 



Расчет интегрального экономического эффекта NPV можно представить в виде формулы (5.27):

NPV= t–Зt+At) · at Kt·at= чt) · at Kt·at=913989,69 руб. (5.27)

где Дt – доходы от реализации проекта по годам; Зt – текущие затраты без амортизации; At – амортизационные отчисления; Kt – капитальные вложения в основные и оборотные фонды; ПЧ – прибыль чистая.

Индекс доходности SRR определяется как отношение суммарного дисконтированного дохода к суммарным дисконтированным капитальным вложениям по формуле (5.28):

(5.28)

где - сальдо операционной деятельности в t-м годе, - денежный поток от инвестиционной деятельности в t-м годе.

Индекс доходности составляет:

(5.29)

Как видно, полученный индекс доходности больше 1, что говорит об эффективности инвестиционного проекта.

Внутренний коэффициент эффективности проекта IRR определяется как пороговое значение рентабельности, при котором NPV равно нулю:

Таблица 5.13.

1. Чистый денежный поток (ЧДП), руб. -193664,2 681213,95 681213,95
2. ЧДП нарастающим итогом, руб. -193664,2 487549,75 1168763,7
3. Коэффициент дисконтирования 15% 0,2309 0,0533
4. Дисконтированный денежный поток, руб. -193664,2 157324,24 36333,54
5. Дисконтированный денежный поток нарастающим итогом (NPV), руб. -193664,2 -36339,96 -6,42

 

. (5.30)

При r1 = 15 % NPVr1 = 913989,69 руб.;

При r2 = 333 % NPVr2 = -6,42 руб.

 

 

% (5.31)

 

Как видно, полученный внутренний коэффициент эффективности проекта намного больше ставки дисконтирования rпор > r1, что говорит об эффективности инвестиционного проекта.

Срок окупаемости капитальных вложений, формула (5.32):

, (5.32)

где - величина NPV в t-м периоде , = 193664,2 руб.

- величина ДДП в t+1-м периоде, =1435487,8 руб.

Срок окупаемости капитальных вложений составляет

= 193664,2 / 592656,14= 0,33 года или 3,96 месяца.

Срок возврата инвестиций (5.33):

(5.33)

где tx - количество периодов, при которых NPV<0 , tx= 1 год.

Срок возврата инвестиций составляет

= 1 + 193664,2 / 592656,14= 1,33 года или 15,96 месяцев.

Финансовый профиль инвестиционного проекта представляет собой график чистой текущей стоимости во времени нарастающим итогом
(рис. 5.1).

 

Рис. 5.1. Финансовый профиль инвестиционного проекта

Результаты всех технико-экономических расчетов представлены в таблице 5.14.

Цена 1 тонны сахара 16 тысяч рублей.

Таблица 5.14.

Технико-экономические показатели инвестиционного проекта

Показатель Величина Отклонение +/-
До внедрения После внедрения
Выпуск продукции:
а) в натуральном выражении, т.
б) в стоимостном выражении, тыс. руб.
Себестоимость товарной продукции:
1 ед., руб. 9104,88 9079,75 -25,13
На весь объем, тыс. руб.
Основные фонды, тыс. руб. 150140,05 140,05
Фондоотдача 5,056 5,066 0,01
Чистая прибыль, тыс. руб. 248393,84 250028,6 1634,76
Капитальные вложения, руб. 193664,2
Индекс доходности 5,72
Внутренний коэффициент эффективности проекта, %
Срок окупаемости, лет 0,33
Срок возврата инвестиций, лет 1,33
Интегральный экономический эффект, руб. 913989,69

Выводы: необходимыми условиями принятия инвестиционного проекта являются:

§ Сальдо накопленных денег в любом временном интервале, где осуществляются затраты или получаются доходы, положительно (2007 г. – 0 руб.; 2008, 2009 г. – 681213,95 руб.);

§ Интегральный экономический эффект (NPV) больше нуля и составляет 913989,69 руб.;

§ Внутренний коэффициент эффективности (IRR) rпор, равный 332,99%, больше ставки дисконтирования r1, равной 15 %;

§ Индекс доходности (SRR) больше 1 и составляет 5,72.


Заключение

В ходе выполнения дипломного проекта был рассмотрен метод очистки диффузионного сока, включающий обработку сока известью (дефекация) и осаждение ее избытка диоксидом углерода (сатурация). Также были рассмотрены три основные схемы очистки диффузионного сока, основанные на методе дефекосатурации. При анализе этих схем была выбрана, схема с холодной прогрессивной преддефекацией и холодно-горячей основной дефекацией, являющаяся наиболее рациональной. На основании выбранной схемы процесса, была построена структурная схема. Для построения функциональной схемы были рассмотрены принципы управления отдельными аппаратами и технологическим процессом в целом. Для технической реализации системы был осуществлен обзор типов датчиков и исполнительных механизмов, применяемых в сахарной промышленности, а также их последующий выбор. Также были рассмотрены системы комплексной автоматизации, применяемые на сахарных заводах, на основании которых был выбран контроллер для процесса дефекосатурации. При помощи выбранных средств реализации программ по разработанным алгоритмам была написана программа нижнего уровня для выбранного контроллера. При помощи SCADA системы RSView32 была написана программа визуализации представляющая собой две подсистемы информационную и управляющую.

Таким образом, в ходе выполнения дипломного проекта были последовательно реализованы задачи определенные в постановке задачи на дипломное проектирование.


Список литературы

1. Безопасность жизнедеятельности: Лабораторный практикум.- Белгород: Изд-во БелГТАСМ, 2001- 88 с.

2. Белостоцкий Л.Г. Интенсификация технологических процессов свеклосахарного производства. – М.: Агропромиздат, 1989 – 135с.

3. Белик В.Г. Справочник по технологическому оборудованию сахарных заводов. – Киев: Техника, 1984 – 56 с.

4. Волошин З.С. и д.р. Автоматизация свеклосахарного производства. –М.: Легкая и пищевая промышленность, 2001 – 235 с.

5. Волошин З.С. Справочник специалиста КИПиА сахарной промышленности. – М.: Агропромиздат, 1985 – 87 с.

6. Востоков А.И. Свеклосахарное производство. – М.: Пищевая
промышленность, 1986 – 226 с.

7. Добжицкий Я.В. Химический анализ в сахарном производстве. – М.: Агропромиздат, 1994 – 188 с.

8. Загродский С. Н. Тепловое хозяйство сахарных заводов. –М.: Легкая и пищевая промышленность, 1969 – 396 с.

9. Колесников В.А. и д.р. Теплосиловое хозяйство сахарных заводов. –М.: Пищевая промышленность, 1980.

10. Курдюмов В.И., Зотов Б.И. Проектирование и расчет средств обеспечения безопасности. – М.: КолосС, 2005. – 216с.

11. Лепешкин И.П. Справочник сахарника. – М.: Пищепромиздат, 1983 – 78с.

12. Методические указания по экономическому обоснованию квалификационных работ для студентов специальности 210200 –Автоматизация технологических процессов и производств.- Белгород: Изд-во БелГТАСМ, 2002 – 23 с.

 

13. Пчелинцев В.А. Охрана труда в строительстве. – М.: Высшая школа, 1991.

14. Руководство пользователя RSView32. Новый облик функциональных возможностей человеко-машинного интерфейса. 1997 – 557 с.

15. Руководство пользователя TSX/PMX/PCX 57 PL, шасси, процессоры, источники питания и др. 1998 – 384 с.

16. Сапронов А.Р. Сахар. – М.: Легкая и пищевая промышленность, 1990 – 254 c.

17. Сапронов А.Р. и д.р. Технология сахара. – М.: Колос, 1993– 220 с.

18. Сапронов А.Р. Общая технология сахара и сахаристых веществ. – М.: Агропромиздат, 1990 – 109 c.

19. Сапронов А.Р. Технология сахарного производства. – М.: Агропромиздат, 1986 .

20. Соколов В.А. Автоматизация технологических процессов пищевой промышленности - М.: Агропромиздат, 1991

21. Силин П.М. Технология сахара. – М.: Пищевая промышленность,
1987–293 с.

22. Сусиденко В.Т. Автоматизация и оптимизация сложных систем свеклосахарного производства. – Киев: урожай, 1990.

23. Табунщиков Н.П. Производство извести и сатурационного газа на сахарных заводах. – М.: Легкая и пищевая промышленность, 1981 – 110c.

24. Теплоэнергоиспользование и теплоэнергосбережение на сахарных заводах/Группа компаний ЛОЭС, материалы семинара. - Тула, ГУИПП «Тульский поли­графист», 2001

 


Приложение 1


Приложение 2


Приложение 3

 

Текст программы

Mast main

 

SR1;

SR3;

SR2;

SR4;

SR13;

SR16;

Sr1

!

Time1:=BCD_TO_INT(%SW51);(*%S51-потеря времени часов реального времени*)

Time2:=Time1/10;

IF Time2_m<>Time2 THEN

SET %M10;

Time2_m:=Time2;

END_IF;

IF %M10 AND NOT %MW544:X0 THEN

READ_VAR(ADR#{1.1}SYS,'%mw',128,1,Ldc_dif:1,%MW544:4);

RESET %M10;

END_IF;

IF %MW62=0 THEN

%MW62:=101;

END_IF;

WHILE %MW62<%KW300+101 DO (*%KW300=40*)

Mw0[%MW62]:=5000+%MW62;(*(%MW101):=5000+%MW62*)

INC %MW62;(*inc(%MW62=101 до 141*)

END_WHILE;

Lcc_l1fc:=(Lcc+L1fc)/2;

Fdc:=REAL_TO_INT(INT_TO_REAL(Input_fdc)*%MF900);(*коэффициент = 1 сохраняется программой*)

Tsiropa:=Input_tsir;

F1dc:=REAL_TO_INT(INT_TO_REAL(Input_f1dc)*%MF902);

Lxd:=Input_lxd;

Lizm_m:=Input_lizm_m;

Cco2:=Input_cco2-20;

Lgd:=Input_lgd;

L1nap:=Input_l1nap;

L2nap:=Input_l2nap;

L3nap:=Input_l3nap;

F1izm:=Input_f1izm;

F2izm:=REAL_TO_INT(INT_TO_REAL(Input_f2izm)*1.0);

L1hc:=Input_l1hc;

L2hc:=Input_l2hc;

Lcc:=Input_lcc;

F2susp:=Input_lns_pa;

L1susp:=Input_l1susp;

L2susp:=%IW3.13;

L2susp2:=Input_l2susp;

L3susp:=Input_l3susp;

 

 

Fvzv:=Input_fvzr;

F1fc:=Input_f1fc;

L1fc:=Input_l1fc;

Pvf:=Input_pvf-500;

Pco2:=Input_pco2;

Tscir2:=%IW4.6;

Pca:=Input_pca;

F1susp:=Input_f1susp_co2;

IF Phpd_in<>0 THEN

Phpd_kor:=Phpd_kor+(Phpd_in-Phpd);

Phpd_in:=0;

END_IF;

IF Ph1ca_in<>0 THEN

Ph1ca_kor:=Ph1ca_kor+(Ph1ca_in-Ph1ca);

Ph1ca_in:=0;

END_IF;

IF Ph2ca_in<>0 THEN

Ph2ca_kor:=Ph2ca_kor+(Ph2ca_in-Ph2ca);

Ph2ca_in:=0;

END_IF;

Ph1ca:=Input_ph1ca+Ph1ca_kor;

Ph2ca:=Input_ph2ca+Ph2ca_kor;

Phpd:=Input_phpd+Phpd_kor;

IF Fdc<0 THEN Fdc:=0;

END_IF;

IF F1susp<0 THEN F1susp:=0;

END_IF;

!

M_d323:=M_d_323;

M_d1izm:=M_1izm;

M_pd300_e356:=M_pd300;

M_gd304_gd304:=M_gd304;

Ur_ca1:=Ur_1ca;

%M901:=Ur_2ca;

!

INC Tm_f1ds;

!

Sum_f1ds:=Sum_f1ds+INT_TO_REAL(F1dc);(* усреднение F1DC *)

F1ds_sr:=Sum_f1ds/INT_TO_REAL(Tm_f1ds);

Sr_f1ds:=REAL_TO_INT(F1ds_sr);

%MF310:=%MF310+INT_TO_REAL(Fdc);(* усреднение FDC *)

%MF312:=%MF310/INT_TO_REAL(Tm_f1ds);

%MW314:=REAL_TO_INT(%MF312);

%MF316:=%MF316+INT_TO_REAL(F1fc);(* усреднение F1fc *)

%MF318:=%MF316/INT_TO_REAL(Tm_f1ds);

%MW320:=REAL_TO_INT(%MF318);

IF Tm_f1ds>=240 THEN (*через час счетчик обнуляется!*)

Tm_f1ds:=0;

Sum_f1ds:=0.0;

%MF310:=0.0;

%MF316:=0.0;

END_IF;

SR2

!

INC %MW243;

IF %MW243>40 THEN

READ_VAR(ADR#{1.6}SYS,'%mw',808,1,Tco2:1,%MW239:4);

N_n:4:=0;

%MW243:=0;

END_IF;

 

IF Slezhenie_p1co2 THEN

Pco2_sp:=REAL_TO_INT(INT_TO_REAL((P1co2_min+P1co2_max)/2));

INC Taimer_p1co2;

IF Taimer_p1co2>Porog_taimer_p1co2 THEN

Taimer_p1co2:=0;

END_IF;

 

IF(Tco2<Tco2_min)AND(P1co2_sp<P1co2_max)AND(Taimer_p1co2=Porog_taimer_p1co2)THEN

P1co2_sp:=P1co2_sp+Delta_max_p1co2;

END_IF;

 

IF(Tco2>Tco2_max)AND(P1co2_sp>P1co2_min)AND(Taimer_p1co2=Porog_taimer_p1co2)THEN

P1co2_sp:=P1co2_sp-Delta_min_p1co2;

END_IF;

END_IF;

Sr3

!

N_p:=2;

WHILE N_p<8 DO

SR5;

SR9;

SR6;

INC N_p;

END_WHILE;

 

N_p:=9;

WHILE N_p<11 DO

SR5;

SR9;

SR6;

INC N_p;

END_WHILE;

 

Nc_p:=11;

WHILE Nc_p<=18 DO

SR7;

SR11;

SR8;

INC Nc_p;

END_WHILE;

 

IF F1fc_c>6000 THEN F1fc_c:=6000;END_IF;

IF F1fc_c<0 THEN F1fc_c:=0;END_IF;

 

IF %M125 THEN

INC Timer_f1fc;

IF Timer_f1fc>Porog_timer_f1fc THEN

Timer_f1fc:=0;

END_IF;

 

IF(L1fc<L1fc_min)AND(F1fc_sp>F1fc_min)

AND(Timer_f1fc=Porog_timer_f1fc)THEN

F1fc_c:=F1fc_c-D_f1fc_min;

END_IF;

 

IF(L1fc>L1fc_max)AND(F1fc_sp<F1fc_max)

AND(Timer_f1fc=Porog_timer_f1fc)THEN

F1fc_c:=F1fc_c+D_f1fc_max;

END_IF;

END_IF;

Sr4

!

Output_lgd:=%MW1194/4;

 

Output_fvzr:=%MW1744;

 

Output_pco2:=%MW1444/4;

Output_p1co2:=%MW1494;

Output_f2izm:=%MW2044;

Output_f1izm:=%MW1644/4;

Output_tsiropa:=%MW1294;

 

Output_ph1ca:=%MW1344;

Output_f2susp:=%MW1844;

Output_f1susp:=%MW2244;

(* Переброс на частотники в выпарку*)

Fdc_ch:=%MW1544;

F1dc_ch:=%MW2144;

F1fc_ch:=%MW1944;

(* Разгрузка сатуратора при 2 кг *)

IF Pca>=2000 THEN SET Output_pca;Pca_hist:=85;

ELSE RESET Output_pca;Pca_hist:=5;

END_IF;

%M285:=Output_pca;

 

Sr5

N_in:=%KW0[N_p];(*N_in:=%KW2при N_p=2*)

N_quit:=1000+44+(50*(N_p-1));(*N_quit:=1144*)

N_sp_r:=N_quit-44;(*1100*)

N_man_r:=N_sp_r+1;(*1101*)

N_sp_t:=%KW300+99+(N_p*2);(*%KW300=40 ->40+99+(2*2)*)

N_man_t:=%KW300+100+(N_p*2);(*N_man_t:=144*)

Sr6

!

(*Безударность*)

IF Y_es[N_p] THEN

Mw0[N_sp_r]:=Mw0[N_sp_t];

Mw0[N_man_t]:=Mw0[N_quit];

END_IF;

IF NOT Y_es[N_p] THEN

Mw0[N_sp_t]:=Mw0[N_in];

Mw0[N_man_r]:=Mw0[N_man_t];

END_IF;

PID('','',Mw0[N_in],Mw0[N_quit],Y_es[N_p],Mw0[N_sp_r]:43);

 

Sr8

!

(*Безударность*)

%MF0[Nf_in]:=INT_TO_REAL(Mw0[Nc_in]);

%MF0[Nf_f1]:=INT_TO_REAL(Mw0[Nc_f1]);

%MF0[Nf_f2]:=INT_TO_REAL(Mw0[Nc_f2]);

%MF0[Nfs_in]:=%KF400[Nc_pc];

%MF0[Nfs_f1]:=%KF400[Nskala_f1];

%MF0[Nfs_f2]:=%KF400[Nskala_f2];

IF NOT Y_es[Mc_pc_m] THEN

%MF0[Nf_in_f1]:=(%MF0[Nf_in]*%MF0[Nfs_in])/(%MF0[Nf_f1]*%MF0[Nfs_f1]);

END_IF;

IF NOT Y_es[Mc_pk_m] THEN

%MF0[N64]:=((%MF0[Nf_in]*%MF0[Nfs_in]/10000.0)*

((%MF0[Nf_f2]*%MF0[Nfs_f2]/10000.0)+1.0))/((%MF0[Nf_f1]*%MF0[Nfs_f1])/10000.0);

 

END_IF;

 

(*КАСКАД*)

IF Y_es[Mc_pk_m] THEN

 

%MF0[N68]:=INT_TO_REAL(Mw0[Nc_k_t]);

%MF0[N68]:=%MF0[N68]/%KF400[Nskala_f2_i];

%MF0[N66]:=(%MF0[N68]*%MF0[Nf_f1]*%MF0[Nfs_f1])/

(((%MF0[Nf_f2]*%MF0[Nfs_f2]/10000.0)+1.0)*%MF0[Nfs_in]);

Mw0[Nc_sp_t]:=REAL_TO_INT(%MF0[N66]);

END_IF;

 

!

(*РУЧНОЙ*)

PID('','',Mw0[Nc_in],Mw0[Nc_quit],Y_es[Nc_p],Mw0[Nc_sp_r]:43);

(*PID('','',%MW103,%MW2744,%M132,%MW2700:43);*)

%MW400[Nc_p]:=Mw0[Nc_quit];

 

Sr9

 

!

N_n:=72(*%KW300+%KW301*2+%KW302*4+101*);

N_sp_r_2:=N_sp_r+2;

N_pwm:=N_sp_r+45;

M_k:=N_p*3-2;

IF Mw0[N_n]=0 AND N_n_m=0 THEN

RESET Y_es;

Count1:=0;

END_IF;

IF Mw0[N_n]>0 AND N_n_m=0 THEN

N_n_m:=Mw0[N_n];

END_IF;

IF N_n_m<>Mw0[N_n] AND N_n_m>0 THEN

Mw0[N_n]:=N_n_m:=0;

Count1:=0;

END_IF;

IF N_n_m=Mw0[N_n] AND N_n_m>0 THEN

IF Mw0[N_n]=N_p THEN

N_n_1:=N_n+1;

N_n_1_r:=N_n+4;

IF Y_es THEN

Mw0[N_sp_r_2]:3:=Mw0[N_n_1]:3;

Mw0[N_n]:=N_n_m:=Count1:=0;

RESET Y_es;

END_IF;

INC Count1;

IF Count1>300 THEN

Mw0[N_n]:=N_n_m:=Count1:=0;

END_IF;

IF Count1=2 THEN

Mw0[N_n_1]:3:=Mw0[N_sp_r_2]:3;

END_IF;

Mw0[N_n_1_r]:3:=Mw0[N_sp_r_2]:3;

END_IF;

END_IF;

IF Mw0[N_sp_r_2]=0 THEN

Mw0[N_sp_r_2]:3:=%KW500[M_k]:3;

END_IF;

N_sp_r_2:=N_sp_r_2+1;

IF Mw0[N_sp_r_2]=0 THEN

N_sp_r_2:=N_sp_r_2-1;

Mw0[N_sp_r_2]:3:=%KW500[M_k]:3;

END_IF;

IF Mw0[N_pwm]<3 THEN

Mw0[N_pwm]:=15;

END_IF;

Sr11

!

N_n:=72(*%KW300+%KW301*2+%KW302*4+101*);

N_sp_r_2:=Nc_sp_r+2;

N_pwm:=Nc_sp_r+45;

M_k:=Nc_p*3-2;

IF Mw0[N_n]=0 AND N_n_m=0 THEN

RESET Y_es;

Count1:=0;

END_IF;

IF Mw0[N_n]>0 AND N_n_m=0 THEN

N_n_m:=Mw0[N_n];

END_IF;

IF N_n_m<>Mw0[N_n] AND N_n_m>0 THEN

Mw0[N_n]:=N_n_m:=0;

Count1:=0;

END_IF;

IF N_n_m=Mw0[N_n] AND N_n_m>0 THEN

IF Mw0[N_n]=Nc_p THEN

N_n_1:=N_n+1;

N_n_1_r:=N_n+4;

IF Y_es THEN

Mw0[N_sp_r_2]:3:=Mw0[N_n_1]:3;

Mw0[N_n]:=N_n_m:=Count1:=0;

RESET Y_es;

END_IF;

INC Count1;

IF Count1>300 THEN

Mw0[N_n]:=N_n_m:=Count1:=0;

END_IF;

IF Count1=2 THEN

Mw0[N_n_1]:3:=Mw0[N_sp_r_2]:3;

END_IF;

Mw0[N_n_1_r]:3:=Mw0[N_sp_r_2]:3;

END_IF;

END_IF;

IF Mw0[N_sp_r_2]=0 THEN

Mw0[N_sp_r_2]:3:=%KW500[M_k]:3;

END_IF;

N_sp_r_2:=N_sp_r_2+1;

IF Mw0[N_sp_r_2]=0 THEN

N_sp_r_2:=N_sp_r_2-1;

Mw0[N_sp_r_2]:3:=%KW500[M_k]:3;

END_IF;

IF Mw0[N_pwm]<3 THEN

Mw0[N_pwm]:=15;

END_IF;

 

Sr15

!

(* Программа для расхода суспензии*)

 

IF NOT Rejim THEN (* работа по уровню*)

 

Output_f2susp:=%MW1144;

 

IF Start_susp THEN

SET %M103;

RESET Predypregdenie;

INC Timer_susp;

Taimer_v_min:=Timer_susp/240;

IF Timer_susp<Vremya AND L2susp2_sp>0 THEN

L2susp2_sp_real:=L2susp2_sp_real-Pr_yr;

L2susp2_sp:=REAL_TO_INT(L2susp2_sp_real);

ELSE

RESET Start_susp;

END_IF;

ELSE

RESET %M103;

Vremya:=Vrem*240;

L2susp2_real:=INT_TO_REAL(L2susp2);

Vremya_real:=INT_TO_REAL(Vremya);

Pr_yr:=L2susp2_real/Vremya_real;

L2susp2_sp_real:=INT_TO_REAL(L2susp2_sp);

END_IF;

 

IF Fdc<312 AND Start_susp THEN

RESET %M103;

RESET Start_susp;

SET Predypregdenie;

L2susp2_man:=0;

END_IF;

IF Fdc>312 THEN

RESET Predypregdenie;

END_IF;

 

IF Timer_susp<Vremya AND Timer_susp<>0 AND NOT %M103 THEN

Timer_susp:=Vremya;

END_IF;

 

IF Timer_susp<(Vremya+5)AND Timer_susp>=Vremya AND NOT %M103 THEN

L2susp2_man:=0;

Timer_susp:=Timer_susp+1;

END_IF;

IF Timer_susp>(Vremya+4)THEN

Timer_susp:=0;

Taimer_v_min:=0;

END_IF;

 

ELSE (* работа по расходу*)

 

Output_f2susp:=%MW1844;

 

IF %M124 THEN

INC Timer_susp1;

IF Timer_susp1>Porog_timer_susp1 THEN

Timer_susp1:=0;

END_IF;

 

IF(L2susp2<L2susp2_min)AND(Timer_susp1=Porog_timer_susp1)THEN

F2susp_c:=F2susp_c-Delta_min_susp;

END_IF;

 

IF(L2susp2>L2susp2_max)AND(Timer_susp1=Porog_timer_susp1)THEN

F2susp_c:=F2susp_c+Delta_max_susp;

END_IF;

IF F2susp_sp>10000 THEN F2susp_sp:=10000;END_IF;

IF F2susp_sp<0 THEN F2susp_sp:=0;END_IF;

END_IF;

END_IF;

 

Sr16

 

!

IF %M108 THEN

INC Tm_ph2;

IF Tm_ph2>16 THEN

IF Ph2ca>Ph2_m THEN

Ph2ca_man:=Ph2ca_man+REAL_TO_INT(INT_TO_REAL(ABS(Ph2ca_sp-Ph2ca))*0.05);

END_IF;

IF Ph2ca>Ph2ca_sp THEN

Ph2ca_man:=Ph2ca_man+REAL_TO_INT(INT_TO_REAL(ABS(Ph2ca_sp-Ph2ca))*0.01);

END_IF;

IF Ph2ca<Ph2_m THEN

Ph2ca_man:=Ph2ca_man-REAL_TO_INT(INT_TO_REAL(ABS(Ph2ca_sp-Ph2ca))*0.05);

END_IF;

IF Ph2ca<Ph2ca_sp THEN

Ph2ca_man:=Ph2ca_man-REAL_TO_INT(INT_TO_REAL(ABS(Ph2ca_sp-Ph2ca))*0.01);

 

END_IF;

%MW257:=REAL_TO_INT(INT_TO_REAL(ABS(Ph2ca_sp-Ph2ca))*0.06);

%MW258:=REAL_TO_INT(INT_TO_REAL(ABS(Ph2ca_sp-Ph2ca))*0.02);

Ph2_m:=Ph2ca;

Tm_ph2:=0;

END_IF;

IF Ph2ca_man>10000 THEN Ph2ca_man:=10000;END_IF;

IF Ph2ca_man<500 THEN Ph2ca_man:=500;END_IF;

END_IF;

IF NOT %M108 THEN

Ph2ca_sp:=Ph2ca;

END_IF;

Output_ph2ca:=Ph2ca_man;

 

Mast Sr0

 

%M2:=%S5;

IF NOT %M3 THEN

IF RE %M2 THEN

%MW99:=%MW99+50;

END_IF;

END_IF;

IF %M3 THEN

IF RE %M2 THEN

%MW99:=%MW99-50;

END_IF;

END_IF;

IF %MW99>8000 THEN

SET %M3;

END_IF;

IF %MW99<2000 THEN

RESET %M3;

END_IF;

%MW98:=%MW98+1;

IF %MW98>=163 THEN

%MW98:=101;

END_IF;

Mw0[%MW98]:=%MW99;

 

Sr1

PWM(%MW1094,Output_f1susp_lgd,%MW1095:5);





Рекомендуемые страницы:

Воспользуйтесь поиском по сайту:



©2015- 2021 megalektsii.ru Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.