www.pudn.com > inet_stock.zip > BIAS.C

#include 
#include 
#include 
#include 
#include "resource.h"
#include "global.h"
#include "fx.h"

extern LPFX  Fx;

/*
	BIAS:乖离率
	BIAS =(ZJJG -N日平均ZJJG)/N日平均ZJJG
*/

int CreateBiasData(K_DATA *lpKData,int RNum,DATA *Data,PARA *Para)
{
    
	int i,j;
    static double Tun[2],Tdn[2];
    static double Ttr,Tpdm,Tndm,Tadx;
    static int Trise;
	BIAS_DATA *BiasData;
	
	BiasData=(BIAS_DATA*)_fmalloc(sizeof(BIAS_DATA)*RNum);
	memset(BiasData,0,sizeof(BIAS_DATA)*RNum);
	for(j=0;jprice[0]=0;
    		}
    		else
    		{
    			if(j<=Para->periods[0]-1)
    			{        
    			    BiasData[j].bias=0;
    				Ttr+=lpKData[j].ss;
    			}
    			
    			if(j==Para->periods[0]-1)
    			{
                    //Ttr=Ttr/Para->periods[0];
                    //Para->price[0]=BiasData[j].bias=Ttr*100.00;
                    Para->price[0]=BiasData[j].bias=
                    	(lpKData[j].ss -Ttr/Para->periods[0])*100.00/(Ttr/Para->periods[0]);
    			}
    			
    			if(j>Para->periods[0]-1)
    			{
    			    //Ttr+=(double)lpKData[j].ss/(double)Para->periods[0]-
    			    //     (double)lpKData[j-Para->periods[0]].ss/(double)Para->periods[0];
    			         
    			    Ttr+=lpKData[j].ss-lpKData[j-Para->periods[0]].ss;    			         
    				//BiasData[j].bias=((double)(lpKData[j].ss-Ttr)*100.00/Ttr);
                    BiasData[j].bias=
                    	(lpKData[j].ss -Ttr/Para->periods[0])*100.00/(Ttr/Para->periods[0]);
    				
    				if(Para->price[0]price[0]=BiasData[j].bias;
    			}    			
    		}
    }

    for(j=0;j<10;j++)
    {
        if(Data->v==NULL) 
        	break;
    	if(Data->v[j]!=NULL)
    	{
    		_ffree(Data->v[j]);
    		Data->v[j]=NULL;
    	}
    }
    Data->v==NULL;
    Data->num =Para->dnum; 
    Data->no =Para->no;
    strcpy(Data->gpdm,Fx->gpdm);
    Data->type =Fx->type;
    Data->range =Fx->range;
    Data->size =RNum;
    for(j=0;jnum;j++)
    	Data->v[j]=(double *)_fmalloc(sizeof(double)*RNum);
    for(i=0;inum;i++)
    {
    	for(j=0;jv[i][j]=BiasData[j].bias;
    	Data->method[i]=CURVE_METHOD;
    }
    Para->feature |=DW_ALL;
    _ffree(BiasData);
	return TRUE;
}