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

ycng

许多年以前,我曾经在
1 a/ j! |* u8 A- ?2 d$ y0 ?: a1 e: s理想公式区发布了
"
如何用 Foxtrader(飞狐)连结 C++动态程式库 DLL及 80x86Macro Assembly (组合语言)
"

现在更新foxtrader(飞狐交易师)
连结 DLL的方法
: J- W! w4 J$ `' V9 h/ _9 H$ U
9 u3 Z+ J3 O- L" L2 jfoxtrader- - > DLL (C++ and assembly) = ( foxfunc.h + foxfunc.cpp +pow10.asm )
  A! g/ t6 r* ]; |gauss- - > DLL (C++ and assembly) = ( foxfunc.cpp + meigj.asm )
' M; \2 k2 p, a  M% P" ]. Ugauss只用到函数参数传递,所以使用新的 c++compiler, 不受影响
. v# L  `6 @, \8 jfoxtrader的 foxfunc.h宣告的结构型态 (struct)在 2004vc++ 6.0 全部有效
) Z; e9 G* L: T2 [# y
' I" q1 B+ x" d% X; M( k1 x也就是这五个结构都能用
' ~! x, I' Z" [( r4 J$ f5 v) Atypedefstruct tagSTKDATA
- E5 K! R- r+ b: jtypedefunion tagSTKDATAEx
typedefstruct tagSPLITDATA
typedefstruct tagCALCPARAM
typedefstruct tagCALCINFO

9 l& F& Z; Y9 ?3 F# c; |, I自2008年起,vc++ 2008, vc++ 2010, vc++2017 对struct的编译,已经完全 c++化,不再相容于 C
; e9 _, X( P& V5 S! N0 R, q% l- g也就是这五个结构中
typedefstruct tagSTKDATA
typedefunion tagSTKDATAEx
typedefstruct tagSPLITDATA
typedefstruct tagCALCPARAM
typedefstruct tagCALCINFO
) T) u. v6 [; I" D: \2 W只有这两个可以用
typedefstruct tagCALCPARAM
typedefstruct tagCALCINFO
4 W1 p  m5 O# r5 ^- X' [. U值得庆幸的是,下面这个结构的函数参数传递个数可以有无数个
6 ~2 {9 j( n4 [1 I$ c6 Jtypedefstruct tagCALCPARAM
* L  k) M" |- j7 Q4 V( a$ ^4 j例如:在 foxtrader中
& J7 o: Q* g! A5 K/ z2 V* _; sMA1:=MA(CLOSE,3);
' I1 `* ?) r: ]* G  _MA2:=MA(CLOSE,6);
) a* F+ s' Z5 W6 uMA3:=MA(CLOSE,12);
" Z3 \% u- K& V9 A- s& C9 qMA4:=MA(CLOSE,24);
; i( w$ {/ Z2 u* S. NMYBBI1:"MYFUNC2017@MYBBI"(MA1, MA2,MA3,MA4,MA3,MA4,5)*0.95,colorff00ff,linethick3; {2017 vc++ 15.0}
4 e8 _6 h& |& L其中MYFUNC2017=MYFUNC2017.dll, MYBBI = MYFUNC2017.dll 中的MYBBI函数,这里 MYBBI函数传递的参数共有 7个
下面这两式计算结果相同
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计算}
& k( G" E, w$ Z4 D* M" t其他例子
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里面被注解不用的定义或宣告中,有些应该是可以用的
: S* G) y  u! ZfTotal= pData->m_pData.m_fClose; // @@@@@@@ vc++ 2010 cl.exe 使pData->m_pData[i-j].m_fClose错误


9 W5 l& O+ S8 J& @1 g; S5 p" k////////////////////////////////////////////////////////foxfunc.h
#ifndef__FOXFUNC_H_INCLUDE
& f2 B; c! }$ X% p" {" O. `) P* j5 {#define__FOXFUNC_H_INCLUDE
8 x. G& Z/ x5 D+ A. O; R# E$ A( F: T/*
1 O8 O. B* D( M" z- d2 L飞狐交易师“C语言接口”扩展程序调用接口规范V3.0
2 h" [$ J( n* Z! H& P1.本规范适用于飞狐交易师V3.x公式系统.
2.扩展函数用于实现系统函数不能实现的特殊算法.
3.扩展函数用windows32位动态连接库实现,建议使用MicrosoftVisual C++编程.
; W2 P/ l! P. d7 L8 F# f% M! @) @- L9 N3 o4.调用时在公式编辑器中写"动态库名称@函数名称"(参数表)即可,例如下面函数可以写为"FOXFUNC@MYMACLOSE"(5)
5.动态连接库名称和函数名称可以自己定义.
6.使用时必须将动态库拷贝到飞狐交易师安装目录下的FmlDLL子目录下使用.
*/
#ifdef__cplusplus
/ W( t. Q/ [5 G, I4 jextern"C"
' e) d) N+ N4 |  s{
; n$ t6 g# l. P% I4 Z( k9 {#endif//__cplusplus
///////////////////////////////////////////////////////////////////////////
//分析周期
  E3 \: E# m$ e6 J+ u/ \; }enumDATA_TYPE
" Y& g1 q+ t& Y7 N9 e2 X{
# r. j% v" y" Q, JTICK_DATA=2,//分笔成交
MIN1_DATA,//1分钟线
( m+ T8 F1 U5 {" C, \MIN5_DATA,//5分钟线
MIN15_DATA,//15分钟线
MIN30_DATA,//30分钟线
! u, \% s* v, ^MIN60_DATA,//60分钟线
9 y5 k2 ~# T2 d' v0 C/ P9 GDAY_DATA,//日线
WEEK_DATA,//周线
MONTH_DATA,//月线
YEAR_DATA,//年线
! O* u7 M1 A4 B- D, X) x4 uMULTIDAY_DATA,//多日线
1 `9 o2 a% K1 c# F6 PMULTIMIN_DATA//多分钟线
};
///////////////////////////////////////////////////////////////////////////
/ J+ ?( x: r' Z$ n+ \/ ^0 k- z; Y//定义取用股票基本数据的结构 只有 VC++ 6.0 能compile成功使用
typedefstruct tagSTKDATA
: u" k/ i: }9 Z/ K{
, `+ G; f, F5 {* n/ `_tm_; //时间,UCT
& A* p. E. G7 o; @floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
floatm_fLow; //最低 low
floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
floatm_fAmount; //成交额 amount
/ G" Q% G2 E' n* c; rWORDm_wAdvance; //上涨家数 仅大盘有效
6 F1 ~  Y0 L" J  |& V2 i) sWORDm_wDecline; //下跌家数 仅大盘有效
}STKDATA;
定义STKDATA为 tagSTKDATA的简单别名,STKDATA
. {7 H( Y2 w: ]+ b5 P' O为真正方便使用名称,tagSTKDATA 为定目的的过水名称
////////////////////////////////////////////////////////////////////////////
//扩展数据,用于定义取用分笔成交数据的买卖盘 的结构
typedefunion tagSTKDATAEx
1 g  n7 D  a% N9 \0 r{
* L" Q: h, b8 v$ r: Kstruct
5 T4 C$ ?! k/ F* k: R$ E7 h{
floatm_fBuyPrice[3]; //买1--买3价floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
floatm_fLow; //最低 low
9 t. V6 f* ?- u, w7 G0 C3 zfloatm_fClose; //收盘 close
) l" V! [# s8 H' @' xfloatm_fVolume; //成交量 Volume
  x) C4 d& g( G- r$ Ofloatm_fAmount; //成交额 amount
floatm_fBuyVol[3]; //买1--买3量
+ N, p8 i. r3 O6 kfloatm_fSellPrice[3]; //卖1--卖3价
5 C- k: r; B9 X' jfloatm_fSellVol[3]; //卖1--卖3量
1 @. a$ x9 c: p  U  [/ i, k};
0 _* M* }. r/ L/ i% W$ hfloatm_fDataEx[12];
' f* y; p  s% }4 M}STKDATAEx;
3 j. B4 N; W: Z$ S0 g8 L////////////////////////////////////////////////////////////////////////////
//定义取用除权数据的结构
typedefstruct tagSPLITDATA
- c' k/ l& n& L; ]  I, h" k{
time_tm_time; //时间,UCT
( D9 [# F  s9 t4 M( zfloatm_fHg; //红股
floatm_fPg; //配股
( Q2 q( h% o: gfloatm_fPgj; //配股价
+ U3 i) p1 |/ ?$ B& M, n; o$ {floatm_fHl; //红利
0 r: \% X( c, r  u3 A( K0 R}SPLITDATA;
/////////////////////////////////////////////////////////////////////////////
' ?* \+ ^% I3 r. u; R5 x/*财务数据顺序(m_pfFinData内容)
# W' Q' o4 F8 j序号内容
0 ]5 \% ^5 u0 S1 y# _- D0总股本(万股),
, j, V4 _: n2 D9 f9 P9 c0 p! _/ l1国家股,
2 V' ~( [* w4 m/ |" ?! _; M- l2发起人法人股,
3法人股,
* l  ^5 i7 U; ]! W' g6 q5 C4B股,
5H股,
6流通A股,
: K5 _. T% h5 K* Z" W: ~- ~7职工股,
* J3 i$ q+ G9 E8A2转配股,
9总资产(千元),
10流动资产,
11固定资产,
12无形资产,
% u/ Y4 u' e1 z4 l6 v13长期投资,
7 [5 z1 m! g$ \14流动负债,
15长期负债,
16资本公积金,
6 M! T% o' ]- H6 _17每股公积金,
6 p8 I% ^8 b2 c4 q. A, ^! L! N$ X: b18股东权益,
) n: M% I" N6 Y19主营收入,
% j: e0 k7 G$ F: O2 X; b20主营利润,
21其他利润,
22营业利润,
( L. N3 }0 [) P+ K: |3 f/ d4 M23投资收益,
( u! o8 J' U/ h4 O24补贴收入,
25营业外收支,
2 e4 h" c9 U- s26上年损益调整,
5 Y9 d( K2 g! H. I" E; b/ ^27利润总额,
28税后利润,
4 F$ W) r" b2 s5 @8 ?29净利润,
30未分配利润,
3 V( ^3 C! w; u3 w31每股未分配,
4 D1 s7 O9 h: a+ A1 Y: H) g32每股收益,
33每股净资产,
0 _+ a. B5 I6 y34调整每股净资,
35股东权益比,
3 f  r8 y* T6 i- z) G& x3 T4 k36净资收益率
*/
$ z5 v- ^+ H) Y6 M! k/////////////////////////////////////////////////////////////
2 c  U# ]9 ~8 P: G//定义取用caller函数传递参数项 的结构
8 h" _+ H7 h8 i, N9 }typedefstruct tagCALCPARAM
1 J6 X' i/ g, b3 Q8 ?{
union
+ O7 H2 [! ?* ~+ m{
# R, I( m3 ^) v1 L1 t: oconstfloat* m_pfParam; //指向序列参数的址标，指向一个浮点型数组pointertofloat variable parameter / ex. c,h,l,o, co2...co2=(c+o)/2
constfloat m_fParam; //数值参数 valueof parameter
4 X" @' x* W7 r};
* E* j: K7 n9 z: }1 g3 Fconstint m_nParamStart; //序列参数有效起始位置thestart address of variable parameter / ex. c,h,l,o,co2.....
}CALCPARAM;
/ W% V) O  p; Z, v& g- w! ~/////////////////////////////////////////////////////////////////////////////
  r2 N8 H6 S) Q  k9 J* X" x% {+ q//定义全部取用址标 的总结构 (各指标指向前述各结构以便取的各结构的数据,接口信息数据的结构 )
typedefstruct tagCALCINFO
{
- H0 W% Q1 G+ Z2 O1 u: fconstDWORD m_dwSize; //结构大小
constDWORD m_dwVersion; //调用软件版本(V2.10: 0x210)
constDWORD m_dwSerial; //调用软件序列号
constchar* m_strStkLabel; //股票代码
' ^" Z! G1 b- i- u' wconstBOOL m_bIndex; //大盘
- k* S+ ~$ j4 rconstint m_nNumData; //数据数量(pData,pDataEx,pResultBuf数据数量)数据长度
constSTKDATA* m_pData; //常规数据,注意:当m_nNumData==0时可能为NULL
/ L+ Z, g$ a9 G6 ]constSTKDATAEx* m_pDataEx; //扩展数据,分笔成交买卖盘,注意:可能为NULL
% A9 N4 N+ w2 @1 k' Hconstint m_nParam1Start; //参数1有效起始位置<0/ constant parameter >0 /variable parameter
' G7 b% ?2 V0 [" Q9 U$ ~constfloat* m_pfParam1; //调用参数1/pointer to variable parameter 1
constfloat* m_pfParam2; //调用参数2/pointer to variable parameter 2
' I8 N. T, {3 i: d" @3 d5 r- \% q7 r4 Dconstfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
2 |2 u/ w; J/ r/ e. ~8 q! b6 ~constfloat* m_pfParam4; //调用参数4/pointer to variable parameter 4
: n+ ^  l& L8 c/ o9 bfloat*m_pResultBuf; //结果缓冲区
: w/ z6 I5 w, ]constDWORD m_dataType; //数据类型
constfloat* m_pfFinData; //财务数据
8 U( U; H7 U/ V/ Q- h% H* o//以上与分析家兼容，所以沿用其结构和名称
' n9 e5 z" d/ A: Q0 l8 K//以下为飞狐交易师扩展(fortagSTKDATAEx)
3 N) }" Z$ P$ }6 [# `/ o( _constDWORD m_dwReserved; // 保留
3 O; r! b+ B9 I& F; c5 [constint m_nNumParam; // 调用参数数量
constCALCPARAM* m_pCalcParam; // 调用参数数组
constDWORD m_dwReservedEx[4]; // 保留
char*m_strStkName; //股票名称
% @6 b, B% Q8 M# S2 z  x( RSPLITDATA*m_pSplitData; //除权数据
/ M! W* e; r1 k) Y* s0 P* wintm_nNumSplitData; //除权次数
}CALCINFO;
( p5 a0 k3 N& N& C/*
注1:(与分析家兼容)
1.函数调用参数由m_pfParam1--m_pfParam4带入,若为NULL则表示该参数无效.
2.当一个参数无效时,则其后的所有参数均无效.
5 c) Q+ E. ^7 ^如:m_pfParam2为NULL,则m_pfParam3,m_pfParam4一定为NULL.
3.参数1可以是常数参数或序列数参数,其馀参数只能为常数参数.
4.若m_nParam1Start<0,则参数1为常数参数,参数等于*m_pfParam1;
- Q: t: j( c- Z9 {) L9 d+ X# {! |7 I5.若m_nParam1Start>=0,则参数1为序列数参数,m_pfParam1指向一个浮点型数组,
数组大小为m_nNumData,数据有效范围为m_nParam1Start至 m_nNumData-1.
1 z9 n& f! |/ z: l! X在时间上m_pData[x]与 m_pfParam1[x]是一致的
- ]* Q) ^. }8 k4 [8 L注2:(飞狐交易师扩展)
8 P  M6 L6 T  N% m/ g3 T1.该扩展结构使调用参数在技术上可以是无限数目的，且每个参数都可为数值或序列，由公式中实际的调用参数决定。
2.CALCPARAM结构用于带入参数信息和实际数据，m_pCalcParam数组大小为m_nNumParam，数据有效范围为0 至m_nNumParam-1.
: F0 E5 N+ |3 e3.按参数的顺序，m_pCalcParam[0]为第一个参数的数据，m_pCalcParam[1]为第二个参数的数据...，为了保持兼容，原m_nParam1Start、m_pfParam1等5个属性依然有赋值。
" }$ b, f' E; E# X; [; S4.若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  O9 L4 |" V( \/ _- s6.由于可以调用多个序列，许多序列的计算可以先在公式中进行，然后作为调用的参数即可。
7.经此扩展，对分析家的DLL依然可以调用、兼容。
*/
/ |- J$ s7 C; C4 v" R///////////////////////////////////////////////////////////////////////////////////
! ~9 k' n7 F- c7 |/*函数输出
) X) Z2 J9 M$ J__declspec(dllexport)int xxxxxxxx(CALCINFO* pData);
1.函数名称需全部大写.
2.函数必须以上述形式声明,请用实际函数名称替代xxxxxxxx;
对于C++程序还需包括在extern"C" { } 括号中.
3.函数计算结果用pData->m_pResultBuf带回.
# X) L/ H+ M# u% a+ X9 A; ^4.函数返回-1表示错误或全部数据无效,否则返回第一个有效值位置,即:
* O1 x5 R  ], y4 ?/ p0 I& dm_pResultBuf[返回值]-- m_pResultBuf[m_nNumData-1]间为有效值.
! c4 e8 B. `1 Q5.函数名称长度不能超过15字节,动态连接库文件名不能超过9字节(不包括扩展名),动态库名称不能叫SYSTEM,EXPLORER
9 b, v; {: H- Q9 D*/
# Z' n3 m3 z1 o% Q" g* @//示例函数,使用时用实际名称替换
' j& h! g* a- o; o__declspec(dllexport)int WINAPI MYMACLOSE(CALCINFO* pData);
- J* J, D+ u, e* t$ G: R7 e__declspec(dllexport)int WINAPI SMOOTH(CALCINFO* pData);
' X" \% v; F' |9 l2 d//__declspec(dllexport) int WINAPI MYMAVAR(CALCINFO* pData);
- \$ @& Z5 [! a0 ___declspec(dllexport)int WINAPI MYBBI(CALCINFO* pData);
0 t# h/ b2 f: o1 @9 @//WINAPI = _stdcall
#ifdef__cplusplus
}
2 `! I* A+ S0 Z; H+ S#endif//__cplusplus
#endif//__FOXFUNC_H_INCLUDE
; K$ ?3 y8 r% F- n+ }
1 s4 \. x. D3 F//////////////////////////////////////////comment 注解
__declspec(dllexport)int WINAPI MYMAVAR(CALCINFO* pData)
pData是指向 址标总结构 CALCINFO的 总址标
: F2 y1 B7 O& Y. p取用第二个参数数值floatfParam = *pData→m_pfParam2
取用第一个序列参数的址标constfloat* pValue = pData->m_pfParam1;
取用股票数据长度intndata = pData→m_nNumData;
第一个参数存在且为数值pData->m_pfParam1&& pData→m_nParam1Start<0
第一个参数存在且为序列pData->m_pfParam1&& pData→m_nParam1Start>=0
4 ^4 [* a( p, v4 B第一个及第二个参数存在且为序列,第三个参数不存在pData->m_pfParam1&& pData->m_pfParam2 && pData->m_nParam1Start>=0&& pData->m_pfParam3==NULL
2 r. H, S7 i1 k3 t, aconstfloat* cpParam = pData->m_pfParam1; 定义cpParam为第一个序列参数的址标
" `. a$ @, G8 P6 ^* Q% t取用股票数据结构
pData→m_nNumData= 变数数据长度
pData→m_pData= pointer to struc STKDATA 的址标
) O; t1 E; d' [; M0 s: NpData→m_pData[x]数据结构的第x个数据
pData→m_pData[x].m_fHigh数据结构的第x个数据中的 High
取用结果缓冲序列
1 |% q0 Q% b3 ]/ g) ?% B2 E% p8 e8 fpData->m_pResultBuf
取得第一个序列参数的起始序位,如 2,...5 , . 7...
( `2 l' Z! Q$ s: vintnFirst = pData->m_nParam1Start;
" ~% u0 a  @. }for( i = nFirst+nPeriod-1; i < pData->m_nNumData; i++ )
取得第二个数值参数的数值
8 d7 R0 m% Z8 Z7 a; I5 ?0 V' b) @floatfParam = *pData->m_pfParam2;
intnPeriod = (int)fParam;
取用第一个序列参数的址标constfloat* pValue = pData→m_pfParam1;
取用序列参数的单个直pValue
) u" J* {, s; \3 @# E" J取用缓冲序列的单个值pData->m_pResultBuf
constCALCPARAM* m_pCalcParam; // 调用参数数组
m_pCalcParam为序列址标,指向各序列参数的指标
第一个序列参数pData→m_pCalcParam[0]
' Y6 M( B2 a7 [9 f8 O9 e9 Hconstfloat* m_pfParam; //指向序列参数的址标
+ k: @& y1 {2 ^9 f; _第一个序列参数的起始序位pData->m_pCalcParam[0].m_nParamStart
1 g- |* I' ^0 m. y0 w4 W/ y第一个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[0].m_pfParam;
7 g2 d; [3 l% y' J; K4 U, w取用第一个序列参数的单个直pValue1
5 R2 }) k+ w! u3 m6 A第二个序列参数pData→m_pCalcParam[1]
$ y$ f, F4 I: U' l% p第二个序列参数的起始序位pData->m_pCalcParam[1].m_nParamStart
4 }) b5 e% u' i1 k) P第二个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[1].m_pfParam;
/ Z' o% p! P- K+ G3 K4 }取用第二个序列参数的单个直pValue2
第三个序列参数pData→m_pCalcParam[2]
8 \; [/ E& s6 T第三个序列参数的起始序位pData->m_pCalcParam[2].m_nParamStart
第三个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[2].m_pfParam;
取用第三个序列参数的单个直pValue3
第四个序列参数pData→m_pCalcParam[3]
第四个序列参数的起始序位pData->m_pCalcParam[3].m_nParamStart
) p3 Z0 h3 `' w' A第四个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[3].m_pfParam;
8 W5 X8 I4 z+ D9 ?3 z& r取用第四个序列参数的单个直pValue4
5 u; A, X$ f; Y8 F) f  ]* A如果有四个序列参数,则取用序位最高的那一个序位
if( pData->m_pCalcParam[0].m_nParamStart >= 0 &&
pData->m_pCalcParam[1].m_nParamStart>= 0 &&
pData->m_pCalcParam[2].m_nParamStart>= 0 &&
- N: Y$ C- p7 d2 m: L/ P# \. n, UpData->m_pCalcParam[3].m_nParamStart>= 0 ) //4个序列都含有效数值
{
//计算返回的序列的第一个有效值位置
  c) J. N9 Q* T  |, BintnFirst = pData->m_pCalcParam[3].m_nParamStart;//已知返回的序列的第一个有效值位置与第4个序列一致
//若不知，则
/*
2 `8 Z2 x; M9 R6 T. a8 H4 P5 I8 EintnFirst = pData->m_pCalcParam[0].m_nParamStart;
2 H5 G" r4 K! D: ?6 t" Q% fif( 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 )
nFirst= pData→m_pCalcParam[3].m_nParamStart;
) E% x( n/ p. x2 gconstfloat* pValue1 = pData->m_pCalcParam[0].m_pfParam;
constfloat* pValue2 = pData->m_pCalcParam[1].m_pfParam;
# s& C8 l2 r' Yconstfloat* pValue3 = pData->m_pCalcParam[2].m_pfParam;
+ C. T& L# l3 `; d0 d3 o, Bconstfloat* pValue4 = pData->m_pCalcParam[3].m_pfParam;
8 N3 Z. y7 }6 w0 [# I( O& K' x//-------------------
floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
floatm_fLow; //最低 low
' @, z  N) o5 P/ u+ R, T9 Afloatm_fClose; //收盘 close
" B  v5 i; l5 ^' z6 Wfloatm_fVolume; //成交量 Volume
1 }. P) t# ?( Ifloatm_fAmount; //成交额 amount
调用收盘据
pData→m_nNumData= 变数数据长度
% v+ o/ ?. _& s# opData→m_pData= pointer to struc STKDATA
pData→m_pData[x]第x个数据
- y; [( e* h- WpData→m_pData[x].m_fHigh第x个数据中的 High
$ e; X" U! W/ B# M, Y, g@@@@@@@@@@@important !!!!!!!
6 D  Q, ^2 W, U# ]sinceVC++ 2008, cl.exe will make ‘pData→m_pData[i-j].m_fClose’ anerror
; ]: N5 ^# @! B' ]so,pass the high,low,open and close just from the function parameter ,that is use ‘ CALCPARAM’ struct
( z1 }0 B- [* _pData->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
! r; j5 A( Q0 r) ?' m, Nm_pData= pointer to struc STKDATA
7 ~; O/ Z7 o9 Q7 |0 f& Sincalling 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
constfloat* m_pfParam2; //调用参数2/pointer to variable parameter 2
constfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
constfloat* m_pfParam4;
m_pfParam1,m_pfParam2, m_pfParam3, m_pfParam4 = pointer to caller function 的参数
pData→m_pfParam1= pointer to 第一个(序列)参数
pData→m_pfParam1[x]= 取用第一个(序列)参数的第x 个值
constfloat* cpParam = pData→m_pfParam1; ＝定义 cpParam为 pointerto 第一个(序列)参数
+ E4 E. ~: \' J" R* U# ^. p: _! N% h& KcpParam[x] = 取用第一个(序列)参数的第x 个值
2 r! z" j8 E5 Mm_pResultBuf＝ 结果缓冲列
pData→m_pResultBuf= pointer to 结果缓冲列
pData→m_pResultBuf[x] = 取用结果缓冲列的第 x个值
//////////////////////////////////////////comment
//////////////////////////////////////////comment 注解
4 Q% E/ u0 [" a* R2 i. O' k) @" [0 sconstint m_nParam1Start; //统杅1衄虴宎弇离
constfloat* m_pfParam1; //覃蚚统杅1
9 E  w  s/ S; }  u! |+ U* G2 Q. \" bconstfloat* m_pfParam2; //覃蚚统杅2
constfloat* m_pfParam3; //覃蚚统杅3
' Z# c# J( C( K- O, j7 _constfloat* m_pfParam4; //覃蚚统杅4,parameters must be <= 4
//const float* m_pfParam5; // parameters must be <= 4
//const float* m_pfParam6;
0 N' W8 d( S7 ?1 Z6 ~1 s& k0 g8 w; Q//const float* m_pfParam7;
//const float* m_pfParam8;
8 u' ~% h- M$ P, M* U, f8 y8 h: Y//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
- k3 E  g5 i$ `&&pData->m_pCalcParam[2].m_nParamStart>=0)
0 z0 q; \6 f: g7 M{
floatfParam = *pData->m_pfParam4; //pointer ,pData->m_pCalcParam[3].m_nParamStart >= 0
- e/ c- C' a& rintnPeriod = (int)fParam; //统杅1
//const float* cpParam = pData->m_pfParam2; // cpParam = pointer to第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
constfloat* cpParam1 =pData->m_pCalcParam[0].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
8 J5 v6 b8 ^2 @! fconstfloat* cpParam2 =pData->m_pCalcParam[1].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
; h( j, S( @# Econstfloat* cpParam3 =pData->m_pCalcParam[2].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值//parameters must be <= 4
& o/ G8 @- W  X6 v//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
  [7 R. F/ p  e5 _; }9 NpData→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;
0 |( P$ Y( k5 F) P/ Z9 N" Z6 v.. .
|1,2,3 , … , m_nNumParam | WORD m_wDecline;
m_nNumParam= 数据high,close,open,low的长度
touse high:
pData→m_pData[x].m_fHigh
contentof struct STKDATA
7 c3 F1 ^8 Z& |time_tm_time; //时间,UCT
floatm_fOpen; //开盘 open
# O# p! X. \0 S: n7 ]% Sfloatm_fHigh; //最高 high
floatm_fLow; //最低 low
floatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
floatm_fAmount; //成交额 amount
WORDm_wAdvance; //上涨家数 仅大盘有效
WORDm_wDecline; //下跌家数 仅大盘有效
, j# p/ I& G( t. E& @. Z# R8 w9 C调用传递参数及传回结果
. X2 @  i, T7 a4 O6 a$ v调用传递参数
(pData->m_pfParam1 && //参数1有效Param1exists
pData->m_nParam1Start<0&& //参数1为常数
pData->m_pfParam2==NULL) //
localprocedure 定义使用变数
onstfloat* pValue = pData→m_pfParam1; //use constant参数1
intnFirst = pData->m_nParam1Start; //use 参数1效值起始位
5 l6 v  n" j( e+ M& l8 n0 wfloatfParam = *pData->m_pfParam2; //use 参数2
intnPeriod = (int)fParam;
! Z4 C7 z' s0 T7 M传回结果
+ K& E0 @1 Q: i5 `fTotal+= pValue[i-j];
pData->m_pResultBuf
//////////////////////////////////////////comment