提款机,成交量类公式,可以替换成交量了。
{流通盘}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) ANDREF(VOL,2)<REF(VOL,7) ANDREF(VOL,3)<REF(VOL,7) ANDREF(VOL,(7-3))<REF(VOL,7) ANDREF(VOL,(7-2))<REF(VOL,7) ANDREF(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) ANDREF(VOL,2)<REF(VOL,8) ANDREF(VOL,3)<REF(VOL,8) ANDREF(VOL,(8-3))<REF(VOL,8) ANDREF(VOL,(8-2))<REF(VOL,8) ANDREF(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) ANDREF(VOL,2)<REF(VOL,9) ANDREF(VOL,3)<REF(VOL,9) ANDREF(VOL,(9-3))<REF(VOL,9) ANDREF(VOL,(9-2))<REF(VOL,9) ANDREF(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) ANDREF(VOL,2)<REF(VOL,10) ANDREF(VOL,3)<REF(VOL,10) ANDREF(VOL,(10-3))<REF(VOL,10) ANDREF(VOL,(10-2))<REF(VOL,10) ANDREF(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) ANDREF(VOL,2)<REF(VOL,11) ANDREF(VOL,3)<REF(VOL,11) ANDREF(VOL,(11-3))<REF(VOL,11) ANDREF(VOL,(11-2))<REF(VOL,11) ANDREF(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) ANDREF(VOL,2)<REF(VOL,12) ANDREF(VOL,3)<REF(VOL,12) ANDREF(VOL,(12-3))<REF(VOL,12) ANDREF(VOL,(12-2))<REF(VOL,12) ANDREF(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)
M:=(开-收)/开; 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;