上下行主图，指标源码分享

{上下行主}

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;

DRAWKLINE(H,O,L,C);

下行:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,10),HHV(LOW,4),0),LINETHICK1,COLORLIBLUE;

上涨:DRAWLINE(LOW<=LLV(LOW,10),LOW,HIGH>=HHV(HIGH,10),LLV(HIGH,4),0),LINETHICK1,COLORYELLOW;

下压线:DRAWLINE(H>=HHV(HIGH,10),H,REF(H>=HHV(HIGH,10),3) AND H<REF(H,1) AND REF(H,1)<REF(H,2),H,0),COLORGREEN ,LINETHICK1;

{庄家成本}

AL0:=SUMBARS(V,CAPITAL*1);

AL1:=SUM(COST(10),AL0)/AL0;

AL2:=SUM(COST(20),AL0)/AL0;

AL3:=SUM(COST(30),AL0)/AL0;

AL4:=SUM(COST(40),AL0)/AL0;

AL5:=SUM(COST(50),AL0)/AL0;

庄家成本2:=(5*AL1+4*AL2+3*AL3+2*AL4+AL5)/15,COLOR0080FF,DOTLINE;

庄家成本1:REFDATE(庄家成本2,DATE),COLORWHITE,DOTLINE;

DRAWTEXT(CURRBARSCOUNT=50,庄家成本1,STRCAT('庄本:',CON2STR(庄家成本1,2))),COLORWHITE;

{快逃绿箭头}

VAR30:=PEAKBARS(3,15,1)<10;

VAR50:=IF(VAR30=1,2,0);

顶1:= IF(VAR50=2,2,0);

顶A:=IF(顶1>REF(顶1,1),2,0),COLORGREEN;

DRAWICON(顶A=2,H*1.02,2);

{买点红箭头}

AR1:=EMA(OPEN,7);

AR2:=EMA(AR1,21);

AR3:=CROSS(AR1,AR2);

AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);

短买:=IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,2,0),COLORRED;

DRAWICON(短买=2,L*0.98,1);

{分析家公式网HTTP://WWW.70822.COM}

MA5:=MA(C,5),COLORWHITE;

MA10:=MA(C,10),COLORRED;

{DRAWBAND(MA5,RGB(116,0,0),MA10,RGB(34,139,34));}

MA21:=MA(C,21),COLORGREEN;

五:=MA(C,5),COLORWHITE;

十:=MA(C,10),COLORYELLOW;

三十:=MA(C,21),COLORGREEN;

M120:=MA(C,120),LINETHICK2,COLORLIGRAY;

山谷:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,21) AND CROSS(MA(C,10),MA(C,21));

DRAWTEXT(山谷AND MA(C,5)<MA(C,120),MA(C,21)-0.08,'银山谷'),COLORLIGRAY;

DRAWTEXT(山谷AND MA(C,21)>MA(C,120),MA(C,21)-0.08,'金山谷'),COLORYELLOW;