#include
#include
#include
#include
#include
#include
#include
void?dataprepare（void）;
void?initial（void）;
void?Yc（void）;
void?showy（void）;
double?detpqc（void）;
void?showdetav（void）;
void?Jrc（void）;
void?showdetpq（void）;
void?Gauss（void）;
void?showj（void）;
void?showsolution（void）;
char?save2file（void）;
char?option（void）;
int?chose（void）;
int?list（char?filename[]int?ichar?dstn[]）;
struct?PQV
{
??char?name[5];
??double?vb;
??double?p;
??double?q;
??double?v;
??double?ag;
}*pqv;
struct?Y{
	double?G;
	double?B;
}**y;
struct?LZ
{
	char?name1[5];
	double?vb1;
	char?name2[5];
	double?vb2;
	double?r;
	double?x;
	double?b;
}*lz;
struct?TZ
{
	char?name1[5];
	double?vb1;
	char?name2[5];
	double?vb2;
	double?x;
	double?k1;
	double?k2;
}*tz;
char?fsource[20];
int?pqnum=0pvnum=0lznum=0tznum=0;
int?temp1=0temp2=0temp3=0temp4=0;
int?diedai=0;
int?numw=1numofw=0;
double?*detpq*detav*Pi*Qierrorwucha**J;?/*?detpq節(jié)點(diǎn)功率的誤差量，detav修正量，Pi節(jié)點(diǎn)的有功功率?*/
char?cchdstname[20]filename[20];
int?main（）
{
opt:c=option（）;
	if（c==‘1‘）goto?opt1;
	else?if（c==‘2‘）
	{
		list（“1.bin“1filename）;
		system（“mode?con:cols=100?lines=30?&?color?07“）;
		while（c!=‘0‘）
		{
			system（“cls“）;
			printf（“?????????################################計(jì)算結(jié)果文件查看################################\n“）;
			printf（“?????????????????????????[8]上一個(gè)?[2]下一個(gè)?[5]查看?[-]刪除文件?【0】退出\n\n“）;
			list（“1.bin“0filename）;
			chose（）;
		}
	???goto?opt;?
	}
	else?if（c==‘0‘）exit（0）;
	else?goto?opt;?
opt1:dataprepare（）;
init:initial（）;
	Yc（）;
	printf（“輸入允許誤差量：“）;
	scanf（“%lf“&wucha）;
	printf（“選擇模式：a.詳情；b.簡(jiǎn)單：“）;
redo:fflush（stdin）;
	c=getchar（）;
	if（c!=‘a(chǎn)‘&&c!=‘b‘&&c!=‘A‘&&c!=‘B‘）
	{printf（“輸入錯(cuò)誤！重新輸入：“）;goto?redo;}
	if（c!=‘B‘&&c!=‘b‘）showy（）;
	error=detpqc（）;
	?showdetpq（）;
	while（error>wucha&&error<100）
	{
		if（c!=‘B‘&&c!=‘b‘）
		{
			printf（“\t\t是否繼續(xù)迭代????<空格：是??R/r:重賦初值??E/e:退出潮流計(jì)算>？\n“）;
	ifdie:	fflush（stdin）;
			ch=getch（）;
			switch（ch）
			{
			case?‘?‘:break;
			case?‘R‘:;
			case?‘r‘:goto?init;break;
			case?‘E‘:;
			case?‘e‘:goto?opt;break;
			default:?goto?ifdie;
			}
		}

		diedai++;
		Jrc（）;
		if（c!=‘B‘&&c!=‘b‘）
		{
			printf（“\n>>>>>>>>>>>>>>>>>>>第?%d?次迭代<<<<<<<<<<<<<<<<<<<<<\n“diedai）;
			showj（）;
		}
		Gauss（）;
		if（c!=‘B‘&&c!=‘b‘）showdetav（）;
		for（temp1=0;temp1		pqv[temp1].ag=pqv[temp1].ag-detav[temp1];
		for（temp1=0;temp1		pqv[temp1].v=pqv[temp1].v-detav[temp1+pqnum+pvnum];
		error=detpqc（）;
		if（c!=‘B‘&&c!=‘b‘）
		showdetpq（）;
	}
	if（error>=300||error<0）
	{
			printf（“\t\t迭代不收斂????？\n“）;
	what:	fflush（stdin）;
			ch=getch（）;
			switch（ch）
			{
			case?‘R‘:;
			case?‘r‘:goto?init;break;
			case?‘E‘:;
			case?‘e‘:goto?opt;break;
			default:?goto?what;
			}
	}
	showsolution（）;
	ch=save2file（）;
	if（ch==‘1‘）goto?opt;
	els

?屬性????????????大小?????日期????時(shí)間???名稱(chēng)
-----------?---------??----------?-----??----
?????文件?????????476??2014-03-27?21:34??a1.data
?????文件?????????511??2014-03-27?21:28??pf1.dat
?????文件?????????545??2013-11-13?20:29??pf2.dat
?????文件?????????511??2013-10-27?15:33??pf3.dat
?????文件???????18206??2013-11-19?05:29??powerflow.c
?????文件???????21504??2013-11-19?02:26??powerflow.exe
?????文件?????????573??2013-11-19?02:54??solution1.data
?????文件?????????573??2013-11-19?03:47??solution2.data
?????文件?????????573??2013-11-19?04:30??solution3.data
?????文件?????????573??2013-11-19?04:27??solution4.data