以下是通达信绝对控盘源码副图(无源码的请下载附件导入)
VAR2Q:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2Q),13,1)/SMA(MAX(LOW-VAR2Q,0),13,1)*100;
VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,56),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
买:=DRAWICON(XL3,VAR8*3,4);
控盘1:=买 AND FILTER(XL3,10);
TDXSTEP380:STICKLINE(XL3,XL3,0,2,0),COLORRED;
TDXSTEP381:DRAWTEXT(控盘1,0.9,26),COLORRED;
TDXSTEP382:DRAWTEXT(控盘1,0.9,27),COLORBLUE;
{-----------------------------------}
654544759.jpg
|