Главная Финансы деньги и налоги Философия Физика и энергетика Управление Схемотехника Стратегический менеджмент Статистика Соцобеспечение Семейное право Программирование компьютеры и кибернетика Охрана окружающей среды экология Основы права Медицина Криминалистика и криминология Коммуникации и связь Кибернетика Качество упр-е качеством КСЕ Информатика ВТ телекоммуникации Журналистика Государство и право Биографии Банковское дело Карта сайта	Рефераты. Конвертирование исходного текста программ для станков с ЧПУ из одной системы программирования в друг...           2. pc_mayak(bufer);          3. Если  Form2.PC_VM.Checked, то переход к п. 4           4. pc_vm(bufer);          5. Если  Form2.VM_MAYAK.Checked, то переход к п. 6           6. vm_mayak(bufer);          7. Если  Form2.MAYAK_VM.Checked, то переход к п.8           8. mayak_vm(bufer);          9.  Bufer:= '';            10.  Inc(m);           11. конец 2.2.5. Список условных обозначений Условные обозначения, используемые в описании алгоритма, приведены в табл. 4. Таблица 4 Условные обозначения
Обозначение	Расшифровка
bufer	Строка значение процедуры
pc_mayak(bufer);	Процедура пересчёта заданным методом
pc_vm(bufer);	Процедура пересчёта заданным методом
vm_mayak(bufer);	Процедура пересчёта заданным методом
mayak_vm(bufer);	Процедура пересчёта заданным методом
Form2.MAYAK_VM.Checked	Свойства переключателя
Bufer	Переменная хранения строки
Inc()	Функция увеличения

Схема алгоритма метода выбора обработки

Рис 2.6

2.3 Описание алгоритма выбора вспомогательных методов обработки

2.3.1. Назначение и характеристика алгоритма

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

2.3.2. Используемая информация

В алгоритме используется графическая оболочка метода выбора обработки.

2.3.3. Результаты решения

В результате реализации алгоритма программа настраивается для обработки дополнительными методами.

2.3.4. Алгоритм решения

1. Если  Form1.Probel.Checked, переходим к п. 2

          2. DelProbel(bufer);

         3. Если  Form1.NomerKadra.Checked, то переходим к п. 4

          4. nomerkadra(bufer);

          5. Если  Form1.PustoStr.Checked, то переход к п. 6

          6. pustostroka;

         7. Bufer:= '';   

          8.  Inc(m);  

          9. конец

                                                                                                 Таблица 5

Список условных обозначений

Название

Описание

Bufer

Переменная хранения строки

Inc()

Функция увеличение значения

DelProbel(bufer);

Функция удаления пробелов

nomerkadra(bufer);

Функция восстановления нумерации кадров

pustostroka;

Функция удаления пустых строк

2.4. Описание алгоритма конвертирования

2.4.1. Назначение и характеристика алгоритма

Алгоритм описывает конвертирование исходного текста программы для станков с ЧПУ. В результате программа пересчитывает все исходные координаты из данной системы программирования в заданную.

2.4.2. Алгоритм решения

         1. Если (pos('%', kadr) <> 0) or (pos('$', kadr) <> 0), то переход к п. 28

         2. Если  pos('X',kadr) <> 0, то переход к п. 3 иначе к п. 5

         3. NaytiKoordinatu(kadr,'X', vyh);

         4. PreobrazovanieMayak(X_nast, kadr);

         5. uslovie:= FindVstavki('X', kadr);

         6. DobavitTochku(s);

          7. insert(Concat('X', s), kadr, uslovie);

         8. Если (pos('G42', kadr) <> 0) or (pos('G41', kadr) <> 0), то пер к п. 9

         9. Если  pos('X', kadr) = 0, то переход к п. 10

         10. uslovie:= FindVstavki('X', kadr);

         11. Insert('X' + s, kadr, uslovie);

         12. Если (pos('I', Stroka.Strings[Succ(m)]) <> 0) and (pos('J', Stroka.Strings[Succ(m)]) <> 0), то переход к п. 13 иначе к п. 16

         13. Naytikoordinatu(Stroka.Strings[Succ(m)], 'I', st);

         14. Naytikoordinatu(Stroka.Strings[Succ(m)], 'J', st);

         15. Podhod_G41_G42_radius;

         16. Podhod_G41_G42_line; 

         17. Если pos('I', kadr) <> 0, то переход к п. 18

         18. NaytiKoordinatu(kadr, 'I', st);

         19. PreobrazovanieMayak(X_sled, kadr);

         20. uslovie:= pos('I',kadr);

         21. Если  uslovie <> 0, то переход к п. 22

         22. NaytiKoordinatu(kadr,'I',vyh);

         23. Если  oshibka = 1, то переход к п. 24

         24. I:= X_pred + I;

         25. preobrazovanieMAYAK(I,kadr);

         26. X_pred:= X_nast;

         27. Y_pred:= Y_nast;

         28. конец

                                                                                                                  Таблица 6

Список условных обозначений

Обозначение

Расшифровка

Kadr

Текущая строка обработки

NaytiKoordinatu(kadr,'X', vyh);

Функция нахождения значения координаты

vyh

Выходное значение процедуры

PreobrazovanieMayak(X_nast, kadr);

Функция преобразования координаты

X_nast и X_pred

Числовая переменная настоящего и предыдущего значения Х

uslovie

Числовая переменная

FindVstavki('X', kadr);

Функция поиска вставки значения заданной координаты в строке

DobavitTochku(s);

Функция вставляет точку в строку, если её нет

insert(Concat('X', s), kadr, uslovie);

Функция вставляет и сцепляет строки

(pos('I', Stroka.Strings[Succ(m)])

Функция поиска и проверки заданной позиции в строке

Podhod_G41_G42_radius

Функция расчёта радиусов на заходах

Podhod_G41_G42_line; 

Функция расчёта линейных заходов

I и J

Координаты круговой интерполяции в программе

Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17