СОВРЕМЕННАЯ ЭЛЕКТРОНИКА №6/2012

Set graphic = Project.Graphs.Add(graphic_name,m wGT_Rectangular) graphic.Measurements.Add(filter_n ame,"DB(|S(1,1)|)") graphic.Measurements.Add(filter_n ame,"DB(|S(2,1)|)") 'Вывод диаграммы Смита graphic_name2 = filter_name & " SmithChart" Set graphic2 = Project.Graphs.Add(graphic_name2, mwGT_SmithChart) graphic2.Measurements.Add(fil ter_name,"S(1,1)") Запустим созданный сценарий не посредственно в редакторе сценари ев или из пункта меню Scripts → Local Scripts окна Microwave Office. В ре зультате работы сценария в проек те появится новая схема с названи ем filter_circuit (см. рис. 6), будет произведён её расчёт, и на экран будут выведены S параметры в ло гарифмическом масштабе в прямо угольной системе координат (см. рис. 7а) и на диаграмме Смита (см. рис. 7б). В теле сценария можно также выпол нить расчёт необходимого порядка фильтра согласно формуле (1) на ос нове заданных требований к характе ристикам. Осуществим расчёт, исполь зуя пользовательскуюфункцию гипер болического арккосинуса, и выведем сообщение с информацией о рассчи танном порядке фильтра order (с округлением до двух знаков после за пятой) и заданном порядке N : MsgBox "Рассчитанный порядок фильтра "& Round(order,2) & "; заданный – N=" & N В результате выполнения данных команд для используемых исходных данных на экран будет выведено ок но сообщения с текстом: «Рассчитан ный порядок фильтра 4,85; заданный – N=5". С ОЗДАНИЕ ДИАЛОГОВОГО ОКНА ИНТЕРФЕЙСА ПОЛЬЗОВАТЕЛЯ Повысить удобство использования написанного сценария можно за счёт введения в него пользовательского ин терфейса в виде диалогового окна, ко торое создаётся с помощью конструк тора UserDialog Editor. Реализованный интерфейс диалогового окна рассмат риваемого сценария построения ППФ показан на рисунке 8. Введение подоб ной оконной среды взаимодействия с пользователем даёт возможность при менять написанный сценарий пользо вателям, не знакомым с языком про граммирования сценариев и даже не имеющим достаточных навыков рабо ты в среде Microwave Office, т.к. сцена рий самостоятельно осуществляет соз дание схемы фильтра, её расчёт и вывод результатов. Вследствие этого подобный сценарий может быть ис пользован, например, на учебных за нятиях со студентами второго третье го курсов, не имеющими опыта работы с данной программой, при изучении дисциплин теории цепей и техники фильтров СВЧ. Кратко охарактеризуем код сцена рия при введении диалогового окна. Чтобы иметь возможность переопре деления исходных данных в соответ ствии с введёнными в окне значения ми, соответствующие величины необ ходимо определить как переменные и сделать их глобально доступными в те ле всего сценария, объявив их в пер вых строках кода до тела основной процедуры. Для вызова диалога создадим отдель ную процедуру User_Dialog, которую будем вызывать уже из основного тела Main: Sub User_Dialog Begin Dialog UserDialog 500,273,"Синтез полосно пропуска ющего фильт ра",.MyDialogFunction ' %GRID:10,7,1,1 TextBox 180,49,60,21,.F0 Text 20,42,150,28,"Центральная частота, ГГц",.Text1 ... End Dialog Dim dlg As UserDialog ' Вызов диалогового окна Dialog dlg ' Запись введенных в диалоге дан ных F0=Val(dlg.F0)*1e9 ... End Sub Большая часть этого кода, находяща яся в теле конструкции Begin Dialog … Dialog dlg, генерируется автоматичес ки после создания в конструкторе окна ПРОЕКТИРОВАНИЕ И МОДЕЛИРОВАНИЕ 58 WWW.SOEL.RU СОВРЕМЕННАЯ ЭЛЕКТРОНИКА ◆ № 6 2012 Рис. 6. Схема ППФ, построенная при помощи сценария –100 –80 –60 –40 –20 0 Модуль S параметров 15000 Частота, МГц 13000 11000 9000 S21 S11 7000 5000 0 0,2 0,2 0,4 0,6 0,8 2,0 4,0 6,0 8,0 10 10 –5,0 –4,0 –3,0 –2,0 –1,0 0,8 –0,6 –0,4 –0,2 1 Swp Max 15 000 МГц Swp Min 5 000 МГц 0,4 0,6 0,8 2,0 3,0 4,0 5,0 10,0 Рис. 7. Рассчитанные S параметры схемы ППФ © СТА-ПРЕСС