飞狐交易师 (foxtrader) 连结 DLL 的方法

ycng

许多年以前,我曾经在
4 Z; T0 O$ o  w; j3 n7 t理想公式区发布了
2 _* S( H- e; Y0 I# V6 f6 }% p- J( G"
3 [* U4 L( H6 R2 B  d8 X  w如何用 Foxtrader(飞狐)连结 C++动态程式库 DLL及 80x86Macro Assembly (组合语言)
, ?* y7 T( r9 ?9 b9 w. u7 Z: W6 o"
. i( M3 n" I0 ]+ q5 I' G. D) i
现在更新foxtrader(飞狐交易师)
  F+ T; [" R- T5 B) X连结 DLL的方法

foxtrader- - > DLL (C++ and assembly) = ( foxfunc.h + foxfunc.cpp +pow10.asm )
gauss- - > DLL (C++ and assembly) = ( foxfunc.cpp + meigj.asm )
gauss只用到函数参数传递,所以使用新的 c++compiler, 不受影响
/ Z" ]* Q) y, @4 xfoxtrader的 foxfunc.h宣告的结构型态 (struct)在 2004vc++ 6.0 全部有效

3 _5 h' P( M. U& u+ V也就是这五个结构都能用
typedefstruct tagSTKDATA
typedefunion tagSTKDATAEx
6 `/ f* j! A- ~7 |typedefstruct tagSPLITDATA
typedefstruct tagCALCPARAM
; v0 I6 q9 m! f2 R% l- Y( Utypedefstruct tagCALCINFO
! K! @4 B& n  k( ~) V
5 J( p. I& t! H2 z# a. c  t! S$ p自2008年起,vc++ 2008, vc++ 2010, vc++2017 对struct的编译,已经完全 c++化,不再相容于 C
也就是这五个结构中
4 l$ q4 p1 D6 k  q. j( n- vtypedefstruct tagSTKDATA
/ m* o" V& N% F' H' ]  |typedefunion tagSTKDATAEx
typedefstruct tagSPLITDATA
typedefstruct tagCALCPARAM
5 s/ r5 l3 p( j5 L" ^: ]! ~typedefstruct tagCALCINFO
只有这两个可以用
typedefstruct tagCALCPARAM
typedefstruct tagCALCINFO
  O0 V8 X8 A; X值得庆幸的是,下面这个结构的函数参数传递个数可以有无数个
typedefstruct tagCALCPARAM
例如:在 foxtrader中
( X1 q7 P- P: C* e* h! dMA1:=MA(CLOSE,3);
MA2:=MA(CLOSE,6);
MA3:=MA(CLOSE,12);
MA4:=MA(CLOSE,24);
MYBBI1:"MYFUNC2017@MYBBI"(MA1, MA2,MA3,MA4,MA3,MA4,5)*0.95,colorff00ff,linethick3; {2017 vc++ 15.0}
# s: X) S) O7 n6 i1 j/ }* d( ]; M  e其中MYFUNC2017=MYFUNC2017.dll, MYBBI = MYFUNC2017.dll 中的MYBBI函数,这里 MYBBI函数传递的参数共有 7个
' c: V; q9 o- U% W下面这两式计算结果相同
xx:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12),MA(CLOSE,24),MA(CLOSE,12),),MA(CLOSE,24)/6*0.95,color0000ff,linethick2;{foxtrader 自行计算}
MYBBI1:"MYFUNC2017@MYBBI"(MA1, MA2,MA3,MA4,MA3,MA4,6)*0.95,colorff00ff,linethick3; {2017 vc++ 15.0 , dll计算}
' o7 U* e, ^' @其他例子
oooq:="MYFUNC2008good@MYMACLOSE"(c,,c,c,6),colorffffff,linethick5;(---> pow10.asm)
oooq1:"MYFUNC2010@MYMAVAR"(ma(c,5),5),colorgreen,linethick5;
其中pow10.asm里面有很多不同定义或宣告被注解不用,那是因为后来在逐步侦测法修改语码中才发现在foxfunc.cpp主程式中,下面这行错误,也就是新的 compiler不再相容于 C,因此在pow10.asm里面被注解不用的定义或宣告中,有些应该是可以用的
fTotal= pData->m_pData.m_fClose; // @@@@@@@ vc++ 2010 cl.exe 使pData->m_pData[i-j].m_fClose错误

4 a( F0 _) o- v% u& p' B0 ^  q
% ?8 C0 T* y& M; D////////////////////////////////////////////////////////foxfunc.h
5 |" V1 O6 ]. h#ifndef__FOXFUNC_H_INCLUDE
#define__FOXFUNC_H_INCLUDE
- e! D2 \1 J" z$ ?8 z/*
飞狐交易师“C语言接口”扩展程序调用接口规范V3.0
1.本规范适用于飞狐交易师V3.x公式系统.
1 i( C- I5 X9 ]. N2 d. V0 y4 q2.扩展函数用于实现系统函数不能实现的特殊算法.
3.扩展函数用windows32位动态连接库实现,建议使用MicrosoftVisual C++编程.
+ n  Q( A( q8 X' [: h1 [0 S8 g- @4.调用时在公式编辑器中写"动态库名称@函数名称"(参数表)即可,例如下面函数可以写为"FOXFUNC@MYMACLOSE"(5)
5.动态连接库名称和函数名称可以自己定义.
7 \/ A" s0 Q8 J' ?/ c6.使用时必须将动态库拷贝到飞狐交易师安装目录下的FmlDLL子目录下使用.
*/
#ifdef__cplusplus
6 _: T# Z7 g$ I- B2 U& I- qextern"C"
# J+ R4 X3 ?: q& o$ q5 ~{
  Y* [+ W  ^$ p  m% e#endif//__cplusplus
* n0 L2 l, q. ^5 ^2 B  g///////////////////////////////////////////////////////////////////////////
//分析周期
) K" \" d& `- zenumDATA_TYPE
5 v3 D! y7 A( [  Y; g( {{
9 W* }/ U8 U* ?6 ZTICK_DATA=2,//分笔成交
. ~- o: G! c' j6 J( Q; DMIN1_DATA,//1分钟线
MIN5_DATA,//5分钟线
) J. i" X) i* M! n% xMIN15_DATA,//15分钟线
MIN30_DATA,//30分钟线
MIN60_DATA,//60分钟线
DAY_DATA,//日线
; ^6 d# K, q' C! MWEEK_DATA,//周线
* U) ^! a6 `; _9 t! U3 C2 B3 ?) fMONTH_DATA,//月线
YEAR_DATA,//年线
  f6 G7 h- r8 K8 W% w' r6 KMULTIDAY_DATA,//多日线
MULTIMIN_DATA//多分钟线
};
0 Q2 d3 M: z* I1 L1 I* E) H///////////////////////////////////////////////////////////////////////////
' \* r1 ?/ Y% H+ S9 e# H' e( f//定义取用股票基本数据的结构 只有 VC++ 6.0 能compile成功使用
typedefstruct tagSTKDATA
! W. ?4 L& w7 L( }! ]: h' `: i3 b{
_tm_; //时间,UCT
floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
- d2 {% |3 ~9 T5 B8 I6 z% u7 ~floatm_fLow; //最低 low
floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
floatm_fAmount; //成交额 amount
* _# e8 W* |" mWORDm_wAdvance; //上涨家数 仅大盘有效
( E& v+ x& v$ A; EWORDm_wDecline; //下跌家数 仅大盘有效
}STKDATA;
定义STKDATA为 tagSTKDATA的简单别名,STKDATA
为真正方便使用名称,tagSTKDATA 为定目的的过水名称
////////////////////////////////////////////////////////////////////////////
//扩展数据,用于定义取用分笔成交数据的买卖盘 的结构
! ?, q8 J+ P2 P. n  }/ ]typedefunion tagSTKDATAEx
. O) s! L6 j& T7 C9 V/ k& ~{
struct
- j3 Z# ]; b3 U: i( H% s5 [* p{
floatm_fBuyPrice[3]; //买1--买3价floatm_fOpen; //开盘 open
3 N) B* J3 J2 D; Afloatm_fHigh; //最高 high
floatm_fLow; //最低 low
2 j. P9 D; w' ~7 M/ g7 |4 l2 ofloatm_fClose; //收盘 close
% V5 |0 E/ l+ N( p. t7 zfloatm_fVolume; //成交量 Volume
floatm_fAmount; //成交额 amount
floatm_fBuyVol[3]; //买1--买3量
floatm_fSellPrice[3]; //卖1--卖3价
0 f/ Y; x( l/ u% H4 Y8 U) f" T% Ffloatm_fSellVol[3]; //卖1--卖3量
};
floatm_fDataEx[12];
: i4 x3 F! o# I' n  t}STKDATAEx;
////////////////////////////////////////////////////////////////////////////
//定义取用除权数据的结构
typedefstruct tagSPLITDATA
{
( D% }3 a( [% G  _3 D& r2 Ptime_tm_time; //时间,UCT
+ O& \* n# l, \/ \floatm_fHg; //红股
; N- C* O/ ?# }1 Q& Q1 q0 xfloatm_fPg; //配股
' N4 R9 I8 `% ~  P' U0 zfloatm_fPgj; //配股价
floatm_fHl; //红利
}SPLITDATA;
5 `, c4 I  I7 O/////////////////////////////////////////////////////////////////////////////
/*财务数据顺序(m_pfFinData内容)
# \* F5 x2 @$ ^& C序号内容
0总股本(万股),
1国家股,
' h6 H2 x: a' d7 p2发起人法人股,
3法人股,
8 w( O: X" \- g/ n, Q7 o4B股,
5H股,
+ g0 Q, m$ M( |( D. _/ l6流通A股,
, p2 L) m+ M; d7职工股,
8A2转配股,
5 y6 W8 |# f/ g; m7 \1 G$ K8 ?9总资产(千元),
10流动资产,
5 G$ m" r1 e. g, t) g11固定资产,
' ^0 }6 s# }( F# J% r8 [12无形资产,
13长期投资,
14流动负债,
; U) O2 |& W. N9 R7 z- R15长期负债,
16资本公积金,
17每股公积金,
18股东权益,
% z) |# T/ W) F% f# C- u19主营收入,
6 h) S+ y# v+ _' B! N, A20主营利润,
21其他利润,
22营业利润,
23投资收益,
' t5 s4 b+ G4 h4 T24补贴收入,
25营业外收支,
1 i# p! {1 ?$ F) {26上年损益调整,
% b8 n7 z5 X0 ^6 l! m: d27利润总额,
5 M) h# ?9 y6 `- c! ^- U# q5 c; b28税后利润,
4 t5 Z3 b* S/ g& @1 z5 b. _0 X: _5 j2 z, M29净利润,
& w  J$ C& [+ i* n6 O; c30未分配利润,
31每股未分配,
32每股收益,
, h* D: Z: N/ C- ~' J" T33每股净资产,
. W/ p9 Z4 G2 v: F. c7 K34调整每股净资,
35股东权益比,
& p0 c" t) h# U5 f) V: O2 p36净资收益率
*/
/////////////////////////////////////////////////////////////
& U* d' U" i. ~% c8 {//定义取用caller函数传递参数项 的结构
typedefstruct tagCALCPARAM
) ~0 M8 h7 Z* d4 M3 z{
union
{
constfloat* m_pfParam; //指向序列参数的址标，指向一个浮点型数组pointertofloat variable parameter / ex. c,h,l,o, co2...co2=(c+o)/2
constfloat m_fParam; //数值参数 valueof parameter
};
constint m_nParamStart; //序列参数有效起始位置thestart address of variable parameter / ex. c,h,l,o,co2.....
/ N& e) A8 G+ u& i, @}CALCPARAM;
* f( j5 A5 q; J8 }5 |/////////////////////////////////////////////////////////////////////////////
//定义全部取用址标 的总结构 (各指标指向前述各结构以便取的各结构的数据,接口信息数据的结构 )
typedefstruct tagCALCINFO
{
* N& R- E/ q4 o4 S0 G0 Z. ~constDWORD m_dwSize; //结构大小
5 o6 r/ x0 ^0 ]* g6 X% ?constDWORD m_dwVersion; //调用软件版本(V2.10: 0x210)
! X6 @* r  f" W( _- |constDWORD m_dwSerial; //调用软件序列号
, C1 Z5 \. C7 N( S. Rconstchar* m_strStkLabel; //股票代码
constBOOL m_bIndex; //大盘
, Q2 U$ m  R0 bconstint m_nNumData; //数据数量(pData,pDataEx,pResultBuf数据数量)数据长度
constSTKDATA* m_pData; //常规数据,注意:当m_nNumData==0时可能为NULL
+ E5 {: T" l4 Q. c2 k8 r& B# C1 N5 \7 IconstSTKDATAEx* m_pDataEx; //扩展数据,分笔成交买卖盘,注意:可能为NULL
+ Y4 Z; ]* B& n3 O0 Kconstint m_nParam1Start; //参数1有效起始位置<0/ constant parameter >0 /variable parameter
3 K3 e. ~% Q+ rconstfloat* m_pfParam1; //调用参数1/pointer to variable parameter 1
constfloat* m_pfParam2; //调用参数2/pointer to variable parameter 2
constfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
! c% k; j/ n9 s3 ]3 a) pconstfloat* m_pfParam4; //调用参数4/pointer to variable parameter 4
/ E& F/ Q! Z# f/ B5 d1 ^# ffloat*m_pResultBuf; //结果缓冲区
" O0 ~6 W5 ~, R( m, h( sconstDWORD m_dataType; //数据类型
constfloat* m_pfFinData; //财务数据
1 o  {$ l4 ~6 j( e* \" L//以上与分析家兼容，所以沿用其结构和名称
: g2 T0 v: y, j7 M. R, j2 d//以下为飞狐交易师扩展(fortagSTKDATAEx)
/ d, A( X  r# V. yconstDWORD m_dwReserved; // 保留
$ d/ K* w% [4 }) K) Z3 }constint m_nNumParam; // 调用参数数量
* b' M, s. h4 Y( X0 d6 n' _/ zconstCALCPARAM* m_pCalcParam; // 调用参数数组
constDWORD m_dwReservedEx[4]; // 保留
char*m_strStkName; //股票名称
! l' S6 n4 e8 J; dSPLITDATA*m_pSplitData; //除权数据
intm_nNumSplitData; //除权次数
}CALCINFO;
- f% c7 t! f. [. @; ~/*
: M8 m7 c+ P; m# X5 w4 N% W注1:(与分析家兼容)
( o& S7 n$ {* I+ F1.函数调用参数由m_pfParam1--m_pfParam4带入,若为NULL则表示该参数无效.
2.当一个参数无效时,则其后的所有参数均无效.
0 n: W8 l1 L8 Q6 n* x9 K如:m_pfParam2为NULL,则m_pfParam3,m_pfParam4一定为NULL.
3.参数1可以是常数参数或序列数参数,其馀参数只能为常数参数.
4.若m_nParam1Start<0,则参数1为常数参数,参数等于*m_pfParam1;
7 D1 R- g- s8 F: O% n* a5.若m_nParam1Start>=0,则参数1为序列数参数,m_pfParam1指向一个浮点型数组,
( E+ V0 H# B! n! \4 P3 L- G数组大小为m_nNumData,数据有效范围为m_nParam1Start至 m_nNumData-1.
1 P3 j" N% o1 Z7 [在时间上m_pData[x]与 m_pfParam1[x]是一致的
注2:(飞狐交易师扩展)
1.该扩展结构使调用参数在技术上可以是无限数目的，且每个参数都可为数值或序列，由公式中实际的调用参数决定。
& Q1 F2 U3 v9 ^$ |( J3 w* @7 Q6 G2.CALCPARAM结构用于带入参数信息和实际数据，m_pCalcParam数组大小为m_nNumParam，数据有效范围为0 至m_nNumParam-1.
3.按参数的顺序，m_pCalcParam[0]为第一个参数的数据，m_pCalcParam[1]为第二个参数的数据...，为了保持兼容，原m_nParam1Start、m_pfParam1等5个属性依然有赋值。
4.若i位置的参数为数值，取用m_pCalcParam.m_fParam.
5.若i位置的参数为序列，取用m_pCalcParam.m_pfParam，数组大小为m_nNumData,数据有效范围为m_pCalcParam.m_nParamStart至 m_nNumData-1.若m_pCalcParam.m_nParamStart<0,则此数组中无有效数据。
+ Q  h% Z' I. J6.由于可以调用多个序列，许多序列的计算可以先在公式中进行，然后作为调用的参数即可。
7.经此扩展，对分析家的DLL依然可以调用、兼容。
*/
$ C$ |7 ^1 q9 H- T( \/ D4 w///////////////////////////////////////////////////////////////////////////////////
/*函数输出
__declspec(dllexport)int xxxxxxxx(CALCINFO* pData);
1.函数名称需全部大写.
2.函数必须以上述形式声明,请用实际函数名称替代xxxxxxxx;
, g) j7 M. g( I- C# ?; }对于C++程序还需包括在extern"C" { } 括号中.
3.函数计算结果用pData->m_pResultBuf带回.
4.函数返回-1表示错误或全部数据无效,否则返回第一个有效值位置,即:
m_pResultBuf[返回值]-- m_pResultBuf[m_nNumData-1]间为有效值.
5.函数名称长度不能超过15字节,动态连接库文件名不能超过9字节(不包括扩展名),动态库名称不能叫SYSTEM,EXPLORER
+ q  S6 e( T1 }+ D" I- c*/
//示例函数,使用时用实际名称替换
__declspec(dllexport)int WINAPI MYMACLOSE(CALCINFO* pData);
__declspec(dllexport)int WINAPI SMOOTH(CALCINFO* pData);
//__declspec(dllexport) int WINAPI MYMAVAR(CALCINFO* pData);
# k' Z9 r- \5 `& w__declspec(dllexport)int WINAPI MYBBI(CALCINFO* pData);
/ {6 |1 ]2 f  h6 }//WINAPI = _stdcall
0 B3 ^) i& U, |4 \% ~0 N#ifdef__cplusplus
+ \! V6 b" r* H- N2 \}
( x* {, t, Z* K# L( Z#endif//__cplusplus
#endif//__FOXFUNC_H_INCLUDE

; h/ ~/ U& i3 ~6 E3 h+ l6 w//////////////////////////////////////////comment 注解
5 P0 T# K1 I3 Y+ G) [, h__declspec(dllexport)int WINAPI MYMAVAR(CALCINFO* pData)
! k4 `+ r3 ], P5 dpData是指向 址标总结构 CALCINFO的 总址标
( C6 y1 I' q9 T8 r/ O% T取用第二个参数数值floatfParam = *pData→m_pfParam2
取用第一个序列参数的址标constfloat* pValue = pData->m_pfParam1;
5 I% @4 m! c- g+ }取用股票数据长度intndata = pData→m_nNumData;
9 Y% E6 H# u  o  g第一个参数存在且为数值pData->m_pfParam1&& pData→m_nParam1Start<0
) F+ `3 q6 S: C: r: V# f2 w8 F第一个参数存在且为序列pData->m_pfParam1&& pData→m_nParam1Start>=0
第一个及第二个参数存在且为序列,第三个参数不存在pData->m_pfParam1&& pData->m_pfParam2 && pData->m_nParam1Start>=0&& pData->m_pfParam3==NULL
  _8 ?* D/ C: e$ M3 S2 Pconstfloat* cpParam = pData->m_pfParam1; 定义cpParam为第一个序列参数的址标
5 r, p! R6 V4 c7 T& Q- [取用股票数据结构
pData→m_nNumData= 变数数据长度
" N; u: X* g. W; F. H. a# wpData→m_pData= pointer to struc STKDATA 的址标
/ p; m( t0 O) q4 ^' ~pData→m_pData[x]数据结构的第x个数据
* p3 E" o8 m! g4 C3 Y! tpData→m_pData[x].m_fHigh数据结构的第x个数据中的 High
取用结果缓冲序列
pData->m_pResultBuf
取得第一个序列参数的起始序位,如 2,...5 , . 7...
intnFirst = pData->m_nParam1Start;
for( i = nFirst+nPeriod-1; i < pData->m_nNumData; i++ )
取得第二个数值参数的数值
floatfParam = *pData->m_pfParam2;
# W5 \$ A6 w; x( f9 F7 QintnPeriod = (int)fParam;
取用第一个序列参数的址标constfloat* pValue = pData→m_pfParam1;
取用序列参数的单个直pValue
取用缓冲序列的单个值pData->m_pResultBuf
constCALCPARAM* m_pCalcParam; // 调用参数数组
m_pCalcParam为序列址标,指向各序列参数的指标
第一个序列参数pData→m_pCalcParam[0]
2 ^, u- W. i) Y' hconstfloat* m_pfParam; //指向序列参数的址标
3 B/ e  ]* S' t第一个序列参数的起始序位pData->m_pCalcParam[0].m_nParamStart
' W/ u$ ~. H0 _* L6 @% h* A7 ~第一个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[0].m_pfParam;
& j; P1 q/ _5 X6 q取用第一个序列参数的单个直pValue1
第二个序列参数pData→m_pCalcParam[1]
! O$ m7 I5 F; M9 }7 g( f第二个序列参数的起始序位pData->m_pCalcParam[1].m_nParamStart
& h: F1 D  V4 Y+ W5 D; A# l第二个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[1].m_pfParam;
/ L  J2 L* ?0 L9 N* u取用第二个序列参数的单个直pValue2
第三个序列参数pData→m_pCalcParam[2]
; q7 Q* n6 R. l' `5 Q, c第三个序列参数的起始序位pData->m_pCalcParam[2].m_nParamStart
第三个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[2].m_pfParam;
取用第三个序列参数的单个直pValue3
6 b* v" ~5 m% Z; f3 u0 D; d第四个序列参数pData→m_pCalcParam[3]
, z# T: @" |9 D7 I8 X* ^第四个序列参数的起始序位pData->m_pCalcParam[3].m_nParamStart
3 y& \4 ]1 s3 U+ `第四个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[3].m_pfParam;
  @% k7 B! E$ o取用第四个序列参数的单个直pValue4
如果有四个序列参数,则取用序位最高的那一个序位
if( pData->m_pCalcParam[0].m_nParamStart >= 0 &&
* P/ B- O, T4 @, U! ]0 npData->m_pCalcParam[1].m_nParamStart>= 0 &&
4 a6 U9 A1 Z0 H3 [3 ]pData->m_pCalcParam[2].m_nParamStart>= 0 &&
pData->m_pCalcParam[3].m_nParamStart>= 0 ) //4个序列都含有效数值
+ ^8 Y( `! U, m  l1 H$ u{
  e- p( X" m( d//计算返回的序列的第一个有效值位置
intnFirst = pData->m_pCalcParam[3].m_nParamStart;//已知返回的序列的第一个有效值位置与第4个序列一致
" D/ [: j3 U; j7 Y3 ]//若不知，则
/*
intnFirst = pData->m_pCalcParam[0].m_nParamStart;
: p  ?+ p& m8 ^9 }if( nFirst < pData->m_pCalcParam[1].m_nParamStart )
nFirst= pData->m_pCalcParam[1].m_nParamStart;
if( nFirst < pData->m_pCalcParam[2].m_nParamStart )
nFirst= pData->m_pCalcParam[2].m_nParamStart;
if( nFirst < pData->m_pCalcParam[3].m_nParamStart )
. ^6 R# S1 O; OnFirst= pData→m_pCalcParam[3].m_nParamStart;
* j& m3 I3 l% }3 e+ o- ~6 Z+ bconstfloat* pValue1 = pData->m_pCalcParam[0].m_pfParam;
constfloat* pValue2 = pData->m_pCalcParam[1].m_pfParam;
constfloat* pValue3 = pData->m_pCalcParam[2].m_pfParam;
constfloat* pValue4 = pData->m_pCalcParam[3].m_pfParam;
//-------------------
2 Q' l: s( r% z8 q8 X) Z) v% ifloatm_fOpen; //开盘 open
. W5 N% B5 Z! P5 q/ k! P3 Ofloatm_fHigh; //最高 high
floatm_fLow; //最低 low
floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
. ?% O- O1 s; a2 `0 K/ Mfloatm_fAmount; //成交额 amount
调用收盘据
+ _& t. m! c$ zpData→m_nNumData= 变数数据长度
' P) C5 `5 S! H- W' @% L: k7 _7 s8 MpData→m_pData= pointer to struc STKDATA
+ N+ S# d8 ^# \& _0 ^pData→m_pData[x]第x个数据
pData→m_pData[x].m_fHigh第x个数据中的 High
0 Y& ~7 e2 Y4 [, H4 i6 h@@@@@@@@@@@important !!!!!!!
sinceVC++ 2008, cl.exe will make ‘pData→m_pData[i-j].m_fClose’ anerror
so,pass the high,low,open and close just from the function parameter ,that is use ‘ CALCPARAM’ struct
( ^8 w$ y- K& Q0 M! g  BpData->m_pData[i-j].m_fOpen// to use open , there is no way in using a varable for calculationoutside foxtrader
pData→m_pData[i-j].m_fHighto use high
pData->m_pData[i-j].m_fLow
' k3 c2 t5 I, l7 h% S, a$ g" mpData->m_pData[i-j].m_fClose
m_pData= pointer to struc STKDATA
0 c) `' Z2 j; o# ]( o! pincalling C++ dll function
m_pDatais passed to pData (CALCINFO* pData . A CALCINFO* type pointer)
touse a single value in variable ‘High’
pData→m_pData[i-j].m_fHighto use high
constfloat* m_pfParam1; //调用参数1/pointer to variable parameter 1
7 K8 X3 {) s8 F- C: Qconstfloat* m_pfParam2; //调用参数2/pointer to variable parameter 2
6 }# \+ b' H; e* m9 S6 c. zconstfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
constfloat* m_pfParam4;
- q3 R7 ~$ V7 L1 ~) zm_pfParam1,m_pfParam2, m_pfParam3, m_pfParam4 = pointer to caller function 的参数
9 F+ n3 c$ O1 zpData→m_pfParam1= pointer to 第一个(序列)参数
' C2 G2 S6 n9 i4 i( a  C, a( U* H3 ~% o# qpData→m_pfParam1[x]= 取用第一个(序列)参数的第x 个值
constfloat* cpParam = pData→m_pfParam1; ＝定义 cpParam为 pointerto 第一个(序列)参数
cpParam[x] = 取用第一个(序列)参数的第x 个值
m_pResultBuf＝ 结果缓冲列
5 ~. O" L  F0 c8 ^3 q/ j0 @" ApData→m_pResultBuf= pointer to 结果缓冲列
. x! S6 [7 z7 T! m) ZpData→m_pResultBuf[x] = 取用结果缓冲列的第 x个值
6 `. a# r$ z. K) Y//////////////////////////////////////////comment
5 {9 c; u6 x) ~) Q, C//////////////////////////////////////////comment 注解
" Q$ z4 }: c! i% H+ zconstint m_nParam1Start; //统杅1衄虴宎弇离
constfloat* m_pfParam1; //覃蚚统杅1
! o4 w6 `  z, Zconstfloat* m_pfParam2; //覃蚚统杅2
$ n# k/ M' V5 L! M. yconstfloat* m_pfParam3; //覃蚚统杅3
constfloat* m_pfParam4; //覃蚚统杅4,parameters must be <= 4
//const float* m_pfParam5; // parameters must be <= 4
8 _" V/ b1 P* Q//const float* m_pfParam6;
, ]- U" X1 s/ T) O- E- q//const float* m_pfParam7;
//const float* m_pfParam8;
9 ]* f% b6 p, n; j/ n$ q3 l//pData->m_pfParam1 && pData->m_pfParam2 &&pData->m_pfParam3 && pData->m_nParam1Start>=0 &&
pData->m_pCalcParam[0].m_nParamStart>=0&& pData->m_pCalcParam[1].m_nParamStart>=0
+ @0 n1 w" O( b&&pData->m_pCalcParam[2].m_nParamStart>=0)
" k3 G4 x5 |* o{
; U1 l( c1 F9 \7 H4 F, S/ E' EfloatfParam = *pData->m_pfParam4; //pointer ,pData->m_pCalcParam[3].m_nParamStart >= 0
intnPeriod = (int)fParam; //统杅1
//const float* cpParam = pData->m_pfParam2; // cpParam = pointer to第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
6 S/ B+ F& ~7 g2 M( B/ u% L, T0 [constfloat* cpParam1 =pData->m_pCalcParam[0].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
constfloat* cpParam2 =pData->m_pCalcParam[1].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
constfloat* cpParam3 =pData->m_pCalcParam[2].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值//parameters must be <= 4
6 b8 u: t+ H2 L6 r8 V" Z# H//const float* cpParam4 =pData->m_pCalcParam[3].m_pfParam; //cpParam = pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
//const float* cpParam5 =pData->m_pCalcParam[4].m_pfParam; //cpParam = pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
//m_pData = const struct pointer to struct STKDATA , pointer to structSTKDATA ,
touse pData→m_pData[x].m_fClose
# \5 w6 p) h1 X3 i( SpData→m_pData[x]= | 1,2,3 , … , m_nNumParam | time_t m_time;
! g+ r6 z+ {: U% N5 K|1,2,3 , … , m_nNumParam | float m_fOime_t
|1,2,3 , … , m_nNumParam | float m_fHigh;
: i3 O3 t- M+ v$ N4 h8 C.. .
, W, V& Y( \; \9 U/ n|1,2,3 , … , m_nNumParam | WORD m_wDecline;
m_nNumParam= 数据high,close,open,low的长度
touse high:
- U- ?8 V" m  ]pData→m_pData[x].m_fHigh
+ L: \- h  p& jcontentof struct STKDATA
' x3 |" {! i8 r7 _9 M  Gtime_tm_time; //时间,UCT
floatm_fOpen; //开盘 open
+ d% {; G$ Y$ ffloatm_fHigh; //最高 high
floatm_fLow; //最低 low
floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
5 j9 W2 L) ^+ d' C( y! e* U  vfloatm_fAmount; //成交额 amount
# ^7 l7 q; k: a7 X/ J1 p2 wWORDm_wAdvance; //上涨家数 仅大盘有效
( A$ k' d/ ~- ~/ O# IWORDm_wDecline; //下跌家数 仅大盘有效
调用传递参数及传回结果
: ]! R, m8 b, S) }7 b$ c6 J# q调用传递参数
(pData->m_pfParam1 && //参数1有效Param1exists
* b1 z; K/ P/ r2 MpData->m_nParam1Start<0&& //参数1为常数
pData->m_pfParam2==NULL) //
localprocedure 定义使用变数
3 R$ G9 @  j; |% v6 vonstfloat* pValue = pData→m_pfParam1; //use constant参数1
# a. G  c' z1 n$ ^3 @intnFirst = pData->m_nParam1Start; //use 参数1效值起始位
3 F$ ~0 B/ e' H) r+ T, W; D9 _2 tfloatfParam = *pData->m_pfParam2; //use 参数2
6 Z2 l0 p& j% _4 b: U) v) KintnPeriod = (int)fParam;
1 q& y) L, X" t$ x$ \1 q传回结果
fTotal+= pValue[i-j];
pData->m_pResultBuf
//////////////////////////////////////////comment