0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
1 | |
Разработка имитационной программы для анализа работы участка технологического процесса производства25.09.2014, 22:12. Показов 1931. Ответов 13
Метки нет Все метки)
(
написал программу,задача такова:
На участке цеха по выпуску напитков выполняются следующие операции: заполнение бутылок напитком и закупоривание, наклейка этикеток, установка бутылок в ящики.Пустые бутылки по одной поступают в цех в среднем через каждые 4 с. (экспоненциальная случайная величина). По мере поступления бутылки устанавливаются в поддон, вмещающий 25 шт. Поддон с бутылками поступает к машине, выполняющей заполнение и закупоривание. Эти операции выполняются для всех бутылок в поддоне одновременно и занимают27+-3b с. на поддон (обе операции вместе). На закупоренные и заклеенные бутылки наклеиваются этикетки; эта операция занимает Uniform(14,16) c на бутылку (включая извлечение ее из поддона, наклеивание этикетки и установку обратно в поддон). По окончании всей обработки бутылки из поддона перегружаются в ящики, вмещающие по 6 шт. Всего на участке используется 6 поддонов. Перемещение поддона от места подачи пустых бутылок к машине для заполнения и закупоривания, от нее – к месту наклейки этикеток, и оттуда – к месту перегрузки бутылок в ящики занимает 10 с.; возвращение пустого поддона к месту подачи пустых бутылок занимает 20 с. Разработать имитационную программу для анализа процесса работы участка в течение недели (5 дн. по 3 смены). Предложить возможные методы повышения выпуска продукции при минимальных изменениях технологического процесса производства. Текст программы: Код
PODDON storage 6 generate ,,,1 BUT advance (EXPONENTIAL(1,0,4)) split 1,BUT assemble 25 enter PODDON advance 10 seize ZAP_ZAK advance 27,3 release ZAP_ZAK assign 1,25 leave PODDON enter PODDON NAP advance (UNIFORM(2,14,16)) loop 1,NAP leave PODDON split 24 assemble 6 savevalue IASHIKI+,1 advance 20 KON terminate generate (24#60#60#5) terminate 1 start 1 Код
PODDON storage 6 generate ,,,1 BUT advance (EXPONENTIAL(1,0,4)) split 1,BUT assemble 25 test E SF$PODDON,0,KON enter PODDON advance 10 seize ZAP_ZAK advance 27,3 release ZAP_ZAK assign 1,25 leave PODDON enter PODDON NAP advance (UNIFORM(2,14,16)) loop 1,NAP leave PODDON split 24 assemble 6 savevalue IASHIKI+,1 advance 20 KON terminate generate (24#60#60#5) terminate 1 start 1 test E SF$PODDON,0,KON Заранее благодарю
0
|
|
25.09.2014, 22:12 | |
Ответы с готовыми решениями:
13
Модификация имитационной модели технологического процесса Дороботка программы в GPSS Исследование на имитационной модели работы сборочного участка цеха предприятия Разработать СМО–модель для анализа процесса функционирования участка контроля в течение смены разработка маршрутного технологического процесса |
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 07:51 | 2 |
![]() Решение
Как блок test работает объяснять смысла нет - об этом говорит любой самый первый сайт в интернете, поясню что там проверяется - проверяется условие все поддоны заняты.
SF это стандартный числовой атрибут вашего многоканального устройства который будет равен 0 когда хотябы 1 обслуживающее устройство есть. Когда все поддоны будут заняты условие равенства 0 будет нарушено ( SF будет =1) - значит заявка уже не пойдет по стандартному пути - ниже по коду, а пойдет по указанной метке KON. Добавлено через 11 минут Может невнимательно смотрю. Где сказано что поддонов в системе 6. И где сказано что если свободных поддонов нету, то заявки бутылки получают отказ ( именно это реализует ваш test, отправляет заявки на выход). Видимо это уже не по условию, а меры повышения адекватности модели.
1
|
0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
26.09.2014, 09:16 [ТС] | 3 |
storage poddon 6 <-----Разве оно не будет задавать кол-во МКУ поддон?
на счет кол-ва бутылок вмесчающихся на поддн, вы правы,но как задать ?
0
|
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 09:29 | 4 |
Да всё верно, не заметил в условиях задачи. Ок.
В смысле про что? про отказы? - Как сказал они реализованы проверкой наличия свободных поддонов (TEST)
1
|
0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
26.09.2014, 09:39 [ТС] | 5 |
о мере поступления бутылки устанавливаются в поддон, вмещающий 25 шт<<<<-----т.е. этот тест будет учитывать это ограничение или нужен еще 1?
0
|
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 09:56 | 6 |
Так, вы похоже вообще не разбираетесь даже в "вашей" первой написанной программе и не в курсе что там происходит???
Код
BUT advance (EXPONENTIAL(1,0,4)) split 1,BUT assemble 25
0
|
0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
26.09.2014, 10:00 [ТС] | 7 |
задерживаем тр-т бутылки(поступление на поддон),разбитие тр-та на несколько(создаем поток подачи бутылок) и собираем их по 25,я спрашиваю про то,ненужно ли это еще тестом как-то проверять?
0
|
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 10:31 | 8 |
Зачем тестом? если assemble собирает их по 25, нормально тут всё.
Единственное, смотрите Код
assemble 25 test E SF$PODDON,0,KON enter PODDON Поэтому проверку TEST SF поддон можно переместить ДО assemble, иначе получается мы КУДА-то можем собирать бутылки, хотя поддонов нету... и ещё, я знаю зачем вы применили split, а вы знаете? может проще сделать?
1
|
0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
26.09.2014, 10:46 [ТС] | 9 |
split нужен по заданию..поэтому тут я никак обойти не могу.(((огромное спасибо за помощь)
Добавлено через 1 минуту а про тест сф до ассембла,всмысле тот же самый тест?
0
|
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 10:48 | 10 |
Окей, обращайтесь если что.
А по факту про split. Дело в том, что assemble объединяет ТОЛЬКО заявки, которые принадлежат к 1 так называемому семейству транзактов. Если использовать просто GENERATE - то генерируются заявки не повторяющихся семейств и объединения не происходит. Поэтому применили такую структуру, в которой split просто для копий копирует номер семейства и таким образом assemble выполняет объединение заявок. Проще сделать так Код
generate (EXPONENTIAL(1,0,4)) ADOPT 1 ; назначаем всем заявкам одно семейство (№1) assemble 25 ; объединяем 25 заявок
0
|
0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
26.09.2014, 10:53 [ТС] | 11 |
а про тест сф до ассембла,всмысле тот же самый тест?
0
|
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 10:56 | 12 |
А ну да, про тест забыл. Я привёл пример замены старого куска (а там не было теста).
0
|
0 / 0 / 0
Регистрация: 13.01.2014
Сообщений: 10
|
|
26.09.2014, 11:02 [ТС] | 13 |
но по сути,если оставить сплит,то система же будет все равно работать верно?
0
|
1816 / 1030 / 285
Регистрация: 13.02.2012
Сообщений: 3,339
|
|
26.09.2014, 11:08 | 14 |
Начало Верно. середину и конец кода особенно не смотрел, комментариев нету. сложно додумывать.
0
|
26.09.2014, 11:08 | |
Помогаю со студенческими работами здесь
14
Разработка программы для сравнительного анализа методов сортировки Разработка программы для моделированияи анализа гауссовских случайных процессов Выбор ПО для моделирования технологического процесса
Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |