|
Главная -> Справочник по алгоритмам 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 [61] 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 ft/ДБ <А-КСЭФФИЦИЕНТ УСИЛЕНИЯМ ! > JtiCitiitiitiitiijiiliitiitijKitiitiWitiitiiti ! I-------------------LGT W ------1 -itiitiitiitiitiitiiiiK- LGT UIP=UIZ 0940 PRIHT 0950 PRINT 0960 PRINT 0970 PRINT 0980 PRINT 0990 PRINT 1000 PRINT F<UI) (Р-ФАЗА) 1010 PRINT • 1020 PRINT 0 ! iCKitiitiitiitiitiiti 1030 PRINT ! iti 1040 PRINT -180 1---------iti 1050 PRINT ! 1060 PRINT -360 !-1070 PRINT 1080 PRINT 1090 PRINT 1100 PRINTB ПРИВЕДЕННОМ НИЖЕ СПИСКЕ 1110 PRINTВЫБЕРИТЕ ТИП ФИЛЬТРА.НАБЕРИТЕ LOAD<N> 1120 PRINTTAE <N>-HOMEP ФИЛЬТРА В АПОСТРОФАХ. 1130 PRINTHAWMMTE КЛАВИШУ ПС!INPUT X 1140 PRINT 1150 PRINT 1160 PRINTСПИСОК ФИЛЬТРОВ lj70 PRINTНИЗКОДОБРОТНЫЕ 1180 PRINT1.НИЗКОЧАСТОТНЫЙ Ц90 РР1НТг.П0Л0СН0-ПР0ПУСКАК1ЩИй с РЕЗИСТИВНЫМ ВХОДОМ 1200 PRINTЗ.П0Л0СН0-ПР0ПУСКАК1111ИЙ С ЕМКОСТНЫМ ВХОДОМ 1210 PRINT4.ВЫСОКОЧАСТОТНЫЙ 1220 PRINT5А.ВСЕПР0ПУСКАК1ЩИЙ-ДОБРОТНОСТЬ 0.5 ПОЛОЖИТЕЛЬНАЯ 1230 PR I NT 5Б, ВСЕПР0ПУСКАК1ЩИЙ-ДОБРОТНОСТЬ 0.5 ОТРИЦАТЕЛЬНАЯ 1240 PRINT6.ВСЕПРОПУСКАМШИй 1250 PR I ИТ 7. П0Л0СН0-ЗАГРАЖДАК1111ИЙ 1260 PRINT 1270 PRINTСРЕДНЕДОБРОТНЫЕ 1280 PRINT8.НИЗКОЧАСТОТНЫЙ 1290 РР1НТ9.П0Л0СН0-ПР0ПУСКАН)ЩНй С РЕЗИСТИВНЫМ ВХОДОМ 1300 PRINT10 ПОЛОСНО-ПРОПУСКАЮШИй С ЕМКОСТНЫМ ВХОДОМ 1310 PRINT11.ВЫСОКОЧАСТОТНЫЙ 1320 PRINT 12.ВСЕПР0ПУСКАН)ЩИй 1330 PRINT 13.П0Л0СН0-ЗАГРАЖДАК1ЩИЙ 1340 PRINT14.НЧ И ВЧ С НУЛЕМ ПЕРЕДАЧИ 1350 РР1НТ15.П0Л0С:Н0-ЗАГРАЖДАК1и1Ий НЧ И ВЧ С НУЛЕМ ПЕРЕДАЧИ 1360 INPUT X 1370 PRINT 1380 PRINT 1398 PRINTВЫСОКОДОБРОТНЫЕ 1400 PRINT16.НИЗКОЧАСТОТНЫЙ 1410 PRINT17.ПОЛОСНО-ПРОПУСКАЮШНй 1420 PRINT18.ВЫСОКОЧАСТОТНЫЙ 1430 PRINT 19.ВСЕПР0ПУСКАН)ЩИй 1440 PRINT20.ПОЛОСНО-ЗАГРАЖДАЮШИй 1450 PRINT21.H4 И ВЧ С НУЛЕМ ПЕРЕДАЧИ 1460 PRINT22.УНИВЕРСАЛЬНЫЙ.СХЕМА 1 1470 PRINT23.УНИВЕРСАЛЬНЫЙ.СХЕМА 2 1480 PRINT 1490 PRINT 1500 PRINT 1510 PRINT 1520 PRINTHPH НЕОБХОДИМОСТИ ПОВТОРНОГО ПРОСМОТРА СПИСКА 1530 PRINTНАБЕРИТЕ GOTO 1160 1540 PRINT 1550 PRINT 1560 PRINT 1570 PRINT 1580 PRINT 1590 PRINT !STOP 1600 PRINT 1610 PRINT 1620 END Принципиальные схемы фильтров приведены в поле операторов PRINT в начале каждой программы. Поэтому отдельно в виде рисунков они не приводятся. При расчетах частоты задаются в герцах, сопротивления - в омах и емкости конденсаторов - в фарадах. Необязательный параметр (т. е. не влияющий на АЧХ й ФЧХ, но влияющий на номиналы расчетных резисторов и конденсаторов) в примерах помечен знаком *. Добротность (fp = Q однозначно определяет характер переходных процессов (апериодический, критический или колебательный). Обычно достаточно знать передаточную функцию в операторном виде. Однако если пользователь желает провести расчеты АЧХ, ФЧХ или ПХ по заданной передаточной функции, он может воспользоваться формулами для основных параметров фильтров, приводимыми перед каждой программой. Общий объем памяти, занимаемый всеми 24 программами расчета АФ, составляет около 0,3 Мбайт. Низкодобротные фильтры (Q = i7p<2). 1. Низкочастотный. Передаточная функция T{s): T{s) = Ri=RnR,i/{Rn + R,2), Шр=1/л ?1С2/?зС4, <7р=л ?зС2 ?,С4/(1 +Rs/Rj) . Постоянный коэффициент усиления К K=Ri2/(Ru+R,2). Произведение усиление - чувствительность (ПУЧ): пуч = <7рл/ад7адз. Программа 7.34. =6,6393365-10=, /?,2 = 9,9590048•10 /?з = = 13,49059 • 10 ПУЧ = 1,8652139. Пример В. Вводимые параметры: f= = 2,3-10=, Q=l,2, /?,2 = 1.10°, С2 = 27-10-. С4 = 3,3-10~, Квх = 1- Результаты расчета: /?,, =3,9836019-10=, /?,2=М0°, Rs = = 13,49059-10=, ПУЧ = 1,8652139. 2. Полосно-пропускающий с резистивным входом. T{s) = -K{ЫЧр) S/ [s4 {ч>,/д,) s+ml]], /?,=/?iW№+«i2), ар= /л/СзЖ. q,= RiC2/RiCs/{l + C2/Cs\ K=Ri2Ko/{Rn+R>i). К„ = ПУЧ = <?= [1 + (Сз/С2)]. Программа 7.35. Пример А. Вводимые параметры: F= = 2,3-10=, Q= 1,4, С2 = 68-10-, Сз= 15-10" , Квх= 1,5. Результаты расчета: =949,77374. /?,2= 1,5965215-10=, /?4 = 7,8831221-10=, К= = 1,5, ПУЧ = 2,3923529. Пример В. Вводимые параметры: Р= = 2,3-10=, Q= 1,4, С2 = 68.10"», Сз= 5.10-, /?12=1-10, Квх = 0. Результаты расчета: 1=595,50604, /?12==Ы0, /?4 = = 7,8831221 -10=, К=2,3923529. ПУЧ = =2,3923529. 3. Полосно-пропускающий с емкостным входом. Т (s) = -K[(p./q,) S/[s4(tDp/£p) S-ftD=]l C,=C,,-fC,2, v>p = l/CiR2RsC,, ei PRINTPACHET ФИЛЬТРА НЧ НИЗК0Д0БР0ТНСГ0 02 PRINT ---------------------- 03 PRINT ! 04 PRINT C2 === 05 PRINT ! R3 ее PRINT <-!====!--*-!====!--*----!+ 07 PRINT Rll ! ! ! 08 PRINT - ! -!- 09 PRINT ! ! C4 === 1 ! 18 PRINT R12 ! ! ! ! 11 PRINT - ! ! 12 PRINT ! ! 13 PRINT 20 INPUTFP=F!INPUTQP=Q 30 INPUTC2=C2 ! INPUTC4=C4 48 IF С2>=4*0"2*С4 THEN 60 50 PRINTФИЛЬТР HE РЕАЛИЗУЕМ. 55 PRINTBBEAHTE НОВЫЕ C2 И C4:60T0 38 80 LETRl=1 ( г*#РI*Fi«SG!R < Р*С2жС4> > 90 LETR3=pitiRl ! LETX=G!*SQR(C2PC4) 180 INPUTKBX=K1 ! IF K1=0 THEN 148 110 IF 1-K1<=0 THEN 140 120 LETK=K1 s LETR8=R1.K 138 LETR9=R1/C1-K> s 60T0 158 140 LETR8=R1 ! LETR9=9E99 s LETK=1 150 PRINTРЕЗУЛЬТАТЫ РАСЧЕТА 160 PRINTR11=R8 ! PRINTR12=R9 170 PRINTR3=R3 ! PRINTK=K 180 РР1НТПУЧ=Х 190 PRINTПЕРЕДАТОЧНАЯ ФУНКЦИЯ ИМЕЕТ ВИД 200 PR INT Т<S) =Кж( СUIP"2) СS"2+ СUP/Gl)*8+ <ЫРг) > ) 210 PRINTseOTO 100SEND Пример А. Вводимые параметры: F= = 2,3-10=, Q=l,2, С2=27.10-, С4=3,3-10-. /<; = 600-10-=. Результаты расчета: Ru = <7р = -у/?зС./«2С4/(1 -Ь/?з/«2), K = C„Ko/(C,.-f С,Д Ко = ПУЧ = <7р -CtRs/dRl. 01 PRINTPACHET ФИЛЬТРА ПОЛ,-ПРОПУСК.С R ВХОДОМ И МАЛЫМ 02 PRINT С2 === R11 <-!====!- -! ! 1 I ! ! • !-ж~> R12 ! ! 03 PRINT 04 PRINT 05 PRINT 06 PRINT 07 PRINT 08 PRINT 09 PRINT 10 PRINT 11 PRINT 12 PRINT 13 PRINT 14 PRINT 15 PRINT ! 16 PRINT 20 INPUTFP=F!INPUTQP=Q 30 INPLnrC2=C2: INPUTC3=C3 40 LETP=Q"2«(2+(C2C3)+<:C3.C2)) 50 LETRl=l/<2*#PIitiF»SQR(PitiC2i«C3) > 60 LETR4=P*R1 :LETK0=Q"2iti( 1+(C3/C2) ) 70 INPUTKBX=Kl!IFK1=0 THEN 110 80 IF i;K0-K1><=0 then 110 90 LETK2=Kl!LETR8=<K0/Kl)i«Rl 100 LETR9=<Ke/<K0-Kl))*Rls6OTO 120 110 LETR8=R1sLETR9=lE90s LETK2=K0 120 PRINTРЕЗУЛЬТАТЫ РАСЧЕТА 130 PRINTRl1=R8!PRINTR12=R9 140 PRINTR4=R4!PRINTK2=K2 150 PRINTПУЧ=К0 160 PRINTПЕРЕДАТОЧНАЯ ФУНКЦИЯ ИМЕЕТ ВИД 170 PRINTT<S)=-Kiti((UP/Q)itiS>-<S2+CUPU)i*S+UIP"2)) 180 PRINT5G0T0 705END Программа 7.36. 81 PRINTPACHET ФИЛЬТРА ПОЛ.-ПРОПУСК.С С-ВХОДОМ И МАЛЫМ О 02 PRINT -----------iti--------- 03 PRINT ! ! ! 64 PRINT - ! I 05 PRINT ! ! R2 ! ! 06 PRINT CU ! ! 07 PRINT 68 PRINT И ! R3 09 PRINT <-!!-*-!====!-iti-!- ! 10 PRINT ! ! ! ! !-iti-> 11 PRINT ! 12 PRINT === C12 13 PRINT ! 14 PRINT ! 15 PRINT 20 INPUTFP=F!INPUTQP=Q 30 INPUTC4=C4sINPUTCI1=C8:INPUTC12=C9 40 IF<C8+C9>>=4«<G"2)*C4 THEN 68 50 РР1ИТФИЛЬТР he РЕАЛИЗУЕМ.ВВЕДИТЕ НОВЫЕ C4,C8,СЭ.S60T0 38 60 LETC1=C8+C9 70 LETA=<Cl/<2iti<Q2)itiC4>)-l 80 LETP=A+SQR<A"2-1> 90 LETR2= l/< 2iti«P I*FitiSQR <PjsC 1 itiC4) ) s LETR3=PitiR2 100 LETX=Q«SQR < С1 /P/t;4 > s LETK= ( CSz-C 1 > itiX 110 PRIHTРЕЗУЛЬТАТЫ РАСЧЕТА. 120 PRINTR2=R25PRINTR3=R3 130 PRINTK=К!PRINTПУЧ=Х 140 PRINTПЕРЕДАТОЧНАЯ ФУНКЦИЯ ИМЕЕТ ВИД 150 PRINTT<S>=-K*( (WPQ>itiS/<S2+<WP/Q)itiS+UiP"2>> 160 END === C4 ! ! 0У ! I -----! - i + ! I - Пример A. Вводимые параметры: f=2.1-10 Q=1.6, Си=68-10-Л c;2 = = 15-10~, C% = 5,1-10-". Результаты расчета: /?г= 1,816083-10 «3 = 7,4716704-10 /<-=2,607!364, ПУЧ = 3,18224. Пример В. Вводимые параметры: ==2,l.lo Q=!.6, С,=68-10-, с;2=о, С4 = 5,1-10 Результаты расчета: /?2 = = 2,4070895 -10 /?з = 6,880664 -10 К= = 3,4555748, ПУЧ = 3,4555748. 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 [61] 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 0.0105 |
|