數(shù)據庫讀寫,看看我有沒有問題 [開拓者 TB]
- 咨詢內容:
變量
string strkeyb;
string strkeys;
NumericSeries kb(1);
StringSeries strkb;
NumericSeries ks(1);
StringSeries strks;
Begin
//下面是數(shù)據庫讀的部分
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);
......................
//下面是數(shù)據庫寫的部分
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個品種,在工作區(qū)打開了6個圖標,當某個品種,率先開倉,后續(xù)品種在相同方向的開倉信號都給過濾掉。
- TB客服:
怎么不回復
- 網友回復: 怎么不回復
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯(lián)系技術人員 QQ: 1145508240 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內容