以下是通达信分时抓涨停源码副图(无源码的请下载附件导入)
{分时抓涨停}
涨幅%:DYNAINFO(14)*100,NODRAW;
SHOU:=1;
SHI:=BETWEEN((DCLOSE*SHOU)/(SUM(AMOUNT,BARSCOUNT((DCLOSE*SHOU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*SHOU)))),1.05,0.95);
TOU:=IF(SHI=0,MA((DCLOSE*SHOU),BARSCOUNT((DCLOSE*SHOU))),(SUM(AMOUNT,BARSCOUNT((DCLOSE*SHOU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*SHOU)))));
动力线:EXPMA((DCLOSE/TOU),13),COLORFFFF00,LINETHICK1;
趋势线:=EXPMA((DCLOSE/TOU),88),COLOR0080FF,LINETHICK2;
NOTEXT1:1.003,COLORLIGREEN,LINETHICK2;
NOTEXT2:1.03,COLORLIRED,LINETHICK2;
DRAWTEXT(CROSS(EXPMA((DCLOSE/TOU),20),1.04),1.04,'OR涨停'),COLORYELLOW;
IF(动力线>1.003,动力线,DRAWNULL),COLORMAGENTA;
IF(动力线>1.03,动力线,DRAWNULL),COLORRED;
DRAWICON(CROSS(动力线,1.03),1.03,13);
626400851.png
|