Форум «Графика»

Список форумов

Новые темы

Тема: «отображение потока мощности на графике » в форуме: Графика

Сергей A
Посетитель

Всего сообщений: 9
Дата регистрации: 29.05.2021

Создано: 01.07.2021 15:15:06

Добрый день! Подскажите пожалуйста как сделать так что бы на графике поток мощности в комплексной форме ветви отображался в кВт а не в мВт? Аналогично для комплексной мощности нагрузки и генерации. Спасибо

Профиль

Наверх

Александр Александров
Администратор

Всего сообщений: 636
Дата регистрации: 31.05.2008

Создано: 01.07.2021 16:30:38

Здравствуйте!

Есть макрос

SetParam "node", "pn", "", 0
SetParam "node", "qn", "", 0
SetParam "node", "pg", "", 0
SetParam "node", "qg", "", 0
SetParam "node", "sn", "cmplx(1000*pn,1000*qn,0)", 0
SetParam "node", "sg", "cmplx(1000*pg,1000*qg,0)", 0

SetParam "vetv", "slb", "cmplx(1000*#plb*_zbg,1000*#qlb*_zbg,3)", 0
SetParam "vetv", "sle", "cmplx(1000*#ple*_zen,1000*#qle*_zen,3)", 0
SetParam "vetv", "ib", "#ib", 3
SetParam "vetv", "ie", "#ie", 3

Sub SetParam( tabl, name, formula, prec )
Set tta=Rastr.Tables(tabl)
Set cl=tta.Cols
j=cl.Find(name)
if j=-1 then
MsgBox "NotFound Col-> "+ CSTR( name )
else
Set newct=cl(j)
end if
' newct.Prop(FL_ZAG)=zag
newct.Prop(FL_FORMULA)=formula
' newct.Prop(FL_NAMEREF)=ssilka
' newct.Prop(FL_DESC)=desc
newct.Prop(FL_PREC)=prec
' newct.Prop(FL_WIDTH)=width
' newct.Prop(FL_MASH)=mash
' newct.Prop(FL_CASH)=cash
' newct.Prop(FL_UNIT)=unit
End Sub

Профиль

Наверх