后台交易问题 [金字塔]
-
咨询内容：
/平多空单
if Tholding>0 and tenterbars>1 and L<=zs then
BEGIN
MyTPrice :=IF(OPEN<zs,OPEN,zs)-MINDIFF;
TSELL(1,ss,LMT,MyTPrice,0);
END
if Tholding<0 and tenterbars>1 and H>=zs THEN
BEGIN
MyTPrice :=IF(OPEN>zs,OPEN,zs)+MINDIFF;
TSELLSHORT(1,ss,LMT,MyTPrice,0);
END
//开多单
IF H>=UpperBand and BLIQCON and THOLDING=0 THEN
BEGIN
MyPrice :=IF(OPEN>UpperBand,OPEN,UpperBand)+MINDIFF;
TBUY(1,ss,LMT,MyPrice,0);
zs:=Mdg;
maxhl:=h;
END
//开空单
IF L<=LowerBand and SOPCON and THOLDING=0 THEN
BEGIN
MyPrice :=IF(OPEN<LowerBand,OPEN,LowerBand)-MINDIFF;
TBUYSHORT(1,ss,LMT,MyPrice,0);
zs:=Mdd;
maxhl:=l;
END图表改后台交易的，出现平空就开空？？？
-
金字塔客服：
Globalvariable:hold=drawnull;
//平多空单
if holding>0 and enterbars>1 and L<=zs then
BEGIN
MyTPrice :=IF(OPEN<zs,OPEN,zs);
sell(1,ss,LIMIT,MyTPrice-MINDIFF);
END
if holding<0 and enterbars>1 and H>=zs THEN
BEGIN
MyTPrice :=IF(OPEN>zs,OPEN,zs);
sellshort(1,ss,LIMIT,MyTPrice+MINDIFF);
END
//开多单
IF H>=UpperBand and BLIQCON and THOLDING=0 THEN
BEGIN
MyPrice :=IF(OPEN>UpperBand,OPEN,UpperBand);
buy(1,ss,LIMIT,MyPrice+MINDIFF);
zs:=Mdg;
maxhl:=h;
END
//开空单
IF L<=LowerBand and SOPCON and THOLDING=0 THEN
BEGIN
MyPrice :=IF(OPEN<LowerBand,OPEN,LowerBand);
buyshort(1,ss,LIMIT,MyPrice-MINDIFF);
zs:=Mdd;
maxhl:=l;
END
if Tholding<0 and l<maxhl then begin //重新定位离场实现浮动止损止盈 zs:=Mdd; end if Tholding>0 and h>maxhl then begin zs:=Mdg; end
cc809008322:=holding; if not(islastbar) or workmode<>1 then exit; xiadan809008322:=cc809008322-hold; if xiadan809008322>0.5 then begin cang:=min(xiadan809008322,abs(hold)); if hold<0 then begin tsellshort(1,cang,LMT,0,0,'809008322'); end cang:=xiadan809008322+min(hold,0); if cang>0 then begin tbuy(1,cang,LMT,0,0,'809008322'); end end if xiadan809008322<-0.5 then begin cang:=min(abs(xiadan809008322),abs(hold)); if hold>0 then begin tsell(1,cang,LMT,0,0,'809008322'); end cang:=abs(xiadan809008322)-max(hold,0); if cang>0 then begin tbuyshort(1,cang,LMT,0,0,'809008322'); end end hold:=cc809008322; WARNING_DISABLE:9;
-
用户回复：
按阿火改的，但后面后台交易，限价应该使用前面的限价瑟帮改改。
-
网友回复：
cc809008322:=holding;
if not(islastbar) or workmode<>1 then exit;
xiadan809008322:=cc809008322-hold;
if xiadan809008322>0.5 then begin
cang:=min(xiadan809008322,abs(hold));
if hold<0 then begin
tsellshort(1,cang,LMT,MyTPrice+MINDIFF,0,'809008322');
end
cang:=xiadan809008322+min(hold,0);
if cang>0 then begin
tbuy(1,cang,LMT,MyPrice+MINDIFF,0,'809008322');
end
end
if xiadan809008322<-0.5 then begin
cang:=min(abs(xiadan809008322),abs(hold));
if hold>0 then begin
tsell(1,cang,LMT,MyTPrice-MINDIFF,0,'809008322');
end
cang:=abs(xiadan809008322)-max(hold,0);
if cang>0 then begin
tbuyshort(1,cang,LMT,MyPrice-MINDIFF,0,'809008322');
end
end
hold:=cc809008322;
WARNING_DISABLE:9; - 网友回复： 首先，这段代码你要干什么？
有思路，想编写各种指标公式，程序化交易模型，选股公式，预警公式的朋友
可联系技术人员 QQ: 511411198 进行 有偿 编写！（不贵！点击查看价格！）
相关文章
-
没有相关内容
会员登录/注册