不同软件函数机制处理不同,改写参考:
T1:=LLVBARS(L,BARPOS);
T2:=HHVBARS(H,T1+1);
T3:=LLVBARS(L,T2+1);
T4:=HHVBARS(H,T3+1);
CURRBARSCOUNT:=DATACOUNT-BARPOS;
T5:=BARSLAST(CURRBARSCOUNT=REFX1(T1,10000)+1);
T6:=BARSLAST(CURRBARSCOUNT=REFX1(T2,10000)+1);
T7:=BARSLAST(CURRBARSCOUNT=REFX1(T3,10000)+1);
T8:=BARSLAST(CURRBARSCOUNT=REFX1(T4,10000)+1);
D1:REF(L,T5),COLORGREEN;
G1:REF(H,T6),COLORRED;
D2:=REF(L,T7);
G2:REF(H,T8),COLORRED;
IF(CURRBARSCOUNT=REFX1(T1,1000)+1,L,NULL),CIRCLEDOT,COLORGREEN,LINETHICK3;
IF(CURRBARSCOUNT=REFX1(T2,10000)+1,H,NULL),CIRCLEDOT,COLORRED,LINETHICK3;
IF(CURRBARSCOUNT=REFX1(T4,10000)+1,H,NULL),CIRCLEDOT,COLORRED,LINETHICK3;
XG:=(REFX1(C>G1,10000)=1 AND C>G1 OR CROSS(C,G1)) AND G1>=G2 AND BETWEEN(D1/G2,0.98,1.05) AND REF(C,T5)/REF(C,T7+1)<1.3;
DRAWICON(XG AND BARSCOUNT(C)>200,L,1);