|
以下是通达信屠龙刀副图源码（无源码的请下载附件导入）
屠龙刀
VARA1:=AMOUNT/VOL;
VARA2:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5);
VARA111:="1A0001$VOL"*"1A0001$CLOSE";
VARA21:=EMA(VARA111,5)/EMA("1A0001$VOL",5);
CYS:=("1A0001$CLOSE"-VARA21)/VARA21*100;
A1:=VARA1/100;
A2:=MA(A1,5);
A3:=MA(A1,20);
A4:=MA(A1,30);
B1:=A4>A2*1.09 AND A3>A2*1.06;
B2:=A2>A1*1.03 AND A3>A1*1.13;
VARA32:=MA(CLOSE,27);{N=27}
VARA33:=(CLOSE-VARA32)/VARA32*100;
VARA34:=MA(VARA33,3);{M=3}
VARA10:=CYS<-2 AND B2;
TLD:=VARA2<6 AND VARA10 AND VARA34<-15;
屠龙刀:TLD*20,COLORRED,STICK,LINETHICK2;
升跌: VARA34,LINETHICK2;
VARA35:=BARSLAST(CROSS(-10,VARA34)=1);
VARA36:=BARSLAST(CROSS(VARA34,10)=1);
VARA37:=VARA34<-10 AND VARA35>3;
VARA38:=VARA34>10 AND VARA36>3;
C1: IF(VARA37,VARA34,0),COLORWHITE,LINETHICK2;
C2: C1, COLORSTICK;
C3: IF(VARA38,VARA34,0),COLORWHITE,LINETHICK2;
C4: C3, COLORSTICK;
抄底:IF(升跌>REF(升跌,1) AND VARA37 AND VARA34<-15,10,0),COLORFF00FF,LINETHICK2;
DRAWICON(抄底>0,11,1);
J:=(REF(C,1)+REF(C,2)+REF(C,3)+REF(C,4)+REF(C,5))/5;
J1:=J<COST(10) AND C/J>1.025 AND (HHV(C,5)-LLV(C,5))/LLV(C,5)*100>7;
J2:= J1 AND REF(C,5)/REF(C,1)>1.003 AND MA(INDEXC,3)>=REF(MA(INDEXC,3),1);
FILTER(J2,10);{[REPLYVIEW] };
654422329.jpg
| 
