赢在龙头的指标 个股资金强弱 源码 哪位知道！

{修改以后，通达信已通过测试}20,pointdot;50,pointdot;80,pointdot;个股线:ema(100*(c-llv(low,34))/(hhv(h,34)-llv(low,34)),3), colorred,; 大盘线:ma(forcast(个股线,20),6),,colorgreen,;yya4:=ma(close,20);yya5:=(close > ma(close,5));yya6:=(ma(close,5) > ma(close,10));yya7:=(close > ma(close,10));yya8:=(ma(close,5) > ma(close,20));yya9:=(close > ma(close,20));yya10:=ref(yya4,1);yya11:=(yya4 > yya10);yy**x:=(((((if(yya5,10,(0 - 10)) + if(yya6,10,(0 - 10))) + if(yya7,10,(0 - 10))) + if(yya8,10,(0 - 10))) + if(yya9,10,(0 - 10))) + if(yya11,10,(0 - 10)));dslx:=(close / indexc);dslx1:=ma(dslx,5);yyv1:=ma(vol,5);yyv2:=ma(vol,10);ma75:=ma(close,144);wj:=(h+l+c)/3;v1:=if(h=l,1,h-max(o,c));v2:=if(h=l,1,max(c,o)-wj);v3:=if(h=l,1,min(o,c)-l);v4:=if(h=l,1,wj-min(c,o));v5:=vol/if(h=l,4,h-l);v6:=(v1*v5);v7:=(v2*v5);v8:=(v3*v5);v9:=(v4*v5);lc:=ref(c,1);k9:=sma((c-llv(l,9))/(hhv(h,9)-llv(l,9))*100,3,1);d9:=sma(k9,3,1);j9:=3*k9-2*d9;var1:=dyna**(17)*ref(ma(v,5),1);var2:=dyna**(7)=c and dyna**(10)=amount;var3:=if(dyna**(7)=c and dyna**(10)=amount,var1,var2);预量:=if(v>=var3 and period=5,v,var3);tt:=240/fromopen;比:=tt;比1:=预量/v;买盘:=if(**lastbar and period=5 and c<300,(dyna**(23)*比),(if(**lastbar and c>300,(v9+v8)*tt,(v9+v8))));卖盘:=if(**lastbar and period=5 and c<300,(dyna**(22)*比),(if(**lastbar and c>300,(v6+v7)*tt,(v6+v7))));买盘1:=dyna**(23)*比1;卖盘1:=dyna**(22)*比1;mfi:=(high-low)*1000000/(vol*比);xxx:=ema((c-llv(l,11))/(hhv(h,25)-llv(l,11))*4,8)+1;xx:=if(1=1,pow(xxx,2)-10,draw**);drawtext((const(if(((cross(yy**x,1) and (yyv1 >= yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,4),colorff00ff;drawtext((const(if(((cross(yy**x,1) and (yyv1 < yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,5),colorff00ff;drawtext((const(if(((cross(yy**x,1) and (yyv1 > yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,6),colorff00ff;drawtext((const(if(((cross(yy**x,1) and (yyv1 <= yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,7),colorff00ff;drawtext((const(if(((cross(1,yy**x) and (yyv1 >= yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,8),coloryellow;drawtext((const(if(((cross(1,yy**x) and (yyv1 < yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,9),coloryellow;drawtext((const(if(((cross(1,yy**x) and (yyv1 >= yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,10),coloryellow;drawtext((const(if(((cross(1,yy**x) and (yyv1 < yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,70,11),coloryellow;drawtext((const(if(((((yy**x >= 1) and (ref(yy**x,1) > 0)) and (yyv1 >= yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,12),color00ffff;drawtext((const(if(((((yy**x >= 1) and (ref(yy**x,1) > 0)) and (yyv1 < yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,13),coloryellow;drawtext((const(if(((((yy**x >= 1) and (ref(yy**x,1) > 0)) and (yyv1 >= yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,14),coloryellow;drawtext((const(if(((((yy**x >= 1) and (ref(yy**x,1) > 0)) and (yyv1 < yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,15),coloryellow;drawtext((const(if(((((yy**x < 1) and (ref(yy**x,1) < 0)) and (yyv1 >= yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,16),coloryellow;drawtext((const(if(((((yy**x < 1) and (ref(yy**x,1) < 0)) and (yyv1 < yyv2)) and (dslx >= dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,17),colorffff00;drawtext((const(if(((((yy**x < 1) and (ref(yy**x,1) < 0)) and (yyv1 >= yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,18),colorffff00;drawtext((const(if(((((yy**x < 1) and (ref(yy**x,1) < 0)) and (yyv1 < yyv2)) and (dslx < dslx1)),1,0)))=1 and (close < 200) and currbarscount=59,60,19),colorffffff;drawtext((const(if((cross(yy**x,1) and (yyv1 >= yyv2)),1,0))) and (close >200) and currbarscount=59,50,20),color00ff00;drawtext((const(if((cross(yy**x,1) and (yyv1 < yyv2)),1,0))) and (close >200) and currbarscount=59,50,21),colorff00ff;drawtext((const(if((cross(1,yy**x) and (yyv1 >= yyv2)),1,0))) and (close >200) and currbarscount=59,50,22),coloraaaaaa;drawtext((const(if((cross(1,yy**x) and (yyv1 < yyv2)),1,0))) and (close >200) and currbarscount=59,50,23),colorff0000;drawtext((const(if((((yy**x >= 1) and (ref(yy**x,1) > 0)) and (yyv1 >= yyv2)),1,0))) and (close >200) and currbarscount=59,50,24),color00ffff;drawtext((const(if((((yy**x >= 1) and (ref(yy**x,1) > 0)) and (yyv1 < yyv2)),1,0))) and (close >200) and currbarscount=59,50,25),color00ff00;drawtext((const(if((((yy**x < 1) and (ref(yy**x,1) < 0)) and (yyv1 >= yyv2)),1,0))) and (close >200) and currbarscount=59,50,26),colorffffff;drawtext((const(if((((yy**x < 1) and (ref(yy**x,1) < 0)) and (yyv1 < yyv2)),1,0))) and (close >200) and currbarscount=59,50,27),colorffffff;drawtext(const(mfi>=ref(mfi,1)and vol*比>=ref(vol,1)) and currbarscount=59,40,28),colorffffff;drawtext(const(mfi<ref(mfi,1)and vol*比<ref(vol,1)) and currbarscount=59,40,29),colorgreen;drawtext(const(mfi>=ref(mfi,1)and vol*比<ref(vol,1)) and currbarscount=59,40,30),colorgreen;drawtext(const(mfi<ref(mfi,1)and vol*比>=ref(vol,1)) and currbarscount=59,40,31),coloryellow;drawtext(const((卖盘+买盘)/ref(vol,1)>2) and currbarscount=59,30,32),colorgreen;drawtext(const(ref(vol,1)/(卖盘+买盘)>1.5) and currbarscount=59,30,33),coloryellow;drawtext(const((卖盘-买盘)/买盘>0.4) and currbarscount=59,20,34),colorgreen;drawtext(const((买盘-卖盘)/卖盘>0.4) and currbarscount=59,20,35),coloryellow;drawtext(const(if(预量=llv(预量,10),1,0)) and currbarscount=59,10,36),color00ff00;drawtext(const(if(预量=llv(预量,10) and j9<70,1,0)) and currbarscount=59,10,37),color00ff00;drawtext(const(if(c>lc and ma(c,5)>ref(ma(c,5),1) and ma(c,10)>ref(ma(c,10),1) and c>ma(c,5) and ref(ma(c,5),1)>=ref(ma(c,5),2) and yyv1<=yyv2 and (预量<ref (预量,1) and 预量<yyv1) and 买盘1>卖盘1,1,0)) and currbarscount=28,20,38),colorff00ff;drawtext(const(if(c<lc and c<ma(c,5) and 买盘1<卖盘1 and 预量>ref(预量,1) and 预量>yyv1,1,0)) and currbarscount=28,3,39),color00ff00;drawtext(const(if(c<lc*0.96 and c<ma(c,5) and 买盘1>卖盘1*1.15 and 预量>ref (预量,1) and 预量>yyv1,1,0)) and currbarscount=28,10,40),color00cccc;drawtext(const(if(c<lc and ma(c,5)<ref(ma(c,5),1) and ma(c,10)<=ref(ma(c,10),1) and 买盘1<卖盘1 and c<ma(c,5) and c<ma(c,10)and 预量>llv(预量,10),1,0)) and currbarscount=28,20,41),colorffff00;drawtext(const(if((c>ma(c,5) and c<ma(c,10)) or (c<=ma(c,5) and (c>=ma(c,10) or ma(c,10)>=ref(ma(c,10),1))),1,0)) and c<lc and currbarscount=59,90,42),colorff77cc;drawtext((const(if(close>=ma(close,13),1,0))) and currbarscount=59,80,43),colorgreen;drawtext((const(if(close<ma(close,13) and c<ma(close,5),1,0))) and currbarscount=59,80,44),colorgreen;drawtext((const(if(cross(ma(close,13),close),1,0))) and currbarscount=49,90,45),colorgreen;drawtext((const(if(c>=ma75,1,0))) and currbarscount=49,80,46),colorgreen;drawtext((const(if(c<ma75,1,0))) and currbarscount=49,80,47),colorgreen; 20210311