以下是通达信天河彩虹主图指标(无源码的请下载附件导入)
天河彩虹图H1:EMA(CLOSE,8);
H2:EMA(天河彩虹图H1,20);
LH:EMA(CLOSE,240),COLORRED;
VAR1:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
VAR2:=SMA(VAR1,5,1);
VAR3:=SMA(VAR2,8,1);
VAR4:=CROSS(VAR2,VAR3) AND VAR3<20;
VAR5:=CLOSE>LLV(CLOSE,60)+0.3*LLV(CLOSE,60) AND VAR4;
VAR6:=IF(CLOSE>1000,VAR4,VAR5);
DRAWICON(CROSS(天河彩虹图H1,H2) AND CLOSE<EMA(CLOSE,60),LOW,1);
DRAWICON(VAR6,H,2);
STICKLINE(天河彩虹图H1>H2,天河彩虹图H1,H2,1,1),COLORLIMAGENTA;
STICKLINE(天河彩虹图H1>H2,天河彩虹图H1,H2,1,2),COLORLIMAGENTA;
STICKLINE(天河彩虹图H1<H2,天河彩虹图H1,H2,1,1),COLORBLUE;
DRAWTEXT(CROSS(天河彩虹图H1,H2),天河彩虹图H1*0.97,'●'),COLORYELLOW;
DRAWTEXT(CROSS(天河彩虹图H1,H2),天河彩虹图H1*0.968,'●'),COLORRED;
DRAWTEXT(CROSS(天河彩虹图H1,H2),天河彩虹图H1*0.985,'↑'),COLORRED;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K51:=SMA(RSV,9,1);
D15:=SMA(K51,9,1);
J25:=3*K51-2*D15;
AXX:=CROSS(K51,D15);
BXX:=CROSS(D15,K51);
DRAWTEXT(AXX,H,'-----------'),COLOR0000FF;
DRAWTEXT(BXX,L,'-----------'),COLOR00FF00;
724400083.png
|