源码
Var1:=MA(CLOSE,80)-MA(CLOSE,13)/3;
神奇线: MA((CLOSE-Var1)/Var1,1);
买点1: IF(CROSS(神奇线,0) AND LOW/REF(HIGH,1)<1.012,0.5,0), , ;
稳赚: IF(COUNT(神奇线>REF(神奇线,1),3)=3 AND COUNT(神奇线<0,10)=10 AND REF(神奇线,3)=LLV(神奇线,10),0.5,0);
买点2: IF(REF(神奇线,2)=LLV(神奇线,20) AND REF(神奇线,2)<0.071 AND REF(神奇线,2)<REF(神奇线,1) AND NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1),0.5,0), , ;
DRAWTEXT(买点1>0,0.2,'★神奇线'), , ;
DRAWTEXT(买点2>0,0.4,'★神奇线'), , ;
Var2:=INDEXC;
Var3:=MA(Var2,6);
Var4:=MA(Var2,24);
Var5:=MA(Var2,32);
Var6:=MA(Var2,62);
Var7:=MA(Var2,105);
Var8:=Var6<REF(Var6,1) AND Var7<REF(Var7,1) AND Var6<Var7*0.98;
Var9:=Var5>Var3*1.11 AND Var4>Var3*1.095;
VarA:=Var3>Var2*0.95;
百发百中: Var8 AND Var9 AND VarA AND CLOSE/COST(8)<=0.8 AND (CLOSE>OPEN OR CLOSE<OPEN) AND (REF(CLOSE,1)>REF(OPEN,1) OR REF(CLOSE,1)<REF(OPEN,1)) AND DATE<1991231 OR CLOSE>0.1 AND DATE>1991231, , ;
DRAWTEXT(百发百中>0,0.5,'★百发百中'), , ;
VarB:=999999999999999999999999999;
VarC:=LOW;
VarD:=REF(LOW,1);
VarE:=SMA(ABS(VarC-VarD),3,1)/SMA(MAX(VarC-VarD,0),3,1)*100;
VarF:=MA(IF(CLOSE*1.35<=VarB,VarE*10,VarE/10),3);
Var10:=LLV(LOW,30);
Var11:=HHV(VarF,30);
Var12:=999999999999999999999999999;
Var13:=CLOSE-REF(CLOSE,6);
Var14:=MA(Var13,6);
Var15:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Var16:=SMA(Var15,3,1);
Var17:=SMA(Var16,3,1);
Var18:=EMA(3*Var16-2*Var17,2);
Var19:=(((Var13+100)/2+Var18)/2-50)*(-4);
Var1A:=EMA(Var19,3);
Var1B:=EMA(Var1A,4);
Var1C:=Var1A;
Var1D:=Var1B;
Var1E:=100-Var1C;
Var1F:=100-Var1D;
Var20:=IF(DATE<=Var12,MA(IF(LOW<=Var10,(VarF+Var11*2)/2,0),3),999999999999999999999999999);
长针1: Var1F<9 AND Var20>70000, ,COLORYELLOW ;
DRAWTEXT(长针1>0,0.7,'★长针1'), , ;
Var21:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),0-VOL,0)),0);
Var22:=SUMBARS(VOL,CAPITAL);
Var23:=IF(CLOSE>LLV(CLOSE,Var22),1,-1);
Var24:=IF(Var21>LLV(Var21,Var22),1,-1);
Var25:=Var23*Var24;
Var26:=IF(Var25=-1,1,0);
Var27:=COUNT(Var26=1,8)>2;
Var28:=AMOUNT/VOL/100;
Var29:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
Var2A:=SUM(AMOUNT,13)/Var28/100;
Var2B:=DMA(Var29,VOL/Var2A);
Var2C:=(CLOSE-Var2B)/Var2B*100<-15;
Var2D:=(CLOSE-MIN(REF(CLOSE,5)*0.865,REF(CLOSE,21)*0.772))/CLOSE<0.05;
长针2: Var2C AND Var2D AND Var27,COLORRED;
长针2>0 AND REF(长针2,1)=0, ,COLORYELLOW;
DRAWTEXT(长针2>0 AND REF(长针2,1)=0,0.9,'★长针2'), ,COLORRED ;
