{473、新红色恋人  }

Var1:=EMA(CLOSE,8);

Var2:=EMA(CLOSE,20);

STICKLINE(Var1>Var2,Var2,Var1,8,0);

STICKLINE(Var1

分水岭: EMA(Var2,20);

Var3:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);

Var4:=HIGH-REF(HIGH,1);

Var5:=REF(LOW,1)-LOW;

Var6:=SMA(IF(Var4>0 AND Var4>Var5,Var4,0),12,1);

Var7:=SMA(IF(Var5>0 AND Var5>Var4,Var5,0),12,1);

Var8:=Var6*100/Var3;

Var9:=Var7*100/Var3;

VarA:=SMA(ABS(Var9-Var8)/(Var9+Var8)*100,12,1);

VarB:=(VarA+REF(VarA,5))/2;

VarC:=SUM(HIGH-OPEN,12)/SUM(OPEN-LOW,12)*100;

VarD:=SUM(MAX(0,HIGH-REF(CLOSE,1)),12)/SUM(MAX(0,REF(CLOSE,1)-LOW),12)*100;

VarE:=AMOUNT/VOL/100;

VarF:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

Var10:=SUM(AMOUNT,5)/VarE/100;

Var11:=SUM(AMOUNT,13)/VarE/100;

Var12:=SUM(AMOUNT,34)/VarE/100;

Var13:=SUM(AMOUNT,209)/VarE/100;

Var14:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);

Var15:=Var14/CAPITAL;

Var16:=VOL/CAPITAL*VarF+Var15*REF(VarE,1);

CYC5: IF(DATE<1500501,DMA(VarF,VOL/Var10),0);

CYC13: IF(DATE<1500501,DMA(VarF,VOL/Var11),0);

CYC34: IF(DATE<1500501,DMA(VarF,VOL/Var12),0);

{CYC}无穷: IF(DATE<1500501,DMA(VarF,VOL/CAPITAL),0);

Var17:=100*(CLOSE-CYC5)/CYC5;

Var18:=100*(CLOSE-CYC13)/CYC13;

Var19:=100*(CLOSE-CYC34)/CYC34;

Var1A:=100*(CLOSE-{CYC}无穷)/{CYC}无穷;

Var1B:=MA(CLOSE,13);

Var1C:=100*(Var1B-REF(Var1B,1))/REF(Var1B,1);

Var1D:=CLOSE-LOW;

Var1E:=HIGH-LOW;

Var1F:=CLOSE-HIGH;

Var20:=IF(CLOSE>=0,(Var1D/Var1E+Var1F/Var1E)*VOL,(Var1F/Var1E+Var1D/Var1E)*VOL);

Var21:=SUM(Var20,10)/10000;

Var22:=100*(CYC13-REF(CYC13,1))/REF(CYC13,1);

Var23:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

Var24:=SMA(Var23,3,1);

Var25:=SMA(Var24,3,1);

Var26:=3*Var24-2*Var25;

Var27:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

Var28:=SMA(Var27,5,1);

Var29:=SMA(Var28,10,1);

Var2A:=CROSS(Var29,Var28);

Var2B:=Var29>80 OR Var28>80;

Var2C:=Var2A AND Var2B;

Var2D:=Var1C>0 AND Var22>0 AND Var21>0;

Var2E:=Var1C<0 OR Var22<0 OR Var21<0 OR Var18<0;

Var2F:=CLOSE;

Var30:=OPEN;

Var31:=HIGH;

Var32:=LOW;

红色恋人: STICKLINE(Var2D,Var2F,Var30,8,0);

STICKLINE(Var2D,Var31,MAX(Var2F,Var30),0,1);

STICKLINE(Var2D,MIN(Var2F,Var30),Var32,0,1);

蓝色妖姬: STICKLINE(Var2E,Var2F,Var30,8,0);

STICKLINE(Var2E,Var31,MAX(Var2F,Var30),0,1);

STICKLINE(Var2E,MIN(Var2F,Var30),Var32,0,1);

DRAWTEXT(Var2C,HIGH,'逃顶');

Var33:=LLV(LOW,240);

Var34:=100*(CLOSE-Var33)/Var33>15;

Var35:=100*(CLOSE-Var33)/Var33<45;

Var36:=100*(CLOSE-Var33)/Var33;

Var37:=Var34 AND Var35;

Var38:=100*(WINNER(CLOSE)-WINNER(0.7*CLOSE));

Var39:=100*(CYC5-REF(CYC5,1))/REF(CYC5,1);

Var3A:=Var38>70 AND Var39>1 AND Var37;

DRAWTEXT(Var3A,LOW,'密上');

Var3B:=(Var18-LLV(Var18,60))/(HHV(Var18,60)-LLV(Var18,60))*100;

Var3C:=LLV(LOW,240);

Var3D:=100*(CLOSE-Var3C)/Var3C;

Var3E:=WINNER(CLOSE)/SMA(VOL/CAPITAL,13,1);

Var3F:=100*VOL/CAPITAL;

Var40:=100*(WINNER(CLOSE)-REF(WINNER(CLOSE),1));

Var41:=Var40/Var3F;

Var42:=1.1*CLOSE;

Var43:=0.9*CLOSE;

Var44:=100*(WINNER(Var42)-WINNER(Var43));

Var45:=100*(CLOSE-COST(0))/(COST(100)-COST(0));

Var46:=(CLOSE-LLV(LOW,240))/(HHV(HIGH,240)-LLV(LOW,240))*100;

Var47:=(CLOSE-LLV(LOW,480))/(HHV(HIGH,480)-LLV(LOW,480))*100;

Var48:=WINNER(CLOSE)/(VOL/CAPITAL);

Var49:=100*(1-WINNER(CLOSE));

Var4A:=Var36<1 AND Var48<0.3 AND Var3E<0.3 AND Var41<0 AND Var46<0.5 AND Var47<0.5 AND Var44<1.5 AND Var45<1 AND Var3B=0;

DRAWTEXT(Var4A,LOW,'抄底');