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

ycng

许多年以前,我曾经在
理想公式区发布了
"
0 R/ }0 h: O9 D- T如何用 Foxtrader(飞狐)连结 C++动态程式库 DLL及 80x86Macro Assembly (组合语言)
"

; i3 |* b) H" m0 z0 N现在更新foxtrader(飞狐交易师)
连结 DLL的方法

foxtrader- - > DLL (C++ and assembly) = ( foxfunc.h + foxfunc.cpp +pow10.asm )
; ]$ i5 x- {* N  r' L" U& I/ V  kgauss- - > DLL (C++ and assembly) = ( foxfunc.cpp + meigj.asm )
9 W! L5 _$ |3 L1 }# _$ Ggauss只用到函数参数传递,所以使用新的 c++compiler, 不受影响
foxtrader的 foxfunc.h宣告的结构型态 (struct)在 2004vc++ 6.0 全部有效

也就是这五个结构都能用
typedefstruct tagSTKDATA
typedefunion tagSTKDATAEx
9 d+ a2 g6 p+ gtypedefstruct tagSPLITDATA
* i$ g$ Q, Q/ x: z: G3 ltypedefstruct tagCALCPARAM
typedefstruct tagCALCINFO

自2008年起,vc++ 2008, vc++ 2010, vc++2017 对struct的编译,已经完全 c++化,不再相容于 C
7 t8 _* E/ E: `  f& ]( I( w也就是这五个结构中
typedefstruct tagSTKDATA
& d/ S! {% [9 f) H- h; A  C/ M6 ftypedefunion tagSTKDATAEx
typedefstruct tagSPLITDATA
" L% b6 }4 v, p( X; M! {6 stypedefstruct tagCALCPARAM
typedefstruct tagCALCINFO
- B" z0 _4 d& S- x只有这两个可以用
) |# \$ b7 m. n) d5 t# {typedefstruct tagCALCPARAM
/ F% C. y& ~* r/ utypedefstruct tagCALCINFO
% u. o" W' J$ f) U( v值得庆幸的是,下面这个结构的函数参数传递个数可以有无数个
3 h* z4 S; w. `6 w+ `9 l4 qtypedefstruct tagCALCPARAM
例如:在 foxtrader中
MA1:=MA(CLOSE,3);
, x+ U2 h! C, mMA2:=MA(CLOSE,6);
) U7 J( l$ o0 Z. ^MA3:=MA(CLOSE,12);
+ Q$ _& z+ p3 j, k& V7 w' ZMA4:=MA(CLOSE,24);
MYBBI1:"MYFUNC2017@MYBBI"(MA1, MA2,MA3,MA4,MA3,MA4,5)*0.95,colorff00ff,linethick3; {2017 vc++ 15.0}
其中MYFUNC2017=MYFUNC2017.dll, MYBBI = MYFUNC2017.dll 中的MYBBI函数,这里 MYBBI函数传递的参数共有 7个
3 U4 Q% t. O# e4 _下面这两式计算结果相同
0 r: s+ t4 h" [0 E+ jxx:(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计算}
3 p, F4 E0 [, |( w0 s其他例子
' i* C5 M8 B! S5 g0 Boooq:="MYFUNC2008good@MYMACLOSE"(c,,c,c,6),colorffffff,linethick5;(---> pow10.asm)
; J# x6 C/ r6 V" F: m0 Noooq1:"MYFUNC2010@MYMAVAR"(ma(c,5),5),colorgreen,linethick5;
: y1 ]6 T) a/ p$ `) `7 x; }4 A# n: e* c其中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错误


////////////////////////////////////////////////////////foxfunc.h
* m: A" y/ b) j#ifndef__FOXFUNC_H_INCLUDE
) C" O4 W; o& T! L#define__FOXFUNC_H_INCLUDE
/*
飞狐交易师“C语言接口”扩展程序调用接口规范V3.0
; ]6 r8 e: \  Y1.本规范适用于飞狐交易师V3.x公式系统.
2.扩展函数用于实现系统函数不能实现的特殊算法.
5 T. R& y8 z% `& W3.扩展函数用windows32位动态连接库实现,建议使用MicrosoftVisual C++编程.
$ J1 R* N1 D; U( ~& l7 x4.调用时在公式编辑器中写"动态库名称@函数名称"(参数表)即可,例如下面函数可以写为"FOXFUNC@MYMACLOSE"(5)
4 J1 a6 P2 ?0 S9 v6 [2 ~& r5.动态连接库名称和函数名称可以自己定义.
; s% ~+ r: M& l# {  j  W$ U( c6 B6.使用时必须将动态库拷贝到飞狐交易师安装目录下的FmlDLL子目录下使用.
*/
3 X! F, W- ~  {1 O! J6 E9 J/ m) `#ifdef__cplusplus
* ^% w+ N7 }: _2 iextern"C"
{
#endif//__cplusplus
///////////////////////////////////////////////////////////////////////////
8 H" ~  a7 k8 C& ?//分析周期
" S6 ?' j/ Q$ h: Z: \, renumDATA_TYPE
- |1 O6 v6 |6 y) o* Y  }' I{
0 u$ i6 p5 E3 W! r* z( a, F' hTICK_DATA=2,//分笔成交
$ B# r0 I( V' G7 T: m" C) dMIN1_DATA,//1分钟线
7 W  o4 m9 n1 z2 `* fMIN5_DATA,//5分钟线
" x2 {: \( F& p5 O8 k+ q5 EMIN15_DATA,//15分钟线
MIN30_DATA,//30分钟线
+ C3 y/ n& o2 {) ?& |' wMIN60_DATA,//60分钟线
DAY_DATA,//日线
' c. `/ I- l4 bWEEK_DATA,//周线
MONTH_DATA,//月线
$ ?8 w& C" L6 _1 Y$ @- JYEAR_DATA,//年线
MULTIDAY_DATA,//多日线
MULTIMIN_DATA//多分钟线
};
, i2 ]7 Y6 I% O2 G) Q% u& o///////////////////////////////////////////////////////////////////////////
9 z, ?8 g* H+ J  M3 A& R3 b; F//定义取用股票基本数据的结构 只有 VC++ 6.0 能compile成功使用
* A* C$ q5 m: |: Q) Q9 d; atypedefstruct tagSTKDATA
! \  w4 q/ Y" E% U" P{
. t: W, K& u# r1 Q' h_tm_; //时间,UCT
2 {- K8 |  M2 ffloatm_fOpen; //开盘 open
% x2 d7 U: ^0 v  Vfloatm_fHigh; //最高 high
floatm_fLow; //最低 low
, Q4 G% Y* w6 Z2 B/ _" ^( _# u# |floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
  q  V$ B. G' r; _- S$ x  D5 wfloatm_fAmount; //成交额 amount
WORDm_wAdvance; //上涨家数 仅大盘有效
WORDm_wDecline; //下跌家数 仅大盘有效
}STKDATA;
定义STKDATA为 tagSTKDATA的简单别名,STKDATA
为真正方便使用名称,tagSTKDATA 为定目的的过水名称
; R1 Q7 u3 G& Y. ^" P# G////////////////////////////////////////////////////////////////////////////
  Y1 ]" [# b: \! `5 l1 {//扩展数据,用于定义取用分笔成交数据的买卖盘 的结构
. z& Y1 ]! E( `0 k' H6 @typedefunion tagSTKDATAEx
1 h0 B7 D/ T; }$ Z( m" N6 j* Y{
0 k* R. t( B' Astruct
, ?0 n2 X2 c# \% o% l{
, L# o! ~: V& Y1 S' Gfloatm_fBuyPrice[3]; //买1--买3价floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
floatm_fLow; //最低 low
! Q0 j, A( a( v# f; l/ X' `floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
floatm_fAmount; //成交额 amount
+ v% G6 A4 A0 w, ?0 s! t  o' Zfloatm_fBuyVol[3]; //买1--买3量
floatm_fSellPrice[3]; //卖1--卖3价
8 w) Q2 |# D: e; A+ {* `floatm_fSellVol[3]; //卖1--卖3量
};
& r0 G; ?, D* b# Yfloatm_fDataEx[12];
# k* ^+ ^& [% j: y4 l}STKDATAEx;
////////////////////////////////////////////////////////////////////////////
5 Z' D) Z0 k: b; O1 X//定义取用除权数据的结构
typedefstruct tagSPLITDATA
{
time_tm_time; //时间,UCT
  p8 A  E- @9 ~4 {4 ofloatm_fHg; //红股
& P) K) r, ?$ _& ofloatm_fPg; //配股
: h; w1 K. a# D* N& d/ g$ ^0 |floatm_fPgj; //配股价
  ?6 v6 t" A% m9 R: c1 `floatm_fHl; //红利
}SPLITDATA;
3 L; v8 ~1 P) A5 z. m/////////////////////////////////////////////////////////////////////////////
' R) _# ^: S9 x* r! L7 F' u( L2 u1 x8 n/*财务数据顺序(m_pfFinData内容)
+ ?2 j  ?! X7 d/ O. a% d, j序号内容
0总股本(万股),
3 S7 U1 P, N& L2 x4 p) y  v1国家股,
( G8 M# Y. n; w7 N) T" Q! M2发起人法人股,
3法人股,
$ I4 b) g4 E: Q) x4B股,
5H股,
( S* c# r0 D; J4 A6流通A股,
' P! r6 c2 {* ]+ k' G7职工股,
8A2转配股,
9总资产(千元),
10流动资产,
. B" Z$ ^& M' }0 v" U) j1 J# ^11固定资产,
( B: e" H+ r; v12无形资产,
13长期投资,
% @/ l/ K* j1 K8 Z' J2 w) [/ W14流动负债,
+ u/ W. W( ~  P- E: U& J15长期负债,
16资本公积金,
17每股公积金,
18股东权益,
19主营收入,
20主营利润,
21其他利润,
* f% O5 h& A( `- }* p. s( o4 ~7 F22营业利润,
5 K! q- R) {) B1 t5 h23投资收益,
24补贴收入,
- `5 q0 u! r, j" O25营业外收支,
: X: s- w% r  E; L( X: C. L- T+ }26上年损益调整,
- g) k( y" i- h% K/ @2 J: ]27利润总额,
28税后利润,
8 C+ B( N8 e4 @8 @, b5 u29净利润,
30未分配利润,
31每股未分配,
, A% }. R' x- o2 _. t32每股收益,
33每股净资产,
34调整每股净资,
35股东权益比,
3 c/ W1 i4 g- c+ F. L$ H36净资收益率
*/
/////////////////////////////////////////////////////////////
4 S% U4 }- M2 B# D* H2 {2 |//定义取用caller函数传递参数项 的结构
( v' ?8 u2 [. s0 stypedefstruct tagCALCPARAM
6 I6 c+ n, B$ C  r  f8 L# y& j6 w{
union
" B% e6 i8 a% X. N' {4 |. Q  J3 Q{
  |1 d0 d/ N6 [. U1 t9 Oconstfloat* m_pfParam; //指向序列参数的址标，指向一个浮点型数组pointertofloat variable parameter / ex. c,h,l,o, co2...co2=(c+o)/2
constfloat m_fParam; //数值参数 valueof parameter
};
8 m& |: s, \' G; G/ E; Z; ~, qconstint m_nParamStart; //序列参数有效起始位置thestart address of variable parameter / ex. c,h,l,o,co2.....
}CALCPARAM;
/////////////////////////////////////////////////////////////////////////////
//定义全部取用址标 的总结构 (各指标指向前述各结构以便取的各结构的数据,接口信息数据的结构 )
. Z/ Y/ e% v/ Q, n, Otypedefstruct tagCALCINFO
{
constDWORD m_dwSize; //结构大小
7 {' o$ F, h1 a9 _4 O7 Q# h5 Z$ cconstDWORD m_dwVersion; //调用软件版本(V2.10: 0x210)
% ]- g+ q# r  u9 I2 nconstDWORD m_dwSerial; //调用软件序列号
constchar* m_strStkLabel; //股票代码
constBOOL m_bIndex; //大盘
3 `% E/ U6 k) h/ B; {: Fconstint m_nNumData; //数据数量(pData,pDataEx,pResultBuf数据数量)数据长度
9 ^- f# p! ^, _0 g) [- J6 mconstSTKDATA* m_pData; //常规数据,注意:当m_nNumData==0时可能为NULL
constSTKDATAEx* m_pDataEx; //扩展数据,分笔成交买卖盘,注意:可能为NULL
constint m_nParam1Start; //参数1有效起始位置<0/ constant parameter >0 /variable parameter
constfloat* 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
constfloat* m_pfParam4; //调用参数4/pointer to variable parameter 4
# C% U) D3 k! G% V7 ^8 ]+ Yfloat*m_pResultBuf; //结果缓冲区
constDWORD m_dataType; //数据类型
0 S# j2 F+ m4 |. I6 \constfloat* m_pfFinData; //财务数据
9 b9 o: e4 p: |//以上与分析家兼容，所以沿用其结构和名称
" m* a" c7 z# @* O# H4 r3 L//以下为飞狐交易师扩展(fortagSTKDATAEx)
" p6 W: ^" P/ S, m2 I+ rconstDWORD m_dwReserved; // 保留
7 x6 e  ?1 P: M7 t) pconstint m_nNumParam; // 调用参数数量
3 x1 \! b4 t" W+ J! zconstCALCPARAM* m_pCalcParam; // 调用参数数组
constDWORD m_dwReservedEx[4]; // 保留
  c& c: Z% G( |. S  K+ ~char*m_strStkName; //股票名称
SPLITDATA*m_pSplitData; //除权数据
intm_nNumSplitData; //除权次数
( q' ?3 g/ A! k+ i+ [1 x}CALCINFO;
/*
注1:(与分析家兼容)
1.函数调用参数由m_pfParam1--m_pfParam4带入,若为NULL则表示该参数无效.
! J# Q, ~) l4 z+ w% o, w1 T2.当一个参数无效时,则其后的所有参数均无效.
如:m_pfParam2为NULL,则m_pfParam3,m_pfParam4一定为NULL.
3.参数1可以是常数参数或序列数参数,其馀参数只能为常数参数.
) }: H3 o% [4 q+ }( I7 L4.若m_nParam1Start<0,则参数1为常数参数,参数等于*m_pfParam1;
5.若m_nParam1Start>=0,则参数1为序列数参数,m_pfParam1指向一个浮点型数组,
# |/ F- V2 R5 N& C数组大小为m_nNumData,数据有效范围为m_nParam1Start至 m_nNumData-1.
& x9 w* x8 L- w" I6 e' W, V/ s7 S在时间上m_pData[x]与 m_pfParam1[x]是一致的
注2:(飞狐交易师扩展)
. @4 R3 k, y$ y/ R1.该扩展结构使调用参数在技术上可以是无限数目的，且每个参数都可为数值或序列，由公式中实际的调用参数决定。
% h3 E, L: Z# \2.CALCPARAM结构用于带入参数信息和实际数据，m_pCalcParam数组大小为m_nNumParam，数据有效范围为0 至m_nNumParam-1.
3.按参数的顺序，m_pCalcParam[0]为第一个参数的数据，m_pCalcParam[1]为第二个参数的数据...，为了保持兼容，原m_nParam1Start、m_pfParam1等5个属性依然有赋值。
$ B/ S$ R+ J2 K& x* P2 B, U4.若i位置的参数为数值，取用m_pCalcParam.m_fParam.
+ D) x4 c( M  K& ]: O5.若i位置的参数为序列，取用m_pCalcParam.m_pfParam，数组大小为m_nNumData,数据有效范围为m_pCalcParam.m_nParamStart至 m_nNumData-1.若m_pCalcParam.m_nParamStart<0,则此数组中无有效数据。
6 x3 D+ X. A  }: G6.由于可以调用多个序列，许多序列的计算可以先在公式中进行，然后作为调用的参数即可。
7.经此扩展，对分析家的DLL依然可以调用、兼容。
*/
///////////////////////////////////////////////////////////////////////////////////
/*函数输出
__declspec(dllexport)int xxxxxxxx(CALCINFO* pData);
# [8 G5 T3 {5 i2 V1.函数名称需全部大写.
2.函数必须以上述形式声明,请用实际函数名称替代xxxxxxxx;
对于C++程序还需包括在extern"C" { } 括号中.
3.函数计算结果用pData->m_pResultBuf带回.
2 a9 }. }& m+ ~6 }. d4.函数返回-1表示错误或全部数据无效,否则返回第一个有效值位置,即:
m_pResultBuf[返回值]-- m_pResultBuf[m_nNumData-1]间为有效值.
1 H$ ~3 c: a1 H  a5.函数名称长度不能超过15字节,动态连接库文件名不能超过9字节(不包括扩展名),动态库名称不能叫SYSTEM,EXPLORER
* q; R" U& e7 D- a" k! K/ ~" @; |*/
9 x+ j- {# v) U//示例函数,使用时用实际名称替换
  a0 x; B0 F6 B& f5 l/ R__declspec(dllexport)int WINAPI MYMACLOSE(CALCINFO* pData);
& @5 @% L) I9 |) m. |  O2 e5 P__declspec(dllexport)int WINAPI SMOOTH(CALCINFO* pData);
& `& L8 k" @9 J* ?" |//__declspec(dllexport) int WINAPI MYMAVAR(CALCINFO* pData);
__declspec(dllexport)int WINAPI MYBBI(CALCINFO* pData);
- P' M/ q9 X0 }& H4 [//WINAPI = _stdcall
#ifdef__cplusplus
}
# ~  z6 w) K8 i. n0 q#endif//__cplusplus
#endif//__FOXFUNC_H_INCLUDE

//////////////////////////////////////////comment 注解
__declspec(dllexport)int WINAPI MYMAVAR(CALCINFO* pData)
/ {& C+ s8 ^- E/ IpData是指向 址标总结构 CALCINFO的 总址标
# K7 |2 E: p' c! j. |* A取用第二个参数数值floatfParam = *pData→m_pfParam2
取用第一个序列参数的址标constfloat* pValue = pData->m_pfParam1;
取用股票数据长度intndata = pData→m_nNumData;
: A- j( j* q7 N- S2 \第一个参数存在且为数值pData->m_pfParam1&& pData→m_nParam1Start<0
第一个参数存在且为序列pData->m_pfParam1&& pData→m_nParam1Start>=0
! o( k' C+ f4 i( f' U2 }* x7 Z' E第一个及第二个参数存在且为序列,第三个参数不存在pData->m_pfParam1&& pData->m_pfParam2 && pData->m_nParam1Start>=0&& pData->m_pfParam3==NULL
3 V7 j& A& b! ?constfloat* cpParam = pData->m_pfParam1; 定义cpParam为第一个序列参数的址标
取用股票数据结构
! z& O1 l9 k9 j2 R! QpData→m_nNumData= 变数数据长度
, q4 F& F9 c* P* npData→m_pData= pointer to struc STKDATA 的址标
+ c5 K+ X0 ^. o. u& {( jpData→m_pData[x]数据结构的第x个数据
pData→m_pData[x].m_fHigh数据结构的第x个数据中的 High
; R# D' o9 P7 T+ g  e& D. x3 J/ I取用结果缓冲序列
pData->m_pResultBuf
取得第一个序列参数的起始序位,如 2,...5 , . 7...
$ [5 j5 A0 J- _3 ~$ v  ^; CintnFirst = pData->m_nParam1Start;
. j5 o8 C7 V! _, d  ufor( i = nFirst+nPeriod-1; i < pData->m_nNumData; i++ )
取得第二个数值参数的数值
floatfParam = *pData->m_pfParam2;
intnPeriod = (int)fParam;
8 q* z* h  G: a* D# C& j& D. z* c取用第一个序列参数的址标constfloat* pValue = pData→m_pfParam1;
取用序列参数的单个直pValue
取用缓冲序列的单个值pData->m_pResultBuf
! G% B0 n4 d) u$ E1 sconstCALCPARAM* m_pCalcParam; // 调用参数数组
' e/ {% `; A/ }m_pCalcParam为序列址标,指向各序列参数的指标
8 j0 v+ ]3 o; W; w0 I6 q第一个序列参数pData→m_pCalcParam[0]
constfloat* m_pfParam; //指向序列参数的址标
第一个序列参数的起始序位pData->m_pCalcParam[0].m_nParamStart
/ H/ w, p* ?9 s' A7 i- y3 X( V第一个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[0].m_pfParam;
取用第一个序列参数的单个直pValue1
第二个序列参数pData→m_pCalcParam[1]
3 h) G6 T5 p. J$ m1 v! Q# I7 p第二个序列参数的起始序位pData->m_pCalcParam[1].m_nParamStart
第二个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[1].m_pfParam;
. M* _) X% B5 M& u5 I  e* H取用第二个序列参数的单个直pValue2
2 G. v) k7 w! F( V第三个序列参数pData→m_pCalcParam[2]
! A& b- D9 o! b& ^+ w/ v  q/ n第三个序列参数的起始序位pData->m_pCalcParam[2].m_nParamStart
第三个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[2].m_pfParam;
$ E4 p, ~% I: D! O1 Z: Z取用第三个序列参数的单个直pValue3
7 n: G! E$ Z% p* c; P! M第四个序列参数pData→m_pCalcParam[3]
; y$ t: ?8 g/ g4 Y/ \第四个序列参数的起始序位pData->m_pCalcParam[3].m_nParamStart
' K3 w$ d+ l. w+ K8 b* j第四个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[3].m_pfParam;
" s3 J' z8 E. B5 f- Z6 R# z9 \取用第四个序列参数的单个直pValue4
如果有四个序列参数,则取用序位最高的那一个序位
% {, X% H+ @4 e) L) i2 M7 \/ S2 V- vif( pData->m_pCalcParam[0].m_nParamStart >= 0 &&
pData->m_pCalcParam[1].m_nParamStart>= 0 &&
pData->m_pCalcParam[2].m_nParamStart>= 0 &&
pData->m_pCalcParam[3].m_nParamStart>= 0 ) //4个序列都含有效数值
5 r. {5 s+ F7 q2 K* _{
- D' P0 T9 l: |; O//计算返回的序列的第一个有效值位置
9 @& C% F3 Z2 Q2 Y2 D% QintnFirst = pData->m_pCalcParam[3].m_nParamStart;//已知返回的序列的第一个有效值位置与第4个序列一致
8 \, w; ~; ]& J$ z0 p+ p& d//若不知，则
/*
7 T% w8 J4 {2 M1 q! ?- O7 ?; RintnFirst = pData->m_pCalcParam[0].m_nParamStart;
6 {* x9 P% k/ R" W7 r; c; e# Wif( nFirst < pData->m_pCalcParam[1].m_nParamStart )
1 ?, a, A: n& RnFirst= 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 )
  T9 t  \  v4 r1 F1 I) Z. knFirst= pData→m_pCalcParam[3].m_nParamStart;
constfloat* pValue1 = pData->m_pCalcParam[0].m_pfParam;
constfloat* pValue2 = pData->m_pCalcParam[1].m_pfParam;
/ w/ k$ {: K4 m/ v5 L: Dconstfloat* pValue3 = pData->m_pCalcParam[2].m_pfParam;
4 Y; p+ s5 ~5 F- Y8 q7 yconstfloat* pValue4 = pData->m_pCalcParam[3].m_pfParam;
- ^: k$ j7 M* N" K) w/ j' b, @//-------------------
% c8 V( m" K4 X/ F. n  K& t# ~floatm_fOpen; //开盘 open
: L4 ]; T) \8 h( F2 sfloatm_fHigh; //最高 high
/ B2 Q3 ?+ C# ~8 c, L% o6 Sfloatm_fLow; //最低 low
floatm_fClose; //收盘 close
  a$ p' P1 h* h- o2 P9 p% O. Z/ Nfloatm_fVolume; //成交量 Volume
3 k% {& M- F0 A1 ~# C. m0 R8 xfloatm_fAmount; //成交额 amount
1 x( R. u- m# K# M调用收盘据
pData→m_nNumData= 变数数据长度
1 f: b% ^+ G1 x5 PpData→m_pData= pointer to struc STKDATA
- A# n1 z  W! QpData→m_pData[x]第x个数据
4 \1 P+ K% w' f5 |1 XpData→m_pData[x].m_fHigh第x个数据中的 High
@@@@@@@@@@@important !!!!!!!
) q4 m+ a  r( R& t5 esinceVC++ 2008, cl.exe will make ‘pData→m_pData[i-j].m_fClose’ anerror
( D, N0 u3 g( m4 l# w- gso,pass the high,low,open and close just from the function parameter ,that is use ‘ CALCPARAM’ struct
% c) ^8 b: @3 h4 `7 F. e$ KpData->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
pData->m_pData[i-j].m_fClose
) d) e7 K% M* _5 {5 k# B7 }3 Qm_pData= pointer to struc STKDATA
$ o6 Z) Z! r. C) ]3 `7 `incalling C++ dll function
0 j2 S2 w+ ]& p/ R2 n& ?m_pDatais passed to pData (CALCINFO* pData . A CALCINFO* type pointer)
$ n% q: ]  N0 D0 @. ~, E5 N! d1 Gtouse a single value in variable ‘High’
pData→m_pData[i-j].m_fHighto use high
4 k! p# `* c3 s9 h0 mconstfloat* m_pfParam1; //调用参数1/pointer to variable parameter 1
, ~# t% ]; D, I* t% O$ |) |constfloat* m_pfParam2; //调用参数2/pointer to variable parameter 2
constfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
, D# T! \9 |9 k: O+ Mconstfloat* m_pfParam4;
. ~/ W" Q. g. C6 w3 W6 l9 pm_pfParam1,m_pfParam2, m_pfParam3, m_pfParam4 = pointer to caller function 的参数
pData→m_pfParam1= pointer to 第一个(序列)参数
pData→m_pfParam1[x]= 取用第一个(序列)参数的第x 个值
" Y9 y$ p* }9 Vconstfloat* cpParam = pData→m_pfParam1; ＝定义 cpParam为 pointerto 第一个(序列)参数
5 r+ `/ o3 c6 e& g' d( LcpParam[x] = 取用第一个(序列)参数的第x 个值
( m& B) I8 D% {8 |0 T+ \. ?m_pResultBuf＝ 结果缓冲列
/ P: m  d) U' J! W  P. |7 m, PpData→m_pResultBuf= pointer to 结果缓冲列
  f5 r$ H" `  R$ ?pData→m_pResultBuf[x] = 取用结果缓冲列的第 x个值
//////////////////////////////////////////comment
//////////////////////////////////////////comment 注解
constint m_nParam1Start; //统杅1衄虴宎弇离
constfloat* m_pfParam1; //覃蚚统杅1
9 S- U5 L. ^5 v6 X6 A* ~; Bconstfloat* m_pfParam2; //覃蚚统杅2
constfloat* m_pfParam3; //覃蚚统杅3
4 T& F3 V8 @9 M/ Lconstfloat* m_pfParam4; //覃蚚统杅4,parameters must be <= 4
//const float* m_pfParam5; // parameters must be <= 4
//const float* m_pfParam6;
//const float* m_pfParam7;
; ^7 C( i8 \; K7 c0 v5 \$ A//const float* m_pfParam8;
$ {& C+ c" _6 Y. v. S9 t+ l3 O( \//pData->m_pfParam1 && pData->m_pfParam2 &&pData->m_pfParam3 && pData->m_nParam1Start>=0 &&
: y) Q& ^' p; WpData->m_pCalcParam[0].m_nParamStart>=0&& pData->m_pCalcParam[1].m_nParamStart>=0
&&pData->m_pCalcParam[2].m_nParamStart>=0)
, ~& z  \0 D( [) b2 s* T0 P{
floatfParam = *pData->m_pfParam4; //pointer ,pData->m_pCalcParam[3].m_nParamStart >= 0
' ^/ p5 y+ q- C8 ^8 [+ ]: U1 E1 lintnPeriod = (int)fParam; //统杅1
" p3 g0 T4 |& f2 T6 `2 B1 q//const float* cpParam = pData->m_pfParam2; // cpParam = pointer to第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
constfloat* cpParam1 =pData->m_pCalcParam[0].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
0 @: W1 `- x8 r, gconstfloat* 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
//const float* cpParam4 =pData->m_pCalcParam[3].m_pfParam; //cpParam = pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
3 A- Q4 d, p) |; g0 S& }& ^& R$ c, }" l//const float* cpParam5 =pData->m_pCalcParam[4].m_pfParam; //cpParam = pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
3 F5 T/ g; m: h) Q& q6 o; B; L//m_pData = const struct pointer to struct STKDATA , pointer to structSTKDATA ,
touse pData→m_pData[x].m_fClose
pData→m_pData[x]= | 1,2,3 , … , m_nNumParam | time_t m_time;
|1,2,3 , … , m_nNumParam | float m_fOime_t
|1,2,3 , … , m_nNumParam | float m_fHigh;
.. .
|1,2,3 , … , m_nNumParam | WORD m_wDecline;
5 _( |4 I& t- f) ^; Om_nNumParam= 数据high,close,open,low的长度
touse high:
pData→m_pData[x].m_fHigh
/ ]" V# A/ @' f7 m- Pcontentof struct STKDATA
time_tm_time; //时间,UCT
floatm_fOpen; //开盘 open
4 t1 D# [# {& K+ W" vfloatm_fHigh; //最高 high
4 d, V/ T: [" h5 J7 r5 b% H% u1 Jfloatm_fLow; //最低 low
floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
8 _( N: P4 _( `1 Ffloatm_fAmount; //成交额 amount
' k2 p2 E( k6 w7 S' ^' iWORDm_wAdvance; //上涨家数 仅大盘有效
' N: @2 M; E8 z* WWORDm_wDecline; //下跌家数 仅大盘有效
/ m/ P' t8 @. o" A调用传递参数及传回结果
调用传递参数
(pData->m_pfParam1 && //参数1有效Param1exists
7 _& Q& l; Z" s0 Y9 A$ GpData->m_nParam1Start<0&& //参数1为常数
pData->m_pfParam2==NULL) //
; [4 R  f9 c" z( D- Q4 \/ c# U* Z: Flocalprocedure 定义使用变数
onstfloat* pValue = pData→m_pfParam1; //use constant参数1
intnFirst = pData->m_nParam1Start; //use 参数1效值起始位
! d& ]- y. y% w  N% S6 E* u5 ]/ P+ GfloatfParam = *pData->m_pfParam2; //use 参数2
intnPeriod = (int)fParam;
% C: k( i8 e. ?' c# H7 q1 F. W传回结果
fTotal+= pValue[i-j];
: M  Z) ~1 g7 d7 M3 h( Y  cpData->m_pResultBuf
4 B( }* V1 O- h* s( q( F//////////////////////////////////////////comment