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

ycng

许多年以前,我曾经在
: k+ f) x! Z6 @! v理想公式区发布了
"
4 h# q: r+ s/ E' d) n8 y如何用 Foxtrader(飞狐)连结 C++动态程式库 DLL及 80x86Macro Assembly (组合语言)
1 I0 J6 J2 u* E* r: c8 G"
, y# }# l) k8 t3 v5 `: r: q
" q: J1 t9 j* l现在更新foxtrader(飞狐交易师)
连结 DLL的方法

" ]0 [5 k, a& Z( Bfoxtrader- - > DLL (C++ and assembly) = ( foxfunc.h + foxfunc.cpp +pow10.asm )
3 l3 C, q  s! `5 \gauss- - > DLL (C++ and assembly) = ( foxfunc.cpp + meigj.asm )
gauss只用到函数参数传递,所以使用新的 c++compiler, 不受影响
foxtrader的 foxfunc.h宣告的结构型态 (struct)在 2004vc++ 6.0 全部有效
! P- s, p# `0 p% z
也就是这五个结构都能用
( [9 ]: X5 V/ N& _$ L8 utypedefstruct tagSTKDATA
" J4 Q$ p5 ?5 y0 btypedefunion tagSTKDATAEx
$ B# J6 w  m8 etypedefstruct tagSPLITDATA
7 J8 R4 Q* t1 L# j4 Wtypedefstruct tagCALCPARAM
* J) q6 R0 ~9 X6 v3 Stypedefstruct tagCALCINFO
) x8 @$ b9 z% n1 b' w3 p( |. {
0 F. g; @3 ?: L* h5 ]6 y自2008年起,vc++ 2008, vc++ 2010, vc++2017 对struct的编译,已经完全 c++化,不再相容于 C
- `- c# w0 T; p  T7 ]- I; W" V也就是这五个结构中
" f. E/ Q" ^: B( p6 p% `) ftypedefstruct tagSTKDATA
typedefunion tagSTKDATAEx
5 ?6 N' `# C7 I6 mtypedefstruct tagSPLITDATA
0 I7 S" S4 v  ^, s2 H* Qtypedefstruct tagCALCPARAM
# _* j  j0 z1 x$ e. |! dtypedefstruct tagCALCINFO
只有这两个可以用
typedefstruct tagCALCPARAM
& M% |/ ]5 W, z& b2 F; Ttypedefstruct tagCALCINFO
! x) i& K) _/ L# v' J值得庆幸的是,下面这个结构的函数参数传递个数可以有无数个
& o* o) w5 `3 N+ y6 P9 {( P9 W+ [1 ptypedefstruct tagCALCPARAM
$ }) v" b4 z1 [, ]1 ~例如:在 foxtrader中
MA1:=MA(CLOSE,3);
/ a3 q: d: b! f* T7 I5 {4 R$ }+ WMA2:=MA(CLOSE,6);
MA3:=MA(CLOSE,12);
MA4:=MA(CLOSE,24);
2 l4 E3 c5 N% ~6 w0 z  Y) o0 HMYBBI1:"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个
! [5 B0 [( M% e. u4 O下面这两式计算结果相同
2 u8 e4 F( F3 d2 Txx:(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计算}
其他例子
oooq:="MYFUNC2008good@MYMACLOSE"(c,,c,c,6),colorffffff,linethick5;(---> pow10.asm)
  y. t* I+ }" M, A3 m/ b; O) toooq1:"MYFUNC2010@MYMAVAR"(ma(c,5),5),colorgreen,linethick5;
其中pow10.asm里面有很多不同定义或宣告被注解不用,那是因为后来在逐步侦测法修改语码中才发现在foxfunc.cpp主程式中,下面这行错误,也就是新的 compiler不再相容于 C,因此在pow10.asm里面被注解不用的定义或宣告中,有些应该是可以用的
4 f! s  C( ^5 j# {( q8 c: |fTotal= pData->m_pData.m_fClose; // @@@@@@@ vc++ 2010 cl.exe 使pData->m_pData[i-j].m_fClose错误

, Y8 C. L  w/ p6 |2 S) g# \
////////////////////////////////////////////////////////foxfunc.h
# a9 Y) M" m; d9 H; V& ^" ?#ifndef__FOXFUNC_H_INCLUDE
6 M0 w. }3 J5 j/ z9 j. J1 }% F#define__FOXFUNC_H_INCLUDE
) L2 d/ V& u: u$ }4 j/ R' G9 ?/*
飞狐交易师“C语言接口”扩展程序调用接口规范V3.0
1.本规范适用于飞狐交易师V3.x公式系统.
* B- n8 i, E$ c. l! r& _# J2.扩展函数用于实现系统函数不能实现的特殊算法.
3.扩展函数用windows32位动态连接库实现,建议使用MicrosoftVisual C++编程.
4.调用时在公式编辑器中写"动态库名称@函数名称"(参数表)即可,例如下面函数可以写为"FOXFUNC@MYMACLOSE"(5)
5 I  g2 F9 |- z5.动态连接库名称和函数名称可以自己定义.
: v- R$ B9 g+ ?/ M. l3 W6.使用时必须将动态库拷贝到飞狐交易师安装目录下的FmlDLL子目录下使用.
. Q, h8 m% C' [4 S' _. p*/
1 f! P* }* w0 w& p6 x0 R) N& F$ W#ifdef__cplusplus
extern"C"
; I* [5 [0 _; w' U# `5 t* ?{
* T: T1 F( E; I) h0 _#endif//__cplusplus
% |6 h# ~1 ]# {///////////////////////////////////////////////////////////////////////////
//分析周期
enumDATA_TYPE
{
TICK_DATA=2,//分笔成交
6 w& q' J: b7 j4 J4 XMIN1_DATA,//1分钟线
MIN5_DATA,//5分钟线
( _! O5 ?2 n9 s0 W+ VMIN15_DATA,//15分钟线
3 H0 h: y5 k% W; a& ~  c% z% TMIN30_DATA,//30分钟线
MIN60_DATA,//60分钟线
) `! m4 P! |5 ]5 ?7 `  A3 ]# CDAY_DATA,//日线
WEEK_DATA,//周线
2 r; j2 a1 }. [7 L; ~: W) v8 {MONTH_DATA,//月线
YEAR_DATA,//年线
MULTIDAY_DATA,//多日线
MULTIMIN_DATA//多分钟线
};
///////////////////////////////////////////////////////////////////////////
% O7 K- b. e% W  y//定义取用股票基本数据的结构 只有 VC++ 6.0 能compile成功使用
typedefstruct tagSTKDATA
+ |# F) ^1 C3 j{
6 V; ^' E, V9 w" c' |_tm_; //时间,UCT
floatm_fOpen; //开盘 open
5 B: b2 H4 g' @6 ~floatm_fHigh; //最高 high
8 R+ L" w3 @) X+ |3 W% lfloatm_fLow; //最低 low
( d+ l7 |: o6 D+ Vfloatm_fClose; //收盘 close
- D5 P6 g9 r" q* w5 H, e' \$ tfloatm_fVolume; //成交量 Volume
7 E0 o: y" {! W, X& n! ?floatm_fAmount; //成交额 amount
4 ^) ?! b: r8 v4 h0 QWORDm_wAdvance; //上涨家数 仅大盘有效
WORDm_wDecline; //下跌家数 仅大盘有效
6 U0 X0 S2 ?0 k}STKDATA;
' R% s# V1 d/ }; n6 ]7 r定义STKDATA为 tagSTKDATA的简单别名,STKDATA
, T0 J$ S( e& w# }为真正方便使用名称,tagSTKDATA 为定目的的过水名称
////////////////////////////////////////////////////////////////////////////
+ M$ z* W( E! Z7 n//扩展数据,用于定义取用分笔成交数据的买卖盘 的结构
typedefunion tagSTKDATAEx
$ |; K7 e0 [: w4 C{
struct
2 Z: X( I  o7 [' d" k{
, L: P  Z( S9 w8 p' qfloatm_fBuyPrice[3]; //买1--买3价floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
! t6 H7 Z" S: O, y$ mfloatm_fLow; //最低 low
1 K) I3 D( _3 h/ X& F, }1 ofloatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
1 \) {0 j# s" J7 B7 y* h: pfloatm_fAmount; //成交额 amount
floatm_fBuyVol[3]; //买1--买3量
floatm_fSellPrice[3]; //卖1--卖3价
) e( Z2 C& u+ p( a7 ofloatm_fSellVol[3]; //卖1--卖3量
};
& l% h" \/ C8 F8 E0 I. o' {floatm_fDataEx[12];
}STKDATAEx;
% [7 ?" h: `  L+ L: x: o$ @8 n) A////////////////////////////////////////////////////////////////////////////
//定义取用除权数据的结构
; N) a- J- x: a9 F% e7 ytypedefstruct tagSPLITDATA
3 D) a: U/ |0 Q+ _% m7 b, P! j{
time_tm_time; //时间,UCT
" y4 Y8 O% I( Qfloatm_fHg; //红股
floatm_fPg; //配股
floatm_fPgj; //配股价
& S9 S. ?- c: G4 n. u  S: {3 h# @* _! gfloatm_fHl; //红利
) |- p; ]& z! V) k) f}SPLITDATA;
' s: z- m5 {  N( I$ u/////////////////////////////////////////////////////////////////////////////
! w4 Q  F+ F, K0 D' E/*财务数据顺序(m_pfFinData内容)
  M& @9 U. l9 h$ T3 A3 q: A2 X序号内容
0总股本(万股),
3 _' c2 P- v" ?1国家股,
2发起人法人股,
% x8 h) t5 a! X; g" D3法人股,
4B股,
5H股,
6流通A股,
; w8 }. W! ?" Z7职工股,
: B3 A' J. Z5 g8A2转配股,
9总资产(千元),
& e# Z& Q7 P8 E; V" v* d% S6 l* M10流动资产,
( G: V- R: ~: q8 D* s11固定资产,
12无形资产,
4 @, E# |( z# M% }7 e' p13长期投资,
$ @' Y; m9 \9 v/ U14流动负债,
15长期负债,
16资本公积金,
17每股公积金,
2 m6 e8 c$ z/ R1 h$ e18股东权益,
19主营收入,
20主营利润,
: g3 o- \7 @- [* ~21其他利润,
22营业利润,
2 I. ]7 t8 h. g) s) p1 g23投资收益,
, G8 l& }' v& H7 ~24补贴收入,
7 ~* G3 J! o( U5 ]& y25营业外收支,
26上年损益调整,
/ t% G3 {+ |; L& l" h# k# y! W27利润总额,
0 _/ y# n1 o# C7 _2 U28税后利润,
29净利润,
30未分配利润,
( \# v8 @- h) N9 ~1 [% J6 ^31每股未分配,
32每股收益,
33每股净资产,
34调整每股净资,
35股东权益比,
, Z, j5 v' u& R+ K# g2 ]* Z36净资收益率
*/
/////////////////////////////////////////////////////////////
//定义取用caller函数传递参数项 的结构
typedefstruct tagCALCPARAM
{
union
{
constfloat* m_pfParam; //指向序列参数的址标，指向一个浮点型数组pointertofloat variable parameter / ex. c,h,l,o, co2...co2=(c+o)/2
3 b; e1 @+ c- a( i. p8 jconstfloat m_fParam; //数值参数 valueof parameter
0 R! C6 c/ Y3 t, U* Y5 G};
constint m_nParamStart; //序列参数有效起始位置thestart address of variable parameter / ex. c,h,l,o,co2.....
) I, e% i& u' u! H2 D* G) O}CALCPARAM;
7 G' n7 E$ Z$ A% w3 ~/////////////////////////////////////////////////////////////////////////////
//定义全部取用址标 的总结构 (各指标指向前述各结构以便取的各结构的数据,接口信息数据的结构 )
( e9 L1 a  Y/ R7 Z* @typedefstruct tagCALCINFO
  F) g- e9 ^7 M6 q; U: R' L{
constDWORD m_dwSize; //结构大小
. R7 p) Y6 A- Q, J+ p8 Q7 JconstDWORD m_dwVersion; //调用软件版本(V2.10: 0x210)
constDWORD m_dwSerial; //调用软件序列号
$ L# P* N6 b: t* q6 z/ W5 {constchar* m_strStkLabel; //股票代码
3 C& g! Y- i( y/ gconstBOOL m_bIndex; //大盘
constint m_nNumData; //数据数量(pData,pDataEx,pResultBuf数据数量)数据长度
constSTKDATA* m_pData; //常规数据,注意:当m_nNumData==0时可能为NULL
& a; ~& [' T9 r% H- D: FconstSTKDATAEx* m_pDataEx; //扩展数据,分笔成交买卖盘,注意:可能为NULL
/ a' o$ A* G4 A' F. L4 Vconstint 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
& H* c' s8 ]0 ?3 tconstfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
constfloat* m_pfParam4; //调用参数4/pointer to variable parameter 4
float*m_pResultBuf; //结果缓冲区
: T' h" l2 G9 E2 h- Y0 bconstDWORD m_dataType; //数据类型
constfloat* m_pfFinData; //财务数据
, {3 E- Q  [, X2 i' ~//以上与分析家兼容，所以沿用其结构和名称
//以下为飞狐交易师扩展(fortagSTKDATAEx)
constDWORD m_dwReserved; // 保留
constint m_nNumParam; // 调用参数数量
: F& B$ Z' y& x/ ZconstCALCPARAM* m_pCalcParam; // 调用参数数组
constDWORD m_dwReservedEx[4]; // 保留
char*m_strStkName; //股票名称
SPLITDATA*m_pSplitData; //除权数据
intm_nNumSplitData; //除权次数
}CALCINFO;
/*
+ S& L4 b9 u7 E1 M2 L注1:(与分析家兼容)
1.函数调用参数由m_pfParam1--m_pfParam4带入,若为NULL则表示该参数无效.
5 N% b7 R4 n0 @- X2.当一个参数无效时,则其后的所有参数均无效.
如:m_pfParam2为NULL,则m_pfParam3,m_pfParam4一定为NULL.
8 x* Z5 [& h5 v7 H- E+ G3.参数1可以是常数参数或序列数参数,其馀参数只能为常数参数.
# S& A  G+ G6 O  z2 z9 R/ _4.若m_nParam1Start<0,则参数1为常数参数,参数等于*m_pfParam1;
5.若m_nParam1Start>=0,则参数1为序列数参数,m_pfParam1指向一个浮点型数组,
数组大小为m_nNumData,数据有效范围为m_nParam1Start至 m_nNumData-1.
在时间上m_pData[x]与 m_pfParam1[x]是一致的
注2:(飞狐交易师扩展)
1.该扩展结构使调用参数在技术上可以是无限数目的，且每个参数都可为数值或序列，由公式中实际的调用参数决定。
2.CALCPARAM结构用于带入参数信息和实际数据，m_pCalcParam数组大小为m_nNumParam，数据有效范围为0 至m_nNumParam-1.
# ?9 `5 j$ Z- X+ N* x1 W, O- U4 ~2 B3.按参数的顺序，m_pCalcParam[0]为第一个参数的数据，m_pCalcParam[1]为第二个参数的数据...，为了保持兼容，原m_nParam1Start、m_pfParam1等5个属性依然有赋值。
/ V+ {) M6 I& x1 Y5 r. r7 B  w. P4.若i位置的参数为数值，取用m_pCalcParam.m_fParam.
1 s# {7 o: L2 c) k( E& e1 \* Y5.若i位置的参数为序列，取用m_pCalcParam.m_pfParam，数组大小为m_nNumData,数据有效范围为m_pCalcParam.m_nParamStart至 m_nNumData-1.若m_pCalcParam.m_nParamStart<0,则此数组中无有效数据。
6.由于可以调用多个序列，许多序列的计算可以先在公式中进行，然后作为调用的参数即可。
; j1 Z$ V9 m: R# T+ Z  d. v1 {7.经此扩展，对分析家的DLL依然可以调用、兼容。
*/
///////////////////////////////////////////////////////////////////////////////////
7 J+ p5 l8 c6 G- v0 {5 K, T6 _% s/*函数输出
* C( K& V, f' D/ [, b__declspec(dllexport)int xxxxxxxx(CALCINFO* pData);
1.函数名称需全部大写.
2.函数必须以上述形式声明,请用实际函数名称替代xxxxxxxx;
) J8 Z' L2 E. m1 h对于C++程序还需包括在extern"C" { } 括号中.
3.函数计算结果用pData->m_pResultBuf带回.
4.函数返回-1表示错误或全部数据无效,否则返回第一个有效值位置,即:
m_pResultBuf[返回值]-- m_pResultBuf[m_nNumData-1]间为有效值.
5 b) D0 u- v2 e3 k" e- u& M5.函数名称长度不能超过15字节,动态连接库文件名不能超过9字节(不包括扩展名),动态库名称不能叫SYSTEM,EXPLORER
*/
//示例函数,使用时用实际名称替换
, C3 m. t! m: w3 f" c8 o: x* G__declspec(dllexport)int WINAPI MYMACLOSE(CALCINFO* pData);
__declspec(dllexport)int WINAPI SMOOTH(CALCINFO* pData);
//__declspec(dllexport) int WINAPI MYMAVAR(CALCINFO* pData);
__declspec(dllexport)int WINAPI MYBBI(CALCINFO* pData);
- a0 X) G- k8 T: X//WINAPI = _stdcall
5 E' |, o, L$ H2 `; S#ifdef__cplusplus
}
8 e: J3 V* c# p$ R- ^7 J#endif//__cplusplus
- q0 a" }4 f3 k2 Z: Q. G#endif//__FOXFUNC_H_INCLUDE
8 W% R; [+ q* V. o9 c
//////////////////////////////////////////comment 注解
__declspec(dllexport)int WINAPI MYMAVAR(CALCINFO* pData)
$ \9 C( o' }/ q+ ~/ LpData是指向 址标总结构 CALCINFO的 总址标
取用第二个参数数值floatfParam = *pData→m_pfParam2
取用第一个序列参数的址标constfloat* pValue = pData->m_pfParam1;
取用股票数据长度intndata = pData→m_nNumData;
第一个参数存在且为数值pData->m_pfParam1&& pData→m_nParam1Start<0
; w6 U" K4 O# E" G) E第一个参数存在且为序列pData->m_pfParam1&& pData→m_nParam1Start>=0
: P4 H) A6 q% M' {( ^- L第一个及第二个参数存在且为序列,第三个参数不存在pData->m_pfParam1&& pData->m_pfParam2 && pData->m_nParam1Start>=0&& pData->m_pfParam3==NULL
constfloat* cpParam = pData->m_pfParam1; 定义cpParam为第一个序列参数的址标
取用股票数据结构
$ k: Q0 }9 P, dpData→m_nNumData= 变数数据长度
pData→m_pData= pointer to struc STKDATA 的址标
; i/ N' I# p  npData→m_pData[x]数据结构的第x个数据
# t; J4 z4 R) B) s* m: i: LpData→m_pData[x].m_fHigh数据结构的第x个数据中的 High
取用结果缓冲序列
- e2 L' g3 }5 v- k' d) O# kpData->m_pResultBuf
/ e4 A8 O0 D1 Q6 c取得第一个序列参数的起始序位,如 2,...5 , . 7...
- Z; U- F1 N' b! x% m$ FintnFirst = pData->m_nParam1Start;
& F, w( F6 H. ~+ dfor( i = nFirst+nPeriod-1; i < pData->m_nNumData; i++ )
, m( _1 w0 t1 e取得第二个数值参数的数值
5 V6 ~/ w: w. O$ G8 H8 F: C: `8 |floatfParam = *pData->m_pfParam2;
# l1 t2 _- i2 X8 W' K/ {; LintnPeriod = (int)fParam;
取用第一个序列参数的址标constfloat* pValue = pData→m_pfParam1;
% t& h- b- O+ Q! C- b取用序列参数的单个直pValue
取用缓冲序列的单个值pData->m_pResultBuf
constCALCPARAM* m_pCalcParam; // 调用参数数组
m_pCalcParam为序列址标,指向各序列参数的指标
第一个序列参数pData→m_pCalcParam[0]
! q7 g( c0 S1 \% W4 A/ A  W$ O- Zconstfloat* m_pfParam; //指向序列参数的址标
第一个序列参数的起始序位pData->m_pCalcParam[0].m_nParamStart
. @4 ~- X9 w1 B7 h5 ?1 W第一个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[0].m_pfParam;
取用第一个序列参数的单个直pValue1
( |/ ]& V& A8 _9 X* _" `% ^, `/ S第二个序列参数pData→m_pCalcParam[1]
第二个序列参数的起始序位pData->m_pCalcParam[1].m_nParamStart
" m" L6 W" ~+ G# J8 t% G第二个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[1].m_pfParam;
' o7 t6 U' E7 O" U: j取用第二个序列参数的单个直pValue2
' t( \: V% F! u  ~3 x! G* F  f第三个序列参数pData→m_pCalcParam[2]
  f6 B: w% ]# |0 N第三个序列参数的起始序位pData->m_pCalcParam[2].m_nParamStart
第三个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[2].m_pfParam;
3 v: b& c# H& p( k取用第三个序列参数的单个直pValue3
8 e- i# v! f+ m' \: H第四个序列参数pData→m_pCalcParam[3]
' c% c5 e+ g+ g2 K, O! }3 O第四个序列参数的起始序位pData->m_pCalcParam[3].m_nParamStart
第四个序列参数的址标constfloat* pValue1 = pData→m_pCalcParam[3].m_pfParam;
取用第四个序列参数的单个直pValue4
如果有四个序列参数,则取用序位最高的那一个序位
if( 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个序列都含有效数值
{
//计算返回的序列的第一个有效值位置
) W/ W6 N' d, A2 WintnFirst = pData->m_pCalcParam[3].m_nParamStart;//已知返回的序列的第一个有效值位置与第4个序列一致
7 L$ X9 j. R9 _//若不知，则
/*
intnFirst = pData->m_pCalcParam[0].m_nParamStart;
/ e7 R: H; x' {1 K3 [; N4 c! q8 o# pif( nFirst < pData->m_pCalcParam[1].m_nParamStart )
nFirst= pData->m_pCalcParam[1].m_nParamStart;
% O. Y( w6 u" E* @. Uif( nFirst < pData->m_pCalcParam[2].m_nParamStart )
4 `! F% ^% X2 vnFirst= pData->m_pCalcParam[2].m_nParamStart;
if( nFirst < pData->m_pCalcParam[3].m_nParamStart )
2 c& Z  [% F8 i- }/ |3 S7 LnFirst= pData→m_pCalcParam[3].m_nParamStart;
constfloat* pValue1 = pData->m_pCalcParam[0].m_pfParam;
constfloat* pValue2 = pData->m_pCalcParam[1].m_pfParam;
. p1 J" `6 r6 j4 \3 E  oconstfloat* pValue3 = pData->m_pCalcParam[2].m_pfParam;
constfloat* pValue4 = pData->m_pCalcParam[3].m_pfParam;
2 B; c! {1 d" d) q6 V$ O  R//-------------------
floatm_fOpen; //开盘 open
floatm_fHigh; //最高 high
floatm_fLow; //最低 low
floatm_fClose; //收盘 close
" o& ?( h. ~- u. e/ gfloatm_fVolume; //成交量 Volume
floatm_fAmount; //成交额 amount
调用收盘据
pData→m_nNumData= 变数数据长度
6 C1 w& R% D" l9 ], Y/ C. Q2 Z: upData→m_pData= pointer to struc STKDATA
# Q) B- E4 D1 G# n6 ~pData→m_pData[x]第x个数据
pData→m_pData[x].m_fHigh第x个数据中的 High
@@@@@@@@@@@important !!!!!!!
sinceVC++ 2008, cl.exe will make ‘pData→m_pData[i-j].m_fClose’ anerror
* j1 y4 H: B' Z5 l& {so,pass the high,low,open and close just from the function parameter ,that is use ‘ CALCPARAM’ struct
3 q! u8 Q$ ~; L0 a9 O  RpData->m_pData[i-j].m_fOpen// to use open , there is no way in using a varable for calculationoutside foxtrader
( n# ^) n0 E# w4 f  h: lpData→m_pData[i-j].m_fHighto use high
1 @; D* x0 L4 P# N! [1 V7 F+ vpData->m_pData[i-j].m_fLow
  z( {; ^& a3 b& Y$ }pData->m_pData[i-j].m_fClose
0 x8 O2 X9 F$ e- g5 n+ i1 Lm_pData= pointer to struc STKDATA
incalling C++ dll function
m_pDatais passed to pData (CALCINFO* pData . A CALCINFO* type pointer)
; i, g5 I) D2 Mtouse a single value in variable ‘High’
pData→m_pData[i-j].m_fHighto use high
) P" ]7 ]6 ]) }$ _& ~( Rconstfloat* m_pfParam1; //调用参数1/pointer to variable parameter 1
constfloat* m_pfParam2; //调用参数2/pointer to variable parameter 2
  z1 K# q+ P) ?  F' Tconstfloat* m_pfParam3; //调用参数3/pointer to variable parameter 3
constfloat* m_pfParam4;
4 Y, N9 Q  z. x2 |- O, v# cm_pfParam1,m_pfParam2, m_pfParam3, m_pfParam4 = pointer to caller function 的参数
1 h% g: l1 W' u1 K! P4 h) NpData→m_pfParam1= pointer to 第一个(序列)参数
pData→m_pfParam1[x]= 取用第一个(序列)参数的第x 个值
constfloat* cpParam = pData→m_pfParam1; ＝定义 cpParam为 pointerto 第一个(序列)参数
cpParam[x] = 取用第一个(序列)参数的第x 个值
m_pResultBuf＝ 结果缓冲列
pData→m_pResultBuf= pointer to 结果缓冲列
+ k7 y5 z+ ]' SpData→m_pResultBuf[x] = 取用结果缓冲列的第 x个值
& @9 [+ `. O+ U4 n1 u% v2 n//////////////////////////////////////////comment
//////////////////////////////////////////comment 注解
constint m_nParam1Start; //统杅1衄虴宎弇离
constfloat* m_pfParam1; //覃蚚统杅1
, l5 _0 U& c0 K  I8 W/ kconstfloat* m_pfParam2; //覃蚚统杅2
constfloat* m_pfParam3; //覃蚚统杅3
) b. t8 {. B. n" Zconstfloat* m_pfParam4; //覃蚚统杅4,parameters must be <= 4
//const float* m_pfParam5; // parameters must be <= 4
+ B; g6 b+ J, u//const float* m_pfParam6;
* V5 B1 D# e" u# j7 @; u3 a- k//const float* m_pfParam7;
8 V% }' c- h) \. k  o: W//const float* m_pfParam8;
//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
9 F  C2 X+ @. y0 L! e1 \  k. E) [% _$ t&&pData->m_pCalcParam[2].m_nParamStart>=0)
+ ]/ R- t8 e& X9 L8 Y" r{
floatfParam = *pData->m_pfParam4; //pointer ,pData->m_pCalcParam[3].m_nParamStart >= 0
intnPeriod = (int)fParam; //统杅1
/ I0 }# k& _# x7 i8 X$ d+ f//const float* cpParam = pData->m_pfParam2; // cpParam = pointer to第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
# O) i* U# k) |constfloat* cpParam1 =pData->m_pCalcParam[0].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
. Y4 L! z. g" n$ T) g) j- Fconstfloat* cpParam2 =pData->m_pCalcParam[1].m_pfParam; // cpParam =pointer to 第一个序列参数,cpParam = 取用第一个序列参数的第i 个值
/ Q1 |8 [5 ~) b; @- Rconstfloat* 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 个值
1 N- H, _% d* J1 ]' N( C//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 ,
/ U! J; F* a# Z0 g' y4 Btouse pData→m_pData[x].m_fClose
9 o$ l/ n$ F- ^6 F2 s9 kpData→m_pData[x]= | 1,2,3 , … , m_nNumParam | time_t m_time;
|1,2,3 , … , m_nNumParam | float m_fOime_t
9 Z. N# Q3 S+ O' T- u|1,2,3 , … , m_nNumParam | float m_fHigh;
1 f3 Y" e; M2 \.. .
|1,2,3 , … , m_nNumParam | WORD m_wDecline;
m_nNumParam= 数据high,close,open,low的长度
touse high:
1 B/ @: g9 n! _6 `pData→m_pData[x].m_fHigh
2 E' P$ f) C3 e3 {contentof struct STKDATA
: X  }5 u" A2 c5 b- w9 F% Ntime_tm_time; //时间,UCT
floatm_fOpen; //开盘 open
# S- h6 m6 M2 z! Yfloatm_fHigh; //最高 high
floatm_fLow; //最低 low
! G, f( a* l" ]- ], q, Kfloatm_fClose; //收盘 close
floatm_fVolume; //成交量 Volume
/ b: u5 l! G3 U% jfloatm_fAmount; //成交额 amount
WORDm_wAdvance; //上涨家数 仅大盘有效
WORDm_wDecline; //下跌家数 仅大盘有效
调用传递参数及传回结果
6 b# D* k4 }7 M8 S: }调用传递参数
, M. _7 B- z# f/ N( L. }4 o+ R4 j- s8 h(pData->m_pfParam1 && //参数1有效Param1exists
pData->m_nParam1Start<0&& //参数1为常数
pData->m_pfParam2==NULL) //
. j. {$ W! v6 _+ w& k* q" jlocalprocedure 定义使用变数
onstfloat* pValue = pData→m_pfParam1; //use constant参数1
intnFirst = pData->m_nParam1Start; //use 参数1效值起始位
floatfParam = *pData->m_pfParam2; //use 参数2
/ B/ Q7 o% S( ointnPeriod = (int)fParam;
传回结果
! b7 a  ]5 t* n- h. p% k* EfTotal+= pValue[i-j];
3 I$ {' D$ W# I- W1 X% y* w) rpData->m_pResultBuf
6 g+ }9 t& n! R! N% L$ e//////////////////////////////////////////comment