通达信李荣四量图副图源码贴图
DRAWGBK(C>O,RGB(1,0,0),RGB(0,0,0),0,'李荣背景图',0);
李荣主力版本:DATE+2900/00/00,NODRAW ,COLORRED;
{至尊版参数为SMA1/2/100/24/SMA2/2/100/14/SMA3/2/100/6/SMA4/2/100/6 }
{散户量}
X:= VOL/MA(VOL,30) - 1;
BQIUV:= SUM(X,0);
BQIUVEMA6:= MA(BQIUV,SMA3);
STICKLINE(BQIUV>=BQIUVEMA6,9,11,5,0),{COLOR0000AA}COLORRED;
STICKLINE(BQIUV<BQIUVEMA6,9,11,5,0),COLOR009900;
{-----------------------------------------------}
{机构量，已确定}
WVAD:= SUM((CLOSE - OPEN)/(HIGH - LOW) * VOL,SMA1)/10000;
MAWVAD:=MA(WVAD,6);
STICKLINE(MAWVAD>=0,3,5,5,0),COLORRED;
STICKLINE(MAWVAD<0,3,5,5,0),COLOR009900;
{======================================================}
J:=MAX(MA(C,30),MA(C,60));
K:=MIN(MA(C,30),MA(C,60));
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
DKX:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
MADKX:=MA(DKX,6);
MDD:=(DKX-MADKX)*1.2;
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,6)-EMA(V1,55);
V3:=EMA(V2,6);
V4:=2*(V2-V3)*5.5;
V5:=(V2-V3)*0.06;
V6:=MDD+V5;
STICKLINE(V6>=0,-0.59,-2.9,5,0),COLORRED{COLOR017700},LINETHICK2;
STICKLINE(V6<0,-0.59,-2.9,5,0),{COLOR017700}COLOR009900,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,IF(V>=0,-1.4,0),'主力合伙人XEV'),COLORCYAN;
{主力量}
RAWEMV:= ((HIGH + LOW)/2 - (REF(HIGH,1) + REF(LOW,1))/2)/(AMO/(HIGH - LOW));
XL:= EMA(RAWEMV,SMA2) * 100000 * 1000;
XEV:(XL),NODRAW,COLORRED;{14}
STICKLINE(XEV>=0,0,2,5,0),COLORRED;
STICKLINE(XEV<0,0,2,5,0),COLOR009900;
{+++++++++++++++++++++++++++++++++++++++}
{游资量，另一版本2号本集中}
RES1:=MA(CLOSE,30);
RES2:=MA(AMOUNT,30);
LC1:= (CLOSE/ RES1-1)*100;
LC2:= (AMO/ RES2-1)*100;
SOURCE1:=LC2-LC1;
SOURCE2:= MA(SOURCE1,30);
REF1:=REF(SOURCE2,1);
REF2:=REF(SOURCE1,30);
SV:=(REF1*30-(REF2)+(REF1))/30;
SVEMA6:= EMA(SV,SMA4);
STICKLINE(SV>=SVEMA6,6,8,5,0),COLORRED;
STICKLINE(SV<SVEMA6,6,8,5,0),COLOR009900;
{===========================================}
DRAWTEXT(ISLASTBAR=1,IF(V>=0,9.8,0),'◆＜游客散户'),COLORWHITE;
DRAWTEXT(ISLASTBAR=1,IF(V>=0,6.8,0),'◆＜游击游资'),COLORYELLOW;
DRAWTEXT(ISLASTBAR=1,IF(V>=0,3.8,0),'★＜超级机构'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR=1,IF(V>=0,1.2,0),'★＜超级主力'),{COLOR000099}COLORRED;
游行散户:(BQIUV),COLORWHITE,NODRAW;
游击游资:(SV),COLORYELLOW,NODRAW;
超级机构:(MAWVAD),COLORBLUE,NODRAW;
超级主力:(XEV),COLORGREEN,NODRAW;
主力合伙人XEV:(V6),COLORCYAN,NODRAW;
