ATR14:=ATR.ATR(14); LATR:= REF(ATR14,1);
TREND_:= C+ATR14 COLORGREEN; LTREND_:=REF(TREND_,1);
TREND:= IF(TREND_>LTREND_, LTREND_, TREND_) COLORRED;
T:=TREND; T1:=REF(T,1); T2:=REF(T,2); T3:=REF(T,3);
{T本期走平:= ABS(T-T1)<1; T前一下跌:= T1<T2; T前二下跌:= T2<T3; T前一上升:= T1>T2; T前二上升:= T2>T3;}
{本期 的最后一个交易日收盘后, 开始检查买卖条件}
{事件发生时的下一周的首个交易日的开盘前, 9:15分开始下单, 期盼开盘价成交}
B1:= ABS(T-T1)<1 AND T1<T2 AND T2<T3 NODRAW; LB1:=REF(B1,1); DRAWICON(LB1, L, 38);
S1_:= (ABS(T-T1)<1 OR T<T1) AND T1>T2+1 AND T2>T3+1 ;
S1: FILTER(S1_, 3) NODRAW; LS1{LAST BAR OF S1}:=REF(S1,1); DRAWICON(LS1, H*1.02, 39);
BPRICE:= VALUEWHEN(LB1, O); SPRICE:= VALUEWHEN(LS1, O); DRAWNUMBER(LS1, H * 1.04, 100 * ( SPRICE/BPRICE-1));
ATR14:=ATR.ATR(14); LATR:= REF(ATR14,1);
TREND_:= C+ATR14 COLORGREEN; LTREND_:=REF(TREND_,1);
TREND: IF(TREND_>LTREND_, LTREND_, TREND_) COLORYELLOW;
T:=TREND; T1:=REF(T,1); T2:=REF(T,2); T3:=REF(T,3);
{T本期走平:= ABS(T-T1)<1; T前一下跌:= T1<T2; T前二下跌:= T2<T3; T前一上升:= T1>T2; T前二上升:= T2>T3;}
{本期 的最后一个交易日收盘后, 开始检查买卖条件}
{事件发生时的下一周的首个交易日的开盘前, 9:15分开始下单, 期盼开盘价成交}
B1:= ABS(T-T1)<1 AND T1<T2 AND T2<T3 NODRAW;
B2_:= (T>T1+1) AND (T1>(T2+1) OR ABS(T1-T2)<1 ) AND (C>T AND L<T);
B2 := FILTER(B2_, 3);
LB1:=REF(B1 OR B2,1); DRAWICON(LB1, L, 38);
BUY(B1 OR B2, CLOSE);
S1_:= (ABS(T-T1)<1 OR T<T1) AND (T1>(T2+1)) AND (T2>(T3+1)) ;
S1:= FILTER(S1_, 3) NODRAW; LS1{LAST BAR OF S1}:=REF(S1,1); DRAWICON(LS1, H*1.02, 39);
SELL(S1, HIGH);
BPRICE:= VALUEWHEN(LB1, O); SPRICE:= VALUEWHEN(LS1, O);
DRAWNUMBER(LS1, H1.04, 100( SPRICE/BPRICE-1));
BC:BARSCOUNT(C) NODRAW; {开始于0的}
{BC_:= COUNT(C>0, 0)+10;
CURRBARSCOUNT=5;
};
原文:https://www.cnblogs.com/duan-qs/p/12903509.html