股票行情+个股解答
打印

[大智慧I] 神针---定海神针(优化版)

神针---定海神针(优化版)

复制内容到剪贴板
代码:
{SJ神针}
长d89:"kdj.d"(89,3,3),linethick3,coloraaaaaa;
aa1:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100+50;
aa2:=EMA(aa1,9);
aa3:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
aa4:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
aa5:=SMA(aa4,13,8);
走势:CEILING(SMA(aa5,13,8)),color00ffff;
mm:ema(走势,3),colorff00ff;
aa6:=SMA(aa3,21,8);
买观注: STICKLINE(走势-aa6<-65,0,5,15,1);
买进:=LONGCROSS(aa1,aa2*1.05,15) AND aa1<40;
卖观注: STICKLINE(走势-aa6>85,95,90,15,1);
卖出:STICKLINE(LONGCROSS(aa2,aa1*0.95,7) AND aa1>0,100,80,6,0);
80, POINTDOT;
0, POINTDOT;
50, POINTDOT,COLORff00ff;
20, POINTDOT,COLORff00ff;
100, POINTDOT,COLORff00ff;
-20;
排序1:if(买进>0,20,0),STICK,COLORFFCC66;
DRAWICON(排序1>0,20,1 );
Var1:=1;
Var2:=DMA(CLOSE,HIGH/MA(LOW,4)/4);
Var3:=DMA(CLOSE,CLOSE/MA(LOW,30)/30);
Var4:=(LOW-Var2)/Var2*100<-5.889;
Var5:=(Var2-Var3)/Var3*100<-15.889;
Var6:=Var4 AND Var5 AND (HIGH-MA(LOW,3))/REF(LOW,2)>-0.059;
Var7:=Var6>0;
Var8:=AMOUNT/VOL/100;
Var9:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarA:=SUM(AMOUNT,13)/Var8/100;
VarB:=DMA(Var9,VOL/VarA);
VarC:=MA(HHV(HIGH,488),18);
VarD:=MA(HHV(HIGH,220),18);
VarE:=MA(HHV(HIGH,98),18);
VarF:=MA(LLV(LOW,488),18);
Var10:=MA(LLV(LOW,220),18);
Var11:=MA(LLV(LOW,98),18);
Var12:=MA((VarF*0.96+Var10*0.96+Var11*0.96+VarC*0.558+VarD*0.558+VarE*0.558)/6,18);
Var13:=MA((VarF*1.25+Var10*1.23+Var11*1.2+VarC*0.55+VarD*0.55+VarE*0.65)/6,18);
Var14:=MA((VarF*1.3+Var10*1.3+Var11*1.3+VarC*0.68+VarD*0.68+VarE*0.68)/6,18);
Var15:=MA((Var12*3+Var13*2+Var14)/6*1.738,18);
Var16:=IF(DATE<=1021231,Var15,Var15*DAY);
Var17:=LOW;
Var18:=REF(LOW,1);
Var19:=SMA(ABS(Var17-Var18),3,1)/SMA(MAX(Var17-Var18,0),3,1)*100;
Var1A:=MA(IF(CLOSE*1.35<=Var16,Var19*10,Var19/10),3);
Var1B:=LLV(LOW,30);
Var1C:=HHV(Var1A,30);
Var1D:=IF(LOW<=Var1B,(Var1A+Var1C*2)/2,0);
Var1E:=MA(Var1D AND CLOSE<COST(1),3) AND (CLOSE-VarB)/VarB*100<-11;
Var1F:=MA(CLOSE,5);
Var20:=MA(CLOSE,10);
Var21:=MA(CLOSE,20);
Var22:=MA(CLOSE,30);
Var23:=(Var1F+Var20+Var21+Var22)/4;
Var24:=(Var23-REF(Var23,15))/REF(Var23,15)*100;
Var25:=IF(Var24<-10 AND Var24<REF(Var24,1),20,0);
DRAWTEXT(Var7*Var1 AND Var1E*Var1 AND Var25*Var1 AND (CLOSE-OPEN)*Var1>0,-5,'稳操胜券'), , COLORred;
STICKLINE(Var7*Var1 AND Var1E*Var1 AND Var25*Var1 AND (CLOSE-OPEN)*Var1>0,0,50,8,0),COLORred;
bb1:=REF(CLOSE,1);
bb2:=SMA(MAX(CLOSE-bb1,0),7,1)/SMA(ABS(CLOSE-bb1),7,1)*100;
bb3:=SMA(MAX(CLOSE-bb1,0),13,1)/SMA(ABS(CLOSE-bb1),13,1)*100;
bb4:=BARSCOUNT(CLOSE);
bb5:=bb2<20 AND bb3<23 AND bb4>35;
bb5 AND COUNT(bb5,30)=1;
DRAWTEXT(bb5 AND COUNT(bb5,30)=1,-5,'神针'),COLORblue;
STICKLINE(bb5 AND COUNT(bb5,30)=1,0,50,8,0),COLORblue;
VAR1m:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2m:=SMA(VAR1m,9,1)+100;
VAR3m:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4m:=SMA(VAR3m,3,1);
VAR5m:=SMA(VAR4m,3,1)+100;
VAR6m:=VAR5m-VAR2m;
趋势: IF(VAR6m>45,VAR6m-45,0);
STICKLINE(REF(趋势,1)< 趋势, 趋势,REF(趋势,1),5,0),colorff00ff;
STICKLINE(REF(趋势,1)> 趋势, 趋势,REF(趋势,1),5,0),color00ff00;
{BIAS21:(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100,colorff99ff,linethick2;}
[ 本帖最后由 黄金三年 于 2008-7-19 11:57 编辑 ]
附件: 您所在的用户组无法下载或查看附件

TOP