влияние размеров катушки на эффект близости (вводится в машину согласно п. 6); Гд= 0,25С(, tg6 L/g-10~ - сопротивление, вносимое диэлектрическими потерями элементов конструкции; Со - емкость катушки, обусловленная твердым диэлектриком. Для катушек с однослойной обмоткой Со = (12)/[1 + 1/(а8)], где fej = F (t/do); = =F {l,D); a=0,08 -0,14-коэффициент, учитывающий тип каркаса и обмотки катушки; - относительная диэлектрическая проницаемость материала каркаса. Для катушек с многослойной обмоткой Со = (0,81,0)Ск, где Ск - полная емкость катушки (при обмотке типа «универсаль» выбирают из графика [10], при рядовой обмотке -по результатам эксперимента); tg 6-тангенс угла потерь [для однослойных катушек - материала каркаса, для многослойных- изоляционного материала провода (вводится в машину по запросу)].

9. Анализируют полученные результаты. Если они удовлетворяют требованиям ТЗ, приступают к вычерчиванию катушки. Пример оформления рабочей графической документации на катушку двухконтурного электрического фильтра приведен в приложении 3.

Приведем программу расчета катушек индуктивности (см. стр. 106-111).

Обозначения, принятые в программе: XL - индуктивность катушки (по заданию); F - рабочая частота; LL - длина обмотки катушки; D - диаметр обмотки катушки; LD - параметр, зависящий от LL/D; L0-коэффициент формы; XN - число витков обмотки; Т - шаг намотки обмотки; DOPT - оптимальный диаметр провода; DT - параметр, зависящий от DOPT/T; А - поправочный коэффициент, учитывающий влияние конфигурации провода; В - поправочный коэффициент, учитывающий различия во взаимной индуктивности, возникающей между действительными витками и витками сплошной обмотки, выполненной тонкой и узкой лентой; XLO - индуктивность обмотки, намотанной с определенным шагом; ТТ - толщина многослойной обмотки; ХЕ - относительная диэлектрическая проницаемость материала каркаса; ХК1 - коэффициент, зависящий от T/DOPT; XК2 - коэффициент, зависящий от LL/D; СК - емкость катушки; Q - добротность катушки; DDD - параметр, зависящий от D3KP/D; ZN - коэффициент, используемый для вычисления значений функции Бесселя (зависит от диаметра провода обмотки и рабочей частоты катушки); ХК - коэффициент, учитывающий влияние размеров катушки на эффект близости; R00 - сопротивление одного метра провода; LP - длина провода; R0 - активное сопротивление обмотки постоянному току; ZZ, PSL ZOPT - параметры для расчета оптимального диаметра провода; РО, G - значения функции Бесселя; TGD - тангенс угла потерь материала каркаса или изоляции провода; RF - сопротивление провода току с частотой F; RD - сопротивление, вносимое диэлектрическими потерями; LS - длина сердечника; MS - действующая магнитная проницаемость сердечника; MN - относительная магнитная проницаемость материала сердечника; LSER - индуктивность катушки с поправкой на сердечник; SS - площадь поперечного сечения сердечника.

Как следует из приведенного текста, программа написана на языке ФОРТРАН. Для ее реализации удобно использовать мини-ЭВМ типа СМЗ, СМ4, например, АРМ-Р, «НАИРИ-4». В качестве периферийных устройств могут применяться: а) универсальное устройство ввода - вывода информации типа «РИН-609», отображающее информацию в алфавитно-цифровом виде на экране электронно-лучевой трубки (ЭЛТ); б) устройство ввода - вывода ин-

REAL LL,LIl,LO,LS,HS>LSER.MN,LP WRITE(6.1)

1 FORMAT(3X.РАБОТАЕТ ПРОГРАММА "IND") URITE(6.500)

500 format(ЗХ.НУИНА ЛИ ВАМ ИНСТРУКЦИЯ ЯА-ЬНЕТ-0) READ«.9)j

IF(j.NE.1)G0T0 501 krite(6,502)

502 format<3X, ПРИ ЗАПРОСАХ ПРОГРАММЫ НУЖНО ВВЕСТИ S./3X. * ЕСЛИ ЯА-1 ЕСЛИ НЕТ-0,/ЗХ.

*при ВВОДЕ ДАННЫХ ЧИСЛО до«но выть ОСЯЗАТЕЛЬНО с точкой,/ЗХ,

«ВАМ НЕОБХОДИМО ИМЕТЬ УЧЕЕНИК:ВОЛГОВ В.А. ЛЕТАЛИ И УЗМ\ P3ftii/3Xi

«"ЭНЕРГИЯ Н.т1?67Г.)

501 WRITE<й,2)

2 format(ЗХВВЕДИТЕ ИСХОДНЫЕ ДАННЫЕ) WRITE<4f3)

reap(if 4)XL

writ£<6f5)

XN=0.

read(6t4!f 99 write<6,<5)

6 format<3XfВЫБЕРИТЕ ТИП КАТУШКИ НЕОБХОвИМЫИ ИЗГОТОВИТЬ,/ЗХ, « ИСХОДЯ из СЛЕДУВШИХ С00ЕРА«ЕНИйг/ЗХ,

« ПРИ ОДНОСЛОЙНОЙ НАМОТКЕ с ШАГОМ МОКНО ПОЛУЧИТЬ СЛЕДУЮЩИЕj/3Xr « ЗНАЧЕНИЯ ИНДУКТИВНОСТИ!! urite(6,7)

7 format(ЗХгSNAP \ .5. \ 10.\ i5.\ ЗОЛ 25.\г/ЗХ(

щ1------------------------------

* L МКГН\ 1.В\А. \ ЮЛ 20.\ 30.\) WRITE<6,8)

8 F0RMAT<3XfУДОВЛЕТВОРЯЕТ ЛИ ВАС ТАКАЯ КАТУШКА?) reab(<5.?)nx

9 format(ii) if<nx.eb.i)goto 100 write (irlO)

10 format(3X.ПРИ сплошной однослойной намотке>/3Xip

« D ММ\ 30.\ 15.\ гО.\ 30.\ 50.f/3Xf

«...............-----------......-um,

« L МКГН \ 30.\ 50.MOO.\200.\300 ) write(6.8) REA»<4r9>NN IFdVN.eo.DGOTO 100 write<6fll) 1=1

goto 100

11 format(3X-bah НЕОЕХОДИНО ИЗГОТОВИТЬ нног0сл0йнув КАТУШКУ) J90 writers.12)

12 format<ЗХ?НУ1Н0 ли ЭКРАНИРОВАТЬ КАТУШКУ) REAIi<6.9)NNN

IF(NNN.eq.1)call ekran(LB.xl rXLl)

IF<nnn.eq.1)xl=XL1

write(4,13)

13 F0RMAT(3X»КАТУШКА с СЕРДЕЧНИКОМ?) REAri<6.9)N

IF iM.NE.DeOTO 200

и FORMAT<ЗХ,СЕРДЕЧНИК ИАГНИТННЙ?) READ<«.9)N

IF (N.Ea-.i)CALL MAGN{T«t.rXNfLSERrMS>

IF<N.E[1.1)XL=LSER

IF(XN.NE.0.)GOT0 303

IF<N.EQ.1)G0T0 550

WRITE<6,506)

504 FORMAT<3XtРАСЧЕТА КАТУШКИ С НЕМАГНИТНЫМ СЕРДЕЧНИКОН НЕТ)

GOTO 555 550 WRI.TE(6il5)

15 FORMAT <3XjНЕ ХЕЛАЕТЕ ЛИ вц ИЗМЕНИТЬ РАЗМЕРЫ КЙТШИ ) READ<Ai9)N

IF<N.NE.i)GOT0 200 GOTO У? 100 WRITE(6,li)

16 F0RMAT(3X»ВВЕДИТЕ ДИАМЕТР КАТ/Ш Б "СН") REAB(ii4)D

URITE(6rl7>

17 Р0КМАТ(ЗХ>ВВЕДИТЕ АтНУ ШУШ В "С«") REAI)(«i4)LL

UD«=LL/D go ТО 1?0 т IFd.NE.DGOTQ 250 URITE(i525t)

251 F0RMftT(3X,ВВЕДИТЕ ЗНАЧЕНИЕ КОЭФЛОНКГН(СТР.18?)»

REAti(i(4)La

GOTO 20 250 IF(NX.NE.l)eQTO 300 301 IF(LD.6T.O.l)G0TO 19

LD=23.0-84.8»LB

GOTO 20

18 1.0=21.S-I4.S)>LD GOTO 20

19 ifati.lt.dgotq 13 L0=3.5-2.25»LD

20 XN=SQRT(XL/(LQ)lD)l0.001)) WMTE(i,2?)XN

29 format(3X.ЧИСЛО ВИТКОВ pabh0iE12.S>

300 IF!NX.NE,l)fiQTO 301 400 IFiNX.NE.DGOTO 305 WRITE<6,21)

21 FORMAT (.3XiВВЕДИТЕ МАГ НАМОТКИ Б CM") READ<i,4)T

ВТ=ВО/Т

A=!-1.29+2XIiT 23 XLO=XU-i5.28XXN»B)f(A+0,2S))l0.001

XN=XN«SQRT(XL/XLO)

WRITE (i5j 23) XN 23 FORMAT(3X,ЧИСЛО ВИТКОВ КАТУЮ q шагон»jE12.5) 303 CALL MPTKBFiXNrDOPT) • JFfflX.NE.DGOTO 341

lu«xh*(t+i)oft)