原码如下:《千载难逢A》
var1:=REF(CLOSE,1); Var2:=SMA(MAX(CLOSE-Var1,0),18,1)/SMA(ABS(CLOSE-Var1),13,1)*100; Var3:=SMA(MAX(CLOSE-Var1,0),24,1)/SMA(ABS(CLOSE-Var1),20,1)*100; Var4:=BARSLAST(Var3<48)<=3 AND CROSS(Var2,Var3); Var5:=(CLOSE-MA(CLOSE,48))/MA(CLOSE,20)*100<-12.5; Var6:=LLV(LOW,5); Var7:=HHV(HIGH,10); Var8:=EMA((CLOSE-Var6)/(Var7-Var6)*100,4); Var9:=EMA(0.667*REF(Var8,1)+0.333*Var8,2); VarA:=1011131; VarB:=IF(DATE<=VarA,Var5,0) OR IF(DATE<=VarA,LH,0); 低吸: 0-(-1)*Var4 AND Var5 AND CROSS(Var8,Var9) AND Var8<=25; DRAWTEXT(低吸>0,0.9,'★低吸'), , colorgreen; VarC:=REF(CLOSE,1); VarD:=SMA(MAX(CLOSE-VarC,0),7,1)/SMA(ABS(CLOSE-VarC),7,1)*100; VarE:=SMA(MAX(CLOSE-VarC,0),13,1)/SMA(ABS(CLOSE-VarC),13,1)*100; VarF:=BARSLAST(VarE<43)<=3 AND CROSS(VarD,VarE); Var10:=(CLOSE-MA(CLOSE,43))/MA(CLOSE,20)*100<-12.5; Var11:=LLV(LOW,5); Var12:=HHV(HIGH,10); Var13:=EMA((CLOSE-Var11)/(Var12-Var11)*100,4); Var14:=EMA(0.667*REF(Var13,1)+0.333*Var13,2); Var15:=1011131; Var16:=IF(DATE<=Var15,Var10,0) OR IF(DATE<=Var15,LH,0); 枯木逢春: 0-(-1)*VarF AND Var10 AND CROSS(Var13,Var14) AND Var13<=25, , colorffaa33; DRAWTEXT(枯木逢春>0,0.7,'★枯木逢春'), , colorffaa33; Var17:=REF(CLOSE,1); Var18:=SMA(MAX(CLOSE-Var17,0),7,1)/SMA(ABS(CLOSE-Var17),7,1)*100; Var19:=SMA(MAX(CLOSE-Var17,0),13,1)/SMA(ABS(CLOSE-Var17),13,1)*100; Var1A:=BARSLAST(Var19<33)<=3 AND CROSS(Var18,Var19); Var1B:=(CLOSE-MA(CLOSE,33))/MA(CLOSE,20)*100<-12.5; Var1C:=LLV(LOW,5); Var1D:=HHV(HIGH,10); Var1E:=EMA((CLOSE-Var1C)/(Var1D-Var1C)*100,4); Var1F:=EMA(0.667*REF(Var1E,1)+0.333*Var1E,2); Var20:=1011131; Var21:=IF(DATE<=Var20,Var1B,0) OR IF(DATE<=Var20,LH,0); 难得一遇: 0-(-1)*Var1A AND Var1B AND CROSS(Var1E,Var1F) AND Var1E<=25, , colorred; DRAWTEXT(难得一遇>0,0.5,'★难得一遇'), , colorred; Var22:=REF(CLOSE,1); Var23:=SMA(MAX(CLOSE-Var22,0),7,1)/SMA(ABS(CLOSE-Var22),7,1)*100; Var24:=SMA(MAX(CLOSE-Var22,0),13,1)/SMA(ABS(CLOSE-Var22),13,1)*100; Var25:=BARSLAST(Var24<23)<=3 AND CROSS(Var23,Var24); Var26:=(CLOSE-MA(CLOSE,23))/MA(CLOSE,20)*100<-12.5; Var27:=LLV(LOW,5); Var28:=HHV(HIGH,10); Var29:=EMA((CLOSE-Var27)/(Var28-Var27)*100,4); Var2A:=EMA(0.667*REF(Var29,1)+0.333*Var29,2); Var2B:=1011131; Var2C:=IF(DATE<=Var2B,Var26,0) OR IF(DATE<=Var2B,LH,0); 千载难逢: 0-(-1)*Var25 AND Var26 AND CROSS(Var29,Var2A) AND Var29<=25, ,colorred; DRAWTEXT(千载难逢>0,0.3,'★千载难逢'), , colorred; N:2,50,6;LH:5,100,80;
原码如下:《千载难逢B》
Var1:=REF(CLOSE,1); Var2:=SMA(MAX(CLOSE-Var1,0),18,1)/SMA(ABS(CLOSE-Var1),13,1)*100; Var3:=SMA(MAX(CLOSE-Var1,0),24,1)/SMA(ABS(CLOSE-Var1),20,1)*100; Var4:=BARSLAST(Var3<48)<=3 AND CROSS(Var2,Var3); Var5:=(CLOSE-MA(CLOSE,48))/MA(CLOSE,20)*100<-12.5; Var6:=LLV(LOW,5); Var7:=HHV(HIGH,10); Var8:=EMA((CLOSE-Var6)/(Var7-Var6)*100,4); Var9:=EMA(0.667*REF(Var8,1)+0.333*Var8,2); VarA:=1011131; VarB:=IF(DATE<=VarA,Var5,0) OR IF(DATE<=VarA,LH,0); 低吸: 0-(-1)*Var4 AND Var5 AND CROSS(Var8,Var9) AND Var8<=25; DRAWTEXT(低吸>0,0.9,'★低吸'), , ; VarC:=REF(CLOSE,1); VarD:=SMA(MAX(CLOSE-VarC,0),7,1)/SMA(ABS(CLOSE-VarC),7,1)*100; VarE:=SMA(MAX(CLOSE-VarC,0),13,1)/SMA(ABS(CLOSE-VarC),13,1)*100; VarF:=BARSLAST(VarE<43)<=3 AND CROSS(VarD,VarE); Var10:=(CLOSE-MA(CLOSE,43))/MA(CLOSE,20)*100<-12.5; Var11:=LLV(LOW,5); Var12:=HHV(HIGH,10); Var13:=EMA((CLOSE-Var11)/(Var12-Var11)*100,4); Var14:=EMA(0.667*REF(Var13,1)+0.333*Var13,2); Var15:=1011131; Var16:=IF(DATE<=Var15,Var10,0) OR IF(DATE<=Var15,LH,0); 枯木逢春: 0-(-1)*VarF AND Var10 AND CROSS(Var13,Var14) AND Var13<=25, , ; DRAWTEXT(枯木逢春>0,0.7,'★枯木逢春'), , ; Var17:=REF(CLOSE,1); Var18:=SMA(MAX(CLOSE-Var17,0),7,1)/SMA(ABS(CLOSE-Var17),7,1)*100; Var19:=SMA(MAX(CLOSE-Var17,0),13,1)/SMA(ABS(CLOSE-Var17),13,1)*100; Var1A:=BARSLAST(Var19<33)<=3 AND CROSS(Var18,Var19); Var1B:=(CLOSE-MA(CLOSE,33))/MA(CLOSE,20)*100<-12.5; Var1C:=LLV(LOW,5); Var1D:=HHV(HIGH,10); Var1E:=EMA((CLOSE-Var1C)/(Var1D-Var1C)*100,4); Var1F:=EMA(0.667*REF(Var1E,1)+0.333*Var1E,2); Var20:=1011131; Var21:=IF(DATE<=Var20,Var1B,0) OR IF(DATE<=Var20,LH,0); 难得一遇: 0-(-1)*Var1A AND Var1B AND CROSS(Var1E,Var1F) AND Var1E<=25, , ; DRAWTEXT(难得一遇>0,0.5,'★难得一遇'), , ; Var22:=REF(CLOSE,1); Var23:=SMA(MAX(CLOSE-Var22,0),7,1)/SMA(ABS(CLOSE-Var22),7,1)*100; Var24:=SMA(MAX(CLOSE-Var22,0),13,1)/SMA(ABS(CLOSE-Var22),13,1)*100; Var25:=BARSLAST(Var24<23)<=3 AND CROSS(Var23,Var24); Var26:=(CLOSE-MA(CLOSE,23))/MA(CLOSE,20)*100<-12.5; Var27:=LLV(LOW,5); Var28:=HHV(HIGH,10); Var29:=EMA((CLOSE-Var27)/(Var28-Var27)*100,4); Var2A:=EMA(0.667*REF(Var29,1)+0.333*Var29,2); Var2B:=1011131; Var2C:=IF(DATE<=Var2B,Var26,0) OR IF(DATE<=Var2B,LH,0); 千载难逢: 0-(-1)*Var25 AND Var26 AND CROSS(Var29,Var2A) AND Var29<=25, , ; DRAWTEXT(千载难逢>0,0.3,'★千载难逢'), , ; N:2 ,50,6 ;LH:5,100,80
|