通达信飞龙在天源码

以下是通达信飞龙在天源码

VA1:=HHV(HIGH,9)-LLV(LOW,9);
 VA2:=HHV(HIGH,9)-CLOSE;
 VA3:=CLOSE-LLV(LOW,9);
 VA4:=VA2/VA1*100-70;
 VA5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
 VA6:=(CLOSE+HIGH+LOW)/3;
 VA7:=SMA(VA3/VA1*100,3,1);
 VA8:=LLV(LOW,34);
 VA9:=SMA(VA7,3,1)-SMA(VA4,9,1);
 VARA:=IF(VA9>100,VA9-100,0);
 VARB:=HHV(HIGH,34);
 VARC:=EMA((VA6-VA8)/(VARB-VA8)*100,13);
 VARD:=EMA(0.667*REF(VARC,1)+0.333*VARC,2);
 VARE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(ABS(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25;
 VARF:=MA(VARE,3);
 VAR1:=HHV(HIGH,9)-LLV(LOW,9);
 VAR2:=HHV(HIGH,9)-CLOSE;
 VAR3:=CLOSE-LLV(LOW,9);
 VAR4:=((VAR2)/(VAR1))*(100)-70;
 VAR5:=((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)))*(100);
 VAR6:=((2)*(CLOSE)+HIGH+LOW)/(4);
 VAR7:=SMA(((VAR3)/(VAR1))*(100),3,1);
 VAR8:=LLV(LOW,34);
 VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
 VAR10:=IF((VAR9>100),VAR9-100,0);
 VAR11:=HHV(HIGH,34);
 B1:=EMA(((VAR6-VAR8)/(VAR11-VAR8))*(100),8);
 DRAWKLINE(EMA(B1,5),EMA(B1,5),B1+1,B1);
牛市:EMA(B1,5),COLORCYAN;
熊市:EMA(VARD,1),COLORYELLOW;
 V1:=MA(C,5)=HHV(MA(C,5),20);
 V2:=MA(C,5)>MA(C,10);
 V3:=MA(V,5)>MA(V,40)*1.01;
 V4:=COUNT(MA(C,1)>REF(C,1),2)=2;
 VV:=V1 AND V2 AND V3 AND V4;
 A1:=EMA(CLOSE,8);
 A2:=EMA(A1,20);
 A3:=CROSS(A1,A2);
 A4:=A1<EMA(CLOSE,120);
 A5:=3*SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,21,1)-2*SMA(SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,20,1),8,1),CIRCLEDOT,COLORFF9900 ;
安全:=20;
关注:=IF(CROSS(A5,安全),50,0),STICK,COLORMAGENTA,LINETHICK2;
收钱:=IF(CROSS(VARC,牛市) AND VARC>VARD AND VARC<55 AND C>O,50,0),COLORLIRED,POINTDOT;
 A6:=LLV(C,500)=LLV(C,5) AND C/REF(C,1)>(1+9.8/100);
 SEU:IF(A6,牛市,0),COLORGREEN,LINETHICK2;
 STICKLINE((收钱>0 AND 收钱<400) OR (SEU>0 AND SEU<400)
 OR (关注>0 AND 关注<400) OR (关注>0),30,收钱,1,0),COLORRED;
 A:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3),COLORYELLOW,LINETHICK0;
警惕线:80,COLORRED,LINETHICK2;
关注线:10,COLORGREEN,LINETHICK2;
操盘线:A,COLORWHITE,LINETHICK2;