Диагностика отказов распределительных электрических сетей напряжением 6-10 кВ сельскохозяйственного назначения
Диссертация
В третьем разделе развивается идея создания опорной системы координат, относительно которой строятся оценки спектра, ускоренной обработки информационных, измеримых свойств исследуемого процесса, Ясно, что обмен колебательной энергии порождает дисперсию, сложное вхождение спектрального параметра и в системах уравнений на основе асимптотической аппроксимации, и это обстоятельство позволило строить… Читать ещё >
Содержание
- СОДЕРЖАНИЕ РАБОТЫ
- ПРАКТИЧЕСКАЯ ЦЕННОСТЬ РАБОТЫ
- РАЗДЕЛ 1. АНАЛИЗ МЕТОДОВ И СРЕДСТВ ПОИСКА ОТКАЗОВ В КАБЕЛЬНЫХ ЛИНИЯХ ЭЛЕКТРОПЕРЕДАЧИ
- 1. 1. Структуры кабельных сетей и проблемы их эксплуатации
- 1. 2. Режимы работы нейтрали кабельных сетей и их влияние на отказы
- 1. 3. Анализ методов и средств поиска отказов в кабельных линиях электропередачи
- 1. 4. Схема замещения кабельной сети, основные аналитические оценки и анализ процессов сопровождения отказов
- Выводы
- РАЗДЕЛ II. ИНФОРМАЦИОННЫЕ ПРИЗНАКИ ЭЛЕКТРОМАГНИТНОГО ПОЛЯ НАД ТРАССОЙ КАБЕЛЬНОЙ ЛИНИИ ЭЛЕКТРОПЕРЕДАЧИ
- 2. 1. Формирование результирующего электромагнитного поля расстекающимися в месте замыкания токами в земле
- 2. 2. Анализ спектра частот
- 2. 3. Оценки информационных признаков электромагнитного поля в местах отказов
- 2. 4. Экстремальные переходы на спектре частот
- ВЫВОДЫ
- РАЗДЕЛ III. РАЗРАБОТКА МЕТОДА ПОИСКА ОТКАЗОВ НА ЛИНИЯХ ЭЛЕКТРОПЕРЕДАЧИ НА НАПРЯЖЕНИИ И ЧАСТОТЕ СЕТИ
- 3. 1. Оценка амплитуднозависимых фазовых сдвигов результирующего поля вдоль трасс прокладки
- 3. 2. Разработка абсолютного метода поиска отказов на напряжении и частоте сети
- 3. 3. Абсолютный метод поиска отказов с учетом неустойчивости колебаний на спектре частот. 60 3.4.0бщий характер движения процессов в контуре нулевой последовательности при наличии отказа
- Выводы
- РАЗДЕЛ IV. УСКОРЕННАЯ ОБРАБОТКА ИНФОРМАЦИИ ПО ВЫЯВЛЕНИЮ ОТКАЗОВ И ЭКСПЕРИМЕНТАЛЬНЫЕ РЕЗУЛЬТАТЫ
- 4. 1. Информационные признаки и условия однозначной разрешимости задачи на основе анализа характера амплитудной характеристики тока в месте отказа
- 4. 2. Оценки влияния частоты колебаний на определение места отказа
- 4. 3. Построение алгоритма по поиску отказа
- 4. 4. Физическая модель и экспериментальные исследования
- Выводы
Список литературы
- Андронов А. А, Витт A.A., Хайкин С. Э. Теория колебаний. М.:ФМЛ, 1981, 568с.
- Андреев B.C. Теория нелинейных электрических цепей. М.: Связь, 1972, 326 с.
- Алдошкин Ю.Г. О методе Крылова Боголюбова. — Вестник МГУ, серия 1, 1972, № 3, с. 97−104.
- Баутин H.H., Леонтович Е. А. Методы и приемы качественного исследования динамических систем на плоскости. М.: Наука, 1976, 495 с.
- Боголюбов H.H., Митропольский Ю. А. Асимптотические методы в теории нелинейных колебаний. М.: Физматгиз, 1963, 410 с.
- Брюно А.Д. Локальный метод нелинейного анализа дифференциальных уравнений. М.: Наука, 1979,225 с.
- Брюно А.Д. Асимптотика решений нелинейных систем дифференциальных уравнений. -Дан СССР, 1962,143, № 4, с 763.
- Брюно А.Д. Нормальная форма дифференциальных уравнений. ДАН СССР, 1964, 157, № 6, с. 1276−1279.
- Беляков H.H. Исследование перенапряжений при дуговых замыканиях на землю в сетях 6 и 10 кВ с изолированной нейтралью. Электричество, 1957, № 5, с. 25 — 30.
- Березовский А.Ф. Расчет установившегося режима в цепях с нелинейными индуктивностями. Электричество. 1981, № 5, с 71 — 74.
- Бугров Я.С., Никольский С. М. Элементы линейной алгебры и аналитической геометрии. М.: Наука 1980, с. 135−159.
- Бессонов Л.А. Нелинейные электрические цепи. М.: Высшая школа, 1977, 343 с.
- Бессонов Л.А. Автоколебания в электрических сетях со сталью. М.:Госэнергоиздат, 1958,304 с.
- Быков М.А., Шуцкий В. И., Гончар H.A. Новый способ непрерывного контроля изоляции трехфазных шахтных электрических сетей с изолированной нейтралью. М.: Сборник научных трудов МГИ, 1972, Вып. V.
- Вильгейм Р., Уотерс А. Заземление нейтрали в высоковольтных системах. М.: ГЭИ, 1959,416 с.
- Веников В.А. Переходные электромеханические процессы в электрических системах. М.: Высшая школа, 1970, 460 с.
- Валеев К.Г., Мисак В. В. Об устойчивости почти периодического решения обобщенного уравнения Дуффинга. Киев. Наука, 1972, вып. 12, с. 9−13.
- Валеев К.Г., Ганиев А. Ф. Исследование колебаний нелинейных систем. Высшая школа, 1981, 367 с.
- Ван-дер-Поль Б., Бремер X. Операционное исчисление на основе двухстороннего преобразования Лапласа. М. ИИЛ, 1952, 507 с.
- Валеев К.Г., Мисак В. В. Исследование колебаний нелинейных систем. Прикл. матем., 1973, 9, вып.2. с.53−59.
- Валеев К.Г. Исследование колебаний в автономной квазилинейной системе в резонансном случае. Прикл. механ., 1969, 5, вып.4, с. 25−31.
- Валеев К.Г. Об устойчивости решений линейных дифференциальных уравнений второго порядка с синусоидальными коэффициентами. Изв. вузов. Радиофизика, 1962, т.5 № 4, с.36−42.
- Васильева А.Б., Бутузов В. Ф. Асимптотические разложения решений сингулярно возмущенных уравнений. М.: Наука, 1973,272 с.
- Гантмахер Ф.Р. Теория матриц. М.: Наука, 1967, 575 с.
- Градштейн И.С., Рыжик И. М. Таблицы интегралов, сумм, рядов и произведений. М.: Наука, 1971, с.379−537.
- Гореев A.A. Переходные процессы синхронной машины. JL: Госэнергоиздат, 1950, 312 с.
- Гребенников Е.А., Рябов A.A. Конструктивные методы анализа нелинейных систем. М.: Наука, 1979, 431 с.
- Городецкий Я.А. Приближенные метод анализа некоторых нелинейных систем при наличии случайного сигнала. Электричество, 1974, № 2, с. 65−69.
- ДолгиновА.И. Резонанс в электрических цепях и системах. M.-JL: ГЭИ, 1957,328 с.
- Долин П.А. Основы техники безопасности в электрических установках. М.: Энергия, 1970, 336 с.
- Жуховицкий Б.Я., Негневицкий И. Б. Теоретические основы электротехники. М.: Энергия, 1965, 234 с.
- Жарков Ф.П., Соколов В. А. Цепи с переменными параметрами. М.: Энергия, 1976, 212 с.
- Заездный A.M. Гармонический анализ в радиотехнике и электросвязи. Л.: Энергия, 1972, 527 с.
- Заездный A.M. Основы расчета нелинейных и параметрических радиотехнических цепей. М., Связь, 1974,447 с.
- Исмаилов Э. И. Рахимов Г. Р. Метод фазовой аппроксимации. Ташкент.: Уктувчи, 1972, 172 с.
- Ивашев В.И., Парилис И. И. Колебания в нелинейных электрических системах. Ташкент: ФАН, 1967,178 с.
- Корн Г., Корн Т. Справочник по математике. М.: Наука, 1978, 831 с.
- Колосюк В.П. Защитное отключение рудничных установок. М.: Недра, 1980, 334 с.
- Ломов С.А. Введение в общую теорию сингулярных возмущений. М.: Наука, 1981, 389 с.
- Лихачев Ф.А. Замыкание на землю в сетях с изолированной нейтралью и компенсацией емкостных токов. М.: Энергия, 1971, 152 с.
- Лихачев Ф.А. Выбор, установка и эксплуатация дугогасящих аппаратов. М.: ГЭИ, 1954, 144 с.
- МалкинИ.Г. Теория устойчивости движения. М.: Наука, 1996, 530 с.
- Манделынтамм Л.И. Полное собрание трудов под редакцией Рыжова С.М. М.: Изд-во АН СССР, 1948−1955, 352 с.
- Манделынтамм Л.И. Лекции по теории колебаний. М.: Наука, 1972, 470 с.
- Мищенко Е.Ф., Розов Н. Х. Дифференциальные уравнения с малым параметром и релаксационные колебания. М.: Наука, 1975, 274 с.
- Митропольский Ю.А. Асимптотические и качественные методы в теории нелинейных колебаний. Киев: Изд-во АН УССР, 1971, 242 с.
- Митропольский Ю.А., Лопаткин А. К. О преобразовании систем нелинейных дифференциальных уравнений к нормальной форме. Киев: Наукова думка, 1973, Вып. 14, с. 125−140.
- Митропольский Ю.А., Лыкова О. Б. Исследование поведения решений нелинейных уравнений в окрестности положения равновесия. Сб. мат. физ. Киев: Наукова думка, 1965, с. 74−96.
- Мак-Лахлан Н. В. Теория и приложения функции Матье. М.: ИИЛ, 1953, 178 с.
- Неймарк Ю.Н. Методы точечных отображений в теории нелинейных колебаний. М.: Наука, 1972, 471 с.
- НайфельдМ.В. Заземление, защитные меры безопасности. М.: Энергия, 1971, 311 с.
- Попов Е.П. Прикладная теория процессов управления в нелинейных системах. М.: Наука, 1973, 538 с.
- РюденбергР. Переходные процессы в электроэнергетических системах. М.: ИИЛ, 1955, 714 с.
- Розенвассер Е.Н. Колебания нелинейных систем. Метод интегральных уравнений. М.: Наука, 1969, 576 с.
- Розо М. Нелинейные колебания и теория устойчивости. М.: Наука, 1971,288 с.
- Сирота И.М. Переходные процессы в компенсированной сети при замыкании фазы на землю. В кн. Вопросы устойчивости и автоматики энергетических систем. — Киев: Изд-во АН УССР, 1959, с. 56−75.
- Сирота И. М Влияние режимов нейтрали в сетях 6−35 кВ на условия безопасности. В кн. Режимы нейтрали в электрических системах. — Киев: Наукова думка, 1974, с. 84−104.
- Татур Т.А. Основы теории электрических цепей. М.: Высшая школа, 1980, 249 с.
- Теодорчик К.Ф. Автоколебательные системы. М.: Гостехиздат, 1952, 272 с.
- Ульянов С.А. Электромагнитные переходные процессы в электрических системах. М.: Энергия, 1964, 704 с.
- Фельдбаум A.A. Введение в теорию нелинейных цепей. М.:ГЭИ, 1948, 314 с.
- Филиппов Е. Нелинейная электротехника. М.: Энергия, 1976, 288 с.
- Хаяси Т. Нелинейные колебания в физических системах. М.: Мир, 1968,432 с.
- Хьюз В. нелинейные электрические цепи. М.: Энергия, 1967, 336 с.
- Чернобровое П.В. Релейная защита. М.: Энергия, 1974,240 с.
- Султанов Г. А., Чайкин В. П., Чайкин В. В. Метод функциональной диагностики элементов структуры систем электроснабжения. Труды Кубанского госуд. аграр. ун-та. Выпуск 360(388). 1997.
- Султанов Г. А., Чайкин В. П., Чайкин В. В. Решение некорректной задачи по отысканию отказов в электрических сетях на основе регуляризирующих алгоритмов. Тезисы докл. региональной научно-практ.конф.Кубанский госуд.техн.ун-т.Вып. 165.1998.
- Султанов Г. А., Чайкин В. П., Чайкин В. В. Поиск мест повреждения изоляции кабельных линий электропередачи без отключения потребителей. Тезисы докл. региональной научно-практ. конф. Кубанский госуд. аграрный ун-т.Вып.370(398).1998.
- Султанов Г. А., Чайкин В. П., Чайкин В. В. Информационные признаки отказов кабельных линий электропередачи. Тезисы докл. научно практ.конф.Кубанский госуд.аграр.унт.Вып.370(398).1998.
- Султанов Г. А., Чайкин В. П., Демченко В. Т. Система автоматизированного контроля, технической диагностики и управления сети. Тезисы докл. научно-практ.конф.Кубанский госуд.технол.ун-т.Вьш. 165.1998.
- Султанов Г. А., Чайкин В. П., Чайкин В. В. Обработка априорной информации на основе построения регуляризирующих алгоритмов. Тезисы докл. научно-практ.конф.Кубанскийгосуд.аграр.ун-т.Вып.201.1998.
- Султанов Г. А., Чайкин ВН., Чайкин В. В. Перспективные системы электроснабжения сельскохозяйственного назначения. Труды кубанского госуд.аграр.ун-та.Вып. 201.1998.
- Султанов Г. А., Чайкин В. П., Чайкин В. В. Исследование структуры электромагнитного поля над трассой кабельной линии электропередачи при наличии дефекта изоляции относительно земли. Труды кубанского госуд.аграр.ун-та.Вып.370(398).1998.
- Проблемы городских электрических сетей в современных условиях. СУЛТАНОВ Г. А., ЧАЙКИН В.П., ДЕМЧЕНКО В.Т., ЧАЙКИН В.В. М.: Промышленная энергетика, №, 1998.
- Информационные признаки отказов кабельных линий электропередачи.М.: Промышленная энергетика, №, 1998.
- Автоматизированная система контроля изоляции и технической диагностики сети. СУЛТАНОВ Г. А., ЧАЙКИН В.П., ДЕМЧЕНКО В.Т., ЧАЙКИН В.В. М.: Энергетик, №, 1998.
- КОНФЕРЕНЦИЯ ЭНЕРГЕТИКОВ И ЭЛЕКТРОТЕХНИКОВ ГОРОДОВ РОССИИ «ПРОБЛЕМЫ ЭЛЕКТРИЧЕСКИХ СЕТЕЙ ГОРОДОВ». СУЛТАНОВГ.А."Автоматизированный контроль изоляции и техническая диагностика сети" .Геленджик, 1998.
- РОССИЙСКАЯ НАУЧНО-ТЕХНИЧЕСКАЯ КОНФЕРЕНЦИЯ «Городские электрические сети в современных условиях». СУЛТАНОВ Г. А. «Система двухканальной компенсации возмущений в системах электроснабжения». С-ПЕТЕРБУРГ 1998.
- ПЕРЕЧЕНЬ ИСПЫТАТЕЛЬНОГО и ТЕХНОЛОГИЧЕСКОГО ОБОРУДОВАНИЯ ИСПОЛЬЗОВАННОГО ПРИ ИСПЫТАНИЯХ ИЗДЕЛИЯ1. Трансформатор 5010.
- Кабельная линия электропередачи Юкв с муфтой.
- Набор переходных сопротивлений 0-------------1МГОм.
- Двухлучевой ЭЛЕКТРОННЫЙ ОСЦИЛЛОГРАФ.
- Анализатор спектра СК4−56.
- Светолучевой 16 канальный осциллограф.
- Анализатор спектра на базе персонального компьютера.
- Программатор-для записи программ на носитель. 9. Эмулятор-для отладки программ.
- Персональный компьютер Pentium 11 (бумага, картриджи, программы САПР).
- Программы Р- Cad, Or Cad, M — Cad.
- При движении оператора вдоль трассы линии электропередачи на дисплее прибора в визуальном режиме наблюдались по выбору оператора
- Изменение фазы в пределах 0 -180°.
- По выбору оператора наблюдались составляющие спектра напряженности электрического поля, при этом наибольшее значение составляющих кратных трем наблюдалось над местом отказа, повреждения изоляции относительно земли.
- Перечень элементов, использованных при изготовлении прибора и состав набора испытательного и технологического оборудования для проведения испытаний изделия
- Процессор ОЭВМ фирмы atmel:
- Тип АТ89С52 с тактовой частотой 24 34 МГц,
- Корпус типа РБ1Р- 40 40 выводов, Объём памяти ОЗУ — 256 бит, ПЗУ — 8Кбит.
- Изготовитель-фирма INTEL процессор с тактовой частотой 24−34 МГц Тип Н8751 В,
- Корпус типа PDIP- 40 40 выводов, Объём памяти ОЗУ — 256 бит, ПЗУ — 8Кбит.
- Аналого-цифровые преобразователи фирмы MAXIM: Тип МАХ187АСРА.1. Состав комиссии
- Зам. Главного инженера ПГЭС «Краснодара2/.
- Зам. Начальника службы РЗАИ1. От ВТГ ДТНченко1. Л. Н. Шевченко В.П. Чайкин1. Краснодарэлектро
- ПРИБОР ОПРЕДЕЛЕНИЯ МЕСТ ПОВРЕЖДЕНИЙ
- КАБЕЛЬНЫХ ЛИНИЙ ЭЛЕКТРОПЕРЕДАЧИ
- Предназначен, для отыскания мест однофазных замыканий на землю в сетях работающих с режимом изолированной либо компенсированной нейтрали на напряжении и частоте сети без отключения потребителей.
- Состоит из двух датчиков, аналого-цифровых преобразователей, контроллера, табло отображения, источника питания.
- Точность определения места повреждения 15 — 20 см. Объем памяти ОЭВМ 8К ПЗУ и 256 бит ОЗУ, тактовая частота процессора 24 МГц. Габаритные размеры 10−10−15, масса 1,5 кГ.350 049,Г.КРАСНОДАР, УЛ. КОТОВСКОГО 76/2 ТЕЛЕФОН: (8612) 55−64 -92
- ФАКС: (8612) 55−42−68 ТЕЛЕТАЙП 211 346 АМПЕР
- Рис. 1. Структурная схема прибора определения места повреждения на кабельной трассе
- Fazal.a51 -Izmerenie razn faz 2-x 50gz Signalow ot 09.08.98 g
- Kn6-Adrec (0−7),[0-ff).-Nstr+adr Kn5- !+i' Kn4+Kn5 -Izmer
- Knl/Kr, 2/Kn3+Kn5 -Prosmotr siraniz Ozu (0−7)1.x => Real-(0-$bf) Ozu Img-($ 100-@lbf) Isx Cos/Sin=>Tab! w konze ProgrN1. NN KK KKK L1. Ml
- DATA 64 DATA 192 DATA 06 DATA 05 DATA 32 DATA 631. N=2**K N*31. L=N/2, Ml-N-1izmenjaemie Izmenjaemieparaletry
- KOLSQR DATA 16 — Kolich garm po Sqeri (<7f)
- ZDRJ1 DATA 0B0H — Zaderjka mejdu otschetami (f=24mgz 64t=40009mks=B0)f=12mgz 64t=40009mks=54)
- ZDRJ2 DATA 084H — Zaderjka ot drebezg '+1' (f=24mgz 0.34sec)
- Proweritj pri Nature ???1. NADRRL1. NADRIM1. NADMSI1. NADMS21. ADFZ121. ADSWRT1. ADRZR11. ADRZM11. BTDTID1. BTCFR11. BTCFR21. BTCFR31. BTCFR41. BTKN51. BTKN6
- DATA 00 DATA 01 DATA 02 DATA 03 DATA 04 DATA 05 DATA 06 DATA 071. BIT BIT BIT1. TT Uli1. BIT BIT BIT1. P2.4 P1.0 Pl. l PI.2 P1.3t1 x i1. TO1. Nach Adr Real po P2 (00)1. Nach Adr Imag po P2 (01)
- Nach Adr po P2 Isx Massiwal (02)
- Nach Adr po P2 Isx Massiwa2 (03)
- Nach Adr po P2 Fazy Furje Massl/2 (0~$F)/($ 80=$ 8F)
- Nach Adr po P2 Sqwert Furje Massl/2 (0-$ 7F)/($ 80-FF)
- Nach Adr po P2 Rez Preobr Furje Massiwal Real
- Nach Adr po P2 Rez Preobr Furje Massiwal Img
- Bit Zapisy Data na Indicaziju
- Bit wkl Strsch cifri-Znak/Knl1. Bit wkl cifri 1/Kn21. Bit wkl cifri 2/Kn31. Bit wkl cifri 3/Kn41. Bit Knopki 51. Bit Knopki 6
- BTPUSK BTSCLK BTDT1BIT BTDT2BIT1. SQRT ARTNG FUR641. KLAW1 KLAW2 ADRDAT1. BIT BIT PI.6 PI.7
- PI.4 — Bit SC (Pusk) PI.5 — Bit zikla — Bit Data 1 kanala — Bit Data 2 kanala030.45 030.045 030−0491. EQU 05 0H EQU 051H
- EQU 052H — Na ind=Adr/Data1.MERi IZMER2 REZULT1. TI/T Tiiv^u 053H — Tek Izmerl (53,54=iiii iiii iiii 0000) EQU 055H — Tek Izmer2(55,56=iiii iiii iiii 0000) EQU 057H — Rezultat (57,58,59)1. ADRDPL EQU 05AH
- CNT EQU CNT1 EQU -—Indikasija -CNTEND CF210 EQU CF310 EQU CF410 EQU
- CFR71 EQU CFR72 EQU CFR73 EQU CFR74 EQU05BH — Schetchik 05CH: Schetchik1. EQU 06FH 070H 071H06EH — schetchik indikasii Zifr 2 w 10-chn Zifr 3 w 10-chn Zifr 4 w 10-chn072H — 7-segm cod (Znak)073H — 7-segm cod074H — 7-segm cod075H — 7-segm cod
- RAB1 EQU RAB2 EQU RAB3 EQU ZABI EQU076H 079H 07CH 07FH
- Rabochaja dlja tarir (76,77,78) Rabochaja dlja tarir (79,7a, 7b) Rabochaja dlja tarir (7c, 7d, 7e) Schetch Zaderjki1. ORG 000H1. JMP BEGIN
- ORG 00BH -------Prer Programma Timer 0
- PUSH ACC — Zagruzka Timera 0 CLR TR0 MOV TL0,#07AH MOV TH0,#0DCH SETB TR0 CALL INDiC POP ACC RETI5 mis (f=24mgz)1. ORG 030H1. BEGIN:
- CALL TTMRG SETB ГГ0 SETB РХ0 SETB EA
- Zapusk TimeraO prer po Idikazii Rejim Preriw from Sreza Ust Prioriteta Prer IntO Obchee razr prer
- MOV DPH,#0 MOV R6,#8 BEGILl: CALL NULOZU INC DPH DJNZ R6, BEGILl40/80/00=>0zu (0−07)1. MOV KLAW1,#01. MOV KLAW2,#01. A f /- W 7 T-VT-ITT Jlr?1. V! vJ V wrn, frO1. MOV DPL,#0f A/.A1N:
- JB BTKN6, FAZA1 CALL INDADR IMP FAZA2 FAZA1: CALL TOIND1. Rn6 (aDRES)1. FAZA2: MOV A. KLAW11. JZ FAZAN1. C DPL1.C DPL1. C DPL1. MOV KLAW1,#01. Kn5
- MOV A, KLAW2 MOV KLAW2,#0 JZ FAZAN1. Knl-Kn4
- CJNE A,#08H, FAZA3 Kn4-i-Kn5-Izmer JMP BPF1. FAZA3:1. ANL A, #71. DEC A1. MOV DPH, A1. MOV DPL,#01. JMP FAZAN1. BPF:
- Rejim Izmerenija -- Rabota s 1 Mass CALL EMERN MOV RO, #NADMS1 MOV R1,#NADRRL CALL MVOZU CALL FUR64
- Priem from Azp=>Ozu (02/03)1. Peresilka Ozu (rO'=>rl')
- MOV R0,#NADRRL MOV R1,#ADRZR1 CALL MVOZU MOV R0,#NADRIM MOV R1,#ADRZM1 CALL MVOZU
- Peresilka Ozu (RL=>RezlRl)
- Peresilka Ozu (RM=>RezlRm)
- MOV ADRDPL,#0 — Adres Zasiiky Rez (DPL) CALL Fill
- Rabota so 2 Mass MOV R0,#NADMS2 MOV R1,#NADRRL
- CALL MVOZU — Peresilka Ozu (rO→rl') CALL FUR64
- MOV ADRDPL,#3 — Adres Zasilky Rez (DPL) CALL Fill
- MOV DPH,#ADSWRT MOV DPL,#0 JMP FAZAN1. ORG 01 ООН
- MVOZU: — Peresilka wnutri Ozu (r0'=>r 1 ') MOV DPL,#0 MOV R7,#NN1. MVOZUL:
- MOV DPH, R0 MOVXA,@DPTR MOV DPH, R1 MOVX @DPTR, A INC DPL DJNZ R7, MVOZUL RET
- FM 1 : — Fi=Arctg (RezImi/RezRli)=>Ozu (-DPL=ADRDPL)1. Isx Adr Zasilki (DPL)=ADR
- MOV CNT,#. — Nomer isx chisla1. MOV CNT1 ,#KOLSQR1. FI11L:1. MOV A, CNT MOV R0, A
- CALL RDRLRM — Тек MyDataRl=>DATARL (44) Тек MyDataRm=>DATARM (47)
- MOV R0,#DATARL MOV R1,#XARTNG- (30) CALL MOVPLT MOV R0,#DATARM MOV R1,#YARTNG- (33) CALL MOVPLT
- CALL ARTNG -— Faza*0.01 ----— 0.01=>RAB1
- MOV RAB1,#07AH MOV (RAB1+1),#0A3H MOV (RAB1 +2),#0D7H1. MOV MOV MOVr0'=>rl' (3 BYTA) — r0→rl' (3 BYTA)1. R1,#RAB11. R2,#ARTNGR1. R3,#ARTNGR1. CALL MUL51S
- MOV DPH,#ABFZ12 MOV DPL, ADRDPL MOV A, ARTNGR MOVX @DPTR, A INC DPL MOV A,(ARTNGR+1) MOVX @DPTR, A INC DPL MOV A,(ARTNGR+2) MOVX @DPTR, A MOV A, ADRDPL ADD A,#6 MOV ADRDPL, A INC CNT DJNZ CNT1, FI11L RET1. DADR: — Indicaz Adresa1. N stran
- MOV A,#0 CALL TAB7SG MOV CFR71, A MOV A, DPH CALL TAB7SG MOV CFR72, A
- MOV A, DPL MOV B,#3 DIV AB MOV B, A SWAP A ANL A,#0FH CALL TAB7SG MOV CFR73, A MOV A, B ANL A,#0FH CALL TAB7SG MOV CFR74, A RET
- TOIND: — Inf from Ozu to Indie po Adresu DPTR=>REZULT/+l/+2
- MOVXA,@DPTR MOV REZULT, A INC DPL MOVXA,@DPTR MOV (REZULT+1), A INC DPL MOVX A, @D PTR MOV (REZULT+2), A DEC DPL DEC DPL CALL PLT7SG RET
- PLT7SG: — Preobr Pl.t. to 7 segm Cod
- MOV CFR71,#0FFH — ' ' Probel1. MOV A, REZULT
- JNB 0E7H, PLT7S 1 -- Chislo < 01. MOV CFR71 ,#0EFH -1. ANL A,#7FH1. MOV REZULT, A PLT7S1:1. JB 0E6H, PLT711
- JZ PLT711 -~Chislo > 0.9991. MOV CF210,#91. MOV CF310,#91. MOV CF410,#9
- MOV CF410,#0 -— 0.001 =>RBPL2D1. MOV RAB1,#077H1. MOV (RAB1+1),#083H1. MOV (RAB 1 +2),#012H1. PLT7S6: JC INC JMP1. PLT7S7:1. MOV CALL MOV
- CALL SUBBB PLT7S5 CF310 PLT7S4
- CALL SUBBB PLT7S7 CF410 PLT7S61. A, CF210 TAB7SG CFR72. A
- MOV A, CF310 CALL TAB7SG MOV CFR73, A MOV A, CF410 CALL TAB7SG MOV CFR74, A RET-l I II I 1 I I I I U I I I I I I И I I I I I I I I I
- SUBBB: — REZULT-RAB1 =>RAB2 IF C=0 THEN RAB2=>REZULT MOV R1,#REZULT MOV R2,#RAB1 MOV R3,#RAB2 CALL SUB51S JC SUBBQ MOV R0,#RAB2 MOV R1,#REZULT CALL MOVPLT1. SUBBQ: RETtZMERN: — Priem from AZP =>Ozu
- CLR EA — Zapret prer CLR BTSCLK MOV R7,#N
- MOV DPL,#0 — Nach Adr Massl/2
- ANLDGL: CALL IZMER- izmer Isx Sign, Zasil into Izmerl, Izmer2 (A, B, R6) CALL ISX20Z CALL ZADRJ CALL ZADRJ DJNZ R7, ANLDGL SETB EA — Razresch prer RET
- I I I I I I I I I I I I I I I I И i i i i i i il I I
- SX20Z: — IZMPLT (P1.T.)(REZALT) => Ozu (l/2 massiw) MOV R0,#IZMER1
- CALL IZ2PLT — rO' Izmer (iiii liii iiii 0000) =>P1.T. Rez=>REZULT MOV DPH,#NADMS1 CALL MVREZ MOV R0,#IZMER2
- CALL IZ2PLT — rO' Izmer (iiii iiii iiii 0000) →P1.T. Rez=>REZULT1. MOV DPH.#NADMS21. DEC DPL1. DEC DPL1. CALL MVREZ1. C DPL1. RET
- I I I I I I I i i i il I I I I I I I I i i i i i M +1. VREZ:
- MOV A, REZULT MOVX @DPTR, A INC DPL MOV A,(REZULT+1) MOVX @DPTR, A INC DPL MOV A,(REZULT+2) MOVX @DPTR, A
- SETB BTSCLK MOV CJBTDTl RLC A XCH А, В MOV C, BTDT2 RLC A XCH А, В CLR BTSCLK DJNZ R6JZMERZ
- SWAP A ANL A,#0FH MOV (IZMER1+1), A XCH А, В SWAP A ANL A,#0FH MOV (IZMER2+1), A SETB BTPUSK RET
- DIC: — Widach na indicasiju SETB BTDTTD INC CNTIND — Gaschenie Indikasii SETB BTCFR1 SETB BTCFR2 SETB BTCFR3 SETB BTCFR4
- MOV A, CNTIND JNB 0E5H.1NDICN ANL CNTIND,#23H JB BTKN5, INDICN ANL CNTIND,#3H INC KLAW1
- MOV A,#0 MOVX@RO, A MOV A, PI CPL A ANL A,#0FH JZ INDICN MOV KLAW2 A1. DICN:
- ANL JNZ CLR MOV JMP INDIC1:1. CJNE CLR1. MOV A, CNTIND1. A,#31.DIC11. BTCFR11. A, CFR711. DICU1. A,#1,INDIC2 BTCFR2
- MOV A, CFR72 JMP INDICU Ш1С2:
- CJNE A,#2,INDIC3 CLR BTCFR3 MOV A, CFR73 JMP INDICU 4IDIC3:
- CLR BTCFR4 MOV A, CFR74 JMP INDICU MDICU:1. MOVX@RO, A MDICQ:1. CLR BTDTID RET
- ADRJ: — zaderjka 1-n wizow=r5*0.1 sek
- MOV ZAD1,#ZDRJ1 'ZL1: DJNZ ZAD1, ZZL1 RET1. ADRJ2: — zadeijka =05,sec
- I I I I I I 1 1 1 I I I I I I I I !¦ I I 1 I I1. MRO:1. MOV1. CLR1. MOV1. MOV1. SETB1. SETB1. RET
- Zapusk TimeraO na Polniy sehet 089H,#1 — Rejim 1
- TRO — Stop Timera 0 TL0,#0 TH0,#0
- ETO — Pazr Prer Timera 0 TRO — Pusk timera 01. ORG 0700H1. ГФФФФСФФФФФФФФФФФФФФССФФ
- EQU EQU EQU EQU EQU EQU EQU EQU
- MOV (ARTNG2+2),#0 -'2'=0.51. MOV R1,#ARTNG21. MOV R2,#ARTNGZ1. MOV R3,#ARTNGM1. CALL SUB51S — 0.5-z =>M1.C ARTNG4
- ORL ARTNGC,#40H Tg (x)-l./[Tg (x)+l]1. MOV R1 ,# ARTNGZ1. MOV R2,#ARTNGD1. MOV R3,#ARTNGM1. CALL SUB51S — Tg (x)-1 =>M
- MOV R1,#ARTNGZ MOV R2,#ARTNGD MOV R3,#ARTNG2 CALL AD51S — Tg (x)+1 =>'2'
- MOV R1,#ARTNGM MOV R2,#ARTNG2 MOV R3,#ARTNGZ CALL DIVMOD1. Tg (x)-l/.//Tg (x)+l/]=>z1. RTNG4: MOV MOV MOV1. ARTNG2,#21. ARTNG2+1),#080H1. ARTNG2+2),#0
- ARTNG (z)=z-z* *3 /3 +z* * 5 /5 -z* *7/'7+z* *9/9-z* * 11/111. MOV ARTN GR, ARTNGZ
- MOV (ARTNGR+1),(ARTNGZ+1)
- MOV (ARTNGR+2), (ARTNGZ+2) — Rez=z1. MOV ARTNGM, ARTNGZ
- MOV (ARTNGM+1),(ARTNGZ+1)
- MOV (ARTNGM+2),(ARTNGZ+2) — M=z
- MOV R1,#ARTNGZ MOV R2,#ARTNGZ MOV R3,#ARTNGZ CALL MUL51Sz=z*z1. ARTNGL:
- MOV R1,#ARTNGZ MOV R2,#ARTNGM MOV R3,#ARTNGM CALL MUL51S1. M*(z**2)=>M
- MOV R1,#ARTNGD MOV R2,#ARTNGM MOV R3,#ARTNGM CALL MUL51S — M*Delit=>M
- MOV R1,#ARTNGD MOV R2,#ARTNG2 MOV R3,#ARTNGD CALL AD51S — Delit+2=>Delit
- MOV R1,#ARTNGM MOV R2,#ARTNGD MOV R3,#ARTNGM CALL DIV51S — M/DeIit=>M1. MOV R1,#ARTNGR1. MOV R2,#ARTNGM1. MOV R3,#ARTNGR1. MOV A, ARTNGC1. JB 0E0H, ARTNG51. CALL AD51S — Rez+m=>Rez1. JMP ARTNG61. VRTNG5: CALL SUB51S
- RTNG6: DEC ARTNGC MOV A, ARTNGC ANL A,#0FH JNZ ARTNGL
- MOV R1,#ARTNGR MOV R2,#ARTNG2 MOV R3,#ARTNGR CALL MUL51S
- MOV R1,#ARTNG2 MOV R2,#ARTNGR MOV R3,#ARTNGR
- MOV A, ARTNGC JNB 0E6H, ARTNG8 -- 45±fi1. MOV JB- 45-fi1. CALL1. Rez-m=>Rez=57.29 577 951. Rez*57.2 957 795=>Rez451. A, ARTNGC 0E7H, ARTNG71. SUB51S45. Rez=>Rez
- MOV ARTNG2,#6 MOV (ARTNG2+1),#0E5H MOV (ARTNG2+2),#2FH
- MOV ARTNG2,#6 MOV (ARTNG2+1),#0B4H MOV (ARTNG2+2),#01. JMP ARTNG91. RTNG7: 45+fi1. CALL AD51S JMP ARTNG945+Rez=>Rez1. RTNG8: MOV JNB X>Y1.C ARTNG2 CALL SUB51S1. A, ARTNGC 0E7RARTNG92—9090.Rez=>Rez
- RTNG9. ANL MOV XRL ANL ORL MOV kRTNGQ:1. ARTNGR,#7FH1. A, XARTNG1. A, YARTNG1. A,#080H1. A, ARTNGR1. ARTNGR, A1. RET1. ORG 081 OH
- D C? C1 C1 C C? (D C* i C?
- Nach Adr Real poP2 — Nach Adr Imag po P2
- RDD EQU RMM EQU SINN EQU COSS EQU038H — (38,39,3a)03BH — (3b, 3c, 3d)03EH — (3e, 3f, 40)041H — (41,42,43)lTARL EQU 044HiTARM EQU 047H1. ADRRL DATA 001. ADRIM DATA 01
- Tek Rl (44,45,46) — Tek Rm (47,48,49) — Nach Adr Real po P2 (00) — Nach Adr Imag po P2 (01)
- JR64: — Bpf po programme fortran ot 03.05.1972 g1. MOV DPH,#NADRIM
- Rd:=MyDataRlAjl.*CossA[j]-MyDataRmA[jl]*SinnA[j]- Rm:=MyDataRlA[j 1 ] *SinnA[j]+MyDataRmA[j 1 ] *CossA[j] -1. MOV A, J MOV R0, A
- CALL RDCSSN — Cos=>COSS Sin=>SINN1. MOV A, J1 MOV R0, A
- CALL RDRLRM — Tek MyDataRl=>DATARL Tek MyDataRm=>DATARM
- MOV R1,#DATARL MOV R2,#COSS MOV R3,#RDD1. CALL MUL51S — DRL*Cos=>RD
- MOV R1,#DATARL MOV R2,#SINN1. MOV R3,#RMM CALL MUL51S1. DRL*Sin=>RM1. MOV RI,#D ATARM1. MOV R2,#SINN1. MOV R3,#SINN
- CALL MUL51S — DRM*Sin=>SINN1. MOV R1,#DATARM1. MOV R2,#COSS1. MOV R3,#COSS
- CALL MUL51S — DRM*Cos=>COSS1. MOV R1,#RDD1. MOV R2,#SINN1. MOV R3,#RDD
- CALL SUB51S — RD-DRM* Sin=>RD1. MOV R1,#RMM1. MOV R2,#COSS1. MOV R3,#RMM
- CALL AD51S — RM+DRM*Cos=>RM
- MyDataRlAjl. := MyDataRlA[I2] Rd- MyDataRmA[jl] := MyDataRmA[I2] -Rm-1. MOV АД2 MOV R0, A
- CALL RDRLRM — Tek MyDataRli2.=>DATARL Tek MyDataRm[i2]=>DATARM
- MOV R1,#DATARL MOV R2,#RDD MOV R3,#COSS CALL SUB51S
- MOV R1,#D ATARM MOV R2,#RMM MOV R3,#SINN CALL SUB51S1. MOV A, JI MOV R0, A
- CALL WRRLRM — DRL-RD=> MyDataRl? l. DRM-RM=>MyDataRmj 1 ]
- MyDataRlAI2. := MyDataRlA[I2] + Rd- - MyDataRmA[I2] := MyDataRmA[I2] +Rm-
- MOV R1,#DATARL MOV R2,#RDD MOV R3,#COSS1. CALL AD51S — COSS=DRL+RD
- MOV R1,#D ATARM MOV R2,#RMM MOV R3,#SINN1. COSS=DRL-RD1. SINN=DRM-RM1. CALL AD51S1. SINN=DRM+RM1. MOV A, 12 MOV R0, A
- CALL WRRLRM — DRL-RD=> MyDataRli2. DRM-RM=>MyDataRm[i2]1.C 121. MOV A, M31. CLR С1. SUBB АД21. JNC FURN11. JMP FURN21. JRN1: JMP FURLI21. JRN2:
- C J MOV A, II ADD A, M2 MOV II, A CLR С MOV A,#M1 SUBB A, II JNC FURM1 JMP FURM2 URM1: JMP FURLI1-URM2: DJNZ I, FURM3
- JMP FURM4 7URM3: JMP FURLI 7URM4: цг ifc >je ^ sj» >{г и" he * he # he ^ h" he h" he h" * h* he he # h" he h* he
- MyDataRl1. :=2*MyDataRlI./(N) —
- MyDataRm1. :=2*MyDataRmI./(N) — end-1. CLR A1. CLR С1. SUBB A,#KK1.C A1. ANL A,#7FH1. MOV RDD, A1. MOV (RDD+1),#080H1. MOV (RDD+2),#0 — RDD=2/N1. MOV I,#N1. FURLA:1. MOV АД MOV R0, A
- CALL RDRLRM — Tek MyDataRl1.=>DATARL Тек MyDataRm 1.=>D AT ARM
- MOV R1,#DATARL MOV R2,#RDD MOV R3,#COSS CALL MUL51S
- MOV R1,#DATARM MOV R2,#RDD MOV R3,#SINN CALL MUL51S1. MOV АД MOV R0, A
- CALL WRRLRM — DRL*2/N=> MyDataRl1. DRM*2/N=>MyDataRmi. DJNZ I, FURLA1. Perestanowka Rezult1. MOV R4,#0 — R4=Isx r5=Rez1. MOV R7,#N
- URLB: CALL PEREST — R4=Isx r5=Rez1. MOV A, R41. XRL АД51. JZ FURLQQ1. MOV A, R4 INC A MOV R0, A
- CALL RDRLRM — Tek MyDataRlr4.=>DATARL Tek MyDataRm[r4]=>DATARM
- MOV R0,#DATARL MOV Rl,#COSS
- CALL MOVPLT — Obmen rO'=>rl ' RL=>COSS MOV R0,#DATARM MOV R1,#SINN CALL MOVPLT
- MOV АД5 INC A MOV R0, A CALL RDRLRM
- MOV АД5 INC A MOV R0, A CALL WRRLRM
- MOV R0,#DATARL MOV Rl,#COSS
- CALL MOVPLT — Obmen rO'=>rl' RL=>COSS MOV R0,#DATARM MOV R1,#SINN
- CALL MOVPLT — Obmen rO'=>rl' RM=>SINN1. MOV АД4 INC A MOV R0, A
- CALL WRRLRM — MyDataRlr5.=>MyDataRl[r4] MyDataRm[r5]=>MyDataRm[r4]
- FURLQQ: INC R4 DJNZ R7, FURLB1. Obmen rO'=>rl' RM=>SINN
- Тек MyDataRlr5.=>DATARL Тек MyDataRm[r5]=>DATARM
- MyDataRlr4.=>MyDataRl[r5] MyDataRm[r4]=>MyDataRm[r5]-i i ii i i l i i i 1 i h i- i i i i i i i i i 1 i iif+
- OVPLT: — rO'=>r 1' (3 BYTA)
- MOV A,@R0 MOV @R1,A INC RO INC R1 MOV A,@R0 MOV @R1,A INC RO INC R1 MOV A,@R0 MOV @R1,A RETll M i lllllllll l l l l l l l l l l l l l l EREST: — Perestanowka
- WRRLRM: — Cos/sin (COSS/SINN)=> MyDataRlj 1. / MyDataRmO 1 ] A, R0=Nomer1. ADD A, R01. ADD A, R01. CLR C1. SUBB A,#31. MOV DPL, A1. MOV DPH,#NADRRL
- MOV A, COSS MOVX @DPTR, A INC DPL MOV A,(COSS+l) MOVX@DPTR, A INC DPL MOV A,(COSS+2) MOVX @DPTR, A1. MOV DPH,#NADRIM
- MOV A,(SINN+2) MOVX @DPTR, A DEC DPL MOV A,(SINN+1) MOVX @DPTR, A DEC DPL MOV A, SINN MOVX @DPTR, A RET
- I 1 I I I I M I I I I I M 1 I I I I I I I I I II I
- UDRLRM: — Tek DataRl=>DATARL Tek DataRm=>DATARM
- ADD A, R0 ADD A, R0 CLR С SUBB A,#3 MOV DPL, A MOV DPH,#NADRRL
- MOVX A, @DPTR MOV DATARL, A INC DPL MOVXA,@DPTR MOV (DATARL+1), A ШС DPL MOVX A,@DPTR MOV (DATARL+2), A
- MOV DPH,#NADRIM MOVXA,@DPTR MOV (DATARM+2), A DEC DPL MOVX A,@DPTR MOV (DATARM+1), A DEC DPL MOVX A,@DPTR MOV DATARM, A RET
- I I I I I I I I I I I I 1 I I 1 I I I I I I I I I I I I I I 1 I I
- RDCSSN: — Cos=>COSS Sin=>SINN
- ADD A, R0 ADD A, R0 CLR С SUBB A,#3 MOV R0, A