大智慧闪电之王主图指标

以下是大智慧闪电之王主图指标

大智慧闪电之王主图指标

源码

{闪电之王}Var1:=EMA(C,3);Var2:=EMA(C,5);Var3:=EMA(C,10);Var4:=EMA(C,20);Var5:=EMA(C,30);Var6:=(Var2+Var3+Var4+Var5)/4;Var7:=(Var6-REF(Var6,15))/REF(Var6,15)*100;Var8:=(Var6-REF(Var6,15))/REF(Var6, 15)*100;Var9:=EMA(Var7,8);STICKLINE(Var7<1*REF(Var7,1),h,l,0.5,0),COLORBLUE;{蓝-持币}STICKLINE(Var7<1*REF(Var7,1),o,c,5, 1),COLORBLUE;STICKLINE(Var7>1*REF(Var7,1),h,l,0.5,0),COLORRED;{红-持股}STICKLINE(Var7>1*REF(Var7,1),o,c,5, 1),COLORRED;STICKLINE(Var7<1*REF(Var7,1) AND Var9>1*REF(Var9,1),h,l,0.5,0),COLORGREEN;{绿-洗盘}STICKLINE(Var7<1*REF(Var7,1) AND Var9>1*REF(Var9,1),o,c,5, 1),COLORGREEN;买进价:=((c-ref(ma(c,6),1))/6+ma(c,6))*1.004;买进条件:=cross(c,买进价) and 买进价>ref(买进价,1);STICKLINE(买进条件,h,l,0.5,1),colorwhite,linethick2;{白-买进}STICKLINE(买进条件,o,c,6,0),colorwhite,linethick2;加码价:=((c-ref(ma(c,18),1))/18+ma(c,18))*1.004;加码条件:=cross(c,加码价) and 加码价>ref(加码价,1);STICKLINE(加码条件,h,l,0.5,1),coloryellow,linethick2;{黄-加码}STICKLINE(加码条件,o,c,6,0),coloryellow,linethick2;X1:EMA(C,7),color0088ff;X2:EMA(c,21),coloree00ee;X3:EMA(X2,21),colorwhite;x4:ema(x3,27),color009900;x5:ema(x2,100),colorFFAA00;x6:ema(x5,100),color009999;v1:ema(close,5);v2:ema(ema(close,29)*1.01,10);DRAWICON(cross(v1,v2),v2,1); LC:=REF(CLOSE,1); RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; 逃 :if(CROSS(84,RSI) , HIGH,high+1),pointdot,linethick7,COLORYELLOW ;high+1,pointdot,linethick7,COLOR000000;DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);DRAWICON(FILTER(B1>0,5),L*0.94,10);DRAWTEXT(FILTER(B1>0,5),L*0.94,'M底'),COLORGREEN;{MACD底背离}A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));DRAWICON(FILTER(B2>0,5),L*0.96,10);DRAWTEXT(FILTER(B2>0,5),L*0.96,'K底'),COLORYELLOW;{KDJ底背离}A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));DRAWICON(FILTER(B3>0,5),L*0.98,10);DRAWTEXT(FILTER(B3>0,5),L*0.98,'R底'),COLORFFFF00;{RSI底背离} C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);DRAWICON(FILTER(D1>0,5),H*1.07,12);DRAWTEXT(FILTER(D1>0,5),H*1.07,'M顶'),COLOR0066FF;{MACD顶背离}C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));DRAWICON(FILTER(D2>0,5),H*1.05,12);DRAWTEXT(FILTER(D2>0,5),H*1.05,'K顶'),COLORRED;{KDJ顶背离}C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));DRAWICON(FILTER(D3>0,5),H*1.03,12);DRAWTEXT(FILTER(D3>0,5),H*1.03,'R顶'),COLORFF00FF;{RSI顶背离};