通达信AD线主图源码
通达信AD线主图源码
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
A:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
{公式在线提供：www.gszx.com.cn}
D:(15*MID+14*REF(MID,1)+13*REF(MID,2)+12*REF(MID,3)+11*REF(MID,4)+10*REF(MID,5)+
9*REF(MID,6)+8*REF(MID,7)+7*REF(MID,8)+
6*REF(MID,9)+5*REF(MID,10)+
4*REF(MID,11)+3*REF(MID,12)+2*REF(MID,13)+
REF(MID,15))/120;
IF(D>A,D,A),COLORYELLOW;
IF(D<A,A,D),COLORGREEN;
E:REF(CLOSE,1);
IF(E>A,E,A),COLORRED;
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;
