NF:=1;
Z1:=(REF(H,NF)-REF(L,NF))/REF(C,NF+1)*100;
Z2:=(REF(H,NF+1)-REF(L,NF+1))/REF(C,NF+2)*100;
Z3:=(REF(H,NF+2)-REF(L,NF+2))/REF(C,NF+3)*100;
前三日均振:(Z1+Z2+Z3)/3,NODRAW;
P3:EMA(CLOSE,43),COLORGREEN,LINETHICK1;
IF(P3>REF(P3,1), P3,DRAWNULL),COLORRED,LINETHICK1;
C2:= O<=REF(L,1)*0.98 AND CLOSE/OPEN>=1.05 AND REF(SUM((C-REF(C,1))/C*100,3)<-7,1) ;
DRAWICON(C2,LOW*0.97,38);
AP1:=MA(C,1);
BP1:=SMA(SMA(SMA(AP1,2,1),2,1),2,1);
CP1:=MA(BP1,3);
DRAWBAND(BP1,RGB(255,0,0),CP1,RGB(0,255,0));
BDGD:=C=HHV(C,40);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),20))+1;
GD:REF(H,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1;
TTP:=CROSS(C,REF(GD,1)),COLOR00FFFF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ<=6,GD,GD,8,0),COLORFF00FF;
BDDD:=C=LLV(C,N1);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),N2))+1;
DDD1:REF(L,DDSJ),COLOR00FFFF,POINTDOT,LINETHICK1;
STICKLINE(DDSJ<=6,DDD1,DDD1,8,0),COLOR00FF00;
XG6:=DDSJ=1;
DRAWICON(XG6,L*0.99,1);
XGT6:=BARSLAST(XG6);
{ZSJ:IF(XGT6<=30,REF(L,XGT6),DRAWNULL),COLORRED,DOTLINE;}
DPD:=C=LLV(C,60);
DPD2:=FILTER(CROSS(0.8,DPD),10) AND REF(SUM((C-REF(C,1))/C*100,3)<-10,1) ;
DRAWICON(DPD2,L*0.95,17);
VAR1:=REF(CLOSE,1);
VAR2:=((SMA(MAX((CLOSE - VAR1),0),6,1) / SMA(ABS((CLOSE - VAR1)),6,1)) * 100);
MC:=CROSS(90,VAR2);
DRAWICON(MC,H*1.005,2);
A11:=H>MAX(O,C)*1.03;
A12:=V=HHV(V,30);
XG11:=A11 AND A12 AND C/REF(C,5)>1.081;
DRAWICON(XG11,H*1.005,2);
A13:=V=HHV(V,40) AND C<O AND C/REF(C,11)>1.1 ;
DRAWICON(A13,H*1.005,12);
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA2:=EMA(DIFF,9);
MACDD:=(DIFF-DEA2)*2;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
K:=SMA(RSV,9,3);
D:=SMA(K,9,3);
J:=3*K-2*D;
AP:=CROSS(DIFF,DEA2) AND CROSS(K,D) AND CROSS(J,D) AND DIFF<0;
A7:=FILTER(AP,20);
DRAWTEXT(A7,L*0.991,'↑金振'),COLOR80FFFF;
SA:=CROSS(DEA2,DIFF) AND CROSS(D,K) AND CROSS(D,J) AND DIFF>0;
A8:=FILTER(SA,20);
DRAWTEXT(A8,H,'↓死振'),COLORWHITE;
B:=C/REF(C,1)>1.095 AND H=O AND L=H;
B1:=NOT(B);
B2:=FINANCE(42)>360;
E2:=DDSJ=1 AND B1;
{E3:=DDSJ=2 AND B1;
E4:=E2 OR E3;
E5:=H>MAX(O,C)*1.03 OR L<MIN(O,C)*0.97 ;
E6:=REF(E5,1);
E9:=E5 OR E6;}
A1:=REF(SUM((C-REF(C,1))/C*100,3)<-10,1) OR REF(SUM((C-REF(C,1))/C*100,4)<-10,1) OR REF(SUM((C-REF(C,1))/C*100,5)<-15,1);
A3:=REF(SUM((C-REF(C,1))/C*100,3)<-10,1);
A2:=DDSJ=1 AND B1;
DDD2:=REF(C,DDSJ);
A4:=DDD2>REF(DDD2,1);
XGT:=BARSLAST(A2);
AD:=REF(L,REF(XGT,1)+1);
XG7:=BETWEEN(L,AD,AD*1.06) AND XGT=0 AND REF(XGT,1)<=30 AND E2 ;
XG8:= XG7 AND B2 AND A1 ;
DRAWICON(XG8,L*0.95,23);
{J3:=SUM((C-REF(C,1))/C*100,3)<-15 OR SUM((C-REF(C,1))/C*100,4)<-15 OR SUM((C-REF(C,1))/C*100,5)<-20;
J5:= EVERY(CLOSE<OPEN,3) OR EVERY(CLOSE<OPEN,4) OR EVERY(CLOSE<OPEN,5);
J4:=REF(O,1)<REF(C,2)*0.98 OR O<REF(C,1)*0.98 OR REF(O,2)<REF(C,3)*0.98; ;
J6:=J3 AND J5;
J9:=J3 AND J4 AND J5;
J10:=J6 OR J9;
J11:=FILTER(J10,5);
DRAWICON(J11,L*0.97,41);}
BAA:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
BAB:=BAA>=9.6 AND CLOSE=HIGH;
STICKLINE(BAB,CLOSE,OPEN,3,0 ),COLOR000085;
STICKLINE(BAB,CLOSE,OPEN,2.6,0 ),COLOR0000A5;
STICKLINE(BAB,CLOSE,OPEN,2.2,0 ),COLOR0005B5;
STICKLINE(BAB,CLOSE,OPEN,1.8,0 ),COLOR0015D5;
STICKLINE(BAB,CLOSE,OPEN,1.4,0 ),COLOR0025F5;
STICKLINE(BAB,CLOSE,OPEN,1,0 ),COLOR0035FF;
STICKLINE(BAB,CLOSE,OPEN,0.5,0 ),COLOR0045FF;
STICKLINE(BAB,HIGH,LOW,0,0 ),COLOR0055FF;
DRAWTEXT_FIX(1,0,0,0,'地区:'),COLOR99CC32;DRAWTEXT_FIX(1,0.03,0,0,DYBLOCK),COLOR99CC32;
DRAWTEXT_FIX(1,0.1,0,0,'行业:'),COLORGREEN;DRAWTEXT_FIX(1,0.13,0,0,HYBLOCK),COLORGREEN;
DRAWTEXT_FIX(1,0.19,0,0,'概念:'),COLORFF00FF;DRAWTEXT_FIX(1,0.22,0,0,GNBLOCK),COLORFF00FF;
MTM:=C-REF(C,1);
ZLGJ:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买1:=IF(LLV(ZLGJ,2)=LLV(ZLGJ,7) AND COUNT(ZLGJ<0,2) AND CROSS(ZLGJ,MA(ZLGJ,2)),1,0);
卖1:=IF(HHV(ZLGJ,2)=HHV(ZLGJ,7) AND COUNT(ZLGJ>50,2) AND CROSS(MA(ZLGJ,2),ZLGJ),1,0);
STICKLINE(FILTER(买1=1,5),C,O,1,0),COLORFF00FF;
STICKLINE(FILTER(卖1=1,1),C,O,1,0),COLOR00FF00;
CK:=C/REF(C,1)>1.095 AND H=O AND L=H;
CK1:=NOT(CK);
CDDD:=C=LLV(C,20);
DDSJ1:=BARSLAST(FILTER(CROSS(0.8,CDDD),10))+1;
XG10:= A2 AND MACD>-0.4 AND A3 AND CK1;
DRAWICON(XG10,L*0.97,5);
H1:=C/REF(C,1)>1.095 AND H=O AND L=H;
H2:=NOT(H1);
H3:=C/REF(C,1)>1.04 ;
N3:=15;
H4:=COUNT(L=LLV(L,N3),3);
H5:=CROSS(H4 AND C>REF(C,1)*1.095,0.5) ;
H6:=REF(C,1)<REF(C,2)*0.96;
H7:= O<REF(C,1) AND C>REF(O,1);
H8:=REF(C,1)*1.04;
XG9:= H2 AND H3 AND H4 AND H5 AND H7 AND H6;
STICKLINE(XG9,O,H8 ,3,0),COLORYELLOW;
CD1: IF(BARSLAST(XG9)<=30
AND (REF(H8,BARSLAST(XG9)))=REF(REF(H8,BARSLAST(XG9)),1)
,REF(H8,BARSLAST(XG9)),DRAWNULL),DOTLINE,COLORYELLOW,LINETHICK1;
{STICKLINE(XG9,C,O,2,0),COLORYELLOW;
STICKLINE(XG9,H,L,2,0),COLORYELLOW;}
ZT:=C/REF(C,1)>1.095;
AA1:=C/REF(C,1)>1.04;
AA2:=REF(C,1)<REF(C,2)*0.96 ;
XG12:=AA1 AND AA2 AND L>REF(L*0.94,BARSLAST(REF(ZT,1))+1) AND L<REF(C*0.95,BARSLAST(REF(ZT,1))+1)
AND BARSLAST(REF(ZT,1))>=2 AND BARSLAST(REF(ZT,1))<=30;
AA3:=REF(C,1)*1.04;
STICKLINE(XG12,O,AA3 ,3,0),COLORWHITE;
CD2: IF(BARSLAST(XG12)<=30
AND (REF(AA3,BARSLAST(XG12)))=REF(REF(AA3,BARSLAST(XG12)),1)
,REF(AA3,BARSLAST(XG12)),DRAWNULL),DOTLINE,COLORWHITE,LINETHICK1;
{N:=7;
BC:=(H*0.382+L*0.618+O*0.382+C*0.618)/2;
LJ:=IF(INDEXC=C,BC,(BC+AMOUNT/(V*100))/2);
HT:=REF((HHV(LJ,N*0.691)+HHV(LJ,N)+HHV(LJ,N*1.309))/3,1),LINETHICK,COLORRED;
LT:=REF((LLV(LJ,N*0.691)+LLV(LJ,N)+LLV(LJ,N*1.309))/3,1),LINETHICK,COLORGREEN;
ZT:=(HT+LT)/2,LINETHICK,COLORYELLOW;
STICKLINE(ISLASTBAR=1 AND LJ<ZT,HT,LT,N*8,1),COLORGREEN;
STICKLINE(ISLASTBAR=1 AND LJ=ZT,HT,LT,N*8,1),COLORRED;
STICKLINE(ISLASTBAR=1 AND LJ>ZT,HT,LT,N*8,1),COLORYELLOW; |
