ENE通道主圖優化

N:=22;

M1:=5;

M2:=5;

UPPER:(1+M1/100)*MA(CLOSE,N);

LOWER:(1-M2/100)*MA(CLOSE,N);

ENE:(UPPER+LOWER)/2;

AA:=VOL/REF(VOL,1)>3;

BB:=CLOSE/REF(CLOSE,1)>1.05;

CC:AA AND BB AND (HHV(CLOSE,10)-LLV(CLOSE,10))/CLOSE<0.1 AND C>UPPER;

乾坤線:='-----------------------';

DRAWTEXT(CC,C,'----------------')COLORGREEN;

DRAWICON((CROSS(UPPER,乾坤線) AND (C>乾坤線)),L,23);

{評分}

KMJ:=MA(C,3);

VAR1:=KMJ>REF(KMJ,1) AND KMJ>REF(KMJ,2) AND V>0;

VAR2:=REF(VAR1,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR3:=REF(VAR2,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VAR4:=REF(VAR3,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR5:=REF(VAR4,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VAR6:=REF(VAR5,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR7:=REF(VAR6,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VAR8:=REF(VAR7,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR9:=REF(VAR8,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VARA:=REF(VAR9,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VARB:=REF(VARA,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VARC:=REF(VARB,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VARD:=KMJ<REF(KMJ,1) AND KMJ<REF(KMJ,2);

VARE:=REF(VARD,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VARF:=REF(VARE,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR10:=REF(VARF,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VAR11:=REF(VAR10,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR12:=REF(VAR11,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VAR13:=REF(VAR12,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

VAR14:=REF(VAR13,1) AND KMJ>=REF(KMJ,1) AND KMJ<=REF(KMJ,2);

VAR15:=REF(VAR14,1) AND KMJ<=REF(KMJ,1) AND KMJ>=REF(KMJ,2);

X1:=IF(MA(C,5)>MA(C,10),20,0);

X2:=IF(MA(C,20)>MA(C,60),10,0);

X3:=IF(KDJ.J>KDJ.K,10,0);

X4:=IF(MACD.DIF>MACD.DEA,10,0);

X5:=IF(MACD.MACD>0,10,0);

X6:=IF(V>MA(V,60),10,0);

X7:=IF(WINNER(C)>0.5,10,0);

X8:=IF(C/REF(C,1)>1.03,10,0);

XX:=X1+X2+X3+X4+X5+X6+X7+X8;

DRAWTEXT_FIX(V>O,0.85,0.86,0,STRCAT('安全分： ',STRCAT(CON2STR(XX,2),' '))),COLORYELLOW;