红三角买点，绿三角卖点．红柱子和绿柱子是底和顶．
MA1:MA(CLOSE,5);
MA2:MA(CLOSE,20);
MA3:MA(CLOSE,120);
MA4:MA(CLOSE,250);
TY:=C;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD) BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD) BARSLAST(LD) AND NOT(LD);
{波浪顶:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK2;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK2;}
VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(L,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VARA:=BARSCOUNT(C);
VARB:=VAR8 20 AND VAR9 23 AND VARA
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(C,21)-EMA(C,8);
VARE:=EMA(VARD,5);
VARF:=TROUGH(3,6,1) 4 AND CROSS(VARD,VARE);
VAR10:=IF(TROUGH(3,16,1)=0 AND H L+0.04,4,0);
VAR11:=ZIG(3,6) REF(ZIG(3,6),1) AND REF(ZIG(3,6),1) =REF(ZIG(3,6),2) AND REF(ZIG(3,6),2) =REF(ZIG(3,6),3);
VAR12:=ZIG(3,6) REF(ZIG(3,6),1) AND REF(ZIG(3,6),1) =REF(ZIG(3,6),2) AND REF(ZIG(3,6),2) =REF(ZIG(3,6),3);
VAR13:=ZIG(3,22) REF(ZIG(3,22),1) AND REF(ZIG(3,22),1) =REF(ZIG(3,22),2) AND REF(ZIG(3,22),2) =REF(ZIG(3,22),3);
VAR14:=ZIG(3,22) REF(ZIG(3,22),1) AND REF(ZIG(3,22),1) =REF(ZIG(3,22),2) AND REF(ZIG(3,22),2) =REF(ZIG(3,22),3);
VAR15:=ZIG(3,51) REF(ZIG(3,51),1) AND REF(ZIG(3,51),1) =REF(ZIG(3,51),2) AND REF(ZIG(3,51),2) =REF(ZIG(3,51),3);
VAR16:=ZIG(3,51) REF(ZIG(3,51),1) AND REF(ZIG(3,51),1) =REF(ZIG(3,51),2) AND REF(ZIG(3,51),2) =REF(ZIG(3,51),3);
VAR17:=ZIG(3,72) REF(ZIG(3,72),1) AND REF(ZIG(3,72),1) =REF(ZIG(3,72),2) AND REF(ZIG(3,72),2) =REF(ZIG(3,72),3);
VAR18:=ZIG(3,72) REF(ZIG(3,72),1) AND REF(ZIG(3,72),1) =REF(ZIG(3,72),2) AND REF(ZIG(3,72),2) =REF(ZIG(3,72),3);
买点1:=VAR10;
买点2:=(VAR11+VAR13+VAR15+VAR17);
卖点1:=(VAR12+VAR14+VAR16+VAR18),LINETHICK2;
DRAWTEXT(买点1 0,L-0.01,'▲'),COLORRED;
DRAWTEXT(买点2 0,L-0.01,'▲'),COLORFF00FF;
DRAWTEXT(卖点1 0,H+0.1,'▼'), COLOR33FF33;
N:=150;判断高低:=3;
高:=REF(HHV(H,N),判断高低);
近期顶:REFDATE(高,DATE),COLORGREEN,LINETHICK3;
最顶:=REFDATE(近期顶,DATE),NODRAW;
出:=最顶=H AND ((C-L) (O-C) OR (O-L) (C-O)),NODRAW;
STICKLINE(出,C,O,3,0),COLORGREEN;
STICKLINE(出,C,O,2,0),COLORGREEN;
低:=REF(LLV(L,N),判断高低);
近期底:REFDATE(低,DATE),COLORRED,LINETHICK3;
最底:=REFDATE(近期底,DATE),NODRAW;
进:=最底=L AND ((C+L) (O+C) OR (O+L) (C+O)),NODRAW;
STICKLINE(进,C,O,3,0),COLORRED;
STICKLINE(进,C,O,2,0),COLORRED;
指标王:=COUNT(CROSS((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5)),7) 0 AND REF((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),2) REF((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),1)
AND (HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5) REF((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),1) AND COUNT(COUNT(CROSS((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5)),7) 0 AND
REF((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),2) REF((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),1) AND (HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5) REF((HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5),1),5)=1 OR
CROSS(EMA((((CLOSE - LLV(LOW,10)) / (HHV(HIGH,25) - LLV(LOW,10))) * 4),4),0.3);
DRAWTEXT(指标王,L*0.96,'B'),COLORYELLOW;
ZT:=C/REF(C,1) 1.097;
BH:=BARSLAST(ZT-1000);
STICKLINE(ZT,REF(O,BH),REF(C,BH),1,0),COLORYELLOW;
地域:DRAWTEXT_FIX(ISLASTBAR ,0.94,0,1,DYBLOCK),COLORGRAY;
行业:DRAWTEXT_FIX(ISLASTBAR ,0.95,0,0,HYBLOCK),COLORGRAY;
