通达信平安主图主图源码

2016-11-04 20:47:00来源:本站整理浏览:597

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.135,0.99,0,'净流入:(万)'),COLORYELLOW;
主买A:=ACTINVOL,COLORRED,NODRAW;
主卖A:=ACTOUTVOL,COLORGREEN,NODRAW;
主买:=主买A*100/(主买A+主卖A),NODRAW,COLORRED;
主卖:=主卖A*100/(主买A+主卖A),NODRAW,COLORGREEN;
大单买比:=LARGEINTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL);
大单卖比:=LARGEOUTTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL);
主力净买量:=(LARGEINTRDVOL-LARGEOUTTRDVOL),COLORYELLOW,NODRAW;
主动买卖差:=(ACTINVOL-ACTOUTVOL),COLORMAGENTA,NODRAW;
主力资金差:=((L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1)))/10000,COLORCYAN,NODRAW;
主力买力度:=LARGEINTRDVOL*100/VOL;
主力卖力度:=LARGEOUTTRDVOL*100/VOL;
主买力度比:=主力买力度/(主力买力度+主力卖力度)*100,NODRAW;
主卖力度比:=主力卖力度/(主力买力度+主力卖力度)*100,NODRAW;
力度比限制:=IF((LARGEINTRDVOL+LARGEOUTTRDVOL)=0,0,大单买比);
JGV:=(L2_VOL(0,0) - L2_VOL(0,1))*VOL/100000000,COLORRED;
DHV:=(L2_VOL(1,0) - L2_VOL(1,1))*VOL/100000000,COLORFF00FF;
ZHV:=(L2_VOL(2,0) - L2_VOL(2,1))*VOL/100000000,COLOR00FFFF;
SHV:=(L2_VOL(3,0) - L2_VOL(3,1))*VOL/100000000,COLORFFFFFF;
NOTEXT大量动向:=MA((JGV+DHV),5),COLORYELLOW;
超级大量:=JGV,COLOR0000FF,NODRAW;
机构大量:=DHV,COLORMAGENTA,NODRAW;
大量博弈:=(JGV+DHV),COLORYELLOW,NODRAW;
小量博弈:=(ZHV+SHV),COLORWHITE,NODRAW;
大量资金比:=大量博弈/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
大量资金比限制:=IF(大量资金比=0,-100,大量资金比);
大量强度比:=IF(大量资金比>0,(大量资金比限制+100)/2,IF(大量资金比<0,100-ABS((大量资金比限制-100)/2),0)),COLORGREEN,NODRAW;
小量资金比:=小量博弈/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
小量强度比:=IF(小量资金比>=0,(小量资金比+100)/2,100-ABS((小量资金比-100)/2)),COLORCYAN,NODRAW;
MVR:=REF(MA(V,5),1);
FVR:=REF(V,1);
PVR:=(MVR+FVR)/2;
量能比:=V/(V+PVR)*100/FROMOPEN*240;
{量能饱和度}
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
【量能饱和】:=IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW;
{活跃度}
LC:=REF(CLOSE,1);
RSI5:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃度:=(RSI5-WR10),COLORFFFF00,LINETHICK1,NODRAW;
活跃度比:=IF(活跃度>=0,(活跃度+100)/2,100-ABS((活跃度-100)/2));
DRAWRECTREL(80,0,240,40,RGB(0,75,200));
DRAWRECTREL(80,0,160,40,RGB(0,250,50));
DRAWRECTREL(80,0,80+CONST(力度比限制*160/100),40,RGB(200,0,50));
DRAWTEXT_FIX(1,0.00,0.00,0,STRCAT(STRCAT('买卖力度比 ',CON2STR(大单买比,2)),'％买')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.33,0.00,0,STRCAT(STRCAT('',CON2STR(大单卖比,2)),'％卖')),COLORGREEN;}
DRAWRECTREL(80,50,240,90,RGB(0,100,0));
DRAWRECTREL(80,50,160,90,RGB(0,250,50));
DRAWRECTREL(80,50,80+CONST(大量强度比*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.00,0.05,0,STRCAT(STRCAT('大量强度比 ',CON2STR(大量强度比,2)),'％买')),COLORYELLOW;
DRAWRECTREL(330,0,490,40,RGB(0,75,200));
DRAWRECTREL(330,0,410,40,RGB(0,250,50));
DRAWRECTREL(330,0,330+CONST(主买*160/100),40,RGB(175,50,250));
DRAWTEXT_FIX(1,0.25,0.00,0,STRCAT(STRCAT('主动买卖比 ',CON2STR(主买,2)),' ％')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.33,0.10,0,STRCAT(STRCAT('',CON2STR(主卖,2)),'％卖')),COLORGREEN;}
DRAWRECTREL(330,50,490,90,RGB(0,100,0));
DRAWRECTREL(330,50,410,90,RGB(0,250,50));
DRAWRECTREL(330,50,330+CONST(机构参与度*160/100),90,RGB(200,0,50));
DRAWTEXT_FIX(1,0.25,0.05,0,STRCAT(STRCAT('机构参与度 ',CON2STR(机构参与度,2)),' ％')),COLORYELLOW;
DRAWRECTREL(580,0,740,40,RGB(0,100,0));
DRAWRECTREL(580,0,660,40,RGB(0,250,50));
DRAWRECTREL(580,0,580+CONST(大单流入限制*160/100),40,RGB(200,0,50));
DRAWTEXT_FIX(1,0.500,0.00,0,STRCAT(STRCAT('大单流入比 ',CON2STR(大单流入限制,2)),' ％买')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.83,0.01,0,STRCAT(STRCAT('',CON2STR(大单流出限制,2)),' ％卖')),COLORGREEN;}
DRAWRECTREL(580,50,740,90,RGB(0,200,250));
DRAWRECTREL(580,50,660,90,RGB(0,250,50));
DRAWRECTREL(580,50,580+CONST(大单强度比*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.500,0.05,0,STRCAT(STRCAT('大单强度比 ',CON2STR(大单强度比,2)),' ％买')),COLORYELLOW;
DRAWRECTREL(830,0,990,40,RGB(0,100,0));
DRAWRECTREL(830,0,910,40,RGB(0,250,50));
DRAWRECTREL(830,0,830+CONST(总流入比*160/100),40,RGB(175,50,250));
DRAWTEXT_FIX(1,0.75,0.00,0,STRCAT(STRCAT('资金流入比 ',CON2STR(总流入比,2)),' ％')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.83,0.10,0,STRCAT(STRCAT('',CON2STR(总流出比,2)),' ％卖')),COLORGREEN;}
DRAWRECTREL(830,50,990,90,RGB(0,200,250));
DRAWRECTREL(830,50,910,90,RGB(0,250,50));
DRAWRECTREL(830,50,830+CONST(量能比*160/100),90,RGB(200,0,50));
DRAWTEXT_FIX(1,0.75,0.05,0,STRCAT(STRCAT('资金量能比 ',CON2STR(量能比,2)),' ％')),COLORYELLOW;
DRAWRECTREL(365,890,655,930,RGB(0,100,0));
DRAWRECTREL(365,890,510,930,RGB(0,200,50));
DRAWRECTREL(365,890,360+CONST(活跃度比*300/100),930,RGB(150,10,250));
DRAWTEXT_FIX(1,0.318,0.89,0,STRCAT(STRCAT('活跃度 ',CON2STR(活跃度比,2)),' ％')),COLORYELLOW;