VOL红绿灯指标 通达信公式(附图)

[复制链接]
查看127 | 回复0 | 2021-8-20 15:42:03 | 显示全部楼层 |阅读模式

VOLUME:VOL,VOLSTICK;
预测:=IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),0),NODRAW;
TT:=IF(ISLASTBAR,预测/VOL,1),NODRAW;
换手:=HSCOL,NODRAW,COLOR00FF00;
MA5换:SUM(HSCOL,5),NODRAW,COLOR00FFFF;
月换:SUM(HSCOL,20),NODRAW,COLORFFFF80;
V倍:VOL/REF(VOL,1),NODRAW,COLORFFFF80;
JJQ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=QJ0*(MIN(OPEN,CLOSE)-LOW);
QJ2:=QJ0*(JJQ-MIN(CLOSE,OPEN));
QJ3:=QJ0*(HIGH-MAX(OPEN,CLOSE));
QJ4:=QJ0*(MAX(CLOSE,OPEN)-JJQ);
千钧DDX:IF(HIGH=LOW,4*QJ0,((QJ1+QJ2)-(QJ3+QJ4)))/SUM(VOL,10)*100,NODRAW,COLOR80FF00;
ZFA:=(C/REF(C,1)-1)*100;
ZFB1:=(C/O-1)*100;
ZF:MAX(ZFA,ZFB1),NODRAW,COLOR00FFFF;
VARA2:=LLV(MA(LOW,3),3);
VARA3:=HHV(MA(HIGH,3),3);
NN1:=120;
HH:=HHV(V*TT,NN1);
LL:=LLV(V,NN1);
最高:=CONST(HH);
最低:=CONST(LL);
RCC:=最高*0.9-(最高-最低)*0.5;
RHL:=RCC;
HLMAX:=最高;
HLMIN:=最低;
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
HLMN3:=(100-0)/2*1.3;
HLMN4:=(100-0)/1*1.3;
P:=最高/120;
神:=2*SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1)-(3*HHV(SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1),2)-2*SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1));
奇:=(2*神+EMA((2*(C+L)/2+(H+C)/2+L+O)/5,2)+2*((EMA((C*2+H+L+O)/5,5)+MA((C*2+H+L+O)/5,13)+MA((C*2+H+L+O)/5,21))/3)+((EMA
((C*2+H+L+O)/5,13)+MA((C*2+H+L+O)/5,21)+MA((C*2+H+L+O)/5,34))/3)+((EMA((C*2+H+L+O)/5,21)+MA((C*2+H+L+O)/5,34)+MA((C*2+H+L+O)/5,55))/3))/7;
分清:=(FORCAST(HHV((C+L)/2,1),21)+(EMA(((C+L)/2+L+(H+C)/2)/3,55)-(C-EMA(((C+L)/2+L+(H+C)/2)/3,55))))/2;
放心买入:=(((C+L)/2+(H+C)/2+L)/3+(3*(C+H+L+(O+C+L)/3)/4-2*(C+L)/2))/2;
强:=(EMA((分清+3*((EMA(放心买入,5)*5+分清)/6+((EMA(奇,5)+EMA(奇,8)+EMA(奇,13))/3))/2)/4,3)/3),POINTDOT,COLOR00FFFF;
验证:=((((C+L)/2-LLV(L,24))/(HHV((H+C)/2,24)-LLV(L,24))*1.1*(C+L)/2));
续持验证:=EMA((2*(5*((EMA((2*C+L)/3,2)-EMA((2*C+H)/3,5))
-EMA((EMA((2*C+L)/3,2)-EMA((2*C+H)/3,5)),21)))
+(((C*2+H)/3+(C*2+H)/3)/2)+EMA(验证,2))/4,2),COLOR555555;
比:=TT;
昨V:=TT;
T:=IF(ISLASTBAR,IF(FROMOPEN>60,IF(FROMOPEN-INTPART(FROMOPEN/60)*60=0,1,
60/(FROMOPEN-INTPART(FROMOPEN/60)*60)),60/FROMOPEN),1);
WJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-WJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,WJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5);
V7:=(V2*V5);
V8:=(V3*V5);
V9:=(V4*V5);
买盘1:=DYNAINFO(23)*比;
卖盘1:=DYNAINFO(22)*比;
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
买盘A:=IF(ISLASTBAR AND PERIOD=5 AND C<300,买盘1,买盘2);
卖盘A:=IF(ISLASTBAR AND PERIOD=5 AND C<300,卖盘1,卖盘2);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),POINTDOT,COLORRED;
主卖:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL /2)),LINETHICK0,COLORGREEN;
净流:主买-主卖,NODRAW,COLOR4080FF;VOL,VOLSTICK;
ZLCM1:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算}
ZZLKP:=ZLCM1/(ZLCM1+SHCM);{//主力控盘筹码比率}
ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}
DD1:=EMA((O+H+L)/3,4)COLORWHITE,NODRAW;
DD2:=EMA(C+(H-L)*0.618,3)COLORYELLOW,NODRAW;
密码1:=DD2+(DD2-DD1)*0.618,NODRAW,COLORWHITE;{明卖}
密码2:=EMA((O+H+L)/3,4)+((H+L)/2-REF((O+H+L)/3,3))/4,NODRAW;{明买}
密码3:=MA(REF(密码1,1),1)*1,COLORLIMAGENTA,NODRAW;{今卖}
密码4:=REF(密码2,1),COLORLIMAGENTA,NODRAW;{今买}
密码5:=MA(REF(DD2,1),1)*1,COLORLIMAGENTA,NODRAW;{今卖}
密码6:=REF(DD1,1),COLORLIMAGENTA,NODRAW;{今买}
STICKLINE(1,HLMAX,HLMAX*0.96,5,0),COLORGREEN;
红灯买:STICKLINE(密码1>密码3,HLMAX,HLMAX*0.96,5,0),COLORRED;
STICKLINE(1,HLMAX*0.98,HLMAX*0.98,5,0),COLORWHITE;
STICKLINE(1,HLMAX*0.93,HLMAX*0.89,5,0),COLORRED;
绿灯卖:STICKLINE(密码2<=密码4,HLMAX*0.93,HLMAX*0.89,5,0),COLORGREEN;
STICKLINE(1,HLMAX*0.91,HLMAX*0.91,5,0),COLORWHITE;
操作段1:STICKLINE(密码1>(密码3) AND C>密码2 OR 密码2>密码4,HLMAX*0.82,HLMAX*0.86,5,0),COLORRED;
操作段2:STICKLINE(C>密码2 AND 密码1>密码3,HLMAX*0.82,HLMAX*0.86,5,0),COLORMAGENTA;
操作段3:STICKLINE(密码1<密码3 AND 密码2>密码4,HLMAX*0.82,HLMAX*0.86,5,0),COLORYELLOW;
STICKLINE(密码1>(密码3) AND C>密码2 OR 密码2>密码4 OR C>密码2 AND 密码1>密码3,HLMAX*0.84,HLMAX*0.84,5,0),COLORWHITE;
IF(ZZLJJ<REF(ZZLJJ,1),-35*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ZZLJJ>REF(ZZLJJ,1),-35*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(续持验证<强,-5*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(续持验证>=强,-5*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(续持验证>= REF(续持验证,1),-11*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(续持验证< REF(续持验证,1),-11*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ZF<0,-17*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ZF>0,-17*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(千钧DDX<0,-23*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(千钧DDX>0,-23*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
个股资金线:=MA(C,1)/MA(REF(C,18),18)*100;
资金生命线:=MA(FORCAST(个股资金线,20),6);
生命线:个股资金线>资金生命线,COLOR000000,STICK,LINETHICK1;
IF(生命线<=0,-29*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(生命线>0,-29*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
CC:=CLOSE;
WW:=(CC-LOW+0.01)/(HIGH-LOW+0.01);
N120:=IF(BARSSINCE(CLOSE>0)<120,BARSSINCE(CLOSE>0),120);
N90:=IF(BARSSINCE(CLOSE>0)<90,BARSSINCE(CLOSE>0),90);
N55:=IF(BARSSINCE(CLOSE>0)<55,BARSSINCE(CLOSE>0),55);
N34:=IF(BARSSINCE(CLOSE>0)<34,BARSSINCE(CLOSE>0),34);
ZLCMA:=(DMA(WW,VOL/(MA(VOL,N120)*N120))+DMA(WW,VOL/(MA(VOL,N90)*N90))+DMA(WW,VOL/(MA(VOL,N55)*N55))+DMA(WW,VOL/(MA(VOL,N34)*N34)))/4*800;
NN:=IF(PERIOD=5,240,IF(PERIOD=6,360,240));
ZLCMC:=(ZLCMA-LLV(ZLCMA,NN))*100/(HHV(ZLCMA,NN)-LLV(ZLCMA,NN));
ZLCMB:=WINNER(CLOSE)*100;
ZLB:=IF(ZLCMB>0,ZLCMB,DRAWNULL);
ZLCM:=IF(ZLB=DRAWNULL,ZLCMC,ZLCMB);
ZLQS:EMA(ZLCM,3),COLORYELLOW;
BBCM:=ZLQS-REF(ZLQS,1);
IF(BBCM<0,-35*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(BBCM>0,-35*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
多头:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,0),COLOR000088;
STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,2,0),COLOR0000AA;
STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,1,0),COLOR0000DD;
STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,0.5,0),COLOR0000FF;
空头:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,0),COLOR008800;
STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,2,0),COLOR00AA00;
STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,1,0),COLOR00DD00;
STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,0.5,0),COLOR00FF00;
加仓:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE > OPEN)),0,VAR6,3,0),COLOR880088;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE > OPEN)),0,VAR6,2,0),COLORAA00AA;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE > OPEN)),0,VAR6,1,0),COLORDD00DD;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE > OPEN)),0,VAR6,0.5,0),COLORFF00FF;
减仓:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE < OPEN)),0,VAR6,3,0),COLOR880000;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE < OPEN)),0,VAR6,2,0),COLORBB0000;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE < OPEN)),0,VAR6,1,0),COLORDD0000;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8))
AND (CLOSE < OPEN)),0,VAR6,0.5,0),COLORFF0000;
洗盘:STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,3,0),COLOR999999;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,2,0),COLORAAAAAA;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,1,0),COLORDDDDDD;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,0.6,0),COLORFFFFFF;
高卖:STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,3,0),COLOR008888;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,2,0),COLOR00AAAA;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,1,0),COLOR00DDDD;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,0.5,0),COLOR00FFFF;
B1:=(买盘A+卖盘A)<MA(V,60)/3 ;
B2:=MA(V,5)/2>V AND V>B1;
((80-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1,DOTLINE;
((50-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1,DOTLINE;
((20-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1,DOTLINE;
((10-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1;
KA:=(EMA((CLOSE-VARA2)/(VARA3-VARA2)*100,4)-50)*0.5+50;
DB:=EMA(0.667*REF(KA,1)+0.333*KA,2);
JJ:=3*KA-2*DB;
((KA-HLMN3)*HLMN2/HLMN4+HLMN1),COLORFFF111,LINETHICK1;
((DB-HLMN3)*HLMN2/HLMN4+HLMN1),COLOR00FF00,LINETHICK1;
((JJ-HLMN3)*HLMN2/HLMN4+HLMN1),COLORFF00FF,LINETHICK1;
DRAWTEXT_FIX(1,0.01,0.24,0,'【白洗盘进】__【黄高抛低吸】__【粉庄进追】__【兰绿庄撤卖】'),COLORFFFF00;
DRAWICON(V>=3*REF(V,1) AND O<C,V*1.1,23);
DRAWICON(V>=2*REF(V,1) AND O<C,V*0.8,25);

1534462362-0.jpg

1534462362-0.jpg

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则