【股票指标公式下载】-【通达信】天一神鞭(离基动态止损度布林止损价)

1、【通达信】天一神鞭（离基、动态止损度、布林、止损价）-指标公式源码动态止损度:=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

2、;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),COLOR0000AA,LINETHICK1;跌:PLOYLINE(C<REF(C,1),CONST(C),

3、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)<=止损价 AN

4、D 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(CL

5、OSE,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 DY

6、NAINFO(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

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(

8、五>=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(

9、五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+CLOS

10、E)/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(M

11、A(C,5),C),H,2);N:=14;M:=6;TR:=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-P

12、DI)/(MDI+PDI)*100,M);ADXR:=EXPMEMA(ADX,M);DMIJX:=CROSS(PDI,MDI) AND C>O ;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;垂头长针:=(头

13、下边-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

14、(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>0;DRAWTEXT(REF(EVERY(MACD红缩,3),1)AND MACD>REF(MACD,1) AND C>MA(C,22) AND 提示=0,L/1.02,'启动'),COLORWHITE;/MACD

15、反身向上2/MACD红缩2:=REF(MACD,1)>MACD AND MACD>0;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<MA

16、1,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,&#

17、39;急挖坑'),COLORGREEN;SC1:=MACD.MACD<0;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>0;JC2:=CROSS(五,十);JC3:=MA(V,5)>MA(V,10);JC:=JC1 AND JC2 AND JC3 ;DRAWTEXT(JC AND CURRBARSCOUNT<

18、;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 CUR