轨道突破擒牛一主图四副图通达信套装系列指标

  

  

  

  

  

主图

N  1    100   20

M  1   20       5

NBAR:=BARSLAST(DATE<>REF(DATE,1))+1;

HHN:REF(HHV(H,N),1);

突破上轨:CROSS(C,HHN),COLORYELLOW,NODRAW;

STICKLINE(CROSS(C,HHN),HHN,HHN*1.01,2,0),COLORYELLOW;

STICKLINE(CROSS(C,HHN),O,C,3,0),COLORYELLOW;

LLN:REF(LLV(L,N),1);

MID:(HHN+LLN)/2;

中轨突破:CROSS(C,MID),COLORRED,NODRAW;

STICKLINE(CROSS(C,MID),O,C,3,0),COLORRED;

T1:=TIME>900 AND TIME <1455;

T2:=TIME>=1455;

开多条件:=H>HHN AND (HHN-MID)/MID<M/1000 AND NBAR>=30 AND T1;

开空条件:=L<LLN AND (MID-LLN)/MID<M/1000 AND NBAR>=30 AND T1;

BUY(开多条件,LOW),COLORFF00FF;

SELLSHORT(开空条件,HIGH),COLORBLUE;

SELL(T2,HIGH);

BUYSHORT(T2,LOW);

AUTOFILTER;

DRAWTEXT_FIX(1,0.05,0.03,0,HYBLOCK),COLOR0000FF;

DRAWTEXT_FIX(1,0.01,0.03,0,DYBLOCK),COLOR0000FF;

DRAWTEXT_FIX(1,0.09,0.03,0,'概念:'),COLORWHITE;

DRAWTEXT_FIX(1,0.11,0.03,0,GNBLOCK),COLORRED;

DRAWTEXT_FIX(1,0.01,0.1,0,'风格：'),COLORWHITE;

DRAWTEXT_FIX(1,0.03,0.1,0,FGBLOCK),COLORRED;

副图1

VAR1:=EMA(EMA(CLOSE,20),9);

控盘:60+(VAR1-REF(VAR1,1))/REF(VAR1,1)*10000,NODRAW,COLOR00FFFF;

STICKLINE(控盘>50,控盘,50,2.5,0),COLOR00FFFF;

STICKLINE(控盘>60 AND 控盘>MA(控盘,3),控盘,60,2.5,0),COLOR0000FF;

STICKLINE(控盘>100 AND 控盘>MA(控盘,3),控盘,100,2.5,0),COLORFF00FF;

低控盘:控盘>50 AND 控盘<60 AND 控盘>MA(控盘,3),COLOR00FFFF,NODRAW;

中控盘:控盘>60 AND 控盘<100 AND 控盘>MA(控盘,3),COLOR0000FF,NODRAW;

高控盘:控盘>100 AND 控盘>MA(控盘,3),COLORFF00FF,NODRAW;

副图2

X_1:=EMA(EMA(CLOSE,9),9);

X_2:=(X_1-REF(X_1,1))/REF(X_1,1)*1000;

STICKLINE(X_2<0,X_2,0,1,0),COLORWHITE;

X_3:=CROSS(X_2,0);

无庄控盘:IF(X_2<0,X_2,0),COLORWHITE;

开始控盘:IF(X_3,5,0),COLORYELLOW,LINETHICK2;

STICKLINE(X_2>REF(X_2,1) AND X_2>0,X_2,0,1,0),COLORRED;

有庄控盘:IF(X_2>REF(X_2,1) AND X_2>0,X_2,0),COLORRED;

X_4:=100*WINNER(CLOSE*0.95);

STICKLINE(X_4>50 AND COST(85)<CLOSE AND X_2>0,X_2,0,1,0),COLORMAGENTA;

高度控盘:IF(X_4>50 AND COST(85)<CLOSE AND X_2>0,X_2,0),COLORMAGENTA;

STICKLINE(X_2<REF(X_2,1) AND X_2>0,X_2,0,1,0),COLORGREEN;

控盘趋弱:IF(X_2<REF(X_2,1) AND X_2>0,X_2,0),COLORGREEN;

副图3

DIFF:=( EMA(CLOSE,12) - EMA(CLOSE,26));

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA),STICK;

STICKLINE(DIFF< 0,0,DIFF,2,0),COLORGREEN;

STICKLINE(DIFF>=0,0,DIFF,2,0),COLORRED;

STICKLINE(DEA>=0,0,DEA,2,-1),COLOR0000CC;

STICKLINE(DEA< 0,0,DEA,2,-1),COLORGREEN;

柱1:=IF(DIFF>DEA,DIFF,0),COLORRED;

柱2:=IF(DEA< DIFF,DEA,0),COLORMAGENTA;

DRAWICON(CROSS(DIFF,DEA),柱2,1);

DRAWICON(CROSS(DEA,DIFF),DEA*1.1,2);

总涨跌比:DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100,COLORCYAN,NODRAW;

净资产:=FINANCE(34);

年ROE:FINANCE(33)/FINANCE(34)COLORCYAN,NODRAW;

PE:=DYNAINFO(39),COLORRED,NODRAW;

PB:CONST(DYNAINFO(7) / FINANCE(34))COLOREE3AB2,NODRAW;

回报率:年ROE/PB*100,COLOR0099FF,NODRAW;

M:=9;

SHORT:=12;

LONG:=26;

JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));

DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));

DIF拐头价:=(DIFF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1)))COLORCYAN,LINETHICK3;

柱变向价:=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORGREEN;

DRAWTEXT_FIX(1,0.9,0.94,0,STRCAT('拐点价格: ',CON2STR(DIF拐头价,2))),COLORYELLOW;

DRAWNUMBER(DIFF>DEA,3,BARSLAST(CROSS(DIFF,DEA))+1),COLORRED,NODRAW;

DRAWNUMBER(DIFF< DEA,-1,BARSLAST(CROSS(DEA,DIFF))+1),COLORGREEN,NODRAW;

DRAWTEXT_FIX(1,0.0,0.95,0,STRCAT('停止操作: ',CON2STR(CLOSE< MA(CLOSE,60),2))),COLORCYAN;

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

OBV2:=EMA(OBV1,3)-MA(OBV1,9);

OBV3:=EMA(IF(OBV2>0,OBV2,0),3);

MAC3:=MA(C,3);

STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,DEA/4,2,0),COLORYELLOW;

副图4

多头线:=EMA(C,1.5);

空头线:=EMA(C,5);

均衡线:=EMA(空头线,5),COLORGREEN;

VARF1:=COUNT(CROSS(多头线,均衡线),2)=1;

VARF2:=COUNT(CROSS(空头线,均衡线),2)=1;

擒牛抓妖:FILTER(VARF1 AND VARF2,2);

。。。。。。源码结束明天再见。。。。。。。。。。。。。。。。。。