以下是通达信极低副图指标源码(无源码的请下载附件导入)
VAR1:=SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,3,1),3,1);
VAR2:=(EMA(IF(LOW<=LLV(LOW,30),(EMA(IF(CLOSE*1.2,(SMA(ABS(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1)*100)*10,SMA(ABS(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1)*100/10),3)+(HHV(EMA(IF(CLOSE*1.2,(SMA(ABS(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1)*100)*10,SMA(ABS(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1)*100/10),3),30))*2)/2,0),3)/618*IF(LLV(LOW,58),1,0));
QQ:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/1000)/1000));
STICKLINE(VAR2>VAR1,(CLOSE-QQ)/QQ*1000-15,(CLOSE-QQ)/QQ*1000+30,2,1),COLORGREEN ;
STICKLINE(CROSS((CLOSE-QQ)/QQ*1000,-166),-200,60,1,0),COLORCYAN ;
STICKLINE(CROSS((CLOSE-QQ)/QQ*1000,-120),-180,50,1,0),COLORYELLOW ;
STICKLINE(CROSS((CLOSE-QQ)/QQ*1000,-88),-140,20,1,0),COLORGREEN ;
DRAWTEXT(CROSS((CLOSE-QQ)/QQ*1000,-166),-160,'★:极低'),COLORCYAN;
DRAWTEXT(CROSS((CLOSE-QQ)/QQ*1000,-120),-80,'★:较低'),COLORYELLOW;
DRAWTEXT(CROSS((CLOSE-QQ)/QQ*1000,-88),0,'★:稍低'),COLORGREEN;
148433453.jpg
|