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

Техническими мероприятиями, обеспечивающими безопасность работ в ЭУ, являются:

1. Отключение ремонтируемого электрооборудования и принятие мер против ошибочного его включения или самовключения.

2. Установка временных ограждений неотключенных токоведущих частей, находящихся вблизи от места работы, и вывешивание на рукоятках выключателей предупредительных плакатов "Не включать - работают люди".

3. Присоединение переносного заземления к заземляющей шине, проверка отсутствия напряжения на отключенных токоведущих частях, которые с целью безопасности на время работы подлежат замыканию накоротко и заземлению, и наложение переносных заземлений на отключенные токоведущие части ЭУ сразу после проверки отсутствия напряжения.

4. Ограждение рабочего места и вывешивание на нем разрешающего плаката "Работать здесь".

Эти технические мероприятия выполняет допускающий к работе (в ЭУ до 1000 В - это оперативный электротехнический персонал с III квалификационной группой) по разрешению лица, отдающего распоряжение на производство работ.

Токоведущие части, которые необходимо оставить под напряжением, ограждают временными ограждениями, на которых вывешивается плакат "Стой - опасно для жизни" (для установок напряжением до 1000 В).

Отключение электрооборудования напряжением до 1000 В может быть выполнено рубильником, автоматическими выключателями или контакторами. Если работа выполняется без применений переносных заземлений, то необходимо установить изолирующие прокладки между контактами выключателя или отсоединить питающие провода. В установках до 1000 В операции наложения и снятия заземления могут выполняться без штанги руками, но в диэлектрических перчатках.

Организационными мероприятиями, обеспечивающими безопасносное производство работ в ЭУ, являются оформление работы нарядом или распоряжением; оформление допуска к работе; надзор во время работы; оформление перерывов в работе и переходов на другое рабочее место; оформление окончания работ.

Наряд есть письменное распоряжение на работу в ЭУ, определяющее место, время, начало и окончание работы, условия безопасного её проведения. В наряде указывается состав бригады и лиц, ответственных за безопасность работ. По наряду проводятся работы с полным или частичным снятием напряжения с ремонтируемой ЭУ, а также работы, выполняемые без снятия напряжения вблизи и на токоведущих частях, находящихся под напряжением. Работы могут выполняться без наряда и по распоряжению, которые передаются по телефону. Распоряжение принимается и записывается в оперативный журнал. По распоряжению могут выполняться работы без снятия напряжения вдали от токоведущих частей, находящихся под напряжением, а также кратковременные работы со снятием и без снятия напряжения.

Ответственными за безопасность работ являются: лица, выдающие наряд, или отдающие распоряжение, ответственный руководитель работ, лицо оперативного персонала - допускающий к работе; производитель работ или наблюдающий, рабочие, входящие в состав бригад. Право выдачи нарядов имеет начальник электроцеха, начальник службы эксплуатации, мастер. Разрешение на выдачу нарядов этим лицам даёт главный энергетик предприятия. Эти лица должны иметь не ниже IV группы допуска в установках до 1000 В. Право давать распоряжение, определяемое главным энергетиком предприятия, может быть дано лицам оперативного персонала, не ниже IV группы допуска. Лицо, выдающее наряд или распоряжение на производство работ, отвечает за безопасность её выполнения, а также за квалификацию ответственного руководителя, производителя работ или наблюдающего. Ответственный руководитель (с V группой допуска) определяет состав бригады и квалификацию рабочих. Принимая рабочее место, он отвечает за безопасность работ на данном участке. Правилами техники безопасности разрешается одному из ответственных лиц совмещать обязанности двух лиц: ответственного руководителя и производителя работ.

Наряд на производство работ выписывается в двух экземплярах, один экземпляр должен хранится у дежурного данной ЭУ, другой у производителя работ.

В оперативном журнале отмечается время начала и окончания работ, номер наряда. Если подстанция работает без постоянного дежурного, то второй экземпляр хранится у лица, выдавшего наряд. Производителю выдаётся только один наряд на одну бригаду и на одно присоединение, т.е. электрическая цепь одного назначения и наименования.

Разрешается выдача одного наряда на несколько однотипных работ при производстве работ без снятия напряжения, или выполнения работ в разных местах при полном снятии напряжения. В отдельных случаях разрешается передача текста наряда по телефону, наряд в таких случаях выполняется в трёх экземплярах: один экземпляр заполняет выдающий наряд, второй заполняет принимающий распоряжение по телефону, а третий выдаётся производителю работ. Срок действия не должен превышать 5 дней.

Допуск ремонтной бригады производится в следующем порядке: допускающий совместно с руководителем работ проверяют рабочее место, проверяют указатели напряжения, отсутствие напряжения, а затем касается рукой токоведущих частей ЭУ. Допускающий даёт инструктаж и вручает один экземпляр оформленного наряда.

Надзор во время работы осуществляет руководитель работ или наблюдающий. Если наблюдающего во время работ не может заменить руководитель или лицо, выдавшее наряд, то вся бригада выводится из помещения и запирается дверь. Наблюдающему во всех случаях не разрешается принимать участие в работе бригады. При обнаружении нарушения ТБ угрожающего безопасности работающих, наряд отбирается, а бригада удаляется. По устранению неполадок бригада вновь допускается к работе.

Перерывы в работе (обед) в наряде не оформляются, а вся бригада удаляется, а помещение запирается. По окончании рабочего дня поставленные заземления, временные ограждения и плакаты остаются на месте, а наряд сдаётся оперативному дежурному.

Наряд закрывается после осмотра ремонтируемого оборудования, отсутствия посторонних предметов, удаления временных ограждений, снятия всех вывешенных плакатов. Включение установки разрешается после закрытия наряда.

Заключение

Текст программы для микроконтроллера

Приложение 3

Текст программы для внешней ПЭВМ

program nata_dip;

uses crt,dos;

type

vec=array [1.6] of real;

vec_int=array [1.6] of integer;

ekr=array [1.4000] of byte;

var

i,j, podkl, podkl1, inc_t: integer;

s_nas,obem_t,pred_proc: vec;

pred_str, off: vec_int;

ex: boolean;

ch: char;

time,tmp: real;

r: registers;

savescr: ekr;

nom_str: byte;

obem_all: real;

h,hm, m,mm, s,sm,sn,sp, hund: Word;

Procedure Okno (x1,y1,x2,y2,swet_fon: byte);

begin

Window (x1,y1,x2,y2);

TextBackGround (swet_fon);

ClrScr;

end;

Procedure Ramka (x1,y1,x2,y2,swet,l: byte);

type

mas=array [1.6] of char;

const

mas_od: mas= ('L','-','¬','-','¦','-');

mas_dv: mas= ('L','г','¬','-','¦','=');

var

i: integer;

m: mas;

begin

if l=1 then m: =mas_od

else m: =mas_dv;

TextColor (swet);

GoToXY (x2,y2-1);

write (m [4]);

GoToXY (x1,y2-1);

write (m [1]);

Продолжение приложения 3

for i: =1 to x2-x1-1 do

write (m [6]);

InsLine;

GoToXY (x1,y1);

write (m [2]);

for i: =1 to x2-x1-1 do

write (m [6]);

write (m [3]);

for i: =1 to y2-y1-1 do

begin

GoToXY (x1,y1+i);

write (m [5]);

GoToXY (x2,y1+i);

write (m [5]);

end;

end;

Procedure Pol_Okno (x1,y1,x2,y2,swet_fon,swet: byte;

ten: boolean; ram: byte);

begin

if ten then

Okno (x1+1,y1+1,x2+1,y2+1,black);

Okno (x1,y1,x2,y2,swet_fon);

if ram=1

then

ramka (1,1,x2-x1+1,y2-y1+1,swet,1)

else

if ram=2

then

ramka (1,1,x2-x1+1,y2-y1+1,swet,2);

end;

Procedure Ubr_Kurs;

begin

r. ah: =1;

r. ch: =$20;

Intr ($10,r)

end;

Procedure Vst_Kurs;

begin

r. ah: =1;

r. ch: =6;

r. cl: =7;

Intr ($10,R)

end;

Procedure Rab_Ekr (log: boolean; var save: ekr);

var

ekran: ekr absolute $B800: $0000;

begin

if log then save: =ekran

else ekran: =save;

end;

procedure next;

begin

gotoxy (25,25);

textcolor (15);

write (' Для продолжения нажмите любую клавишу');

ch: =readkey;

clrscr;

end;

procedure vvod;

begin

clrscr;

for i: =1 to 6 do

begin

write ('Введите значение скорости насоса', i,', л/мин >> ');

readln (s_nas [i]);

end;

writeln ('');

write ('Введите значение емкости резервуара, л >> ');

readln (obem_all);

end;

function LZero (w: Word): String;

var

ss: String;

begin

Str (w: 0,ss);

if Length (ss) = 1 then

ss: = '0' + ss;

LZero: = ss;

end;

procedure ris_nap (proc: real);

var x: real;

n_pos: integer;

begin

x: =pred_proc [podkl];

Продолжение приложения 3

pred_proc [podkl]: =proc;

n_pos: = pred_str [podkl];

while (x <= proc) do

begin

if ( (x >= ( (n_pos) *5+2.5)) and (x < ( (n_pos) *5+5))) then

begin gotoxy (3+ (podkl-1) *13,23-n_pos); write ('----------'); end;

if ( (x >= ( (n_pos) *5+5)) and (x < ( (n_pos) *5+7.5))) then

begin gotoxy (3+ (podkl-1) *13,23-n_pos); write ('----------'); end;

if (proc>=90) then

begin

gotoxy (4+ (podkl-1) *13,18);

write (LZero (hm),': ',LZero (mm),': ',LZero (sm));

gotoxy (6+ (podkl-1) *13, 20);

textcolor (5);

write ('Off');

textcolor (1);

end;

gotoxy (5+ (podkl-1) *13,15); write (proc: 2: 1,'%');

x: =x+0.5;

if (x > (n_pos*5+7.5)) then

begin

n_pos: =n_pos+1;

pred_str [podkl]: =n_pos;

end;

end;

end;

begin

podkl: = 1;

obem_all: = 5000;

for i: =1 to 6 do

begin

pred_proc [i]: = 0;

pred_str [i]: = 0;

off [i]: =1;

end;

s_nas [1]: =130;

s_nas [2]: =80;

s_nas [3]: =100;

s_nas [4]: =120;

s_nas [5]: =150;

s_nas [6]: =180;

hm: = 0; mm: = 0; sm: = 0;

Продолжение приложения 3

ex: =true;

vst_kurs;

okno (1,1,80,25,15);

Pol_Okno (12,7,70,17,3,15,false,2);

okno (13,8,69,16,3);

vvod;

ubr_kurs;

okno (1,1,80,25,15);

clrscr;

textcolor (0);

gotoxy (1,2);

write(' ---------1-¬ ---------2-¬ ---------3-¬ ---------4-¬ ---------5-¬ ---------6-¬');

for i:=3 to 23 do

begin

gotoxy(1,i);

write(' ¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦');

end;

gotoxy(1,24);

write(' L----------- L----------- L----------- L----------- L----------- L-----------');

textcolor (2);

gotoxy (1+ (podkl-1) *13,2);

write (' ---------',podkl,'-¬');

for i: =3 to 23 do

begin

textcolor (2);

gotoxy (2+ (podkl-1) *13, i);

write ('¦');

gotoxy (13+ (podkl-1) *13, i);

write ('¦');

end;

gotoxy (1+ (podkl-1) *13,24);

write (' L-----------');

textcolor (0);

GetTime (h,m,s,hund);

sp: = s;

inc_t: = 1;

while ex do

begin

if (KeyPressed = true) then

begin

Продолжение приложения 3

ch: = readkey;

if (ch = '1') then inc_t: = 1;

if (ch = '2') then inc_t: = 5;

if (ch = '3') then inc_t: = 10;

if (ch = '4') then inc_t: = 20;

if (ch = '5') then inc_t: = 30;

if (ch = '0') then inc_t: = 60;

if (ch = #13) then ex: = false;

end;

GetTime (h,m,s,hund);

if (s = sp+1) then

begin

if (s = 59) then sp: = 0 else sp: = s;

sm: = sm + inc_t;

if (sm >= 60) then

begin

mm: = mm + 1;

sm: = sm - 60;

podkl: = podkl + 1;

if (podkl = 7) then podkl: = 1;

textcolor (2);

gotoxy (1+ (podkl-1) *13,2);

write (' ---------',podkl,'-¬');

for i: =3 to 23 do

begin

textcolor (2);

gotoxy (2+ (podkl-1) *13, i);

write ('¦');

gotoxy (13+ (podkl-1) *13, i);

write ('¦');

end;

gotoxy (1+ (podkl-1) *13,24);

write (' L-----------');

if (podkl = 1) then podkl1: = 6 else podkl1: = podkl-1;

textcolor (0);

gotoxy (1+ (podkl1-1) *13,2);

write (' ---------',podkl1,'-¬');

for i: =3 to 23 do

begin

gotoxy (2+ (podkl1-1) *13, i);

write ('¦');

gotoxy (13+ (podkl1-1) *13, i);

Продолжение приложения 3

write ('¦');

end;

gotoxy (1+ (podkl1-1) *13,24);

write (' L-----------');

end;

if (mm = 60) then

begin

hm: = hm + 1;

mm: = 0;

end;

time: =hm*60+mm+sm/60;

for i: =1 to 6 do

begin

obem_t [i]: =time*s_nas [i];

end;

textcolor (1);

gotoxy (36,1);

write (LZero (hm),': ',LZero (mm),': ',LZero (sm));

textcolor (1);

tmp: = (obem_t [podkl] /obem_all) *100;

if (tmp > 100) then tmp: =100;

if (off [podkl] =1) then ris_nap (tmp);

if (tmp >= 90) then off [podkl]: =0;

j: =0;

for i: =1 to 6 do j: =j+off [i];

if (j = 0) then

begin

gotoxy (28,10);

Pol_Okno (12,8,70,11,6,15,false,2);

okno (13,9,69,10,6);

textcolor (15);

writeln (' Все резервуары наполнены ');

write (' Для выхода нажмите любую клавишу');

repeat until KeyPressed;

ex: =false;

end;

end;

end;

vst_kurs;

clrscr;

end.

Размещено на Allbest.ru