通达信四量图副图指标公式源码

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(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,COLORGREEN{www.qill.cnCOLORRED};
马线:=MA(牛线,6),COLORMAGENTA{www.qill.cnCOLORYELLOW};
STICKLINE(C>牛线,2.5,4,8,0),COLORRED{www.qill.cnCOLORGREEN},LINETHICK2;
STICKLINE(C<马线,2.5,4,8,0),COLORGREEN{www.qill.cnCOLORRED},LINETHICK2;
STICKLINE(牛线>=C AND C>=马线,2.5,4,8,0),COLORGREEN{www.qill.cnCOLORMAGENTA}{www.qill.cnCOLORYELLOW},LINETHICK2;
A:=MAX(MA(C,60),MA(C,120));
B:=MIN(MA(C,60),MA(C,120));
STICKLINE(C>=A,0.5,2,8,0),COLORRED{www.qill.cnCOLORGREEN},LINETHICK2;
STICKLINE(C<=B,0.5,2,8,0),COLORGREEN{www.qill.cnCOLORRED},LINETHICK2;
STICKLINE(A>=C AND C>=B,0.5,2,8,0),COLORGREEN{www.qill.cnCOLORMAGENTA}{www.qill.cnCOLORYELLOW},LINETHICK2;
{www.qill.cnR:=0;}
E:=MAX(MA(C,45),MA(C,90));
F:=MIN(MA(C,45),MA(C,90));
STICKLINE(C>E,-1.5,0,8,0),COLORRED{www.qill.cnCOLORGREEN},LINETHICK2;
STICKLINE(C<F,-1.5,0,8,0),COLORGREEN{www.qill.cnCOLORRED},LINETHICK2;
STICKLINE(E>=C AND C>=F,-1.5,0,8,0),COLORGREEN{www.qill.cnCOLORMAGENTA}{www.qill.cnCOLORYELLOW},LINETHICK2;
J:=MAX(MA(C,30),MA(C,60));
K:=MIN(MA(C,30),MA(C,60));
STICKLINE(C>J,-3.5,-2,8,0),COLORRED{www.qill.cnCOLORGREEN},LINETHICK2;
STICKLINE(C<K,-3.5,-2,8,0),COLORGREEN{www.qill.cnCOLORRED},LINETHICK2;
STICKLINE(J>=C AND C>=K,-3.5,-2,8,0),COLORGREEN{www.qill.cnCOLORMAGENTA}{www.qill.cnCOLORYELLOW},LINETHICK2;

买:= ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2), COLORRED,LINETHICK3;
DRAWICON(买,L*0.991,1);
STICKLINE(买,8,0,1,0),COLORRED;

卖:= ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2),COLORF0F000,LINETHICK3;
DRAWICON(卖,H*1.005,2);

STICKLINE(卖,8,0,1,0),COLORWHITE;