【通达信免费源码】资金生命指标副图 资金流向 波段 短线 买卖点 操盘控盘

主力买力度:=LARGEINTRDVOL*100/VOL;

主力卖力度:=LARGEOUTTRDVOL*100/VOL;

AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW;

DRAWRECTREL(1,128,CONST(ABS(主力买力度)*500/AAD),300,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0)));

DRAWRECTREL(1,600,CONST(ABS(主力卖力度)*500/AAD),780,IF(CONST(主力卖力度)>0,RGB(0,150,250),RGB(0,50,0)));

DRAWTEXT_FIX(1,0,0.18,0,STRCAT('主力买力度:',CON2STR(主力买力度,0))),COLORYELLOW;

DRAWTEXT_FIX(1,0,0.60,0,STRCAT('主力卖力度:',CON2STR(主力卖力度,0))),COLORWHITE;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

K角:=ATAN((K/REF(K,3)-1)100)90/3.1416,COLORCYAN;

D角:ATAN((D/REF(D,1)-1)100)90/3.1416,COLORGREEN;

长期:(C-LLV(L,30))/(HHV(C,30)-LLV(L,30))*100,COLORBLUE;

长期角:ATAN((长期/REF(长期,5)-1)100)90/3.1416,COLORYELLOW;

IF(长期>79,长期,DRAWNULL),COLORMAGENTA,LINETHICK4;

IF(长期>49,长期,DRAWNULL),COLORLIMAGENTA,LINETHICK4;

DRAWICON(CROSS(长期,50),50,1);