通达信无尽分时副图源码

VAR1:=LLV(LOW,100);

VAR2:=HHV(HIGH,250);

操盘线: EMA((CLOSE-VAR1)/(VAR2-VAR1)*4,4),COLORD9D919;

绝底:0.3,LINETHICK1,COLOR0000FF; 

绝顶:3.5,LINETHICK1,COLORGREEN;

分界:2,COLORC0C0C0;

{DRAWTEXT(CROSS(操盘线,绝底),0.20,'买入'), COLORYELLOW;}

DRAWICON(CROSS(操盘线,绝底),0.0,1);

DRAWICON(CROSS(操盘线,绝顶),3.8,2);

STICKLINE(CROSS(操盘线,绝顶),3.5,2,1,0);

STICKLINE(CROSS(操盘线,绝底),2,0.3,1,0);

{益盟T+0*显示阻力支撑}

MA30:=EMA(CLOSE,30);

强弱:EMA(CLOSE,900),NODRAW;

H1:=MAX(DYNAINFO(3),DYNAINFO(5));

L1:=MIN(DYNAINFO(3),DYNAINFO(6));

P1:=H1-L1;

阻力:L1+P1*7/8,COLOR00DD00,NODRAW;

支撑:L1+P1*0.5/8,COLORRED,NODRAW;

{机构分时*显示买卖比}

成交额:=V*C/100,NODRAW;{万元}

A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A6:=((A2+A3)+A4)+A5;

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

A9:=IF((ISLASTBAR),((100*A4)/A6),0);

A10:=IF((ISLASTBAR),((100*A5)/A6),0);

{机构买:(A2),LINETHICK6,COLORRED;

机构卖:(A3),LINETHICK6,COLORFFFF55;

机构进出:=机构买-机构卖,NODRAW;

散户买:(A4),COLOR5555FF;{细红线}

{散户卖:(A5),COLOR55FF55;{细绿线}

{强势:=((100*A2)/A6>50);

STICKLINE(强势,机构买*1.02,机构买*1.1,1,0),COLORYELLOW;

拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;

STICKLINE(拉升,机构买*1.1,机构买*1.2,1,0),COLORFF00FF;

DRAWTEXT(ISLASTBAR=1,机构买*0.95,'●机构买'),LINETHICK2,COLORRED;

DRAWTEXT(ISLASTBAR=1,机构卖*0.95,'○机构卖'),LINETHICK2,COLORFFFF55;

DRAWTEXT(机构进出>0 AND REF(机构进出,1)<=0,机构买*1.02,'●机买'),COLORRED;

DRAWTEXT(机构进出<0 AND REF(机构进出,1)>=0,机构买*0.98,'○机卖'),COLORFFFF55;}

DD1:=1;

AAA1:=STRCAT(STRCAT('机构买: ',CON2STR((100*A2)/A6,0)),'%');

AAA2:=STRCAT(STRCAT('机构卖: ',CON2STR((100*A3)/A6,0)),'%');

AAA3:=STRCAT(STRCAT('散户买: ',CON2STR((100*A4)/A6,0)),'%');

AAA4:=STRCAT(STRCAT('散户卖: ',CON2STR((100*A5)/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0,1,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0.12,1,0,AAA2),COLORFFFF55;

DRAWTEXT_FIX(DD1=1,0.24,1,0,AAA3),COLOR5555FF;

DRAWTEXT_FIX(DD1=1,0.36,1,0,AAA4),COLOR55FF55;