通达信潜龙出击附图源码
VAR1:=(CLOSE+HIGH+LOW+OPEN)/4;
VAR2:=SUMBARS(VOL,CAPITAL);
VAR3:=HHV(VAR1,VAR2);
VAR4:=LLV(VAR1,VAR2);
VAR5:=(2*VAR1-VAR4-REF(VAR4,1))/(VAR3-VAR4);
VAR6:=(VAR1-VAR4)/(VAR3-VAR4);
VAR7:=IF(VAR1<=VAR4,VAR5*60,VAR6*60);
VAR8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30);
VAR9:=EMA(VAR8,7);
VARA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100;
VARB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5;
波段买入:IF(VARA+VARB<7 AND CROSS(VAR8,VAR9) AND VAR9<(-18) AND VAR9<VARB,60,50),COLORYELLOW;
TDXSTEP134:DRAWICON(波段买入=60,70,1),COLORRED;
VARC:=HHV(HIGH,9)-LLV(LOW,9);
VARD:=HHV(HIGH,9)-CLOSE;
VARE:=CLOSE-LLV(LOW,9);
VARF:=VARD/VARC*100-70;
VAR10:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR11:=(2*CLOSE+HIGH+LOW)/4;
VAR12:=SMA(VARE/VARC*100,3,1);
VAR13:=LLV(LOW,34);
VAR14:=SMA(VAR12,3,1)-SMA(VARF,9,1);
VAR15:=IF(VAR14>100,VAR14-100,0);
VAR16:=HHV(HIGH,34);
VAR17:EMA((VAR11-VAR13)/(VAR16-VAR13)*100,8);
强弱分界:VAR17,COLORYELLOW;
VAR18:=EMA(VAR17,5);
TDXSTEP135:STICKLINE(VAR17>0 AND VAR17-VAR18>=0,79,80,6,0),COLORRED;
TDXSTEP136:STICKLINE(VAR17>0 AND VAR17-VAR18<0,79,80,6,1),COLORGREEN;
TDXSTEP137:STICKLINE(VAR17>0 AND VAR17-VAR18>=0,19,20,6,0),COLORRED;
TDXSTEP138:STICKLINE(VAR17>0 AND VAR17-VAR18<0,19,20,6,1),COLORGREEN;
TDXSTEP139:STICKLINE(VAR17-VAR18>0,VAR17,VAR18,8,1),COLORRED;
TDXSTEP140:STICKLINE(VAR17-VAR18<0,VAR17,VAR18,8,1),COLORGREEN;
{-----------------------------------}
