var1:=(c-llv(l,13))/(hhv(h,13)-llv(l,13))*100;
牛:sma(var1,7,1);
var2:=sma(牛,5,1);
熊:if(cross(牛,var2) and cross(ma(c,5),ma(c,13) and 牛>50),var2*2,var2);
var3:=ema(c,8);
var4:=ema(c,20);
stickline(牛>var2,牛,熊,0,0);
stickline(牛<var2,牛,var2,0,0);
短线进出:3*sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1)-2*sma(sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1),3,1);
var5:=10;
低吸区:if(短线进出<=10,10,0);
买入:if(cross(短线进出,var5),20,0);
var6:=(2*c+h+l+o)/5;
var7:=llv(l,33);
var8:=hhv(h,33);
目前位置:ema((var6-var7)/(var8-var7)*100,5);
生命线:ema(0.667*ref(目前位置,1)+0.333*目前位置,4),circledot;
var9:=if(cross(生命线,目前位置) and 目前位置>=77,77,89);
vara:=if(cross(目前位置,20) or cross(目前位置,生命线) and 目前位置>20,20,5);
卖出区:var9;
varb:=llv(l,55);
varc:=hhv(h,34);
vard:=ema((var6-varb)/(varc-varb)*100,3);
vare:=(目前位置+vard)/2;
varf:=ema(0.667*ref(vard,1)+0.333*目前位置,2);
var10:=ema(vare,5);
var11:=ema(0.667*ref(var10,1)+0.333*var10,2);
强弱:50,pointdot;
100,pointdot;
20;
爱查 股网 www.aichag u.com