数据库读写，看看我有没有问题 [开拓者 TB]
- 咨询内容：
变量
string strkeyb;
string strkeys;
NumericSeries kb(1);
StringSeries strkb;
NumericSeries ks(1);
StringSeries strks;
Begin
//下面是数据库读的部分
NN=BarsSinceToday+1;
If(Date!=Date[1])
{
kb=1;
ks=1;
strks = Text(ks);
strkb = Text(kb);
} Else
{
strKeyb = text(Date*100+NN);
strkb=GetTBProfileString("Daykb",strKeyb);
If(strkb != InvalidString)
{
strkb=GetTBProfileString("Daykb",strKeyb);
kb=Value(strkb);
}Else
{
strkb=strkb[1];
kb=Value(strkb);
}
strKeys = text(Date*100+NN);
strks=GetTBProfileString("Dayks",strKeys);
If(strks != InvalidString)
{
strks=GetTBProfileString("Dayks",strKeys);
ks=Value(strkb);
}Else
{
strks=strks[1];
ks=Value(strks);
}
}
PlotString("strks",strks,low);
PlotString("strkb",strkb,high);
......................
//下面是数据库写的部分
If(marketposition<1)
{
If(CCC&&kb<=n)
{
Buy(myvolume,Max(Open,upperband));
kb=kb+1;
strkb=Text(kb);
strKeyb = text(Date*100+NN);
SetTBProfileString("Daykb",strKeyb,strkb);
Return;
}
}
If(marketposition>-1)
{
If(DDD&&ks<=n)
{
SellShort(myvolume,Min(Open,lowerband));
ks=ks+1;
strks = Text(ks);
strKeys = text(Date*100+NN);
SetTBProfileString("Dayks",strKeys,strks);
Return;
}
}
End - TB技术人员：
我的思路，在日内交易中控制开仓，假如，同一个模型做了6个品种，在工作区打开了6个图标，当某个品种，率先开仓，后续品种在相同方向的开仓信号都给过滤掉。
- TB客服：
怎么不回复
- 网友回复： 怎么不回复
有思路，想编写各种指标公式，程序化交易模型，选股公式，预警公式的朋友
可联系技术人员 QQ: 1145508240 进行 有偿 编写！（不贵！点击查看价格！）
相关文章
-
没有相关内容
会员登录/注册