H1:=MAX(DYNAINFO(3),DYNAINFO(5));L1:=MIN(DYNAINFO(3),DYNAINFO(6));P1:=H1-L1;阻力:L1+P1*8/9,COLORCYAN,LINETHICK1;支撑:L1+P1*0.5/9,COLORFF66FF,LINETHICK1;中:(H1+L1)/2,POINTDOT,COLORWHITE,LINETHICK1;DRAWICON(LONGcrOSS(支撑,C,2),C*0.995,44);STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORRED;DRAWICON(LONGCROSS(C,阻力,2),C*1.005,45);STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORGREEN;STICKLINE(C< 支撑,支撑,C,1,0),COLORYELLOW;成交额:=V*C/100,NODRAW;VAR1:=SUM((IF(((成交额/8>20) AND (C>(REF(C,1)))),成交额,0)),0);VAR2:=SUM((IF(((成交额/8>20) AND (C< (REF(C,1)))),成交额,0)),0);VAR3:=SUM((IF(((成交额/8< 20) AND (C>(REF(C,1)))),成交额,0)),0);VAR4:=SUM((IF(((成交额/8< 20) AND (C< (REF(C,1)))),成交额,0)),0);VAR5:=((VAR1+VAR2)+VAR3)+VAR4;VAR6:=1;VAR7:=STRCAT(STRCAT('机构买入',CON2STR((100*VAR1)/VAR5,0)),'%');VAR8:=STRCAT(STRCAT('机构卖出',CON2STR((100*VAR2)/VAR5,0)),'%');DRAWTEXT_FIX(VAR6=1,0.0,0.9,0,VAR7),COLORRED;DRAWTEXT_FIX(VAR6=1,0.1,0.1,0,VAR8),COLORBLACK;所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT(' [行业]—',HYBLOCK),STRCAT(' [地域]—',DYBLOCK)),STRCAT(' [概念]—',GNBLOCK)));DRAWTEXT_FIX(ISLASTBAR,0.09,0.95,0,所属板块),COLORWHITE;价:=C;大盘:=EMA(INDEXC,500)/EMA(C,500);大盘参考线:=INDEXC/大盘;VARR1:=(3*C+L+O+H)/6;VARR2:=(20*VARR1+19*REF(VARR1,1)+18*REF(VARR1,2)+17*REF(VARR1,3)+16*REF(VARR1,4)+15*REF(VARR1,5)+14*REF(VARR1,6)+13*REF(VARR1,7)+12*REF(VARR1,8)+11*REF(VARR1,9)+10*REF(VARR1,10)+9*REF(VARR1,11)+8* REF(VARR1,12)+7*REF(VARR1,13)+6*REF(VARR1,14)+5*REF(VARR1,15)+4*REF(VARR1,16)+3*REF(VARR1,17)+2*REF(VARR1,18)+REF(VARR1,21))/210;VARR3:=HHV(C,90);VARR4:=LLV(C,90);VARR5:=VARR3-VARR4;VARR6:=EMA((C-VARR4)/VARR5-0.5,14);VARR7:=VARR6*20;VARR8:=REF(HHV(C,66),2);VARR9:=CROSS(C,VARR8) AND (HHV(C,110)/LLV(C,110)-1)*100< 45 AND VARR7< 5.666;VARR10:=15*FILTER(VARR9,41)>10;主力扫盘:=VARR10*50,;DRAWTEXT(VARR10,C,'●主力吸筹'),COLORRED;VARR:=(vol/C)/2;VARR11:=SUM(IF(VARR>100 AND C>REF(C,1),VARR,0),0);VARR12:=SUM(IF(VARR>100 AND C< REF(C,1),VARR,0),0);VARR13:=SUM(IF(VARR< 100 AND C>REF(C,1),VARR,0),0);VARR14:=SUM(IF(VARR< 100 AND C< REF(C,1),VARR,0),0);VARR15:=VARR11+VARR12+VARR13+VARR14;机买:=(VARR11/VARR15)*100;机卖:=(VARR12/VARR15)*100;主力差:=机买-机卖;VARR16:=DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构')=1;DRAWTEXT(VARR16>0 ,C*1.0001,'●'),COLORRED;VARR17:=EMA(EMA(C,13),13);控盘:=(VARR17-REF(VARR17,1))/REF(VARR17,1)*1000;X_:=DYNAINFO(11);财:=(EMA(C,8)-EMA(C,55))*10;神:=EMA(财,3);X_1:=(C-X_)/X_< -0.03;X_2:=控盘>REF(控盘,1) AND 控盘< -0.2;X_3:=CROSS(财,神) AND 财< -0.3;X_4:=FILTER(X_1 AND X_2 AND X_3,13);DRAWTEXT(X_4,C,'●庄赢'),COLORYELLOW;星期:=WEEkdAY;日1:=DATETODAY(DATE);上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);自然日:=日1-DATETODAY(上市日)+1;ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)OR TOTALBARSCOUNT-CURRBARSCOUNT=0;周期:=BARSLAST(ZB)+1;MA1:=REF(C,周期);MA2:=REF(MA1,周期);MA3:=REF(MA2,周期);MA4:=REF(MA3,周期);MA5:=REF(MA4,周期);MA6:=REF(MA5,周期);MA7:=REF(MA6,周期);MA8:=REF(MA7,周期);MA9:=REF(MA8,周期);MA10:=REF(MA9,周期);MA11:=REF(MA10,周期);MA12:=REF(MA11,周期);十三周价:=(C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9+MA10+MA11+MA12)/13;决策:REFDATE(十三周价,DATE),POINTDOT,COLORMAGENTA;DRAWICON(CROSS(C,决策),C,1);