当前位置：分析家公式网 → 股票公式 → 开拓者公式 → 一键转帖：完善的日内交易系统框架源码 可处理信号反复问题
软件名称：[B]完善的日内交易系统框架源码 可处理信号反复问题[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：0 Bytes
官方主页：Home Page
更新时间：2013-03-03 07:23:44
软件简介:
- 源码内容：
//------------------------------------------------------------------------
// 简称: s007
// 类别: 交易指令
// 类型: 其他
// 输出:
//------------------------------------------------------------------------
Params
Numeric maxLots(1);//单次开仓手数
Numeric maxTrad(3);//最大交易次数
Numeric splitRate(3); //交易滑点和佣金
Numeric ma1(5);
Numeric ma2(18);
Numeric tradBegin(909); //开仓时间
Numeric tradEnd(1440); //开仓时间
Numeric closeTime(1456); //bar的时间超过此值后平仓
Numeric stopLoss(40); //亏损大于于此值时止损，为0不判断
Numeric stopProfis(200); //盈利高于此值时止赢，为0不判断
Numeric tracProfis(0); //盈利高于此值后执行追踪止赢，为0不判断
Numeric tracLoss(0); //追踪止盈的回撤值，为0不判断，
Numeric returnProfis(70); //盈利高于此值后执行回撤止赢，为0不判断
Numeric minProfis(10); //持仓bar数超过maxHoles后盈利小于此值平仓，为0不判断
Numeric maxHolds(7);//为0不判断
Vars
String fileName;
String fileName2;
String toDay;
Numeric splitDot; //交易滑点
Bool b1(False);//开多条件
Bool b2(False);//开多条件
Bool s1(False);//开空条件
Bool s2(False);//开空条件
Bool bc(False);//开多条件
Bool sc(False);//开多条件
Numeric tradePrice(0);//发单的价咯
StringSeries tradMem("");//交易描述
Numeric tradProve(0);//可否开仓：0/禁止，1/允许
Numeric tradNum(0);//交易次数
Numeric tradState(0);//持仓状态：0/无，1/多，-1/空
Numeric tradCost(0);//持仓成本
Numeric tradIdx(0);//持仓Bar的index
Numeric tradCyc(0);//持仓周期
String pKey;//
String pKeyTradProve("TRADPROVE");//
String pKeyTradState("TRADSTATE");//
String pKeyTradCost("TRADCOST");//
String pKeyTradNum("TRADNUM");//
String pKeyTradIdx("TRADIDX");//
Numeric curProfit(0);//持仓当前浮动盈亏
NumericSeries maxProfit(0);//持仓最大浮盈
NumericSeries maxLoss(0);//持仓最大浮亏
String dopos("");//持仓处理代码
NumericSeries m1(0);
NumericSeries m2(0);
Begin
splitDot=splitRate*MinMove();
pKey=FormulaName()+SymbolName()+Text(BarType())+Text(BarInterval());
pKeyTradProve="TRADPROVE";//
pKeyTradState="TRADSTATE";//
pKeyTradCost="TRADCOST";//
pKeyTradNum="TRADNUM";//
pKeyTradIdx="TRADIDX";//
//初始化
If(BarStatus==0)
{
SetTBProfileString(pKey,pKeyTradProve,Text(1));
SetTBProfileString(pKey,pKeyTradState,Text(0));
SetTBProfileString(pKey,pKeyTradCost,Text(0));
SetTBProfileString(pKey,pKeyTradNum,Text(0));
SetTBProfileString(pKey,pKeyTradIdx,Text(0));
tradMem="";
maxProfit=0;
maxLoss=0;
Return;
}
if(Day !=Day[1])
{
SetTBProfileString(pKey,pKeyTradProve,Text(1));
SetTBProfileString(pKey,pKeyTradState,Text(0));
SetTBProfileString(pKey,pKeyTradCost,Text(0));
SetTBProfileString(pKey,pKeyTradNum,Text(0));
SetTBProfileString(pKey,pKeyTradIdx,Text(0));
tradMem=" ";
maxProfit=0;
maxLoss=0;
}
Else
{
//获取交易状态
tradProve=Value(GetTBProfileString(pKey,pKeyTradProve));
[url=http://www.70822.com/soft/sort013/sort083/down-59425.html]完善的日内交易系统框架源码 可处理信号反复问题[/url]