{DRAWTEXTABS(0,40,'机构评级:'+selfstring('评级')),Color1489F3;}
ma13:ma(c,13),colorwhite;
ma34:ma(c,34),coloryellow;
ma55:ma(c,55),colorff00ff;
ma120:ma(c,120),colorffcccc;
ma250:ma(c,250),colorffcc66;
x1:=(C+L+H)/3;
x2:=ma(x1,6);
x3:=ma(x2,5);
stickline(x2>x3 and c>ma13,low,high,0.1,1),colorred;
stickline(x2>x3 and c>ma13,close,open,5,1),colorred;
stickline(x2 stickline(x2 drawtext(CROSS(X2,X3),l-0.09,'B'),colorwhite,linethick2,align1; gr1:=BARSLAST(BETWEEN("bias.bias2"(6,13,24),0,5)); gr2:=ma13>ma34 and ma34>ma55 and ma13>ref(ma13,1); gr3:=count("bias.bias2"(6,13,24)>10 and h=hhv(h,gr1),gr1); gr4:=h=hhv(h,gr1); gr5:="macd.macd"(12,26,9) gr6:=gr2 and gr3 and gr4; gr7:=gr2 and gr3 and gr4 and gr5; gr8:=gr6 and gr7; LC := REF(CLOSE,1); RSI6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; BIAS5:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; 换手:=100*v/capital; DRAWTEXT(filter(rsi6>95 and 换手>=7,3) or filter(bias5>9,3) or gr8,h*1.04,'S'),color00ff00,linethick2,align1; bb13:=atan(ma13-ref(ma13,1))*3.1416*10; ma8:=ma(c,8); WR:=-"W&R"(14); DRAWICON(FILTER(CROSS(WR,(0 - 81)),10),L,4),ALIGN1; DRAWICON(FILTER(CROSS((0 -19),WR),10),H*1.02,5),ALIGN1; DRAWTEXT(FILTER(CROSS(WR,(0 - 81)),21),L*0.98,' W&R'),ALIGN1,COLORRED; DRAWTEXT(FILTER(CROSS(0 -19,WR),21),H*1.03,' W&R'),ALIGN2,COLORGREEN; ///////////////// a:=HHV(MA((L+H+C)/3,3),3); b:=llv(MA((L+H+C)/3,3),5); DRAWTEXT(BARSTATUS=2,a,'￣'),Coloryellow,linethick2; //DRAWTEXT(BARSTATUS=2,a,' '+NUMTOSTRN(a,3)),colorYELLOW; DRAWTEXT(BARSTATUS=2,b,'￣'),Colorred,linethick7,ALIGN0; //DRAWTEXT(BARSTATUS=2,b,' '+NUMTOSTRN(b,3)),Colorred; STICKLINE(BARSTATUS=2,((h+l)/2),((h+l)/2),4,0),Colorblue,linethick2; //DRAWTEXT(BARSTATUS=2,(h+l)/2,' '+NUMTOSTRN((h+l)/2,3)),colorgreen; drawtext(BARSTATUS=2,((h+l)/2)*1.05,' '+'+5%'),Color63806A; drawtext(BARSTATUS=2,((h+l)/2)*1.03,' '+'+3%'),Color63806A; drawtext(BARSTATUS=2,((h+l)/2)*0.95,' '+'-5%'),Color63806A,linethick2; drawtext(BARSTATUS=2,((h+l)/2)*0.97,' '+'-3%'),Color63806A,linethick2; DRAWTEXT( c>=a AND BARSTATUS=2,A*1.015,' '+'←多'),COLORYELLOW; DRAWTEXT(ref(c,1) DRAWTEXT(ref(c,1)>ref(a,1) and c
DRAWTEXT(ref(c,1)>ref(b,1) and c
顶部: HHV(HIGH,60)*0.98,colorFFFFCC; STICKLINE(顶部=REF(顶部,1),顶部,顶部,7,1),colorred; TJTS:=BARSTATUS=2; cg:=hhv(h,125); cgl:=llv(h,125); j:=(cg-cgl)/8; {IF C>0 AND TJTS>0 THEN BEGIN} {DRAWTEXT(C>0,cg*1.04,' '+ '流通:'+NUMTOSTRN( FINANCE(7),0 )+' '+'换手:'+NUMTOSTRN( DYNAINFO(37)*100,3 )+' '),LINETHICK3,ColorFFFF80,ALIGN2;end;} zslife:=(ma(indexc,60)+ma(indexc,90))/2; zsbl:=indexc/zslife; gglife:=(ma(c,60)+ma(c,90))/2; zstb:=zsbl*gglife; rsv:=(c-llv(l,15))/(hhv(h,15)-llv(l,15))*100; kk:=sma(rsv,10,1); dd:=sma(kk,5,1); zlcm:=intpart(sma(rsv,10,1)); shcm:=intpart(sma(kk,5,1)); {IF (zlcm+shcm)>50 and (zlcm+shcm)<160 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'精确风险系数%：'+NUMTOSTRN( (zlcm+shcm),2 )+' '),LINETHICK3,color6699cc,ALIGN2;} {IF ((zlcm+shcm)<=50 or (zlcm+shcm)>=160) AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'精确风险系数%：'+NUMTOSTRN( -(zlcm+shcm),2 )+' '),LINETHICK3,color6699cc,ALIGN2;} aa13:=ma(winner(c)*70,3); bb13:=ma((winner(c*1.1)-winner(c*0.9))*80,3); { IF aa13>bb13 AND TJTS THEN DRAWTEXT(C>0,cg-2.1*j,'主力控盘系数%：'+NUMTOSTRN( aa13/(aa13+bb13)*100,2 )+' '),LINETHICK3,color0000ff,ALIGN2; IF aa13 } e:=BARSCOUNT(c); ah:=hhv(h,250); al:=llv(l,250); b0:=(ah-al)/40; kb1:=h+b0; kb2:=l-b0; stickline((e+0)/34=FLOOR((e+0)/34),kb2,kb2-3*b0,2,0),COLORYELLOW; drawtext((e+0)/34=FLOOR((e+0)/34),kb2-2*b0,'时间窗'),COLORFFFFFF; V1:=REF(C,1); V2:=SMA(MAX(C-V1,0),6,1)/SMA(ABS(C-V1),6,1)*100; DRAWICON(IF(CROSS(81,V2),1,0),h*1.01,5),COLORYELLOW; 乖离线:=((c-ref(ma13,1))/13+ma13)*1.20; tt1:=cross(ma13,ma34) and cross(ma13,ma55) and v>ref(v,1); tt2:=ma13>ref(ma13,2) and v>ref(v,1) and cross(c,ma13); STICKLINE(TT1,l,l-0.09,4,0),coloryellow; DRAWTEXT(TT1,l-0.13,'金叉'),coloryellow; STICKLINE(cross(c,ma34) and cross(c,ma55) and cross(c,ma13),l,l-0.09,4,0),coloryellow; DRAWTEXT(cross(c,ma34) and cross(c,ma55) and cross(c,ma13),l-0.13,'并线开花'),coloryellow;
