calcenergy.cpp

计算电能的有功功率

// calcEnergy.cpp : Defines the entry point for the application.
//

#include "stdafx.h"
#include "time.h"
#include "calmulenergy.h"
#include <time.h>
#include <stdio.h>
#include "caldemand.h"


short ChData[100][6];


void  CalQuadrant(long p,long  q);
int APIENTRY WinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPSTR     lpCmdLine,
                     int       nCmdShow)
{    
/* MKTIME.C: The example takes a number of days
 * as input and returns the time, the current
 * date, and the specified number of days.
 */

//测试需量
   short     *ps;
    static long add=0;
	static long i;
    ps = (short *)&ChData[0][0];
	ps = (short *)&ChData[0][1];
	ps = (short *)&ChData[0][2];
   
    Demand.Init();


while(1)
{
	add++;
    Demand.GetPQ(10000+add,20000);
	Demand.DemandData.PrivateData.Rate= FSXL_VALLAY;
    Demand.DemandData.PrivateData.Quadrant = QUADRANT_III;
	Demand.Exec();
    //Sleep(1000);
    i=0;
}  
     
		
    long p,q;
	p=0.5 * POWER_FORMAT_SCALE/1.100;
	q=0.5 * POWER_FORMAT_SCALE/1.100;
    CalQuadrant(p,q);
	p=1*POWER_FORMAT_SCALE/1.100;
	q=1*POWER_FORMAT_SCALE/1.100;
    CalQuadrant(-p,q);



	p=2*POWER_FORMAT_SCALE/1.100;
	q=2*POWER_FORMAT_SCALE/1.100;
    CalQuadrant(-p,-q);

	p=3*POWER_FORMAT_SCALE/1.100;
	q=3*POWER_FORMAT_SCALE/1.100;
    CalQuadrant(p,-q);

	return 0;
}


void  CalQuadrant(long p,long  q)
{
MulEnergy.PrivatePara.Rate=FSDN_SHARP;
 static long couter=0;
 couter=0;
 while(1)
 {
	//1000W 一象限
 	MulEnergy.CalcuPulse(p,q);
	MulEnergy.Exec();
	couter++;
	if (couter>=(3600*50))
	{ //一个小时
	   break;
	}

 }
 couter=0;
 MulEnergy.PrivatePara.Rate=FSDN_PEAK;
 while(1)
 {
	//1000W 一象限
 	MulEnergy.CalcuPulse(2*p,2*q);
	MulEnergy.Exec();
	couter++;
	if (couter>=(3600*50))
	{ //一个小时
	   break;
	}

 }
 couter=0;
 MulEnergy.PrivatePara.Rate=FSDN_FLAT;
 while(1)
 {
	//1000W 一象限
 	MulEnergy.CalcuPulse(3*p,3*q);
	MulEnergy.Exec();
	couter++;
	if (couter>=(3600*50))
	{ //一个小时
	   break;
	}

 }
 couter=0;
 MulEnergy.PrivatePara.Rate=FSDN_VALLAY;
 while(1)
 {
	//1000W 一象限
 	MulEnergy.CalcuPulse(4*p,4*q);
	MulEnergy.Exec();
	couter++;
	if (couter>=(3600*50))
	{ //一个小时
	   break;
	}
 }

}