动态止损度:=5;
黑:=0;{下跌通道黑色K线开关}
离L:=0;{乖离提示开关}
提示:=0;{买卖文字提示开关}
布林M:=0;{开关}
MMA:=0;
五:MA(CLOSE,5),COLORWHITE;
十:MA(CLOSE,10),COLOR00FFFF;
M18:=MA(CLOSE,18),COLORRED;
离基:=五;
离O:=离基*1.20,COLOR555555;
离A:离基*1.15,COLOR555555;
离B:离基*1.10,COLOR555555;
离C:离基*0.90,COLOR555555;
离D:=离基*0.85,COLOR333333;
EXP50:=EXPMA(CLOSE,50),COLORGREEN;
MA30:MA(CLOSE,30),LINETHICK1,COLORRED;
MA60:MA(CLOSE,60),COLORGREEN;
0:=(H-L)/2+L,LINETHICK0;
:= 0,LINETHICK0;
:=REF( 0,1),LINETHICK0,COLORGREEN;
:=REF( 0,2),LINETHICK0,COLORMAGENTA;
{涨:PLOYLINE(C REF(C,1),CONST(C)),;
跌:PLOYLINE(C REF(C,1),CONST(C)),COLOR00AA00,LINETHICK1;}
高:PLOYLINE(1,CONST(HHV(H,50))),COLOR770077,LINETHICK1;
低:=PLOYLINE(1,CONST(LLV(L,50))),COLOR777700,LINETHICK1;
中:=PLOYLINE(1,(高-低)/2+低),COLOR005555,LINETHICK4;
止损价:=CONST(HHV(C,5)*(100-动态止损度)/100);
止:PLOYLINE(CONST(C) =止损价,止损价),COLOR888800,LINETHICK4;
DRAWTEXT(DYNAINFO(7) =止损价 AND ISLASTBAR,止损价*1.05,'止损');
AA:=CLOSE/REF(C,1) =1.09;
BA:=CLOSE/REF(C,1) =1.09;
DRAWKLINE(H,O,L,C);
STICKLINE(AA,O,C,2.5,1),COLORYELLOW;
MA1:=MA(CLOSE,5),COLORRED;
MA2:=MA(CLOSE,10),COLORYELLOW;
MA3:=MA(CLOSE,20),COLOR770077;
E50:=EXPMA(CLOSE,50),LINETHICK1,POINTDOT,COLORLIGREEN;
E100:=EXPMA(CLOSE,100),POINTDOT,COLORGRAY;
MA181:MA(C,181),COLORGRAY;
{MA60:=MA(C,60),COLOR007700;}
{周:IF( MMA=1 ,MA2,DRAWNULL),COLORYELLOW,LINETHICK1;
月:IF( MMA=1 ,MA3,DRAWNULL),COLORWHITE,LINETHICK1;
季:IF( MMA=1 ,MA4,DRAWNULL),COLORGREEN,LINETHICK1;}
{IF(C E50 ,E50,DRAWNULL),COLOR00FF00,LINETHICK1;}
IF(CONST( ) AND DYNAINFO(7) 0,DYNAINFO(7),DRAWNULL),COLOR000088,LINETHICK1;
IF(CONST( = )AND DYNAINFO(7) 0 ,DYNAINFO(7),DRAWNULL),COLOR008800,LINETHICK1;
IF(CONST( ) AND DYNAINFO(7) 0 AND DYNAINFO(7) =高*0.99,DYNAINFO(7),DRAWNULL),COLOR000088,LINETHICK1;
IF(CONST( = )AND DYNAINFO(7) 0 AND DYNAINFO(7) =低*1.01 ,DYNAINFO(7),DRAWNULL),COLOR008800,LINETHICK1;
N1:=12;
N2:=26;
N3:=9;
DIFF:=(EMA(CLOSE,N1) - EMA(CLOSE,N2));
DEA:=EMA(DIFF,N3);
MACD:=(2 * (DIFF - DEA));
MACD2:=MACD;
SARH:=CLOSE SAR(4,2,20);
{IF(C MA3 ,MA1,DRAWNULL),COLOR555555,LINETHICK1;}
{IF(C MA3 ,MA2,DRAWNULL),COLOR222222,LINETHICK1;}
{IF(五 =REF(五,1) ,离A,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(五 =REF(五,1) ,离B,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(五 =REF(五,1) ,离C,DRAWNULL),COLOR00FF00,LINETHICK1;
IF(五 =REF(五,1) ,离D,DRAWNULL),COLOR00FF00,LINETHICK1;}
五V:=MA(V,5);
{IF(五V =REF(五V,1) ,离A,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(五V =REF(五V,1) ,离B,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(五V =REF(五V,1) ,离C,DRAWNULL),COLOR00FF00,LINETHICK1;
IF(五V =REF(五V,1) ,离D,DRAWNULL),COLOR00FF00,LINETHICK1;}
{IF(五 REF(五,2) AND 离L=0,离A,DRAWNULL),COLOR555555,LINETHICK1;
IF(五 REF(五,2) AND 离L=0,离D,DRAWNULL),COLOR555555,LINETHICK1;}
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
STICKLINE(C MA3 AND 黑=1,H,L,0,0),COLOR555555;
STICKLINE(MA1 MA3 AND 黑=1,O,C,2.5,1),COLOR555555;
STICKLINE(BA AND C MA3,O,C,2.7,1),COLORWHITE;
{DRAWICON(MACD REF(MACD,1) AND CROSS(C,MA3) AND 提示=0 ,L,1);}
{DRAWICON(REF(C MA3 AND 提示,1) AND CROSS(MA(C,5),C),H,2);}
N:=14;
M:=6;
TRR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD 0 HD LD,HD,0),N);
DMM:=EXPMEMA(IF(LD 0 LD HD,LD,0),N);
PDI:=DMP*100/TR;
MDI:=DMM*100/TR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:=EXPMEMA(ADX,M);
DMIJX:=CROSS(PDI,MDI) AND C
{STICKLINE(DMIJX,H,L,0,1),COLORYELLOW;
STICKLINE(DMIJX,O,C,2.7,0),COLORYELLOW;}
{DRAWICON(DMIJX AND 提示=0,L,1);}
{DRAWTEXT(H 离A,离A/0.99,'★'),COLORYELLOW;}
头上边:=MAX(O,C),NODRAW;
头下边:=MIN(O,C),NODRAW;
垂头:=ABS(O-C),NODRAW;{垂头}
长针:=(头下边-L),NODRAW;{长针}
垂:=长针/垂头 2 AND (H-头上边) =长针 AND L REF(L,1) AND O REF(C,1),NODRAW;
DRAWTEXT(垂 AND L =LLV(L,3) AND L 离C AND 提示,L/1.01,'针') AND 提示,COLORGREEN,LINETHICK4;
DRAWTEXT(H MA(CLOSE,5)*1.07 AND ISLASTBAR AND 提示,H*1.01,'离!'),COLORGREEN,LINETHICK2;
DRAWTEXT(L MA(CLOSE,5)*1.005 AND L MA(CLOSE,5) AND 提示=0 AND H MA(CLOSE,5)*1.07 AND ISLASTBAR,L/1.02,'低吸'),COLORGREEN,LINETHICK2;
{////MACD反身向上////}
{MACD红缩:=REF(MACD,1) MACD AND MACD
DRAWTEXT(REF(EVERY(MACD红缩,3),1)
AND MACD REF(MACD,1) AND C MA(C,22) AND 提示=0,L/1.02,'启动'),COLORWHITE;
}
{////MACD反身向上2////}
{MACD红缩2:=REF(MACD,1) MACD AND MACD
DRAWTEXT(REF(EVERY(MACD红缩2,2),1)
AND MACD REF(MACD,1) AND C MA(C,22) AND EVERY(DIFF 0,3) AND 提示=0,L/1.02,'起动'),COLORWHITE;
}
{突破买进(源码)}
{DRAWTEXT(DYNAINFO(7) 0 AND ISLASTBAR ,HIGH,'( DYNAINFO(7) )');}
上5日:=REF(EVERY(C MA1,2),1) AND CROSS(C,MA1);
STICKLINE(上5日,H,L,0,0),COLORFF00FF;
{STICKLINE(上5日,O,C,2.7,0),COLOR3366FF;}
STICKLINE(上5日,O,C,2.7,0),COLORFF00FF;
DRAWICON(上5日,L,1);
破5日:=REF(EVERY(C MA1,4),1) AND CROSS(MA1,C);
DRAWICON(破5日,H,2);
DT:=REF(CLOSE/REF(C,1),1) =0.95;
DRAWTEXT(AA AND DT AND CURRBARSCOUNT 60 ,H,'急挖坑'),COLORGREEN;
SC1:=MACD.MACD
SC2:=CROSS(十,五);
SC3:=MA(V,5) MA(V,10);
SC:=SC1 AND SC2 AND SC3 ;
DRAWTEXT(SC AND CURRBARSCOUNT 10 ,HHV(H,5),'三死叉'),COLORWHITE;
JC1:=MACD.MACD
JC2:=CROSS(五,十);
JC3:=MA(V,5) MA(V,10);
JC:=JC1 AND JC2 AND JC3 ;
DRAWTEXT(JC AND CURRBARSCOUNT 20 ,LLV(L,5),'后金叉'),COLORYELLOW;
{ZS:=CROSS(DMI.ADXR,DMI.ADX);
DRAWTEXT(ZS AND CURRBARSCOUNT 10 ,HHV(H,5),'转势'),COLORRED;}
{IF(五 REF(五,1),五,DRAWNULL),COLOR888888,LINETHICK1;};
{XQK:=H REF(L,1) ;
DRAWTEXT(XQK AND CURRBARSCOUNT 20 ,H,'□□□□□□□□□□□□'),COLOR999999;
SQK:= L REF(H,1);
DRAWTEXT(SQK AND CURRBARSCOUNT 20 ,L,'□□□□□□□□□□□□'),COLORRED;};
DRAWTEXT(CROSS(H,离B) AND CURRBARSCOUNT 10 ,HHV(H,3),'超乖离'),COLORYELLOW;
DRAWTEXT(CROSS(H,离A) AND CURRBARSCOUNT 10 ,HHV(H,3),'超乖离'),COLORYELLOW;
DRAWTEXT(CROSS(离C,L) AND CURRBARSCOUNT 10 ,LLV(L,3),'负乖离'),COLORWHITE;
DRAWTEXT((C MA(C,5) OR MA(C,5) MA(C,10)) AND CURRBARSCOUNT 2,HHV(H,5)*1.04,'MA5下'),COLORRED;
DRAWTEXT((C MA(C,5) OR MA(C,5) MA(C,10)) AND CURRBARSCOUNT 2 ,HHV(H,5)*1.01,'不持股'),COLORRED;
