「翔博精选指标」提款机，成交量类公式（通达信公式 副图 源码
2021-11-02原创 编 辑：翔博软件
提款机，成交量类公式，可以替换成交量了。
{流通盘}
HH2:=CONST(HHV(H,160));
LL:=CONST(LLV(L,160)); HL2:=CONST(IF(CONST(REF(MA(C,10),10))>CONST((HH2+LL)/2),0.0,0.0));
DRAWNUMBER_FIX(1,0.21,HL2,0,CONST(FINANCE(7)/100000000))COLORBROWN;
{低开高走紫空心}
走:=C/REF(C,2)<=0.96 AND V<HHV(V,31)/1.9;
BB走:=O<REF(C,1);
CC走:=C>O;
DD走:=V<REF(V,1);
高走:=走 AND BB走 AND CC走 AND DD走;
STICKLINE(高走,0,V,3.5,0),COLORMAGENTA;
STICKLINE(高走,0,V,2.0,1),COLORMAGENTA;
XGX7:=ABS((VOL-REF(VOL,7))/REF(VOL,7))<0.04 AND
VOL>1.8*REF(VOL,2) AND
REF(VOL,1)<REF(VOL,7) AND
REF(VOL,2)<REF(VOL,7) AND
REF(VOL,3)<REF(VOL,7) AND
REF(VOL,(7-3))<REF(VOL,7) AND
REF(VOL,(7-2))<REF(VOL,7) AND
REF(VOL,(7-1))<REF(VOL,7);
XGX8:=ABS((VOL-REF(VOL,8))/REF(VOL,8))<0.04 AND
VOL>1.8*REF(VOL,2) AND
REF(VOL,1)<REF(VOL,8) AND
REF(VOL,2)<REF(VOL,8) AND
REF(VOL,3)<REF(VOL,8) AND
REF(VOL,(8-3))<REF(VOL,8) AND
REF(VOL,(8-2))<REF(VOL,8) AND
REF(VOL,(8-1))<REF(VOL,8);
XGX9:=ABS((VOL-REF(VOL,9))/REF(VOL,9))<0.04 AND
VOL>1.8*REF(VOL,2) AND
REF(VOL,1)<REF(VOL,9) AND
REF(VOL,2)<REF(VOL,9) AND
REF(VOL,3)<REF(VOL,9) AND
REF(VOL,(9-3))<REF(VOL,9) AND
REF(VOL,(9-2))<REF(VOL,9) AND
REF(VOL,(9-1))<REF(VOL,9);
XGX10:=ABS((VOL-REF(VOL,10))/REF(VOL,10))<0.04 AND
VOL>1.8*REF(VOL,2) AND
REF(VOL,1)<REF(VOL,10) AND
REF(VOL,2)<REF(VOL,10) AND
REF(VOL,3)<REF(VOL,10) AND
REF(VOL,(10-3))<REF(VOL,10) AND
REF(VOL,(10-2))<REF(VOL,10) AND
REF(VOL,(10-1))<REF(VOL,10);
XGX11:=ABS((VOL-REF(VOL,11))/REF(VOL,11))<0.04 AND
VOL>1.8*REF(VOL,2) AND
REF(VOL,1)<REF(VOL,11) AND
REF(VOL,2)<REF(VOL,11) AND
REF(VOL,3)<REF(VOL,11) AND
REF(VOL,(11-3))<REF(VOL,11) AND
REF(VOL,(11-2))<REF(VOL,11) AND
REF(VOL,(11-1))<REF(VOL,11);
XGX12:=ABS((VOL-REF(VOL,12))/REF(VOL,12))<0.04 AND
VOL>1.8*REF(VOL,2) AND
REF(VOL,1)<REF(VOL,12) AND
REF(VOL,2)<REF(VOL,12) AND
REF(VOL,3)<REF(VOL,12) AND
REF(VOL,(12-3))<REF(VOL,12) AND
REF(VOL,(12-2))<REF(VOL,12) AND
REF(VOL,(12-1))<REF(VOL,12);
DRAWTEXT(XGX7,V,'7'),COLORFFFF00;
DRAWTEXT(XGX8,V,'8'),COLORFFFF00;
DRAWTEXT(XGX9,V,'9'),COLORFFFF00;
DRAWTEXT(XGX10,V,'10'),COLORFFFF00;
DRAWTEXT(XGX11,V,'11'),COLORFFFF00;
DRAWTEXT(XGX12,V,'12'),COLORFFFF00;
{手机附图VOL}
DRAWTEXT_FIX(1,0,0.15,0,DYBLOCK),COLOR000840; {地域}
{量柱}
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
{模拟量}
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;{NODRAW}
VOL,VOLSTICK COLORGRAY;
AA:=SUMBARS(VOL,CAPITAL);
T:=DYNAINFO(8)>0;
VO:=VOL=LLV(VOL,55) AND T;
V减1:=VOL*0.9;
V减2:=VOL*0.8;
{EMA}
日均价:=(HIGH+(LOW*2)+CLOSE)/4;
VAR7:=EMA((日均价-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*10,2);
均5:=SMA(VAR7,2,1) ;
均51:=SMA(均5,3,1);
均J:=3*均51-2*均5 ;
字:=IF(VAR7<2,24,0),LINETHICK1 COLORFF0080 ;
STICKLINE( 字,0,999,4,0),COLOR00FF00;{买柱};
ZT:=C>REF(C,1)*1.095 AND C=H;
ZT1:=C=H AND C=O AND L=H AND C>REF(C,1)*1.098;
VV:=VOL/REF(VOL,1);
T钱:=BARSLAST(VOL=HHV(VOL,30) AND VV>2.5 AND REF(ZT,1));
钱A:=1;
钱T:=COUNT(T钱,钱A)>0 AND T钱
COLORRED;
钱量:=REFX(钱T,1);
{倍量}
BLZ:=VOL>REF(V,1)*1.9;
STICKLINE(BLZ,0,V减1,0.8,0),COLOR00AAFF;
STICKLINE(BLZ,0,V减1,0.1,0),COLOR006699;
{黄金桩}
AAA桩:=(3*C+H+L+O)/6;
VAR桩:=(8*AAA桩+7*REF(AAA桩,1)+6*REF(AAA桩,2)+5*REF(AAA桩,3)+4*REF(AAA桩,4)+3*REF(AAA桩,5)+2*REF(AAA桩,6)+REF(AAA桩,8))/36;
TJ桩:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR桩;
立桩量:=FILTER(TJ桩,5);
STICKLINE(立桩量,0,V,1.1,0),COLORYELLOW;
{巨量}
巨:=VOL>REF(V,1)*2.9;
STICKLINE(巨,VOL*5/10,VOL*0/10,1.0,0),COLORRED;
{蒋军}
真阳或假阴:=C>O OR C>REF(C,1);
收阳:= REF(真阳或假阴,3);
倍量1:=REF(BLZ,3);
高量:=REF(V,3)>=HHV(V,7);
三日不破:= LLV(C,3)>=REF(L,3);
价升:=COUNT(C>=REF(C,1),3)=3;{收盘价逐升}
量缩:=COUNT(V<=REF(V,1),3)=3;
连阳:= COUNT(真阳或假阴,3)=3;
倍量将军柱:= 倍量1 AND 三日不破 AND 收阳;
高量将军柱:= 高量 AND 三日不破 AND 收阳;
将军柱:= 倍量将军柱 OR 高量将军柱;
黄金柱:=将军柱 AND 价升 AND 量缩 AND 连阳 ,COLOR0077FF;
黄A:=REFX(黄金柱,3);
倍将军:=REFX(倍量将军柱,3);
高将军:=REFX(高量将军柱,3);
STICKLINE(倍将军,VOL*6.5/10,VOL*6.3/10,1.9,0),COLORFF0080;
STICKLINE(倍将军,VOL*6.4/10,VOL*6.4/10,1.9,0),COLORYELLOW;
STICKLINE(高将军,VOL*8.5/10,VOL*8.3/10,1.9,0),COLOR545454;
STICKLINE(高将军,VOL*8.4/10,VOL*8.4/10,1.9,0),COLORWHITE;
STICKLINE(黄A ,VOL*7.5/10,VOL*7.3/10,1.9,0),COLOR8822FF;
STICKLINE(黄A ,VOL*7.4/10,VOL*7.4/10,1.9,0),COLORRED;
{阳盖阴}
开:=REF(O,1);
收:=REF(C,1);
PM:=(开-收)/开; PM2:=(O-C)/O;
昨阴线:=REF(O,1)> REF(C,1);
今阳包阴:= C>O AND C >=开 AND O<=(开+0.04) AND V>= REF(V,1) *0.85 AND PM>=0.015;
MA13:=MA(CLOSE,13);
MA20:=MA(CLOSE,20);
MA34:=MA(CLOSE,34);
MA55:=MA(CLOSE,55);
多头1:=MA13>MA34 OR MA20>=MA34;
阳盖阴:= 昨阴线AND今阳包阴AND多头1;
STICKLINE(阳盖阴,VOL*10/10,VOL*9.5/10,2.4,0)COLOR000099;
{平量}
FLZ:=V>REF(V,1)*0.98 AND V<REF(V,1)*1.02,LINETHICK0;
STICKLINE(FLZ,VOL*10/10,VOL*9.7/10,2.1,0)COLORFFFF00;
地:=V<=REF(LLV(V,100),1);
STICKLINE(地,VOL*0.5/10,VOL*0/10,1.5,0),COLORFF0000;
{}
长阴短柱:=C/REF(C,1)<=0.96 AND V<HHV(V,30)/1.9;
STICKLINE(长阴短柱 ,VOL*1.5/5,VOL*3.3/5,0.2,0),COLORCYAN;STICKLINE(长阴短柱 ,VOL*1.5/5,VOL*3.3/5,0,0),COLORFF0000;
{倍缩量涨┋}
A1S:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20) AND MA(C,20)>MA(C,60);
A2S:=C>REF(C,1);
A3S:=V/REF(V,1)<2/3 OR V/REF(V,1)<1/2;
涨S:=A1S AND A2S AND A3S;
STICKLINE(涨S,VOL*10/10,VOL*5/10,0.5,0),COLORFF75FF;
缩量涨:=COUNT(C>REF(C,1),2)=2 AND COUNT(V<REF(V,1),2)=2,NODRAW,COLORRED;
STICKLINE(缩量涨,VOL*1/5,VOL*4/5,0,0),COLOR545454;
{倍缩量=}
缩B:=REF(V,1)/V>1.93;
STICKLINE(缩B,VOL*0.6/10,VOL*0/10,2.4,1),COLORFF6600;
伸缩:=REF(VOL,1)>2*REF(VOL,2) AND REF(VOL,1)>2*VOL;
DRAWTEXT(伸缩,V,'┋'),COLORFFAA00;
极:=REF(VOL,1)>2.9*REF(VOL,2) AND REF(VOL,1)>2*VOL;
DRAWTEXT(极,V,'┃'),COLORFFFF00;
{买$}
DIF1:=EMA(C,12)-EMA(C,26);
DEA1:=EMA(DIF1,9);
MACD1:=2*(DIF1-DEA1);
QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0);
QM:=LLVBARS(MACD1,QZQ+20);
MQDZ:=IF(QM>QZQ,REF(MACD1,QM),0);
QF:=LLVBARS(DIF1,QZQ+20);
DQDZ:=IF(QF>QZQ,REF(DIF1,QF),0);
MTM1:=C-REF(C,1);
A013:=HHV(HIGH,34);
A014:=(2*CLOSE+HIGH+LOW)/4;
A015:=LLV(LOW,34);
A016:=EMA(((A014-A015)/(A013-A015))*100,13);
A017:=EMA(0.667*REF(A016,1)+0.333*A016,2);
KKMD:=A016-A017>1 AND A016<30 AND A017<30;
DRAWTEXT(FILTER(KKMD,30),L*0.01,'$'),COLORYELLOW;
{C买点}
买C:=DRAWTEXT(LAST(MA(C,5)<MA(C,10),5,0) AND "CCI.CCI">REF("CCI.CCI",1) AND CROSS("CCI.CCI",-100),1000,'C');
DRAWTEXT(买C,VOL +555,'C'),COLORFFFF00;
{全包 黄空心}
HESHUOJINDING:=(C-REF(C,3))/REF(C,3)*100;
全包:= HESHUOJINDING <3 AND REF(C<O,1) AND C>REF(O,1) AND C>REF(C,1) AND VOL>REF(VOL,1) AND O<REF(C,1)AND DYNAINFO(17)>0;
STICKLINE(全包,VOL*3/3,VOL*9.1/10,0.2,1),COLORYELLOW;
{★获利比}
WINNER(C)*100,COLORYELLOW NODRAW;
{量比流通}
V/REF(MA(V,5),1)NODRAW COLORMAGENTA;
内盘:=DYNAINFO(22) ;
外盘:=DYNAINFO(23) ;
(外盘-内盘),NODRAW;
{倍量突破前高}
HS1:=REF(HIGH,10)=HHV(HIGH,2*10+1);
HS2:=FILTER(HS1,10);
HS3:=BACKSET(HS2,10+1);
HS4:=FILTER(HS3,10);
前高∧:=REF(H,BARSLAST(HS4));
倍量∧:=VOL/REF(VOL,1)>=2;
突破前高:=CROSS(C,前高∧);
选∧:= 倍量∧ AND 突破前高;
突∧:= 突破前高;
DRAWTEXT(突∧,V,'|'),COLOR00AAFF;
DRAWTEXT(选∧,V,'↑'),COLORYELLOW;
假阴:=C<O AND C>REF(C,1) AND VOL,VOLSTICK;
STICKLINE(C<O AND C>REF(C,1),0,V,0,0),COLORRED;{假阴柱}
{次阳盖极阴红箭头}
HJ_1:=VOL>REF(VOL,1)*1.1 AND REF(CLOSE,1)/CLOSE>=1.05 AND REF(CLOSE,1)>REF(CLOSE,2);
HJ_2:=BARSLAST(CLOSE>REF(CLOSE,1))<=2;
HJ_3:=VOL>REF(VOL,HJ_2)*1.1 AND REF(CLOSE,1)/CLOSE>=1.05;
HJ_4:=COUNT(REF(CLOSE,1)>CLOSE,5)>=3 AND COUNT(CLOSE<MA(CLOSE,5),5)>=3 AND REF(CLOSE,1)>CLOSE AND OPEN>CLOSE;
HJ_5:=CLOSE>REF(MAX(CLOSE,OPEN),1);
次阳盖极阴:=REF(HJ_1,1) OR REF(HJ_3,1) OR REF(HJ_4,1) AND HJ_5;
DRAWICON(次阳盖极阴,VOL*5.5/10,1);
DRAWICON(钱量,VOL*4.1/10,28);
{假阴极限}
阳1:=REF(C,1)>=REF(C,2)*1.095;
阳2:=REF(C,1)>=REF(C,4)*3.095;
阳3:=IFN(阳2,阳1,0);
A4:=O>C;
A5:=C>REF(H,1);
A6:=REF(MA(C,3),5)<REF(MA(C,3),1);
阳柱:=阳3 AND A4 AND A5 AND A6;
STICKLINE(阳柱,VOL*5/10,VOL*0.5/10,0.41,1)COLORRED;
立:=阳柱;
T29:=IF(BARSLAST(立)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立)=3 AND CLOSE>REF(HIGH,3),1,0)));
突9:=T29=1;
T39:=IF(BARSLAST(立)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立)=3 AND CLOSE>REF(LOW,3),1,0)));
法9:=T39=1;
成9:=法9 AND 突9;
成立9:=FILTER(成9,3);
STICKLINE(成立9,VOL*5/10,VOL*0.5/10,0.31,0)COLORRED;
STICKLINE(成立9,VOL*5/10,VOL*0.5/10,0.0,0)COLORYELLOW;
梯量:=COUNT(V>REF(V,1),3)=3 AND COUNT(C>=O,3)=3,;
STICKLINE(梯量,VOL*9.1/10,VOL*8.5/10,1.1,0)COLORFF75FF;
{二¨三}
(O+C)/2,COLORGRAY,NODRAW;
STICKLINE((O+C)/2,(O+C)/2,(O+C)/2,3,0)NODRAW;
(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C)COLOR8822FF,NODRAW;
{背}
M1:=9;M2:=14;M3:=6;
HESHUO1:=(HIGH+LOW+CLOSE)/3;
HESHUO2:=(HESHUO1-MA(HESHUO1,M2))/(0.015*AVEDEV(HESHUO1,M2));
HESHUO3:=SMA(HESHUO2,3,1);
HESHUO4:=SMA(HESHUO3,3,1);
HESHUO5:=3*HESHUO3-2*HESHUO4;
HESHUO6:=EMA(HESHUO5,5);
HEHSUO7:=REF(CLOSE,1);
HESHUO8:=SMA(MAX(CLOSE-HEHSUO7,0),M3,1)/SMA(ABS(CLOSE-HEHSUO7),M3,1)*100;
HEHSUO9:=(HESHUO8-50)*5;
HESHUOA:=SMA(HEHSUO9,3,1);
HEHSUOB:=SMA(HESHUOA,3,1);
HESHUOC:=3*HESHUOA-2*HEHSUOB;
HESHUOD:=EMA(HESHUOC,5);
HESHUOE:=REF(HESHUOD,1);
HESHUOF:=HESHUOD>HESHUOE;
HESHUOG:=(CLOSE-LLV(LOW,M1))/(HHV(HIGH,M1)-LLV(LOW,M1))*100;
HESHUOH:=SMA(HESHUOG,5,1);
HESHUOI:=SMA(HESHUOH,3,1);
HESHUOJ:=3*HESHUOH-2*HESHUOI;
HESHUOK:=SMA(HESHUOG,3,1);
HESHUOL:=(HESHUOH-50)*5;
HESHUOM:=SMA(HESHUOL,3,1);
HESHUON:=SMA(HESHUOM,3,1);
HESHUOO:=3*HESHUOM-2*HESHUON;
HESHUOP:=EMA(HESHUOO,5);
抄底:=HESHUOF AND NOT(REF(HESHUOF,1)) AND (HESHUOD<-100 AND HESHUOP<-100) AND HESHUO6<-100 AND IF(NAMELIKE('S'),0,1) AND IF(NAMELIKE('*'),0,1) AND DYNAINFO(17)>0.9;
DRAWTEXT(抄底,VOL +555,'℡'),COLORMAGENTA;
换手:=V*100/FINANCE(7)*100,VOLSTICK;
N:=40;
{提款机＾5=}
RSV7:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100 ;
K7:=SMA(RSV7,3,1);
D7:=SMA(K7,3,1) ;
头:=3*K7-2*D7 ;
J1:=头<20;
J2:=头>REF(头,1) AND REF(头,1)<REF(头,2);
款1:=(J1 AND J2)*15
;
DRAWTEXT(J1 AND J2,5,'.'),COLORWHITE;
