网1:=EXPMA(C,5),COLORYELLOW;
网2:=EXPMA(网1,2);
网3:=EXPMA(网2,2);
网13:EXPMA(CLOSE,13),COLORGRAY,LINETHICK3;
网33:EXPMA(CLOSE,33),COLORFF00FF,LINETHICK4;
 TJ1A:IF(网1>网2,网1,网2),COLORLICYAN;
 TJ2A:IF(网1>网3,网1,网3),COLORGREEN;
 TJ3A:网1,COLORYELLOW,LINETHICK2;
 {QS}
网A:=EXPMA(CLOSE,5),COLORWHITE;

网B:=EXPMA(CLOSE,33),COLORFF00FF,LINETHICK3;

IF(网B  IF(网B  IF(网1

{黄金分割线}
顶1:=REFDATE(HHV(H,M),DATE);
底1:=REFDATE(LLV(L,M),DATE);
 H1:=顶1-(顶1-底1)*0.191;
 H2:=顶1-(顶1-底1)*0.382;
 H3:=顶1-(顶1-底1)*0.5;
 H4:=顶1-(顶1-底1)*0.618;
 H5:=顶1-(顶1-底1)*0.809;
顶部:REFDATE(顶1,DATE),COLOR666666;
 %19.8:REFDATE(H1,DATE),COLOR666666;
 %38.2:REFDATE(H2,DATE),COLOR666666;
 %50:REFDATE(H3,DATE),COLOR666666;
 %61.8:REFDATE(H4,DATE),COLOR666666;
 %80.9:REFDATE(H5,DATE),COLOR666666;
底部:REFDATE(底1,DATE),COLOR666666;
 DRAWTEXT(ISLASTBAR,顶部,'   顶部'),COLORGREEN;
 DRAWTEXT(ISLASTBAR,%19.8,'   19.8％'),COLORMAGENTA;
 DRAWTEXT(ISLASTBAR,%38.2,'   38.2％'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,%50,'   50％'),COLORWHITE;
 DRAWTEXT(ISLASTBAR,%61.8,'   61.8％'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,%80.9,'   80.9％'),COLORMAGENTA;
 DRAWTEXT(ISLASTBAR,底部,'   底部'),COLORRED;

{BS标志}
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2))
 AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,7);
 DRAWICON((ZIG(3,5)=REF(ZIG(3,5),2))
 AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.02,8);

{箱体}
 {
箱顶:PEAK(CLOSE,N,1)*0.98,POINTDOT,LINETHICK3,COLORYELLOW;
箱底:TROUGH(CLOSE,N,1)*1.02,POINTDOT,LINETHICK3,COLORFFFF00;
箱高:100*(箱顶-箱底)/箱底,NODRAW;
 };
 HH:=CONST(HHV(H,160));
 LL:=CONST(LLV(L,160));{160可改成你习惯锁定的日K线数}
HL1:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.76,0.04));
 HL2:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.80,0.08));
 HL3:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.84,0.12));
 HL4:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.88,0.16));
 HL5:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.92,0.20));
 HL6:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH+LL)/2),0.96,0.24));
 DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLOR0080FF;
 DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;
 DRAWTEXT_FIX(1,0.14,0,0,'所属地区：')COLOR00FFFF;
 DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK)COLOR00FFFF;
 DRAWTEXT_FIX(1,0.00,0.04,0,'主题投资：')COLOR0000FF;
 DRAWTEXT_FIX(1,0.07,0.04,0,EXTERNSTR(0,1))COLOR0000FF; {生成数据时第1项输1与这里1一致,描述部分输"主题投资"}
DRAWTEXT_FIX(1,0.00,0.08,0,'主营业务：')COLORFF00FF;
 DRAWTEXT_FIX(1,0.07,0.08,0,EXTERNSTR(0,2))COLORFF00FF; {生成数据时第1项输2与这里2一致,描述部分输"主营业务"}
DRAWTEXT_FIX(1,0.00,0.12,0,'出千概念：')COLORFF88FF;
 DRAWTEXT_FIX(1,0.07,0.12,0,EXTERNSTR(0,3))COLORFF88FF; {生成数据时第1项输3与这里3一致,描述部分输"出千概念"}
总额:=AMOUNT;
买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
买%:=买/AMOUNT*100;
流入:=AMOUNT*买%/10000000000;
流出:=AMOUNT/100000000-流入;
净流:=(流入-流出);
总额3:=SUM(AMOUNT,3);
流入3:=SUM(流入,3);
流出3:=SUM(流出,3);
净流3:=SUM(流入-流出,3);
总额5:=SUM(AMOUNT,5);
流入5:=SUM(流入,5);
流出5:=SUM(流出,5);
净流5:=SUM(流入-流出,5);
总额