【图】优化《神针买卖》

飞狐和分析家通用。大智慧上对于公式中的上下箭头不显示，请自行用　1　.　2　来代替公式中的　4　.　5，或做其他修改。目前只是初步优化，欢迎有心人继续优化。
　主图的：
支撑价:LLV(LOW,19),linethick2 , color00ff00;
阻力价:HHV(HIGH,19),colorblue, linethick2;
Var1:=EMA(CLOSE,12)-EMA(CLOSE,26);
Var2:=EMA(Var1,9);
Var3:=(CLOSE*2.5/100+CLOSE);
Var4:EMA(C,3);
Var5:=LLV(HIGH,240);
Var6:=100*(CLOSE-Var5)/Var5;
Var7:=REF(LLV(CLOSE,480),1);
Var8:=REF(HHV(CLOSE,480),1);
Var9:=100*(CLOSE-Var7)/(Var8-Var7);
VarA:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;
VarB:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;
VarC:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;
VarD:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;
VarE:=VarC>98.5 OR VarD>98.5;
VarF:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4;
Var13:=VarA=0 AND VarC=0 AND Var6<0;
Var14:=VarA=100 AND VarC=100;
Var15:=VarB=0 OR VarD=0 AND Var9<0;
Var16:=VarB=100 AND VarD=100;
Var17:=Var6<0 AND Var9<0;
Var18:=Var13 AND Var15;
Var19:=Var14 AND Var16;
Var1B:=SMA(MAX(CLOSE-REF(CLOSE,1),0),49,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
Var1C:=SMA(MAX(CLOSE-REF(CLOSE,1),0),14,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),14,1)*100;
Var1D:=BARSCOUNT(CLOSE);
Var1E:=Var1B<20 AND Var1C<23 AND Var1D>35;
Var1F:=Var1E AND COUNT(Var1E,1)=1;
Var20:=REF(CLOSE,1);
Var21:=SMA(MAX(CLOSE-Var20,0),34,1)/SMA(ABS(CLOSE-Var20),7,1)*100;
Var22:=SMA(MAX(CLOSE-Var20,0),13,1)/SMA(ABS(CLOSE-Var20),13,1)*100;
Var23:=BARSCOUNT(CLOSE);
Var24:=Var21<20 AND Var22<23 AND Var23>35;
Var25:=VarA=0 AND VarF<1.2 AND Var17;

Var27:=Var18 AND VarF<1.2 AND Var17;

Var29:=SUM(HIGH-OPEN,77)/SUM(OPEN-LOW,77)*100;
Var2A:=SUM(MAX(0,HIGH-REF(CLOSE,1)),77)/SUM(MAX(0,REF(CLOSE,1)-LOW),77)*100;
Var2B:=CROSS(Var29,69) AND CROSS(Var2A,80)<150;
Var2C:=Var24 AND Var1F AND COUNT(Var24,30)=1;
买点:=Var25 AND Var2B;
绝对卖点:=(Var19 OR VarA)AND VarF>23 OR VarE ;
Var2D:=Var1F AND Var2C AND Var25;
股海万元户:=(CLOSE/REF(CLOSE,1)>1.04 AND (CLOSE>10.8 AND CLOSE<10.83 OR CLOSE>6.86 AND CLOSE<6.88 OR CLOSE>13.82 AND CLOSE<13.84 OR CLOSE>7.28 AND CLOSE<7.3 OR CLOSE>12.4 AND CLOSE<12.42 OR CLOSE>22.33 AND CLOSE<22.35 OR CLOSE>4.68 AND CLOSE<4.7 OR CLOSE>26.29 AND CLOSE<26.31 OR CLOSE>7.65 AND CLOSE<7.67 OR CLOSE>13.4 AND CLOSE<13.42 OR CLOSE>7.58 AND CLOSE<7.6 OR CLOSE>20.43 AND CLOSE<20.45 OR CLOSE>19.57 AND CLOSE<19.59 OR CLOSE>6.26 AND CLOSE<6.28 OR CLOSE>7.14 AND CLOSE<7.16 OR CLOSE>6.61 AND CLOSE<6.63 OR CLOSE>11.9 AND VOL<11.92 OR CLOSE>6.7 AND CLOSE<6.72 OR CLOSE>8.19 AND CLOSE<8.21));
DRAWTEXT(FILTER(绝对卖点>0,3),H,'别贪'), COLOR00FF00;
DRAWTEXT(股海万元户>0,L,'☆追涨'),COLORYELLOW ;
DRAWICON(买点>0,L,4);
DRAWTEXT(买点>0,L,'扫描神针'),COLORf00ff0;
DRAWTEXT(VarF<0.7 AND Var27 AND Var25>0,L,'万元'),COLORYELLOW;
STICKLINE(Var2D>0,O,C,10,0), COLORRED;
DRAWTEXT(Var2D>0,L,'大方神针'),COLORRED;
DRAWICON(COUNT(REF(Var4,1)<REF(Var4,2),5)=5 AND Var4>REF(Var4,1),L*0.98,4);
DRAWICON(FILTER(COUNT(Var6<0,5)AND CROSS(Var6,0)AND VarF>REF(VarF,1)AND C>O,3),L,1);
DRAWICON(FILTER(REF(Var4,1)>REF(Var4,2)AND Var4<REF(Var4,1)AND VarF>17 AND Var1>Var2,5),H,2);
DRAWICON(阻力价>ref(阻力价,1)AND CROSS(阻力价,Var3)AND C<O,H*1.02,5);



副图的：
f:=c>o or (c=o and c>ref(c,1));
STICKLINE(f,h,l,0.1,0),colorred;
STICKLINE(f,c,o,6,0),colorred;
STICKLINE(not(f),h,l,0.1,0),colorffff00;
STICKLINE(not(f),o,c,6,0),colorffff00;
支撑价:LLV(LOW,19),linethick2 , color00ff00;
阻力价:HHV(HIGH,19),colorblue, linethick2;
Var1:=EMA(CLOSE,12)-EMA(CLOSE,26);
Var2:=EMA(Var1,9);
Var3:=(CLOSE*2.5/100+CLOSE);
Var4:EMA(C,3);
Var5:=LLV(HIGH,240);
Var6:=100*(CLOSE-Var5)/Var5;
Var7:=REF(LLV(CLOSE,480),1);
Var8:=REF(HHV(CLOSE,480),1);
Var9:=100*(CLOSE-Var7)/(Var8-Var7);
VarA:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;
VarB:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;
VarC:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;
VarD:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;
VarE:=VarC>98.5 OR VarD>98.5;
VarF:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4;
Var13:=VarA=0 AND VarC=0 AND Var6<0;
Var14:=VarA=100 AND VarC=100;
Var15:=VarB=0 OR VarD=0 AND Var9<0;
Var16:=VarB=100 AND VarD=100;
Var17:=Var6<0 AND Var9<0;
Var18:=Var13 AND Var15;
Var19:=Var14 AND Var16;
Var1B:=SMA(MAX(CLOSE-REF(CLOSE,1),0),49,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
Var1C:=SMA(MAX(CLOSE-REF(CLOSE,1),0),14,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),14,1)*100;
Var1D:=BARSCOUNT(CLOSE);
Var1E:=Var1B<20 AND Var1C<23 AND Var1D>35;
Var1F:=Var1E AND COUNT(Var1E,1)=1;
Var20:=REF(CLOSE,1);
Var21:=SMA(MAX(CLOSE-Var20,0),34,1)/SMA(ABS(CLOSE-Var20),7,1)*100;
Var22:=SMA(MAX(CLOSE-Var20,0),13,1)/SMA(ABS(CLOSE-Var20),13,1)*100;
Var23:=BARSCOUNT(CLOSE);
Var24:=Var21<20 AND Var22<23 AND Var23>35;
Var25:=VarA=0 AND VarF<1.2 AND Var17;

Var27:=Var18 AND VarF<1.2 AND Var17;

Var29:=SUM(HIGH-OPEN,77)/SUM(OPEN-LOW,77)*100;
Var2A:=SUM(MAX(0,HIGH-REF(CLOSE,1)),77)/SUM(MAX(0,REF(CLOSE,1)-LOW),77)*100;
Var2B:=CROSS(Var29,69) AND CROSS(Var2A,80)<150;
Var2C:=Var24 AND Var1F AND COUNT(Var24,30)=1;
买点:=Var25 AND Var2B;
绝对卖点:=(Var19 OR VarA)AND VarF>23 OR VarE ;
Var2D:=Var1F AND Var2C AND Var25;
股海万元户:=(CLOSE/REF(CLOSE,1)>1.04 AND (CLOSE>10.8 AND CLOSE<10.83 OR CLOSE>6.86 AND CLOSE<6.88 OR CLOSE>13.82 AND CLOSE<13.84 OR CLOSE>7.28 AND CLOSE<7.3 OR CLOSE>12.4 AND CLOSE<12.42 OR CLOSE>22.33 AND CLOSE<22.35 OR CLOSE>4.68 AND CLOSE<4.7 OR CLOSE>26.29 AND CLOSE<26.31 OR CLOSE>7.65 AND CLOSE<7.67 OR CLOSE>13.4 AND CLOSE<13.42 OR CLOSE>7.58 AND CLOSE<7.6 OR CLOSE>20.43 AND CLOSE<20.45 OR CLOSE>19.57 AND CLOSE<19.59 OR CLOSE>6.26 AND CLOSE<6.28 OR CLOSE>7.14 AND CLOSE<7.16 OR CLOSE>6.61 AND CLOSE<6.63 OR CLOSE>11.9 AND VOL<11.92 OR CLOSE>6.7 AND CLOSE<6.72 OR CLOSE>8.19 AND CLOSE<8.21));
DRAWTEXT(FILTER(绝对卖点>0,3),H,'别贪'), COLOR00FF00;
DRAWTEXT(股海万元户>0,L,'☆追涨'),COLORYELLOW ;
DRAWICON(买点>0,L,4);
DRAWTEXT(买点>0,L,'扫描神针'),COLORf00ff0;
DRAWTEXT(VarF<0.7 AND Var27 AND Var25>0,L,'万元'),COLORYELLOW;
STICKLINE(Var2D>0,O,C,10,0), COLORRED;
DRAWTEXT(Var2D>0,L,'大方神针'),COLORRED;
DRAWICON(COUNT(REF(Var4,1)<REF(Var4,2),5)=5 AND Var4>REF(Var4,1),L*0.98,4);
DRAWICON(FILTER(COUNT(Var6<0,5)AND CROSS(Var6,0)AND VarF>REF(VarF,1)AND C>O,3),L,1);
DRAWICON(FILTER(REF(Var4,1)>REF(Var4,2)AND Var4<REF(Var4,1)AND VarF>17 AND Var1>Var2,5),H,2);
DRAWICON(阻力价>ref(阻力价,1)AND CROSS(阻力价,Var3)AND C<O,H*1.02,5);股票论坛 www.55188.com