ROA:FINANCE(30)/FINANCE(10)*100,NODRAW;
OCF占资产%:FINANCE(25)/FINANCE(10)*100,NODRAW;
PE动:DYNAINFO(39),NODRAW;
资产负债率:FINANCE(9),NODRAW;
现价:CONST(C),DOTLINE;

Z1:=STRCAT(HYBLOCK,'');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,'');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIBLUE;

TY:=C;{收盘价}
A1:=REF(TY,10)=HHV(TY,2*10+1);{10日前收盘价等于21天内最高价}
VB1:=FILTER(A1,10);{当出现A1条件时，过滤10天后连续出现的信号}
C1:=BACKSET(VB1,10+1);{将当前位置到11天前的位置设为1}
HD:=FILTER(C1,10);{将当前位置到10天后的位置设为1}
A2:=REF(TY,10)=LLV(TY,2*10+1);{10天前的收盘价等于21天内最低价}
VB2:=FILTER(A2,10);{过滤10天内连续出现的信号}
C2:=BACKSET(VB2,10+1);{将当前位置到11天前的位置设为1}
LD:=FILTER(C2,10);{当出现C2后，10天后的数据不予记录}
A:=REF(C,BARSLAST(HD));{设值上次高点位置}
B:=REF(C,BARSLAST(LD));{设值上次低点位置}
T11:=BARSLAST(HD)BARSLAST(LD)ANDNOT(LD);{下降波段反弹不创新高没新低}
IF(T11,A,A),COLORFF00FF,POINTDOT;{符合T1条件，高位线为紫色点状线}
STICKLINE(T11,A,A,9,0),COLORFF00FF;{高位画横线}
IF(T21,B,B),COLOR80FF00,POINTDOT;{符合T2条件，高位线为绿色点状线}
STICKLINE(T21,B,B,9,0),COLOR80FF00;{低位画横线};


VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0ANDH>L+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1)<=REF(ZIG(3,6),2)ANDREF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)=REF(ZIG(3,6),2)ANDREF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1)ANDREF(ZIG(3,22),1)<=REF(ZIG(3,22),2)ANDREF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)=REF(ZIG(3,22),2)ANDREF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1)ANDREF(ZIG(3,51),1)<=REF(ZIG(3,51),2)ANDREF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)=REF(ZIG(3,51),2)ANDREF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1)ANDREF(ZIG(3,72),1)<=REF(ZIG(3,72),2)ANDREF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)=REF(ZIG(3,72),2)ANDREF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(C,2)-EMA(C,150);
买１:=VAR10;
买２:=(VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
DRAWTEXT(买１>0OR买２>0,L,'买'),COLORYELLOW;
DRAWTEXT(卖１>0,H,'卖'),COLORYELLOW;
ZIG(3,5),COLORYELLOW;
PL5:=ZIG(3,5);
EN1:=PL5>REF(PL5,1)ANDREF(PL5,1)<=REF(PL5,2)ANDREF(PL5,2)<=REF(PL5,3);
EX1:=PL5=REF(PL5,2)ANDREF(PL5,2)>=REF(PL5,3);
PL10:=ZIG(3,10);
EN2:=PL10>REF(PL10,1)ANDREF(PL10,1)<=REF(PL10,2)ANDREF(PL10,2)<=REF(PL10,3);
EX2:=PL10=REF(PL10,2)ANDREF(PL10,2)>=REF(PL10,3);
PL20:=ZIG(3,20);
EN3:=PL20>REF(PL20,1)ANDREF(PL20,1)<=REF(PL20,2)ANDREF(PL20,2)<=REF(PL20,3);
EX3:=PL20=REF(PL20,2)ANDREF(PL20,2)>=REF(PL20,3);
走强1:=BARSLAST(PL5REF(PL5,1));
走强2:=BARSLAST(PL10REF(PL10,1));
走强3:=BARSLAST(PL20REF(PL20,1));
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20REF(PL20,1)ANDZTJD10=1,H,'[二卖]'),LINETHICK2,COLORLIBLUE;
DRAWTEXT(EN2ANDPL20>REF(PL20,1)ANDZTJZ10=2,L,'[二买]'),LINETHICK2,COLORLIBLUE;
DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2,H,'[一卖]'),LINETHICK3,COLORMAGENTA;