#include
#include
#include
#include
#include
#include?
#include?
#include?“engine.h“
void?main（）
{

?????Engine?*ep;
	?mxArray?*H=NULL*N=NULL*M=NULL*L=NULL*F=NULL*DOTX=NULL*GG=NULL*BB=NULL*rr=NULL*xx=NULL;
?????double?*dotx*Zr*Zx;
	?if?（!（ep?=?engOpen（NULL）））?
	?{
	???MessageBox?（（HWND）NULL?（LPSTR）“Can‘t?start?MATLAB?engine“?（LPSTR）?“Engwindemo.c“?MB_OK）;exit（-1）;
	?}//確定與matlab建立了聯(lián)系；
????//x[20]用于存自變量；index[]用于存自變量對應(yīng)的節(jié)點(diǎn)角標(biāo)；
????int?numnumxdmnijii;
	double?fx[20]={0}x[20]={0};
???//***********處置電壓定義結(jié)構(gòu)體，以備節(jié)點(diǎn)和幅值引用*****************************8
????struct?JIEDIAN
	{
		double?PG;
		double?PL;
		double?QG;
		double?QL;
		double?UG;
		double?etha;
		double?JD;
		double?xd;
		double?E;
	}jiedian[10]=
	{
		{000000000}
		{000000000}
		{000000000}
		{000000000}
		{000000000}
		{000000000}
		{000000000}
		{000000000}
		{000000000}
		{000000000}
	};
????double?pgplqgqlugEthajdXDe;
????double?P[20]={0};
????double?Q[20]={0};
	double?P0[20]={0};
????double?Q0[20]={0};

	//****************雅克比矩陣***********************
	double?Hij[10][10]={0};
	double?Nij[10][10]={0};
	double?Mij[10][10]={0};
	double?Lij[10][10]={0};
	
????//***********支路節(jié)點(diǎn)導(dǎo)納矩陣形成參數(shù)**********************************
????double?R=0X=0B2=0;
	double?SJ=0MJ=0;
????double?G[12][12]={0};
	double?B[12][12]={0};//節(jié)點(diǎn)導(dǎo)納矩陣的維數(shù)與節(jié)點(diǎn)數(shù)目一致；
????double?RR[12][12]={0};
	double?XX[12][12]={0};

	//*********************傳遞一維數(shù)組********************************
	double?JEG[100]={0};
????double?JEB[100]={0};
????double?JEH[100]={0};
	double?JEN[100]={0};
	double?JEM[100]={0};
	double?JEL[100]={0};
	//**********************定義matlab傳遞關(guān)系**********************************
????
????char?fn1[]=“節(jié)點(diǎn)支路參數(shù).txt“;//存輸出數(shù)據(jù)的
	ifstream?fileinxl;
????fileinxl.open（fn1ios::in）;
????if（!fileinxl）
		{
			???cout<<“沒有打開文件“<			???exit（1）;
		}
????cout<<“輸入維數(shù)：（先行后列）（9*9）;“<<“		“;
	cin>>m>>n;
????for（i=0;?i	{
		????fileinxl>>SJ>>MJ>>R>>X>>B2;
			int?t=（int）SJ;
????????????int?u=（int）MJ;
????????????G[t-1][t-1]+=R/（R*R-X*X）;
????????????B[t-1][t-1]+=（B2-X/（R*R-X*X））;
????????????G[u-1][u-1]+=R/（R*R-X*X）;
????????????B[u-1][u-1]+=（B2-X/（R*R-X*X））;
????????????G[t-1][u-1]-=R/（R*R-X*X）;
????????????B[t-1][u-1]-=-X/（R*R-X*X）;
????????????G[u-1][t-1]-=R/（R*R-X*X）;
????????????B[u-1][t-1]-=-X/（R*R-X*X）;
		????R=0X=0B2=0SJ=0MJ=0;
	}
????fileinxl.close（）;
????for（i=0;?i	{
			for（j=0;?j			{
				cout<			}
			cout<	}
	cout<????for（i=0;?i	{
			for（j=0;?j			{
				cout<			}
			cout<	}
																								//********************形成一維傳遞數(shù)組，用于matlab中處理*****************************************
																								/*for（??i=0;i					

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件??????22223??2011-04-17?12:16??潮流計(jì)算程序\3007203189%EF%BC%88%E6%80%BB%E4%BD%93%E7%A8%8B%E5%BA%8F%EF%BC%89.cpp

?????文件??????10984??2011-05-04?19:54??潮流計(jì)算程序\8070607.cpp

?????文件??????10523??2011-04-20?13:33??潮流計(jì)算程序\chaoliu.cpp

?????文件???????7087??2011-04-17?12:21??潮流計(jì)算程序\chaoliu.txt

?????文件??????10596??2011-04-17?14:14??潮流計(jì)算程序\Cpp1.cpp

?????文件???????1723??2007-06-25?09:35??潮流計(jì)算程序\dc\bruml.cpp

?????文件???????3389??2007-06-25?09:35??潮流計(jì)算程序\dc\bruml.dsp

?????文件????????533??2007-06-25?09:59??潮流計(jì)算程序\dc\bruml.dsw

?????文件??????????0??2007-06-25?09:33??潮流計(jì)算程序\dc\bruml.h

?????文件??????33792??2007-06-25?09:59??潮流計(jì)算程序\dc\bruml.ncb

?????文件??????48640??2007-06-25?09:59??潮流計(jì)算程序\dc\bruml.opt

?????文件???????1438??2007-06-25?09:35??潮流計(jì)算程序\dc\bruml.plg

?????文件??????????0??2007-06-25?16:57??潮流計(jì)算程序\dc\DC\0

?????文件??????????0??2007-06-25?16:50??潮流計(jì)算程序\dc\DC\1

?????文件???????1136??2006-01-05?22:31??潮流計(jì)算程序\dc\DC\1.txt

?????文件??????????0??2007-06-22?21:02??潮流計(jì)算程序\dc\DC\213

?????文件???????1716??2007-06-26?11:15??潮流計(jì)算程序\dc\DC\BRINV.C

?????文件???????3387??2007-06-24?15:28??潮流計(jì)算程序\dc\DC\BRINV.DSP

?????文件????????533??2007-06-24?15:29??潮流計(jì)算程序\dc\DC\BRINV.DSW

?????文件??????33792??2007-06-24?15:29??潮流計(jì)算程序\dc\DC\BRINV.ncb

?????文件??????48640??2007-06-24?15:29??潮流計(jì)算程序\dc\DC\BRINV.OPT

?????文件????????910??2007-06-24?15:28??潮流計(jì)算程序\dc\DC\BRINV.PLG

?????文件????????313??2007-06-25?10:05??潮流計(jì)算程序\dc\DC\BRMUL.C

?????文件????????578??2007-06-22?20:24??潮流計(jì)算程序\dc\DC\data_str.h

?????文件???????4475??2007-06-26?11:39??潮流計(jì)算程序\dc\DC\DC.dsp

?????文件????????527??2007-06-22?19:49??潮流計(jì)算程序\dc\DC\DC.dsw

?????文件??????50176??2007-06-26?22:45??潮流計(jì)算程序\dc\DC\DC.ncb

?????文件??????54784??2007-06-26?22:45??潮流計(jì)算程序\dc\DC\DC.opt

?????文件???????1475??2007-06-26?22:01??潮流計(jì)算程序\dc\DC\DC.plg

?????文件???????3901??2007-06-26?11:15??潮流計(jì)算程序\dc\DC\Debug\BRINV.obj

............此處省略103個(gè)文件信息