Повышение эффективности работы МТА при частичной нагрузке двигателя
Диссертация
Энергетическая эффективность машино-тракторного агрегата в значительной мере зависит от уровня загрузки тракторного двигателя, которая для универсально-пропашного трактора класса 1,4 (Nc=74 кВт) изменяется от 45% при выполнении транспортных операций до 87,9% на почвообработке. Частичное использование мощности двигателя связано с перерасходом топлива на единицу полезной работы. Топливная… Читать ещё >
Содержание
- I. СОСТОЯНИЕ ВОПРОСА
- 1. 1. Исследования машинно-тракторных агрегатов на полевых. работах
- 1. 1. 1. Эксплуатационные свойства и показатели МТА
- 1. 1. 2. Обоснование режимов работы агрегатов
- 1. 1. 3. Анализ исследований режимов работы машинно-тракторных агрегатов
- 1. 1. 4. Исследования по обоснованию эксплуатационных показателей агрегатов
- 1. 1. 5. Оценка качества работы агрегатов
- 1. 1. 6. Топливная экономичность трактора
- 1. 2. Вопросы работы дизельных двигателей тракторов в различных условиях
- 1. 3. Цель и задачи исследования
- 1. 1. Исследования машинно-тракторных агрегатов на полевых. работах
- II. ТЕОРЕТИЧЕСКИЕ ИССЛЕДОВАНИЯ
- 2. 1. Теоретические исследования машинно-тракторных агрегатов
- 2. 1. 1. Оптимизация режимов работы МТА
- 2. 1. 2. Методика расчета машинно-тракторного агрегата
- 2. 1. 3. Буксование
- 2. 1. 4. Механический КПД трансмиссии трактора
- 2. 1. 5. Скоростные режимы работы агрегатов
- 2. 1. 6. Тяговая характеристика трактора
- 2. 1. 7. Тяговое сопротивление рабочих машин
- 2. 2. Теоретические исследования двигателей сельскохозяйственных тракторов
- 2. 2. 1. Тепловой расчет двигателей сельскохозяйственных тракторов
- 2. 2. 2. Расчет действительного цикла дизельного двигателя
- 2. 3. Выводы по главе II
- 2. 1. Теоретические исследования машинно-тракторных агрегатов
- III. МЕТОДИКА ЭКСПЕРИМЕНТАЛЬНЫХ И РАСЧЕТНЫХ ИССЛЕДОВАНИЙ
- 3. 1. Методика расчета показателей дизельных двигателей сельскохозяйственных тракторов
- 3. 1. 1. Методика расчета процессов сжатия и расширения в цилиндрах двигателей
- 3. 1. 2. Методика определения параметров двигателя с турбонаддувом
- 3. 1. 3. Определение давления наддувочного воздуха на частичных режимах работы тракторного двигателя
- 3. 1. 4. Методика определения коэффициента использования теплоты для расчета внешней скоростной характеристики двигателя
- 3. 1. 5. Методика определения степени предварительного расширения на частичных режимах работы дизельного двигателя
- 3. 1. 6. Методика определения коэффициента использования теплоты при расчете нагрузочной характеристики двигателя
- 3. 1. 7. Методика расчета внешней скоростной характеристики тракторного двигателя при различных режимов работы МТА
- 3. 1. 8. Методика расчета частичного режима работы тракторного двигателя
- 3. 2. Методика расчета эксплуатационных показателей машинно-тракторного агрегата на сельскохозяйственных технологических операциях
- 3. 2. 1. Влияние на величину буксования силы тяги сельскохозяйственных тракторов кл. 1,
- 3. 2. 2. Методика расчета машинно- тракторного агрегата
- 3. 3. Выводы по главе III
- 3. 1. Методика расчета показателей дизельных двигателей сельскохозяйственных тракторов
- IV. РЕЗУЛЬТАТЫ И АНАЛИЗ ЭКСПЕРИМЕНТАЛЬНЫХ И РАСЧЕТНЫХ ИССЛЕДОВАНИЙ ЭКСПЛУАТАЦИОНЫХ ПОКАЗАТЕЛЕЙ МАШИННО-ТРАКТОРНОГО АГРЕГАТА И ДВИГАТЕЛЯ
- 4. 1. Исследование показателей использования машинно-тракторных агрегатов на пахоте и дисковании
- 4. 1. 1. Анализ показателей использования машинно-тракторных агрегатов на пахоте
- 4. 1. 2. Эффективность использования машинно-тракторных агрегатов на пахоте
- 4. 1. 3. Анализ показателей использования машинно-тракторных агрегатов на дисковании
- 4. 1. 4. Эффективность использования машинно-тракторных агрегатов на дисковании
- 4. 2. Результат расчета показателей тракторного двигателя
- 4. 2. 1. Результаты расчета тракторного двигателя по внешней скоростной характеристике
- 4. 2. 2. Результаты расчета нагрузочной характеристики тракторного двигателя
- 4. 2. 3. Оценки результатов расчетов показателей работы тракторных двигателей
- 4. 3. Выводы по главе IV
- 4. 1. Исследование показателей использования машинно-тракторных агрегатов на пахоте и дисковании
- V. ЭКОНОМИЧЕСКАЯ ОЦЕНКА ЭФФЕКТИВНОСТИ ИСПОЛЬЗОВАНИЯ МАШИННО-ТРАКТОРНЫХ АГРЕГАТОВ НА ОС
- НОВНЫХ ОПЕРАЦИЯХ В РАСТЕНИЕВОДСТВЕ
- 5. 1. Экономический эффект от использования в трактором двигателе экспериментального рабочего процесса
- 5. 2. Экономический эффект от использования машинно- тракторных агрегатов в сельскохозяйственных производстве
- 5. 3. Выводы по главе V
Список литературы
- Алеев Л.Е. Обоснование оптимальных нагрузочных режимов маши-но- тракторного агрегата по дисперсиям выходных параметров// записки ЛСХИ: Сб. Научных. ТР., Т.244/ЛСХИ-Л. Пушкин, 1976.-С. 155−164.
- Аллилуев В. А. Ананьин А.Д. Михлин В.М Техническая Эксплуатация машинно-тракторного парка. М.: Агропромиздат, 1991. 367 с.
- Анилович В.Я., Водолажченко Ю. Т. Конструирование и расчет сельскохозяйственных тракторов. М.: Машиностроение, 1976. 456с.
- Анохин В. И. Сахаров А.Г. Пособие тракториста: учебное пособие для сельских // М.: Колос, 1971. 424с.
- Архилаев М.А. Повышение эффективности использования трактора Т-250 на основной алоскорезной обработке почвы за счет обоснования параметров и режимов работы двигателя: Автореф. дис. .канд. техи.н. Барнаул, 2000. 17с.
- Астанский Ю.Л., Фридуман М. М. Тепловые параметры топливной аппаратуры судовых дизелей при переходных режимах замены топ-лив.// Двигателестроение.-1981, № 8.- С. 20−22.
- Астахов И.В., Окулов В. Г. О раьочем процессе топливной системы тракторного дизеля.// Труды пермского государственного сельско-хоз. ин- та им. Акад. Д. П. Прянишникова.- 1996, вып. 2.- 228С.
- Багиров Д.Д. Влияние неустановившейся нагрузки на выходные показатели двигателей некоторых землеройных машин при различных типах приводов. Автореф. дис. .канд. техн. н. М., 1985. 18 с.
- Богатырев А.В., Корабельников А.Н, Чумаков В. Л Тракторы и автомобили// Част 1. двигатели. М.: МГАУ, 2004. 80 с.
- Богатырев А.В., Лехтер В.Р Тракторы и автомобили / Под ред. Л. Н. Богатырев. М.: Колос, 2005. 399 с.
- Болтинский В. Н. Мощность тракторного дизеля при работе с неустановившейся нагрузкой и её определение. //Механизац. и электрифи- -кац. социалистам, с .х. 1959, № 2. С. 3−8.
- Болтинский В.Н. О работе машинно- тракторных агрегатов на повышенных скоростях // Механизация и электрификация социалистического сельского хозяйства, № 3,1959.
- Болховитинов Г. В., Белостоцкий А. М. Эксплуатационные режимы работы дизелей маневровых тепловозов. //Железнодорожный транспорт. 1966. № 12. С. 45−48.
- Брук М. А., Виксман А. С., Левин Г. X. Работа дизеля в нестационарных условиях. JL: Машиностроение. Ленинградское отд, 1981. 208с.
- Бурт А.К. Исследования по обоснованию эксплуатационных требований к параметрам тракторных агрегатов, определяемым регулярной характеристикой двигателя. Автореф. Дис.канд.тех.н. Барнаул., 1979. 22 с.
- Васильев Ю. Н., Белостоцкий А. М. Улучшение приёмистости судовых дизелей с газотурбинным наддувом. //Морской флот. 1966. № 7. С. 15−17.
- Величкин И. А., Зубиетова М. П., Морозов А. В. Методики ускоренной оценки эксплуатационной надёжности тракторных двигателей. // Двигателестроение. 1981. № 7. С. 12−14.
- Величкин И. Н. Коварский Е.К. Пути повышения надежности парка тракторов.// Тракторы и сельхозмашины. 1978. № 6. С. 32−36.
- Величкин И.Н. Опыт анализа надежности и долговечности тракторных двигателей по комплексным показателям// Тракторы и сельхоз-машины.-1969.-№ 9. С. 1−4.
- Вержбицкий В.М. Численные методы: Математический анализ и обыкновенные дифференциальные уравнения. М.: Оникс 21 век, 2005. 400 с.
- Вершинин А. С. О Влиянии некоторых факторов на протекание рабочего процесса дизеля на переходных режимах. //Труды ЦНИДИ.1968. вып. 58. С. 3−9.
- Взоров Б.А., Молчанов К. К., Трепененков И. И. Снижение расхода топлива сельскохозяйственными тракторами путем оптимизации режимов работы двигателей // Тракторы и сельхозмашины. 1985. — № 6. — С.10−14.
- Водолажченко В. В., Симеон А. Э. Исследование переходных процессов 4-х тактного тепловозного дизеля. //Вестник ВНИИЖТ. 1969, № 1.С. 26−27.
- Гидравлика, гидромашины и гидроприводы / Т. М. Башта, С. С. Руднев, Б. Б. Некрасов и др. М.: Машиностроение, 1982. — 123 с.
- Горелик Г. Б., Дьяченко Н. Х., Магидович А. Е. Работа топливопо-дающей аппаратуры дизелей на частичных и переходных режимах//Энергомашиностроение. Труды ЛПИ. 1971. вып. 316.-С. 19−22.
- Горячкин М.И. Сравнительная экономическая оценка способов механизации в зависимости от объёма работы // Техника в сельском хозяйстве, № 1, 1961.
- Куделя И.Н. Моделирование внешних скоростных характеристик дизеля с регуляторной ветвью // Тракторы и с.-х.машины. 1998- No 9. С. 21−22.
- Грехов J1.B., Иващенко Н. А., Марков В. А. Топливная аппаратура и системы управления дизелей: Учебник для вузов. М.: «Легион-Автодата», 2004. — 344 с.
- Грехов Л.В., Кулешов А. С. Математическое моделирование и компьютерная оптимизация топливоподачи и рабочих процессов двигателей внутреннего сгорания. М.: Изд-во МГТУ им. Н. Э. Баумана, 2000. — 64 с.
- Григорьев М.А. и др. Износостойкость деталей ЦПГ дизеля// Автомобильная промышленность. 1985. № 5. С. 10−12.
- Гуськов В.Г. Методические основы природоохранных режимов эксплуатации крупных каскадов ГЭС при пропуске высоких половодий1. М. 1992.7 с.
- Дашков С. Н., Костин А. П., Дьяченко Н. X. Теплообмен в двигателях и теплонапряжённость их деталей. М.: Машиностроение. 1969. 205 с.
- Двигатели внутреннего сгорания.: Теория поршневых и комбинированных двигателей. /Учебник для ВУЗов по специальности «Двигатели внутреннего сгорания». /Д. Н. Вырубов, Н. А Иващенко, В. И. Ивин и др.- Под ред. А. С. Орлина и М. Г. Круглова. 4-е изд.
- Двигатели внутреннего сгорания.: Тепловозные дизели и газотурбинные установки, аа /Учебник. /А. Э. Симеон, А. 3 Хомич., А. А. Куриц и др.-М.: Транспорт. 1980. 384 с.
- Двигатели внутреннего сгорания: динамика и конструирование / В. Н. Луканин, И. В. Алексеев, М. Г. Шатров и др.- Под ред. В.Н. Лу-канина, М. Г. Шатрова. М.: Высшая школа, 2005. 400 с.
- Двигатели внутреннего сгорания: Компьютерный практикум моделирование процессов в ДВС / В. Н. Луканин, М. Г. Шатров, Т. Ю. Кричевская и др.- Под ред. В. Н. Луканина и М. Г. Шатрова. М.: Высшая школа, 2005.414 с.
- Двигатели внутреннего сгорания: Теория рабочих процессов / В. Н. Луканин, К. Д. Морозов, А. С. Хачиян и др.- Под ред. В. Н. Луканина, М. Г. Шатрова. М.: Высшая школа, 2005. 480 с.
- Двигатели внутреннего сгорания: Теория рабочих процессов поршневых и комбинированных двигателей / А. С. Орлин, Д. Н. Вырубов, В. И. Ивин и др.- Под ред. А. С. Орлина. М.: Машиностроение, 1971. -400 с.
- Двигатели внутреннего сгорания: Устройство и работа поршневых и комбинированных двигателей / В. П. Алексеев, В. Ф. Воронин, Л. В. Грехов и др.- Под ред.А. С. Орлина, М. Г. Круглова. М.: Машиностроение, 1980.-288 с.
- Девянин С.Н., Новиков А. С. Возможность форсирования дизеля Д243 по мощности за счет улучшения смесеобразования // Вестник. 2005. Выпуск 4(14) .С. 93−97.
- Диков В. А., Шабадаш Б. И. Об одном нелинейном факторе в системе регулирования дизеля СМД с роторным топливным насосом НРД-1. //ДВС. Респ. межвед. науч.-техн. сб. Харьков. 1978. вып 28. С. 95 100.
- Добровольский В. В., Наливайко В. С. Экспериментальное исследование топливоподачи на переходных режимах двигателей 6 ЧН25−34. //ДВС. Респ. межвед. науч. техн. сб. Харьков. 1974. вып. 19. С. 109−121.
- Дуров А. 3. Работа топливного насоса с полной разгрузкой линии нагнетения. //Известия ВУЗов. Машиностроение. 1979. № 9. С. 81−84.
- Евдокимов Ю.А., Колесников В. И., Тетерин А. И. Планирование и анализ экспериментов при решении и задач трения и износа. М.: Наука, 1980.288 с.
- Ждановский Н.С., Николаенко А. В. Надежность и долговечность автотракторных двигателей. JL: Колос, 1981.-259 с.
- Жукевич К.И. Двухсменная работа машинно-тракторных агрегатов. Минск.: Ураджай, 1984. 55 с.
- Завалишин Ф.С.- Манцев М.Г. Методы исследований по механизации сельскохозяйственного производства. М.: КолосС, 1982. 231 с.
- Зангиев А.А., Лышко Г. П., Скороходов А. Н. Производственная эксплуатация машинно-тракторного парка. М.: КолосС, 1996. 320 с.
- Зангиев А.А., Скороходов А. Н. Практикум по эксплуатации машинно-тракторного парка. М.: КолосС, 2006. 317 с.
- Зангиев А.А., Шпилько А. В., Левшин А.Г., Эксплуатация машинно-тракторного парка. М.: КолосС, 2004. 320 с.
- Захарченко А.Н., Смирнов В. П., Сутормин Ю. П., Трушин В. Г. Справочное пособие по ЭМТП. М., Изд-во МСХА. 1991. 110 с.
- Зоробян С.Р. и др. Динамическая нагруженность и надежность трактора рукопись ден. ЦНИИТЭИ тракторсельхозмаш, № 616- ТС, Чехов,! 985. 42с.
- Зубиетова М.П., Пустовалов И. В. Влияние условий работы двигателя Д-50 на износостойкость его деталей// Тракторы и сельхозмашины.1981.- № 3. с. 6−8.
- Интернет-публикации: http://www.minsk.antosoft.ru
- Интернет-публикации: http://www.tractor.ru
- Иофинов С.А. Новое в эксплуатации машинно-тракторного парка. М.: Знание, 1980. 64 с.
- Иофинов С.А., Лышко Г. П. Эксплуатация машинно-тракторного парка. М.: Знание, 1984. 351 с.
- Калиш Г. Г. Неустойчивые режимы работы форсунок // Труды НАТИ. 1945. — Вып.42. — С. 3−22.
- Канарчук Е.А., Канарчук В. Е. Влияние режимов работы на износ двигателей внутреннего сгорания.- Киев. 1970. 226 с.
- Капралов Б.И., Красильников А. С., Мазинг М. В. Оптимизация параметров топливной аппаратуры дизеля грузового автомобиля // Двига-телестроение. 1987. № 5. С. 20−22.
- Кацыгин В.В.- Кринко М.С.- Мельников Е. С. Повышение эффективности использования машинно-тракторного парка. Минск.:Ураджай, 1982. 168 с.
- Киртбая Ю.К. Резервы в использовании машинно-тракторного парка. М.: КолосС, 1982.319 с.
- Колобов Г. Г., Парфенов А. П. Тяговые характеристики тракторов.: Машиностроение, 1973. 153с.
- Колчин А.И., Демидов В. П. Расчет автомобильных и тракторных двигателей. М.: Высшая школа, 2003. 496 с.
- Костин А.К., Борисов В. Н. Износ и ресурс основных деталей ЦПГ судовых двигателей в эксплуатационных условиях// Двигателестрое-ние.- 1984,-№ 7. -С. 43−45.
- Кравченко В.А., Игнатченко А. А., Любимов А. В. Метод улучшения тяговой характеристики трактора // Материалы XLII. 2003. С. 209 213.
- Крепе Л.И., Вайнштейн Г. Я. Математическая модель работы автотракторного дизеля с наддувом при неустановившейся нагрузке.// Двигателестроение.- 1982.-№ 12.-С. 5−8.
- Крутов В.И. Неустановившиеся режимы ДВС.// Известия ВУЗов. Машиностроение.- 1969.- № 11.- С. 68−71.
- Ксеневич Н.П., Соловейчик А. А., Шевцов В. Г., Оптимизация режимов работы МТА с переменной технологической массой на основе применения автоматического ВОМ и выбора программы регулирования двигателя // Научные труды вим. Т. 139, М., 2002. С. 37−45.
- Ксеневич Н.П., Солонский А. С., Войчинский С. М. Проектирование универсально-пропашных тракторов.- Минск: Наука и техника, 1980.
- Кутовой В.А. Распыливание топлива дизельными форсунками // Труды НИИД. 1959. — Вып.8. -124 с.
- Кутьков Г. М., Перелыгин В. М. Методика оценки технологического уровня трактора // С.-х.тракторы и автотракт двигатели. М. 2000. С. 3−9.
- Кутьков Г. М., Сидоров В. Н. Методика расчета теоретической тяго-во-динамической характеристики трактора // Тракторы и с.-х.машины. 2006. N 9. С. 20−23.
- Кутьков Г. М. Тракторы и автомобили: Теория и технологические свойства. М.: Колос, 2004. 503 с.
- Леонов О.Б., Павлюков В. Г., Долинский Г. И. Влияние регулирования начального давления топлива на параметры воздухоснабжения дизеля.// ДВС. НИИИНФОРМТЯжмаш.- 1975, № 4−75−12. С. 26−29.
- Леонов О.Б., Павлюков В. Г., Патрахальцев Н. Н. Исследование процесса топливоподачи при неустановившемся режиме работы дизеля.// Известия ВУЗов Машиностраение.- 1970, № 7. С. 86−94.
- Леонов О.Б., Павлюков В. Г., Патрахальцев Н. Н. Факторы динамической чувствительности дизеля.// Известия ВУЗов Машиностраение.-1971, № 8. С. 76−79.
- Лойцянский Л.Г. Механика жидкости и газа. М.: Наука, 1973. — 848 с.
- Львовский Е.Н. Статистические методы построения эмпирических формул. М.: Высшая школа, 1988. 240 с.
- Магидович Л.Е. Исследование процессов подачи топлива дизелей на неустановившихся режимах. Афтореф. дис.. канд.техн.н. Л., 1970. 16 с.
- Мазитов Н.К., Галяутдинов Н. Х., Сахапов Р. Л., Архипов С. М. Моделирование и оптимизация режимов эксплуатации техники в растениеводстве // Энергообеспечение и энергосбережение в сельском хозяйстве. 2004. С. 8−13.
- Марков В.А., Баширов P.M., Габитов И. И. Токсичность отработавших газов дизелей. М.: Изд-во МГТУ им. Баумана, 2002. — 376 с.
- Марков В.А., Кислов В. Г., Хватов В. А. Характеристики топливопо-дачи транспортных дизелей. М.: Изд-во МГТУ им. Баумана, 1997. -160 с.
- Микропроцессорная система управления углом опережения впрыскивания топлива. Динамика./ М. И. Левин, Н. А. Воронов, Э. С. Островский и др.// Двигателестроение.- 1989, № 12. С. 23−24,29.
- Мислёв М.А., Левин Г. Х., Тихоненко С. Г. Роль маховых масс дизельной установки при переходном процессе разгона.// Двигателестроение.- 1984, № 5. С. 11−12.
- Мурашов О.Д. Исследование топливной и экологической эффективности четырёхтактных ДВС при переходных прцессах.// Рабочие процессы, ДВС Всес. Науч. Конф. МАДИ. (1−3 февр. 1982 г.) Тез. докл,/М.:МАДИ. 1982. С. 29−30.
- Мухин А.А. Организация использования машинно-тракторного парка и технология производства работ. М.: Высш. школа, 1983. 368 с.
- Мяленко В.И., Докин Б. Д. Методы экспериментального определения силовых характеристик рабочих органов почвообрабатывающих орудий. Новосибирск.: Новосиб, 1991. 107 с.
- Настенко Н.Н. Корректоры. Дис.. канд. техн. н. Саратов., 1980. 17 с.
- Николаенко А.В., Ложкин В. Н., Фомичёв А. И. Дымность и состав О.Г. диизеля Д-240 в диагностическом тесте.// Двигателестроение.-1991, № 6.-С. 30−32.
- Оценка согласованности ДВС с трансмиссией автомобиля / В. Н. Лавренченко, А. И. Наталевич, А. И. Рябков и др. // Автомобильная промышленность. 1986. — № 7. — С.7.
- Памтахальцев Н. Н, Стхапит P.P. Исследование возможности интенсификации впрыскивания топлива в дизель регулированием начального давления в нагнетательной магистрали.// процессы в тепловых двигателях.СБ. Науч. Труд. УДН. 1988. С. 44−49.
- Патрахальцев Н.Н. Дизельные системы топливоподачи с регулированием начального давления.// Двигателестроение. 1980, № 10. С. 3338.
- Патрахальцев Н.Н. Развитие методов испытания и диагностики ДВС при неустановившихся режимах работы.// Двигателестроение. 1982, № 9. С. 28−31.
- Патрахальцев Н.Н. Рачёт дизельных топливных систем с регулированием начального давления.// Процессы в тепловых двигателях. СБ. Науч. Труд. УДН. М.: 1983. С. 67−74.
- Погодон С.И. Рабочие процессы транспортных турбопоршневых двигателей. М.: Машиностроение. 1978. 312 с.
- Поляк А.Я., Антышев Н. М. Пейсахович Б.И. Тракторы общего назначения на возделывании пропашных культур. М.: Росагропромиз-дат, 1989. 140 с.
- Пьядишев Э.В. Метод приведения характеристик дизелей без наддува к заданных атмосферных условиям. «Тракторы и сельхозмаины», № 2,1967.
- Работа дизелей в условиях эксплуатации: Справочник / А. К. Костин, Б. П. Пугачев, Ю.Ю.Кочинев- Под ред. А. К. Костина. Л.: Машиностроение, 1989. — 283 с.
- Работа топливоподающей аппаратуры дизелей при частичных и переходных режимах / Г. Б. Горелик, Х. Д. Дьяченко, Л. Е. Магидович и др. // Труды ЛПИ. 1970. — № 316. — С.57−64.
- Расчет и оптимизация энергетических показателей тяговых сельскохозяйственных агрегатов / Л. Е. Агеев, Р. Х. Юсупов, В. А. Уртаев и др.- Под ред. Л. Е. Агеев. Спб., 1992. 96 с.
- Режимы работы двигателей энергонасыщенных тракторов / Н. С. Ждановский, А. В. Николаенко, В. С. Шкрабак и др. Л.: Машиностроение, 1981. — 240 с.
- Рославцев А. В, Щитченко С. Н. Особенности современных исследований движения транспортно-технологических средств // Тракторы и с.-х.машины, 2004, N 6. С. 28−30.
- Рославцев А.В., Быков А. А., Третяк В. М. Движение МТА и особенности его агрегатирования // Науч.тр.ВИМ. 2003, Т. 150. С. 30−36.
- Рославцев А.В., Гапанцев Р. С., Куделькин Д. С. Исследование движения машинно-тракторного агрегата // Науч.тр.ВИМ. 2000. Т. 133. С. 151−154.
- Самсонов В.А., Дидманидзе О. Н. Теория и расчет сельскохозяйственного трактора: Учеб. пособие для бакалавров, студентов и магистров вузов по спец. «Механизация сел. хоз-ва» М.: Инж.-экон. ин-т, 1999, — 147 с.
- Скрипец Н.Ф. Исследование путей повышения экономичности тепловозных дизелей типа Д-70 на режимах малых нагрузок и холостом ходу, диссертация на соискание ученой к.т.н. Харьков, 1969, 181с.
- Справочник экономических показателей / Р. И. Тринько, В.В. Лип-чук, В. М. Пилипец и др.- Под ред. Р. И. Тринько. Урожай. М.: 1988. 214 с.
- Старков С.А., Маковеев Ю. П. Тепловая и механическая напряженность двигателя А-41Т в режиме постоянной мощности// Исследование эффективности применения на тракторах двигателей постоянной мощности/ Труды Нати. М.: 1978. Вып. 257. С. 75−79.
- Степанов Г. П. Двигатели боевых машин. М.: Машгиз, 1977. 420 с
- Ташкинов Г. А. Повышение эффективности тракторных дизельных двигателей при эксплуатации зимой в условиях Сибири и Дальнего Востока. В книге «Исследование рабочих процессов двигателей внутреннего сгорания», Ангарск, 1973.
- Теплонапряжённость деталей тракторных двигателей при работе на переменных режимах./ М. П. Зубиетова, Ю. П. Маковеев, М. К. Никольский и др.// Тракторы и сельхозмашины. 1974. № 5. С. 7−8.
- Толстов А.И. Индикаторный период запаздывания воспламенения и динамика цикла быстроходного двигателя с воспламенением от сжатия//Труды НИЛД. 1955. № 1. С. 5−55.
- Толшин В.И. Форсированные дизели: переходные режимы, регулирование. М.: Машиностроение, 1993. — 199 с.
- Толшин В.И., Ковалевский Е. С. Переходные процессы в дизель- генератора. Л.: Машиностроение.Ленингр.Отд. 1977. 168 с.
- Топливные системы и экономичность дизелей / И. В. Астахов, Л. Н. Голубков, В. И. Трусов и др. М.: Машиностроение, 1990. — 288 с.
- Турбонаддув высокооборотных дизелей/ А. Э. Симеон, В. Н. Каминский, Ю. Б. Моргулис и др.- Под ред. П. В. Иванов. М.: Машиностроение,! 976. 288с.
- Хабатов Р.Ш. Эксплуатация машинно-тракторного парка: Учеб.пособие. М.: МСХА., 1993. 108 с.
- Харитончик Е.М. Методы решения проблемы тягового двигателя для тракторов и транспортных машин: труды/ ЧИМЭС. Вып. 4. Челябинск, 1950.
- Хрящев Ю.Е., Слабов Е. П., Матросов Л. П. Об управлении внешней скоростной характеристикой дизеля // Автомобильная промышленность. 1999. № 11. С.7−10.
- Чагар Б.Б. К вопросу о действительной мощности тракторного двигателя при переменной нагрузке: Труды/ ХПИ, Т. 43, Вып. З, Харьков, 1963. С. 51−67.
- Чураков Е.П. Оптимальные и адаптивные системы. М.: Энерго-атомиздат, 1987. 256 с.
- Шуров С.А. Экономичное и эффективное использование мощности тракторного двигателя // Автомобильная и тракторная промышленность. 1950. № 7. С. 10−15.
- Экономическое обоснование внедрения мероприятий научно- технического пргресса в АПК/ Сост.: Ю. А. Конкина. М.: Московский ордена Трудового Красного Знамени институт инженеров сельскохозяйственного производства имени В. П. Горячкина, 1991. 79 с.
- Эминбейли З.Н. Влияние запаса крутящего момента двигателя на тяговые показатели трактора // Механизация и электрификация социалистического сельского хозяйства. 1959. № 2. С. 20−24.
- Adey A.J., Cunliffe F., Mardell J.E. High-Speed Diesel Injection Pump Improved // Automotive Engineering. 1981. V.89, № 7. P.28−35.
- Clark C.A., May M.P., Challen B.I. Transient testing of diesel engines.// SAE Techn. Pap. Ser.- 1984, No 840 348. PP. 1−10.
- Jahns G., Forster K.J., Hellickson M. Computer simulation of diesel engine performance//Transaction of the ASAE.1990. Vol 33(3). C. 764−770.
- Perkins mit power//Bd. Banmachinendienst.-l996.-32, No 3/-p.204−205.1. VBASIC б SOURCE PROGRAM.1. ДВИГАТЕЛЬ «и"МТА.1. Public menuD As Integer
- Private Sub MenchaClick () Formll. sel = Str (3) Forml. Hide Formll.Show End Sub
- Private Sub MenEditClick () Forml. Hide Formll.Show End Sub
- Private Sub MenExitClick ()1. End End Sub
- Private Sub MennorClick () Formll. sel = Str (l) Forml. Hide Form2.Show End Sub
- Private Sub MenRashotClick () Formll. mta = Str (l) Forml. Hide Forml3.Show End Sub
- Private Sub MenvenClick () Formll. sel = Str (2) Forml. Hide Formll.Show End Sub1. Public Sub rashot ()1. Dim count As Integer
- Vhd = 3.1415 * (D / 10) A 2 / 4 * L / 10 / 1000
- DelPaD = DelPaHD * (nd / nHd) A 2 * ((pikpikH) A (1 / nkD)) pkHd = Val (Formll.pkH) connad = Val (Form2.nad) pooo = Val (Form3.P0)1. connad = 1 Then
- Form3.Pk = Round (pooo, 3) pkk = Form3. Pk Elsepkk = pkHd * pikpikH * ((1 DelPaD / Val (Form3. P0)) / (1 — DelPaHD / Val (Form3. P0))) Form3. Pk = Str (Round (pkk, 3)) End If
- TlkV = Round (Val (Form3. TO) * (pkk / pOd) A ((nkD 1) / nkD), 1)1. Form3. Tlk = Str (TlkV)
- DelTkl = Val (Form3. DelTkl)
- PTVd = pkk * (1 / pikpit) * P00 * prj>0 / (P00 -Del PaD) 1 bcx1. Case 3
- PTVd = pkk * (1 / pikpit) * (1.2253 + 0.659 * (pei / PeHD) 0.288 * (pei / PeHD) A 2) A (1 / 2) * POO * prpO / (POO — DelPaD) 1 -rex Case Else
- PTVd = (1.035 + Val (PrHll / POO * (1 0.035 * (POO / PrHll) * (nd / nHd) A 2))) * (0.451 + 0.549 * (pei / PeHD)) * POO End Select
- Form3.PTV = Str (Round (PTVd, 3))1. Else1. PTVd = Val (Form3.PTV)1. End If COU К = 0
- Form3.Tr = Str (Val (Form7.Tr2))
- TrD = Round (Val (Form3.Tr), 1)1. DelTD = Val (Form3.DelT)ru = pkk * 1 000 000 / (287 * TlkV) ruH = pkHd * 1 000 000 / (287 * 423.2)
- DelPaS = DelJPaHD * (nd / nHd) A 2 * (ru / ruH)1. Form3. DElP = ««1. connad = 2 Then
- Form3.DElP = Str (DelPaS) Paa = Round (pkk DelPaS, 3) Else
- DelPaS = Val (Form3.DElP) Paa = pkk DelPaS End If1. Form3. Pa = Paa1. CCC = Val (Form2.CC)gamad = (TkV + DelTD) / TrD * PTVd / ((CCC) * (Paa) PTVd) Form3. Gama = Round (gamad, 3)
- Tad = Round ((TkV + DelTD + gamad * TrD) / (1 + gamad), 1) Form3. Та = Tadeta = (TkV * (CCC * Paa PTVd)) / (((TkV + DelTD) * (CCC — 1) * (pkk))) Form3. EtaV = eta
- Kll = 1.453 3.08 * 10 A -3 * CCC — 1.84 *
- A -4 * Tad + 6.12 * 10 A -5 * CCC A 2 +688 * 10 A -7 * CCC * Tad + 5.96 * 10 A -8 * Tad A 2nl = Kll Val (Form4.Deln)pcc = Paa * CCC A nl1. Tco = Tad * CCC A (nl 1)1. Form4. Kl = nl1. Form4. Po = Str (pcc)1. Form4. Tc = Str (Too)
- CC = Round (Val (Form5.C), 3)
- HH = Round (Val (Form5.H), 3) oo = Round (Val (Form5.0), 3)
- Huu = Round (Val (Form5.Hu), 3)1.o = Round (1 / 0.208 * (CC / 12 + HH / 4 oo / 32), 3)1. Form5. L0 = Str (Loo)
- Form5.Ml = Str (Loo * Val (Forro2.kB))
- Form5.Mr = Str ((gama d * Val (Form5.Ml)))
- FormS.М2 = Round (CC / 12 + HH / 2 + (Val (Form2.kB) 0.208) * Loo, 3)
- XI = Val (Str (Form5.M2)): X2 = Val (Form5.Ml): xx = XI / X2
- Form5.mio0 = Str (Round (xx, 2))zz = X2 * gamad1. Form5. Mr = Round (zz, 3) mio = Round ((XI + zz) / (X2 + zz), 2)1. Form5. miod = Str (mio)
- Form5.Ll = Str (Round ((8 / 3 * CC + 8 * HH oo) * (1 / 0.23), 2))cvld = 20.521 + 2.75 * 0.001 * (Tcc 273)585 * 10 A -8 * (Tcc 273) A 2 — 1.1 *10 A -10 * (Tcc 273) A 3
- Form6.cvl = Round (cvld, 3)
- A2 «21.097 + 0.921 / Val (Form2.kB)
- B2 = (15.491 + 13.816 / Val (Form2.kB)) * 10 A -4rud = Val (Formll.ruH)rul = rud * (1 ((rud — 1) / rud) *1 (pei / Val (Formll.PeH))))
- Select Case count Case 1, 2
- Form6.ksi = Round (Val (Formll.ksiH) * (0.71 * (Val (Form6.lnda) / Val (Formll.landaH)) + 0.29), 3) • bcx Case 31Form6. ksi = 0.73 *************** landachicti = mio * Val (Form6.Tz) / rul / Tcc ' -f End Select
- Forml2.ksi = Form6. ksi Forml7.ksi = Form6. ksi s = (cvld + Val (Form6.lnda) * 8.314) *
- Tcс + Val (Form6.ksi * Huu / Val (Form2.kB) /1.o / (1 + gamad))
- Jazr = (mio * (A2 + 8.314) A 2 + 4 * mio * B2 * s) A (½) Form6. Tz = Round ((-mio * (A2 + 8.314) + Jazr) / (2 * mio * B2), 1)
- Form6.Pzl = Round (pcc * Val (Form6.lnda), 1)
- Form6.pz = Round ((Form6.fiz) * (Form6.Pzl), 1)
- Form6.ru = Round (mio * Val ((Form6.Tz)) /
- II <25 Then II = II + 1 Else Exit Do1. ru f> rul Then D landa =0.05 Else D landa = -0.051.op While Abs (rul ru f) >0.05
- Tzz = Val (Form6.Tz) KBb = Val (Form2.kB)
- Form7.delta = Round (CCC / Form6.ru, 2) Del = Form7. deltak2d = 1.41 7.98 * 10 A -5 * Tzz — 3.74 * 10 A -21 / KBb) + 1.45 * 10 A -3 * Del + 1.31 * 10 A -8
- Tzz A 2 6.41? 10 A -6 * Tzz * (1 / KBb) — 1.28
- A -7 * Tzz * Del + 6.14 * 10 A -3 * (1 / KBb) A 2266 * 10 A -5 * Del * (1 / KBb) 2.19 * 10 A -5 * Del A 21. count = 1 Or count = 2 Then
- Form7.n2 = Round (k2d Val (Form7.Deln2), 3) End If1. count = 3 Then
- Delnd = Val (Formll. delnH) * pei / Val (Formll. PeH) Form7. Deln2 = Round (Delnd, 3) Form7. n2 = Round (k2d Val (Form7.Deln2), 3) End If
- Forml2.del7n2 = Str (Val (Form7.Deln2)) Forml2. k2 = Round (k2d, 3) Forml7. del7n2 = Str (Val (Form7 .Deln2)) Forml7. k2 = Round (k2d, 3)
- Form8. Pi = Round (pildd * Val (Form8. fijp), 3) Form8. etai = Round (Form8.Pi * Val (Form5.Ll)
- Val (Form2.kB) / (Huu / 1000 * ru * eta), 2) Form8. gi = Round (3600 / Huu / Form8. etai * 1000, 1)1. Val (Form2.CM) = 1 Thenaa = 0.067: bb = 5.2 * 0.1 Elseaa = 0.092: bb = 1.01 * 0.0001 End If
- Form9. Pm = Round (aa + bb * Form2. n, 3) Form9. pe = Round (Form8.Pi Form9. Pm, 3) Form9. etam = Round (Fonn9,pe / Form8. Pi, 2) Form9. etae = Round (Form8.etai * Form9. etam, 2) Form9. ge = Round (3600 / Form9. etae / Huu * 1000, 1)
- COU Pe < 20 Then COU Pe = COU Ре + 1 Else Exit Do
- Petest = Form9. pe Loop While Abs (Petest pei) > 0.001
- Forml2.pe = Form9. pe Forml2.ge = Form9. ge Forml7.pe = Form9. pe Forml7.ge = Form9. ge
- FormlO.Ni = Round (Form8.Pi * Fozm2. Vl * Form2. n / 120, 1) FormlO. Ne = Round (FormlO.Ni * Form9. etam, 1) FormlO. Ni = Round (FormlO.Ne / Form2. Vl, 1) FormlO. Np = Round (Form9.pe * (Form2.L / 100) * Form2. n /30/4, 1)
- FormlO.Mk = Round (FormlO.Ne * 30 000 / 3.1415 / Form2. n, 1)
- Form9.Gt = Round (FormlO.Ne * Form9. ge / 1000, 1)1. Forml2. Ne = FormlO. Ne1. Forml2. Mk = FormlO. Mk1. Forml7. Ne = FormlO. Ne1. Forml7. Mk = FormlO. Mk1. End Sub
- Public Sub FileEngine () comta = Val (Formll.mta)1. Select Case comta Case 1
- Forml6.Combo2.Text = Forml6. Combo2. List (0) Then Open «C:D240.txt» For Input As #1
- GoSub Arman Close #1 End If Case Else
- Combol.Text = Combol. List (O) Then Open «C:D245.txt» For Input As #11. GoSub Arman Close #11. End If
- Combol.Text = Combol. List (1) Then Open «C:D240.txt» For Input As #11. GoSub Arman Close #11. End If
- Combol.Text = Combol. List (2) Then Open «C:D120.txt» For Input As #11. GoSub Arman Close #11. End If
- End Select Exit Sub Arman:1.put #1, DD, LL, II, CCC, OXX, CMM, nadd, nHH, PeHF, DelpaHH, pkHH, PrHH, pikpitt, ksiHH, landaHH, delnHH Form2. D = Str (DD): Form2. L = Str (LL):
- Form2.I = Str (II): Form2. CC = Str (CCC): Form2.0X = Str (OXX) Form2. CM = Str (CMM): Form2. nad = Str (nadd):
- Formll.nH = Str (nHH): Formll. РеН = Str (PeHF): Formll. DelPaH = Str (DelpaHH) Formll. pkH = Str (pkHH): Formll. PrH = Str (PrHH): Formll. pikpit = Str (pikpitt): Formll. ksiH = Str (ksiHH) Formll. landaH = Str (landaHH): Formll. delnH = Str (delnHH) Return1. End Sub
- Private Sub CalculateClick () Form2. FileEngine rashot End Sub
- Private Sub CommandlClick ()1. End End Sub
- Private Sub CommandlOClick () Form2. Hide Form7.Show End Sub
- Private Sub CommandllClick () Form2. Hide Form8.Show End Sub
- Private Sub Commandl2Click () Form2. Hide Form9.Show End Sub
- Private Sub Commandl3Click () Form2. Hide FormlO.Show End Sub
- Private Sub Commandl4Click () Combol. Addltem A 120 Combol. Addltem A — 240 End Sub
- Private Sub Commandl5Click ()
- Combol.Removeltem (Combol.Listlndex) End Sub
- Private Sub Command2Click ()1. Form4. Show End Sub
- Private Sub Command3Click () Form2. Hide Form3.Show End Sub
- Private Sub Command4Click () cou = Val (Formll.sel)1. Select Case cou1. Case 1
- Form2.Hide Forml. Show Case 2
- Form2.Hide Forml2. Show Case 3
- Form2.Hide Forml7. Show End Select End Sub
- Private Sub Command5Click () Form2. Hide Form3.Show End Sub
- Private Sub Coinmand6Click () Form2. Hide Forml.Show End Sub
- Private Sub Command7 Click () Form2. Hide Form4.Show End Sub
- Private Sub Command8Click () Form2. Hide Form5.Show End Sub
- Private Sub Command9Click () Form2. Hide Form6.Show End Sub1. Private Sub DChange ()1. D = Val (D.Text) End Sub1. Private Sub FormLoad ()
- Combol.Addltem 11Д 245» Combol. Addltem «Д — 240» Combol. Addltem «Д — 120» Combo l. Addltem «Др. «End Sub1. Private Sub T0Change ()
- TOd = Val (TO.Text) End Sub1. Private Sub CalMTAClick ()
- For n = nmi To nma Step Dn byk2 = 0.1: bykl = 0.11. Dobyk2 = bykl
- Vp = 3.1415 * n * RR / 30 / Itr (I) * (1 byk2) * 3.6
- Ragr = Kprmi * Bpp * (1 + epcc * (Vp V00)) + BAA * Sin (alfaa * 3.1415 / 180) +(Sin (alfaa * 3.1415 / 180) + fpp — fOO) * BTT pkrr = R agr / etauubykl = (pkrr A 2 * aa + pkrr * bb + CC) / 100 MK1 = (pkrr + BTT * fOO + BTT *
- Sin (alfaa * 3.1415 / 180)) * RR * 1000 / Itr (I) / etaTT Loop While Abs (byk2 bykl) ≥ 0.001
- MK1
= Vmi And Vp ≤ Vma And pkrr ≤ pkr Then CountMSF = CountMSF + 1 MSFlexGridl. Row = CountMSF MSFlexGridl. CellAlignment = 3 MSFlexGridl. Col = 0 MSFlexGridl. Text = CountMSF - MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 1 MSFlexGridl. Text = n
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 6 MSFlexGridl. Text = Round (MK1, 1)
- MSFlexGridl.CellAlignment = 31. MSFlexGridl. Col = 7
- MSFlexGridl.Text = Round (Itr (I), 1)
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 8 MSFlexGridl. Text = Round (Vp, 1)
- MSFlexGridl.CellAlignment = 31. MSFlexGridl. Col = 9
- MSFlexGridl.Text = Round (pkrr, 1)
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 10
- MSFlexGridl.Text = Round (bykl * 100, 0)
- MSFlexGridl.CellAlignment = 31. MSFlexGridl. Col =14
- MSFlexGridl.Text = Round (Ragr, 1)
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col =11
- MSFlexGridl.Text = Round (pkrr * Vp / 3.6, 1)
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 13 MSFlexGridl. Text = I
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 15
- MSFlexGridl.Text = Round (0.1 * Vp * Bpp, 2) End If Next n Next I к = 0
- For n = nmi To nma Step Dn к = к + 11.stl.Addltem Str (n) Next n
- Formll.sel = Str (3) For H = 1 To CountMSF MSFlexGridl. Row = H MSFlexGridl. Col = 1 Form2. n = MSFlexGridl. Text MSFlexGridl.Col = 6 mkagr = MSFlexGridl. Text1. For TT = 0 To к 1
- Trim (Form2.n) = Trim (Listl.List (TT)) Then Form6. ksi = List2. List (TT)
- Exit For End If Next TT alfa = 1 aa = 1: bb = 3 Do While Abs (aa bb) > 1 xx = Str (Round (alfa, 3)) Form2. kB = xx Form2. rashot aa = Val (mkagr) bb = Val (FormlO.Mk) alfa = alfa + 0.001 Textl. Text = Form2. n Text2.Text = mkagr Loop
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 2 MSFlexGridl. Text = Form2. kB
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 3 MSFlexGridl. Text = Form9. Gt
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 4 MSFlexGridl. Text = Form9. ge
- MSFlexGridl.CellAlignment = 3 MSFlexGridl. Col = 5 MSFlexGridl. Text = FormlO. Ne
- MSFlexGridl.Col = 11 NkrT = MSFlexGridl. Text MSFlexGridl. CellAlignment = 3 MSFlexGridl. Col = 12
- MSFlexGridl.Text = Round (Form9.Gt / NkrT * 1000,
- MSFlexGridl.Col = 15 WAgr = MSFlexGridl. Text MSFlexGridl. CellAlignment = 3 MSFlexGridl. Col =16
- MSFlexGridl.Text = Round (Form9.Gt / WAgr, 2)1. Next Hf *****************************(I **********r*******************I1. CountRow = 1
- MSFlexGridl.Row = CountRow MSFlexGridl. Col = 4 First = MSFlexGridl. Text
- For H = 2 To CountMSF MSFlexGridl. Row = H Second = MSFlexGridl. Text If Second < First Then First = Second CountRow = H End If Next H
- MSFlexGridl.Row = CountRow MSFlexGrid2. Row = 1 MSFlexGrid2. CellAlignment = 3 MSFlexGrid2. Col = 4 MSFlexGrid2. Text = Temp
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 11. MSFlexGrid2. Col = 1
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 61. MSFlexGrid2. Col = 6
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 21. MSFlexGrid2. Col = 2
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 31. MSFlexGrid2. Col = 3
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 41. MSFlexGrid2. Col = 4
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 51. MSFlexGrid2. Col = 5
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 71. MSFlexGrid2. Col = 7
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 3 MSFlexGridl. Col = 8 MSFlexGrid2. Col = 8
- MSFlexGrid2.Text = MSFlexGridl. Text
- HSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 91. MSFlexGrid2. Col = 9
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 101. MSFlexGrid2. Col = 10
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col =111. MSFlexGrid2. Col = 11
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 121. MSFlexGrid2. Col = 12
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 131. MSFlexGrid2. Col = 13
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col =141. MSFlexGrid2. Col = 14
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 151. MSFlexGrid2. Col = 15
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 161. MSFlexGrid2. Col =16
- MSFlexGrid2.Text = MSFlexGridl. Text4r ********************************* 1**********************************1. CountRow = 1
- MSFlexGridl.Row = CountRow MSFlexGridl. Col = 15 First = MSFlexGridl. Text
- For H = 2 To CountMSF MSFlexGridl. Row = H Second = MSFlexGridl. Text If Second > First Then First = Second CountRow = H End If Next H
- MSFlexGridl.Row = CountRow MSFlexGrid2. Row = 2 MSFlexGrid2. CellAlignment = 3 MSFlexGrid2. Col =151. MSFlexGrid2. Text = Temp
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 11. MSFlexGrid2. Col = 1
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 61. MSFlexGrid2. Col = 6
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment 31. MSFlexGridl. Col = 21. MSFlexGrid2. Col = 2
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 31. MSFlexGrid2. Col = 3
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 41. MSFlexGrid2. Col = 4
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 51. MSFlexGrid2. Col = 5
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 71. MSFlexGrid2. Col = 7
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 81. MSFlexGrid2. Col = 8
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 91. MSFlexGrid2. Col = 9
- MSFlexGrid2 .Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 101. MSFlexGrid2. Col =10
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col =111. MSFlexGrid2. Col =11
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 121. MSFlexGrid2. Col = 12
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGr±d2.CellAlignment = 31. MSFlexGridl. Col =131. MSFlexGrid2. Col = 13
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 141. MSFlexGrid2. Col =14
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2. CellAlignment = 31. MSFlexGridl. Col = 151. MSFlexGrid2. Col = 15
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col =161. MSFlexGrid2. Col = 16
- MSFlexGrid2.Text = MSFlexGridl. Text1.*********************************! 1**********************************11. CountRow = 1
- MSFlexGridl.Row = CountRow MSFlexGridl. Col =16 First = MSFlexGridl. Text
- For H = 2 To CountMSF MSFlexGridl. Row = H Second = MSFlexGridl. Text If Second < First Then First = Second CountRow = H End If1. Next H
- MSFlexGridl.Row = CountRow MSFlexGrid2. Row = 3 MSFlexGrid2. CellAlignment = 3 MSFlexGrid2. Col = 16 MSFlexGrid2. Text = Temp
- MSFlexGrid2. CellAlignment = 31. MSFlexGridl. Col = 11. MSFlexGrid2. Col = 1
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 61. MSFlexGrid2. Col = 6
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 21. MSFlexGrid2. Col = 2
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 3 MSFlexGridl. Col = 3 MSFlexGrid2. Col = 3
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 41. MSFlexGrid2. Col = 4
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 51. MSFlexGrid2 .Col = 5
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 71. MSFlexGrid2. Col = 7
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 81. MSFlexGrid2. Col = 8
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 91. MSFlexGrid2. Col = 9
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 101. MSFlexGrid2. Col = 10
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 111. MSFlexGrid2. Col = 11
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 121. MSFlexGrid2. Col = 12
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 131. MSFlexGrid2. Col = 13
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col =141. MSFlexGrid2. Col = 14
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 31. MSFlexGridl. Col = 151. MSFlexGrid2. Col = 15
- MSFlexGrid2.Text = MSFlexGridl. Text
- MSFlexGrid2.CellAlignment = 3 MSFlexGridl. Col =16 MSFlexGrid2. Col = 16 MSFlexGrid2. Text = MSFlexGridl. Text End Sub
- EXCEL SOURCE PROGRAM «ДВИГАТЕЛЬ «и МТА.1. Sub run () Do1. Do
- Worksheets («Sheet2»).Cells (98,10).Value= Worksheets («Sheet2»).Cells (98, 10).Value + Deta If Worksheets («Sheet2n).Cells (54, 10).Value = 2 Then Do
- Worksheets («Sheet2»).Cells (11,10).Value= Worksheets («Sheet2»).Cells (322, 10).Value peup = Worksheets («Sheet2»).Cells (11, 10).Value pedown = Worksheets («Sheet2»).Cells (322, 10).Value Loop While Abs (pe up pe down) > 0.0001
- Startl = Worksheets («w»).Cells (12, 14).Value Endl = Worksheets («w»).Cells (12, 15).Value1. For i = Startl To Endl
- Worksheets («w»).Cells (i, 12).Value>
- Worksheets («w»).Cells (i, 13).Value Then Worksheets («w»).Cells (i, 13).Value= Worksheets («w»).Cells (i, 12).Value + 0.01 End Ifbyksl = Worksheets (11 w») .Cells (i, 12) .Value byks2 = Worksheets («w»).Cells (i, 13).Value
- Do While Abs (((Worksheets («w»).Cells (i, 12).Value) -byks2))> 0.0005byks2 = byks2 0.1
- Worksheets («w»).Cells (i, 13).Value = byks21. op Next i1. End Sub Sub mlm2()
- Start2 = Worksheets («w»).Cells (12, 18).Value End2 = Worksheets (V) .Cells (12, 19) .Value1. For J = Start2 To End2
- Worksheets («w»).Cells (13, 9).Value = J Worksheets («Sheet2»).Cells (12,10).Value= Worksheets («w»).Cells (J, 2).Value Worksheets («Sheet2»).Cells (20,10).Value= Worksheets («w»).Cells (J 1, 3).Value1. Call run
- Do While Abs (((Worksheets («w»).Cells (i, 8).Value)
- Worksheets («w»).Cells (J, 9).Value))) >0.31. (Worksheets («w»).Cells (i, 8).Value) < (Worksheets (V) .Cells (J, 9) .Value) Then Worksheets («Sheet211). Cells (20,10) .Value= Worksheets («Sheet2»).Cells (20, 10).Value 0.0021. Else
- Worksheets («Sheet2»).Cells (20,10).Valae= Worksheets («Sheet2»).Cells (20, 10).Value + 0.002 End If1. Call run1. op
- Worksheets «w» .Cells (J, 3).Value=
- Worksheets «w» .Cells (i, 3).Value
- Worksheets «w» .Cells (J, 4). Value=
- Worksheets «w» .Cells (i, 4).Value
- Worksheets «w» .Cells (J, 5).Value=
- Worksheets «w» .Cells (i, 5).Value
- Worksheets «w» .Cells (J, 6).Value=
- Worksheets «w» .Cells (i, 6).Value
- Worksheets «w» .Cells (J, 7).Value=
- Worksheets 11 w» .Cells (i, 7).Value
- Worksheets «w» .Cells (J, 8).Value=
- Worksheets «w» .Cells (i, 8).Value
- Worksheets («w»).Cells (13, 9).Value = J Next J1. End Sub