Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:求老师把指标信号改成自动化反手交易

1楼
zurich 发表于:2016/10/26 13:03:01

指标源码如下:

NN:=DATE<>REF(DATE,1);
BARNUMBER1:=BARSLAST(NN)+1;
BARNUMBER2:=50;
MAH1:=WMA(H,BARNUMBER1),LINETHICK2,COLORGREEN;
MAL1:=WMA(L,BARNUMBER1),LINETHICK2,COLORRED;
MAH2:WMA(H,BARNUMBER2),LINETHICK2,COLORMAGENTA;
MAL2:WMA(L,BARNUMBER2),LINETHICK2,COLORMAGENTA;


IF(MAH2>=REF(MAH2,1),MAH2,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(MAL2>=REF(MAL2,1),MAL2,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(MAH2<REF(MAH2,1),MAH2,DRAWNULL),COLORCYAN,LINETHICK2;
IF(MAL2<REF(MAL2,1),MAL2,DRAWNULL),COLORCYAN,LINETHICK2;

DRAWTEXT(MAH2>=REF(MAH2,1) AND MAL2>=REF(MAL2,1) AND (REF(MAH2,1)<=REF(MAH2,2) OR REF(MAL2,1)<=REF(MAL2,2)),L*0.999,'短多B'),COLORRED;

DRAWTEXT(MAH2<=REF(MAH2,1) AND MAL2<=REF(MAL2,1) AND (REF(MAH2,1)>=REF(MAH2,2) OR REF(MAL2,1)>=REF(MAL2,2)),H*1.001,'短空S'),COLORGREEN;

2楼
jinzhe 发表于:2016/10/26 13:11:17

NN:=DATE<>REF(DATE,1);
BARNUMBER1:=BARSLAST(NN)+1;
BARNUMBER2:=50;
MAH1:=WMA(H,BARNUMBER1),LINETHICK2,COLORGREEN;
MAL1:=WMA(L,BARNUMBER1),LINETHICK2,COLORRED;
MAH2:WMA(H,BARNUMBER2),LINETHICK2,COLORMAGENTA;
MAL2:WMA(L,BARNUMBER2),LINETHICK2,COLORMAGENTA;


IF(MAH2>=REF(MAH2,1),MAH2,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(MAL2>=REF(MAL2,1),MAL2,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(MAH2<REF(MAH2,1),MAH2,DRAWNULL),COLORCYAN,LINETHICK2;
IF(MAL2<REF(MAL2,1),MAL2,DRAWNULL),COLORCYAN,LINETHICK2;

DRAWTEXT(MAH2>=REF(MAH2,1) AND MAL2>=REF(MAL2,1) AND (REF(MAH2,1)<=REF(MAH2,2) OR REF(MAL2,1)<=REF(MAL2,2)),L*0.999,'短多B'),COLORRED;

DRAWTEXT(MAH2<=REF(MAH2,1) AND MAL2<=REF(MAL2,1) AND (REF(MAH2,1)>=REF(MAH2,2) OR REF(MAL2,1)>=REF(MAL2,2)),H*1.001,'短空S'),COLORGREEN;

if MAH2>=REF(MAH2,1) AND MAL2>=REF(MAL2,1) AND (REF(MAH2,1)<=REF(MAH2,2) OR REF(MAL2,1)<=REF(MAL2,2)) then begin
 sellshort(1,0,market);
 buy(holding=0,1,market);
end

if MAH2<=REF(MAH2,1) AND MAL2<=REF(MAL2,1) AND (REF(MAH2,1)>=REF(MAH2,2) OR REF(MAL2,1)>=REF(MAL2,2)) then begin
 sell(1,0,market);
 buyshort(holding=0,1,market);
end

共2 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.03125 s, 3 queries.