Смекни!
smekni.com

Конвертирование исходного текста программ для станков с ЧПУ из одной системы программирования в другую (стр. 8 из 14)

Пожары в помещении, в котором находится ЭВМ, представляют особую опасность, так как сопряжены с большими материальными потерями. Площадь помещения, в котором ведется проектирование, невелика и составляет 8 м2. Как известно пожар может возникнуть при взаимодействии горючих веществ, окисления и источников зажигания. В помещении присутствуют все три основные фактора, необходимые для возникновения пожара. Горючими компонентами являются: строительные материалы для акустической и эстетической отделки помещений, двери, полы, бумага, изоляция кабелей и др.

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

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

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

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

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

В соответствии с “Типовыми правилами пожарной безопасности для промышленных предприятий” залы ЭВМ, помещения для внешних запоминающих устройств, подготовки данных, сервисной аппаратуры, архивов, копировально-множительного оборудования и т.п. необходимо оборудовать дымовыми пожарными извещателями. Так как в этих помещениях при возгорании различных пластмассовых, изоляционных материалов и бумажных изделий выделяется значительное количество дыма и мало теплоты.

Помещение, в котором производится разработка данного проекта, необходимо оборудовать средствами оповещения о пожаре, а также средствами для тушения пожара.

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

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

ЗАКЛЮЧЕНИЕ

В ходе дипломной работы было разработано ПО, позволяющее решать задачу автоматизированного пересчёта программного кода для станков с ЧПУ с использованием различных систем программирования. Программа была написана на языке высокого уровня ObjectPascalв среде разработки BorlandDelphi 7.

В процессе разработки были досконально исследованы системы программирования станков с ЧПУ, такие как (Вм, Маяк, Sinumerik). Результаты тестирования показали что, программа верно пересчитывает программный код в различные системы программирования при этом устраняет ошибки допущенные программистом, а так же имеет много вспомогательных настроек. Что значительно упрощает человеко-машинное взаимодействие и повышает время разработки программного кода и ввод его в эксплуатацию.

СПИСОК ЛИТЕРАТУРЫ

  1. Корн Г., Корн Т. Справочник по математике для научных работников и инженеров. - М.: Наука, 1979. – 720с.
  2. Никита Культин Delphi 6. Программирование на ObjectPascal. – СПб.: БХВ – Петербург, 2002. – 528 с.: ил.
  3. http://tnr.kulichki.com/techedit/te.html - TechEdit 2.1.1 относится к разряду специального ПО. С его помощью можно автоматизировать процесс разработки программ для ЧПУ.
  4. Гофман В. Э., Хомоненко А. Д. Delphi 6. – СПБ.: БХВ – Петербург, 2002. – 1152 с.: ил
  5. ГОСТ 12.0.002-80. Система стандартов безопасности труда. Термины и определения. – М.: ИПК Издательство стандартов, 2002
  6. СанПиН 2.2.4. 548 – 96. Гигиенические требования к микроклимату производственных помещений. – М.: Госкомсанэпиднадзор, 1996.
  7. ГОСТ 12.1.006–84. ССБТ. Электромагнитные поля радиочастот. Допустимые уровни на рабочих местах и требования к проведению контроля - М.: Издательство стандартов, 1985.
  8. СанПиН 2.2.2. 542-96. Гигиенические требования к видеодисплейным терминалам, персональным электронно-вычислительным машинам и организации работы. – М.: Госкомсанэпиднадзор, 1996.
  9. ГОСТ 12.1.038-83. Система стандартов безопасности труда. Электробезопасность. Термины и определения. – М.: Издательство стандартов, 1983.
  10. ГОСТ 12.1.004-91. Система стандартов безопасности труда. Пожарная безопасность. Общие положения. – М.: Издательство стандартов, 1991.
  11. ГОСТ 12.1.003–83. ССБТ. Шум. Общие требования безопасности (с изменениями по И-1-III-89).
  12. Почерняев С.В., Килин И.В., Сенилов М.А. Методические указания по дипломному проектированию. – Ижевск: Издательство ИжГТУ, 1994.
  13. ГОСТ 19.701-90 ЕСПД. Схемы алгоритмов, программ, данных и систем. Условные обозначения и правила выполнения. – М.: Издательство стандартов, 1991
  14. ГОСТ 19.105-78 ЕСПД. Общие требования к программным документам. – М.: Издательство стандартов, 1988
  15. ГОСТ 19.401-78 ЕСПД. Текст программы. Требования к содержанию и оформлению. – М.: Издательство стандартов, 1988
  16. ГОСТ 19.404-79 ЕСПД. Пояснительная записка. Требования к содержанию и оформлению. – М.: Издательство стандартов, 1988
  17. ГОСТ 19.504-79 ЕСПД. Руководство программиста. Требования к содержанию и оформлению. – М.: Издательство стандартов, 1988
  18. ГОСТ 19.505-79 ЕСПД. Руководство оператора. Требования к содержанию и оформлению. – М.: Издательство стандартов, 1988

ПРИЛОЖЕНИЕ 1

ТЕКСТ ПРОГРАММЫ

Файл Project1.dpr

program Project1;

uses

Forms,

Unit1 in 'Unit1.pas' {Form1},

Unit2 in 'Unit2.pas' {Form2},

Unit3 in 'Unit3.pas' {AboutBox},

Unit5 in 'Unit5.pas' {Form5},

Unit6 in 'Unit6.pas' {Form6};

{$R *.res}

begin

Application.Initialize;

Application.Title := 'Наладчик 1.6.1';

Application.CreateForm(TForm1, Form1);

Application.CreateForm(TForm5, Form5);

Application.CreateForm(TForm6, Form6);

Form1.Label3.Caption:= 'Всегострок';

Application.CreateForm(TForm2, Form2);

Application.CreateForm(TAboutBox, AboutBox);

Application.Run;

end.

ФайлUnit1.pas

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, Menus, ExtCtrls, ToolWin, ComCtrls, ImgList, Printers,

DBCtrls, Registry, IniFiles;

type

TForm1 = class(TForm)

memo1: TMemo;

MainMenu1: TMainMenu;

OpenDialog1: TOpenDialog;

FontDialog1: TFontDialog;

PrinterSetupDialog1: TPrinterSetupDialog;

PrintDialog1: TPrintDialog;

fayl: TMenuItem;

Nastroyki: TMenuItem;

fond: TMenuItem;

Printery: TMenuItem;

ToolBar1: TToolBar;

ToolButton1: TToolButton;

ImageList1: TImageList;

Parametry: TMenuItem;

ToolButton2: TToolButton;

SaveDialog1: TSaveDialog;

ToolButton3: TToolButton;

Label1: TLabel;

Help: TMenuItem;

Versia: TMenuItem;

Vyhod: TMenuItem;

Save: TMenuItem;

Open: TMenuItem;

Print: TMenuItem;

ToolButton4: TToolButton;

ToolButton6: TToolButton;

NomerKadra: TCheckBox;

Probel: TCheckBox;

Pustostr: TCheckBox;

PanelSostoyaniya: TStatusBar;

Indikator: TProgressBar;

ToolButton9: TToolButton;

ReplaceDialog1: TReplaceDialog;

Cancel: TButton;

Obrabotka: TButton;

Label2: TLabel;

Label3: TLabel;

Panel1: TPanel;

Panel2: TPanel;

ToolButton5: TToolButton;

ToolButton8: TToolButton;

procedure ButPrinterClick(Sender: TObject);

procedure ButPechatClick(Sender: TObject);

procedure fondClick(Sender: TObject);

procedure PrinteryClick(Sender: TObject);

procedure PechatClick(Sender: TObject);

procedure ButParametrClick(Sender: TObject);

procedure FormResize(Sender: TObject);

procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);

procedure FormCreate(Sender: TObject);

procedure ToolButton1Click(Sender: TObject);

procedure ParametryClick(Sender: TObject);

procedure ToolButton2Click(Sender: TObject);

procedure ToolButton3Click(Sender: TObject);

procedure VersiaClick(Sender: TObject);

procedure VyhodClick(Sender: TObject);

procedure SaveClick(Sender: TObject);

procedure OpenClick(Sender: TObject);

procedure PrintClick(Sender: TObject);

procedure CancelClick(Sender: TObject);

procedure ToolButton6Click(Sender: TObject);

procedure ToolButton4Click(Sender: TObject);

procedure ToolButton9Click(Sender: TObject);

procedure ReplaceDialog1Replace(Sender: TObject);

procedure ObrabotkaClick(Sender: TObject);