打印本文
關閉窗口
指標源碼如下：
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;
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