开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
BIAS.C
资源名称：inet_stock.zip　[点击查看]
上传用户：bjghjy
上传日期：2007-01-07
资源大小：379k
文件大小：2k
源码类别：

金融证券系统

开发平台：

Visual C++

BIAS.C：源码内容
  1. #include <windows.h>
  2. #include <stdio.h>
  3. #include <malloc.h>
  4. #include <string.h>
  5. #include "resource.h"
  6. #include "global.h"
  7. #include "fx.h"
  9. extern LPFX  Fx;
  11. /*
  12. BIAS:乖离率
  13. BIAS =(ZJJG -N日平均ZJJG)/N日平均ZJJG
  14. */
  16. int CreateBiasData(K_DATA *lpKData,int RNum,DATA *Data,PARA *Para)
  17. {
  18.     
  19. int i,j;
  20.     static double Tun[2],Tdn[2];
  21.     static double Ttr,Tpdm,Tndm,Tadx;
  22.     static int Trise;
  23. BIAS_DATA *BiasData;
  25. BiasData=(BIAS_DATA*)_fmalloc(sizeof(BIAS_DATA)*RNum);
  26. memset(BiasData,0,sizeof(BIAS_DATA)*RNum);
  27. for(j=0;j<RNum;j++)
  28. {    
  29.      if(j==0)
  30.      {
  31.      Ttr=0;
  32.      BiasData[j].bias=0;
  33.      Para->price[0]=0;
  34.      }
  35.      else
  36.      {
  37.      if(j<=Para->periods[0]-1)
  38.      {        
  39.          BiasData[j].bias=0;
  40.      Ttr+=lpKData[j].ss;
  41.      }
  42.     
  43.      if(j==Para->periods[0]-1)
  44.      {
  45.                     //Ttr=Ttr/Para->periods[0];
  46.                     //Para->price[0]=BiasData[j].bias=Ttr*100.00;
  47.                     Para->price[0]=BiasData[j].bias=
  48.                      (lpKData[j].ss -Ttr/Para->periods[0])*100.00/(Ttr/Para->periods[0]);
  49.      }
  50.     
  51.      if(j>Para->periods[0]-1)
  52.      {
  53.          //Ttr+=(double)lpKData[j].ss/(double)Para->periods[0]-
  54.          //     (double)lpKData[j-Para->periods[0]].ss/(double)Para->periods[0];
  55.               
  56.          Ttr+=lpKData[j].ss-lpKData[j-Para->periods[0]].ss;              
  57.      //BiasData[j].bias=((double)(lpKData[j].ss-Ttr)*100.00/Ttr);
  58.                     BiasData[j].bias=
  59.                      (lpKData[j].ss -Ttr/Para->periods[0])*100.00/(Ttr/Para->periods[0]);
  60.     
  61.      if(Para->price[0]<BiasData[j].bias)
  62.      Para->price[0]=BiasData[j].bias;
  63.      }    
  64.      }
  65.     }
  67.     for(j=0;j<10;j++)
  68.     {
  69.         if(Data->v==NULL) 
  70.          break;
  71.      if(Data->v[j]!=NULL)
  72.      {
  73.      _ffree(Data->v[j]);
  74.      Data->v[j]=NULL;
  75.      }
  76.     }
  77.     Data->v==NULL;
  78.     Data->num =Para->dnum; 
  79.     Data->no =Para->no;
  80.     strcpy(Data->gpdm,Fx->gpdm);
  81.     Data->type =Fx->type;
  82.     Data->range =Fx->range;
  83.     Data->size =RNum;
  84.     for(j=0;j<Data->num;j++)
  85.      Data->v[j]=(double *)_fmalloc(sizeof(double)*RNum);
  86.     for(i=0;i<Data->num;i++)
  87.     {
  88.      for(j=0;j<RNum&&i==0;j++) 
  89.      Data->v[i][j]=BiasData[j].bias;
  90.      Data->method[i]=CURVE_METHOD;
  91.     }
  92.     Para->feature |=DW_ALL;
  93.     _ffree(BiasData);
  94. return TRUE;
  95. }