通达信寻宝1号vol和龙飞蛇钻地公式

六指金叉

DRAWGBK(C>0,RGB(00,00,055),RGB(00,00,90),0,' ',0);
DIFF:=EMA(CLOSE,N3)-EMA(CLOSE,N4);
DEA:=EMA(DIFF,N2);
DRAWICON(DIFF>DEA,1,34);
DRAWICON(DIFF DRAWTEXT(ISLASTBAR=1,1,'.◆MACD'),COLORFFFFFF;
A1:=DIFF>DEA;
RSV1:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100;
K:=SMA(RSV1,N1,1);
D:=SMA(K,N1,1);
DRAWICON(K>D,2,34);
DRAWICON(K DRAWTEXT(ISLASTBAR=1,2,'.◆.KDJ'),COLORFFFFFF;
A2:=K>D;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),N2,1))/(SMA(ABS(CLOSE-LC),N2,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),N4,1))/(SMA(ABS(CLOSE-LC),N4,1))*100;
DRAWICON(RSI1>RSI2,3,34);
DRAWICON(RSI1 DRAWTEXT(ISLASTBAR=1,3,'.◆.RSI'),COLORFFFFFF;
A3:=RSI1>RSI2;
RSV:=-(HHV(HIGH,N4)-CLOSE)/(HHV(HIGH,N4)-LLV(LOW,N4))*100;
LWR1:=SMA(RSV,N1,1);
LWR2:=SMA(LWR1,N1,1);
DRAWICON(LWR1>LWR2,4,34);
DRAWICON(LWR1 DRAWTEXT(ISLASTBAR=1,4,'.◆LW&R'),COLORFFFFFF;
A4:=LWR1>LWR2;
BBI:=(MA(CLOSE,N1)+MA(CLOSE,N2)+MA(CLOSE,N3)+MA(CLOSE,N4))/4;
DRAWICON(CLOSE>BBI,5,34);
DRAWICON(CLOSE DRAWTEXT(ISLASTBAR=1,5,'.◆BBI'),COLORFFFFFF;
A5:=CLOSE>BBI;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,N2),N1)/EMA(EMA(ABS(MTM),N2),N1);
MMM:=100*EMA(EMA(MTM,N4),N3)/EMA(EMA(ABS(MTM),N4),N3);
DRAWICON(MMS>MMM,6,34);
DRAWICON(MMS DRAWTEXT(ISLASTBAR=1,6,'.◆ZLMM'),COLORFFFFFF;
A6:=MMS>MMM;
{(A1 AND A2 AND A3 AND A4 AND A5 AND A6),COLORFFFF00;}
STICKLINE(A1 AND A2 AND A3 AND A4 AND A5 AND A6,0,6,0.1,0),COLORBROWN;
涨不停买入:A1 AND A2 AND A3 AND A4 AND A5 AND A6=1
AND REF(A1 AND A2 AND A3 AND A4 AND A5 AND A6,1)=0,COLORLIRED,LINETHICK3;
DRAWICON(DIFF>DEA,1,34);
DRAWICON(DIFF DRAWICON(K>D,2,34);
DRAWICON(K DRAWICON(RSI1>RSI2,3,34);
DRAWICON(RSI1 DRAWICON(LWR1>LWR2,4,34);
DRAWICON(LWR1 DRAWICON(CLOSE>BBI,5,34);
DRAWICON(CLOSE DRAWICON(MMS>MMM,6,34);
DRAWICON(MMS 7,COLORWHITE;{防止显示字符不全,可不用，也可用黑色BLACK不显示出来};
{底部拾金}
RRSV:=(CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100;
K0:=SMA(RRSV,9,1);
D0:=SMA(K0,9,1);
J1:=3*K0-2*D0;
底部拾金:IF(J1<1 AND J1>REF(J1,1),2,0)COLORMAGENTA,LINETHICK2;
{致命出击}
均5:=MA(CLOSE,4);
X7:=EMA(EMA(EMA(HIGH,9),9),9);
海底:=(X7 * 0.92);
海底2:=(X7 * 0.933);
中轨道:=MA(CLOSE,2);
MA1:=MA(CLOSE,5);
MA3:=MA(CLOSE,20);
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1OPEN ;
致命出击:(一穿三, (CROSS(中轨道,均5) AND (LOW <= 海底)) AND (CLOSE >= 海底2)*2);

{国庆}

VAR1B:=C-REF(C,1);
VAR22:=100*EMA(EMA(VAR1B,6),6)/EMA(EMA(ABS(VAR1B),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00;
BT:(LLV(VAR22,2)=LLV(VAR22,7) AND COUNT(VAR22<0,2) AND CROSS(VAR22,MA(VAR22,2))) AND
REF(DOWN,1)REF(DOWN,1);
0,COLORFF00FF;
3,COLORFF0000,DOTLINE;

STICKLINE(UP,0,0.2,3,0),COLOR0000FF;
STICKLINE(DOWN,0,0.2,3,0),COLOR00FF00;
STICKLINE(BT,0,2,2,0),COLOR000088;
STICKLINE(BT,0,2,1,0),COLOR0000CC;
STICKLINE(BT,0,2,0.22,0),COLOR0000FF;
DRAWTEXT(BT,2,'买'),COLOR0000FF;
TJ1:=REF(DOWN,1)REF(DOWN,1) AND C STICKLINE(TJ1,0,2,3,0),COLOR880088;
STICKLINE(TJ1,0,2,1.5,0),COLORAA00AA;
STICKLINE(TJ1,0,2,0.8,0),COLORCC00CC;
STICKLINE(TJ1,0,2,0.2,0),COLORFF00FF;
DRAWTEXT(TJ1,2,'买'),COLORFF00FF;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN,1)REF(DOWN,1) AND C STICKLINE(TJ2,0,1,5,0),COLOR008888;
STICKLINE(TJ2,0,1,2,0),COLOR00AAAA;
STICKLINE(TJ2,0,1,1,0),COLOR00CCCC;
STICKLINE(TJ2,0,1,0.2,0),COLOR00FFFF;
DRAWTEXT(TJ2,1,'买'),COLORGREEN;

 

蛇舞

{轨道}
CC1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD1:=DMA(CLOSE,CC1);
上:=(1+7/100)*DD1,COLORGRAY;
下:=(1-7/100)*DD1,COLORGRAY;
融中轨:(上+下)/2,COLORGRAY,DOTLINE;
安全线:EMA(CLOSE,55),COLORRED,NODRAW;

MA1:MA(CLOSE,5),COLORLIGREEN,LINETHICK3;
突破:HHV(MA(C,5),10)LINETHICK3,COLORBROWN;
AT:=(LOW+HIGH+CLOSE+OPEN)/4.2;
强势线:HHV((MA(AT,6)),15),COLORYELLOW,LINETHICK3;
IF(强势线 IF(强势线>REF(强势线,1),强势线,DRAWNULL),COLORRED,LINETHICK3;
K线:=MA(C,强势线);
买:=CROSS(K线,强势线);
卖:=CROSS(强势线,K线);
DRAWICON(买,L*0.98,25);
DRAWICON(卖,H*1.01,24);
 

{趋势线 }
{分水岭: MA(CLOSE,60), CIRCLEDOT,COLORBROWN,LINETHICK1;}

SJTJ:=DATE<1590301;
MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;
MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:= SJTJ AND( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60));
KK:= SJTJ AND( MAL>CLOSE OR (C DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1));
KK2:=BARSLAST(CROSS(DK1,KK1));
HS:=DK2 LS:=KK2 DRAWNUMBER(ISLASTBAR AND LS,MAH,MAH),COLORYELLOW;
DRAWNUMBER(ISLASTBAR AND HS,MAL,MAL),COLORYELLOW;
最新价:IF(SJTJ, C,DRAWNULL),LINETHICK0,COLORYELLOW;
趋势线:=(MAH+MAL)/2 COLORGREEN,,LINETHICK2;
趋势线上升:IF(HS,趋势线,DRAWNULL),LINETHICK1,COLORLIMAGENTA;
趋势线下降:IF(LS,趋势线,DRAWNULL),LINETHICK1,COLORGREEN;
DRAWICON(HS,趋势线*0.995,34);
DRAWICON(LS,趋势线*1.005,35);
DRAWNUMBER(ISLASTBAR ,C,C),COLORWHITE;

{标注高低价格线}
AZ1:=REF(H,N)=HHV(H,2*N+1);
AZ2:=FILTER(AZ1,N);
AZ3:=BACKSET(AZ2,N+1);
AZ4:=FILTER(AZ3,N);
AZ5:=BACKSET(ISLASTBAR,BARSLAST(AZ4)+1);
BZ1:=AZ5>REF(AZ5,1);
AZ6:=BACKSET(BZ1,REF(BARSLAST(AZ4),1)+2);
BZ2:=AZ6>REF(AZ6,1);
价1:=REF(H,BARSLAST(BZ1)),COLORGREEN, LINETHICK1;
价2:=REF(H,BARSLAST(BZ2)),COLORMAGENTA,LINETHICK1;
STICKLINE(CURRBARSCOUNT<=120,价1,价1,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT<=120,价2,价2,2,0),COLORGREEN;
DRAWNUMBER(CURRBARSCOUNT<=1,IF(C<价1,(C+ABS(C-REF(C,BARSLAST(BZ1)))),(C-ABS(C-REF(H,BARSLAST(BZ1))))),价1),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT<=1,IF(C<价2,(C+ABS(C-REF(H,BARSLAST(BZ2)))),(C-ABS(C-REF(H,BARSLAST(BZ2))))),价2),COLORGREEN;
 

{阴线-兰色}{阳线-红色}
STICKLINE(C>=O,C,O,3,0),COLOR0000AA;
STICKLINE(C>=O,C,O,2.5,0),COLOR0000BB ;
STICKLINE(C>=O,C,O,1.5,0),COLOR0000CC ;
STICKLINE(C>=O,C,O,1,0),COLOR0000EE;
STICKLINE(C>=O,H,L,0,0),COLOR0000FF;
STICKLINE(C<=O,C,O,3,0),COLOR7B7B00;
STICKLINE(C<=O,C,O,2.5,0),COLOR909000;
STICKLINE(C<=O,C,O,1.5,0),COLORA8A800;
STICKLINE(C<=O,C,O,1,0),COLORCECE00;
STICKLINE(C<=O,H,L,0,0),COLORFFFF00;
DRAWTEXT(CROSS(EMA(100+WINNER(C)*100-HHV(WINNER(C)*100,20),3),20),L,'♂捡钱')COLORYELLOW;

{逃顶}
LC:=REF(CLOSE,1);
RSI5:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
逃命:=CROSS(80,RSI5);
DRAWICON(逃命,H*1.015,15);
TJ1:=REF("CCI.CCI",1)>90 AND "CCI.CCI" TJ2:=REF("KDJ.J"(9,3,3),1)>90 AND "KDJ.J"(9,3,3) TJ3:=REF("RSI.RSI1",1)>70 AND "RSI.RSI1" TJ4:=COUNT(TJ1,5) AND COUNT(TJ2,5) AND COUNT(TJ3,5);
大顶:=CROSS(TJ4,0.5);
DRAWICON(大顶,H*1.001,2);
TJ5:=REF("CCI.CCI",1)<-100 AND "CCI.CCI">REF("CCI.CCI",1);
TJ6:=REF("KDJ.J"(9,3,3),1)<20 AND "KDJ.J"(9,3,3)>REF( "KDJ.J"(9,3,3),1);
TJ7:=REF("RSI.RSI1",1)<20 AND "RSI.RSI1">REF("RSI.RSI1",1);
TJ8:=COUNT(TJ5,5) AND COUNT(TJ6,5) AND COUNT(TJ7,5);
大底:=CROSS(TJ8,0.5);
DRAWICON(大底,L*0.991,18);
 

{MACD日金}
日DIF:="MACD.DIF#DAY"(12,26,9);
日DEA:="MACD.DEA#DAY"(12,26,9);
{MACD周金}
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
{KDJ日金}
日K:="KDJ.K#DAY"(9,3,3);
日D:="KDJ.D#DAY"(9,3,3);
{KDJ周金}
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
MMM:=(CROSS(日DIF,日DEA) + CROSS(周DIF,周DEA) + CROSS(日K,日D) + CROSS(周K,周D))>=2;
DRAWICON(MMM,L*0.995,25);
 

寻宝1号

{寻宝1号——成交量之窗}
成交量之窗:VOL,NODRAW,COLORYELLOW;
VOLA:=VOL,VOLSTICK;
VAR1:=EMA(EMA(CLOSE,3),1);
JRSK:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(JRSK>REF(JRSK,3) AND JRSK>0,VOLA,0,3.5,0),COLOR000088;
STICKLINE(JRSK>REF(JRSK,3) AND JRSK>0,VOLA,0,2.5,0),COLOR0000AA;
STICKLINE(JRSK>REF(JRSK,3) AND JRSK>0,VOLA,0,1.5,0),COLOR0000CC;
STICKLINE(JRSK>REF(JRSK,3) AND JRSK>0,VOLA,0,1,0),COLOR0000EE;
吸货:0,COLOR0000FF;
STICKLINE(JRSK0,VOLA,0,3.5,0),COLOR008800;
STICKLINE(JRSK0,VOLA,0,2.5,0),COLOR00AA00;
STICKLINE(JRSK0,VOLA,0,1.5,0),COLOR00CC00;
STICKLINE(JRSK0,VOLA,0,1,0),COLOR00EE00;
STICKLINE(JRSK0,VOLA,0,3.5,0),COLOR008800;
STICKLINE(JRSK0,VOLA,0,2.5,0),COLOR00AA00;
STICKLINE(JRSK0,VOLA,0,1.5,0),COLOR00CC00;
STICKLINE(JRSK0,VOLA,0,1,0),COLOR00EE00;
减仓:0,COLOR00FF00;
STICKLINE(JRSK<0,VOLA,0,3.5,0),COLORFFAA00;
STICKLINE(JRSK<0,VOLA,0,3.5.2,0),COLORFF4400;
STICKLINE(JRSK<0,VOLA,0,2.5,0),COLORFF8800;
STICKLINE(JRSK<0,VOLA,0,0,0),COLORFFAA00;
出货:0,COLORFFAA00;
VARJ1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘:=IF(CLOSE>OPEN,VARJ1*(HIGH-LOW),IF(CLOSE 量比%:买盘/VOL*100,COLORWHITE,NODRAW;
预测量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW,LINETHICK0;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预测量,0,-1,-1),COLOR00C0C0;
量比:V/REF(MA(V,5),1),NODRAW,COLORYELLOW;
换手:VOL/CAPITAL*100,NODRAW,COLORLIRED;
天量筑顶:IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1),NODRAW,COLORRED;
STICKLINE(天量筑顶>=1,0,VOL,2,0),COLORYELLOW;
{量能饱和度}
N1:=10,100,34;
N2:=N1*1.05;
N3:=N1+3;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和度:IF(SAT>1,1,SAT)*100,COLORLIBLUE,NODRAW;
中点:=REFDATE(HHV(V,100)/2,DATE);{量能饱和的变色切换}
STICKLINE(CURRBARSCOUNT=N1,中点*1.9,中点*1.5,100,1),COLOR00DDDD;
STICKLINE(CURRBARSCOUNT=N1,中点*1.88,中点*1.52,量能饱和度,0),COLOR0033FF;
STICKLINE(CURRBARSCOUNT=N1,中点*1.82,中点*1.58,量能饱和度,0),COLOR0077FF;
STICKLINE(CURRBARSCOUNT=N1,中点*1.76,中点*1.64,量能饱和度,0),COLOR0099FF;
STICKLINE(CURRBARSCOUNT=N1,中点*1.7,中点*1.7,量能饱和度,0),COLOR00DDFF;
DRAWTEXT(CURRBARSCOUNT=N3,中点*1.82,'量能饱和度'),COLORBLUE;
{地量}
总交易日:=BARSCOUNT(CLOSE);
X:=CONST(DATE);
Y:=IF(DATE 地量:VOL/Y*240/REF(VOL,1),COLORLIGREEN,NODRAW;
STICKLINE((VOL/Y*240)=CONST(LLV(VOL,总交易日)),CONST(HHV(VOL,70)),0,0.5,0),COLOR006432;

{橙黄见底}
VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6);
VAR6:=MA(VAR5,3);
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR0044FF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),2.5,0),COLOR0088FF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF;
{黄框}
中点1:=REFDATE(HHV(V,100)/2,DATE);
VAR4J:=EXPMA(CLOSE,9);
AA1:=EXPMA(VAR4J*0.89,5);
JRS1:=CROSS(C,AA1) OR CROSS(L,AA1);
XG1:=CROSS(JRS1,0.8);
STICKLINE(XG1,0,中点1*0.2,4,2 ),COLOR00AAFF;{黄框};
{绿框}
VAR2J:=CLOSE*VOL