大智慧庄拉指标

var3:=llv(high,240);
 var4:=((100 * (close - var3)) / var3);
 var5:=ref(llv(close,480),1);
 var6:=ref(hhv(close,480),1);
 var7:=((100 * (close - var5)) / (var6 - var5));
 var8:=(((close - llv(close,981)) / (hhv(close,981) - llv(close,981))) * 100);
 var9:=(((close - llv(close,393)) / (hhv(close,393) - llv(close,393))) * 100);
 vara:=(((close - llv(low,981)) / (hhv(high,981) - llv(low,981))) * 100);
 varb:=(((close - llv(low,393)) / (hhv(high,393) - llv(low,393))) * 100);
 varc:=(ema(((100 * (close - llv(low,100))) / (hhv(high,100) - llv(low,100))),5) / 4);
 vard:=if((date < 1031231),if((varc > 23.16),varc,0),0);
 vare:=(varc < 1);
 varf:=vard;
 var10:=((var4 < 0) and (var7 < 0));
 var11:=1;
 var12:=((((high + low) + (close * 2)) / 4) * var11);
 var13:=ema(var12,21);
 var14:=std(var12,21);
 var15:=((((((var12 - var13) / var14) * 100) + 200) / 4) * var11);
 var16:=(((ema(var15,89) - 25) * 1.56) * var11);
 var17:=((ema(var16,5) * 1.22) * var11);
 var18:=(ema(var17,3) * var11);
 var19:=((3 * var17) - ((2 * var18) * var11));
 var1a:=if(((cross(var19,var17) and cross(var19,var18)) and cross(var17,var18)),1,0);
 var1b:=if(((cross(var17,var19) and cross(var18,var19)) and cross(var18,var17)),1,0);
 买点:if((filter(((((var8 = 0) and vare) and var10) and var1a),5) = 1),10,0),colorred;
 卖点:if((filter((((var8 = 100) and varf) and var1b),5) = 1),10,0),colorgreen;
 var1c:=(ema(((100 * (close - llv(low,100))) / (hhv(high,100) - llv(low,100))),13) / 4);
 var1d:=(ema(close,2) - ema(close,89));
 var1e:=ema(var1d,30);
 var1f:=((2 * (var1d - var1e)) * 10);
 var20:=((pow(var1f,3) * 0.1) + pow(var1f,2));
 var21:=sqrt(sqrt((((low * high) * open) * close)));
 var22:=ema((var21 * 0.97),3);
 var23:=(((high + low) + close) / 3);
 var24:=((var23 - ma(var23,14)) / (0.015 * avedev(var23,14)));
 var25:=(if(((year < 2008) and (var1f > 0.015)),var20,0) / 45);
 庄拉线:var25,coloryellow;
 var26:=(ema(close,2) - ema(close,150));
 var27:=ema(var26,100);
 var28:=(2 * (var26 - var27));
 var29:=((pow(var28,3) * 0.1) + pow(var28,1));
 var2a:=sqrt(sqrt((((low * high) * open) * close)));
 var2b:=ema((var2a * 0.97),3);
 var2c:=(((high + low) + close) / 3);
 var2d:=((var2c - ma(var2c,14)) / (0.015 * avedev(var2c,14)));
 黑马线:(if((var28 > 0.1),var29,0) * 5),colorred;
 量价线:(((close - ma(close,21)) / ma(close,21)) * 100),colorffffff;
 var2e:=if((filter(((量价线 > 0) and (量价线 < 3)),5) = 1),12,0);
 涨幅前兆:if((filter(((((庄拉线 > 0) and (庄拉线 < 0.5)) and var2e) and (var1c < 3)),10) = 1),10,0),colorffffff;
 选股利器:if((filter((((((((var2e > 0) and (var1c < 2)) and (庄拉线 > 0)) and (庄拉线 < 1)) and (黑马线 > 0)) and (黑马线 < 1.5)) and (var2e > 0)),5) = 1),10,0),colorff00ff;
 drawicon((买点 > 0),10,1);
 drawicon((卖点 > 0),10,2);
 drawicon((涨幅前兆 > 0),10,1);
 drawicon((选股利器 > 0),10,1);
 量价先行:(10 * cross(量价线,0)),colorffff00;
 drawicon((量价先行 > 0),10,11);
 拉升开始:(15 * (((((((庄拉线 > 0.1) and (count((庄拉线 > 0.1),2) = 1)) and (close >= open)) and (vol > ref(vol,1))) and ((vol / capital) > 0.003)) and (量价线 > 1)) and (量价线 > 黑马线))),linethick2,color00ffff;
 drawicon((拉升开始 > 0),15,10);
 量价主升浪:(20 * filter((cross(量价线,黑马线) and (庄拉线 > 0.5)),7)),linethick3,colorff00ff;
 drawicon((量价主升浪 > 0),20,8);
 庄拉主升浪:(30 * ((cross(庄拉线,黑马线) and (黑马线 > 0)) and (量价线 > 0))),linethick3,colorff00ff;
 drawicon((庄拉主升浪 > 0),30,8);