变色趋势 变色趋势王及神龙吐珠
 

参数：
P2=77;
P3:=99

c1:=CLOSE>REF(CLOSE,1);
STICKLINE(C1,OPEN,CLOSE,9.99,0),colorred;
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,6,0),coloryellow;
STICKLINE(涨停,H,L,0,0),coloryellow;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,10,0),colorblue;
STICKLINE(跌停,H,L,0,1),colorblue;
大阴线:=IF((C2-C)*100/C2>=5,1,0) AND IF((C2-C)*100/C2<(10-0.01*100/C2),1,0) OR IF((O-C)*100/O>=5,1,0)  AND IF((C2-C)*100/C2<(10-0.01*100/C2),1,0);
STICKLINE(大阴线,OPEN,CLOSE,10,0),colorblue;
STICKLINE(大阴线,H,L,0,1),colorblue;
TY:=C;
AA1:=REF(TY,10)=HHV(TY,2*10+1); BB1:=FILTER(AA1,10); C1:=BACKSET(BB1,10+1); HD:=FILTER(C1,10);
AA2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(AA2,10); CC2:=BACKSET(B2,10+1); LD:=FILTER(CC2,10);
前期高位:REF(H,BARSLAST(HD)),COLOR00FF00,CIRCLEDOT;
前期低位:REF(L,BARSLAST(LD)),COLORFF00FF,CIRCLEDOT;
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
TP:=TJ2=1;
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),6,0),coloryellow;
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
STFZ:=TJ3=1;
CL:=STFZ AND TP;
TJCL:=FILTER(CL,3);
DRAWTEXT(LJL,L*0.99,'神'),coloryellow;
DRAWTEXT(LJL,L*0.95,'龙'),coloryellow;
DRAWTEXT(LJL,L*0.90,'柱'),coloryellow;
ZT:=C/REF(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(C,(REF(L,BH)+CZ*0.5),(REF(L,BH)+CZ*0.5),7,0),colorred;
STICKLINE(C,REF(L,BH),REF(L,BH),8,0),colorblue;
DRAWTEXT(ZT,L*0.98,'涨停'),colorF00FF0;
VARZT:=BARSLAST(C/REF(C,1)>1.097);
STICKLINE(VARZT=2,L*0.97,L*0.98,8,0),COLOR0000FF;

MA25:MA(CLOSE,25),LINETHICK4,COLORYELLOW ;
MA_P2_:MA(CLOSE,P2),COLORYELLOW,LINETHICK2;
MA_P3_:MA(CLOSE,P3),COLOR006400,LINETHICK2;
PB6:(EMA(CLOSE,192)+MA(CLOSE,384)+MA(CLOSE,768))/3,CIRCLEDOT,COLORGRAY,LINETHICK2;
DIFF:=( EMA(CLOSE,8) - EMA(CLOSE,21));
DEA:=EMA(DIFF,5);TJ:=(DIFF>=DEA);
TJ1:=(DIFF>=0);

STICKLINE(TJ,H,L,0,0),colorff8000;
STICKLINE(TJ,O,C,8,0),colorff8000;        
STICKLINE(TJ1 AND TJ,H,L,0,0),colorff8000;
STICKLINE(TJ1 AND TJ,O,C,8,0),colorff8000;  
STICKLINE(DIFF<DEA,H,L,0,0),COLORWHITE;
STICKLINE(DIFF<DEA,O,C,8,0),COLORWHITE;

EXPMA1:EMA(C,13),COLORBLUE,LINETHICK4;
PARTLINE(EXPMA1,EXPMA1> REF(EXPMA1,1),rgb(255,0,0)),LINETHICK4;