通达信寻宝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<DEA,1,35);
 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<D,2,35);
 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<RSI2,3,35);
 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<LWR2,4,35);
 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<BBI,5,35);
 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<MMM,6,35);
 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<DEA,1,35);
 DRAWICON(K>D,2,34);
 DRAWICON(K<D,2,35);
 DRAWICON(RSI1>RSI2,3,34);
 DRAWICON(RSI1<RSI2,3,35);
 DRAWICON(LWR1>LWR2,4,34);
 DRAWICON(LWR1<LWR2,4,35);
 DRAWICON(CLOSE>BBI,5,34);
 DRAWICON(CLOSE<BBI,5,35);
 DRAWICON(MMS>MMM,6,34);
 DRAWICON(MMS<MMM,6,35);
 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 MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;
 致命出击:(一穿三, (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,2) AND UP>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,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;
 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,2) AND UP>REF(DOWN,1) AND C<HRY33;
 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(强势线<REF(强势线,1),强势线,DRAWNULL),COLORGREEN,LINETHICK3;
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<MA5 AND C<MA10 AND C<MA20 AND C<MA60));
 DK1:=BARSLAST(DK);
 KK1:=BARSLAST(KK);
 DK2:=BARSLAST(CROSS(KK1,DK1));
 KK2:=BARSLAST(CROSS(DK1,KK1));
 HS:=DK2<KK2;
 LS:=KK2<DK2;
 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"<REF("CCI.CCI",1);
 TJ2:=REF("KDJ.J"(9,3,3),1)>90 AND "KDJ.J"(9,3,3)<REF( "KDJ.J"(9,3,3),1);
 TJ3:=REF("RSI.RSI1",1)>70 AND "RSI.RSI1"<REF("RSI.RSI1",1);
 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(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,3.5,0),COLOR008800;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,2.5,0),COLOR00AA00;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,1.5,0),COLOR00CC00;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,1,0),COLOR00EE00;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,3.5,0),COLOR008800;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,2.5,0),COLOR00AA00;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,VOLA,0,1.5,0),COLOR00CC00;
 STICKLINE(JRSK<REF(JRSK,3) AND JRSK>0,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<OPEN,VARJ1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
 量比%:买盘/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<X, 240, FROMOPEN);
 地量: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;
 VAR3J:=EMA((EXPMA(VAR2J,3)/EXPMA(VOL,3)+EXPMA(VAR2J,6)/EXPMA(VOL,6)+EXPMA(VAR2J,12)
 /EXPMA(VOL,12)+EXPMA(VAR2J,24)/EXPMA(VOL,24))/4,13);
 AA2:=VAR3J*0.94,COLORYELLOW;
 JRS:=CROSS(C,AA2);
 XG:=CROSS(JRS,0.8);
 STICKLINE(XG,0,中点1*0.2,4,1 ),COLORGREEN;{绿框};
 {提示}
 红买黄卖5日线:MA(VOL,5),COLORYELLOW,LINETHICK2;
 IF(MA(VOL,5)>=REF(MA(VOL,5),1),MA(VOL,5),DRAWNULL),COLORMAGENTA,LINETHICK2;
 主力洗盘35日线:MA(VOL,35),COLORWHITE;
 资金异动135日线:MA(VOL,135),COLORMAGENTA;
 {DRAWTEXT_FIX(1,0.0,0.0,0,'★★★趋势走好彩框有效★黄框见底绿框加仓★★★'),COLORLIGREEN;}
 DRAWTEXT_FIX(ISLASTBAR,0.80,0,0,'【趋势走好彩框有效★黄框见底绿框加仓】'),COLORLIGREEN;
 
金指
 
{10自创指标}
 R1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200;
 R2:=EMA((CLOSE-(LLV(LOW,5)))/((HHV(HIGH,5))-(LLV(LOW,5)))*100,4)*2;
 R3:=EMA(0.618*REF(R2,1)+0.382*R2,2);
 R4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
 R5:=POW(MA(LOW,5),2)+MA(LOW,5);
 R6:=POW(MA(HIGH,5),2)+MA(HIGH,5);
 R7:=(R4-LLV(R5,64))/(HHV(R6,64)-LLV(R5,64))*150+65-10;
 R8:=SMA((SMA(R7,3,1)*1.5-100),3,1);
 R9:=3*(SMA(R7,3,1)*1.5-100)-2*R8;
 R10:=(HIGH+LOW+CLOSE*2)/4;
 R11:=(R10-(EMA(R10,13)))*100/(STD(R10,13));
 R12:=EMA((EMA(R11,5)),13)+200-100;
 R13:=(SMA(R1,3,1))+R2+(SMA(R7,3,1)*1.5-100)+R12;
 R14:=(SMA((SMA(R1,3,1)),3,1))+R3+R8+(EMA(R12,10));
 R15:=(3*(SMA(R1,3,1))-2*(SMA((SMA(R1,3,1)),3,1)))+(3*R12-2*(EMA(R12,10)))+
 R9+(3*R12-2*(EMA(R12,10)));
 R16:=(HIGH+LOW+CLOSE)/3;
 R17:=(R16-MA(R16,34))/(0.015*AVEDEV(R16,34));
 R18:=(HIGH+LOW+CLOSE+R16)/4;
 R19:=(R18-(EMA(R18,24)))/(STD(R18,24))*100;
 R20:=(R16-MA(R16,24))/(0.015*AVEDEV(R16,24));
 R21:=(((EMA(R19,5))+R20+R17)/3+165)/4;
 R22:=(R13+R14+R15*30)/32/5-15;
 A1:=EMA(EMA(CLOSE,13),13);
 A2:=(A1-REF(A1,1))/REF(A1,1)*6400;
 A3:=100*WINNER(CLOSE*0.95);
 买卖:= EMA(((R21+R22)/2/1.1),1),COLORRED,LINETHICK2;
 确认:=MA(买卖,3),COLORWHITE,LINETHICK2;
 AR1:=EMA(OPEN,7);
 AR2:=EMA(AR1,21);
 AR3:=CROSS(AR1,AR2);
 AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
 DM:IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,20,0),COLORYELLOW,LINETHICK2;
 DRAWICON(DM,70,34);
 DP:IF(PEAKBARS(2,9,1)=1,80,100),COLORBLUE,LINETHICK2;
 DRAWICON(DP,70,35);
ZM:IF(TROUGHBARS(3,18,1)=0 AND HIGH>LOW+0.1,20,0),COLORFF00FF,LINETHICK3;
 DRAWICON(ZM,70,34);
ZP:IF(PEAKBARS(2,15,1)=0,80,100),COLORGREEN,LINETHICK3;
 DRAWICON(ZP,70,35);
 QM:(ZIG(3,35)>REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)<REF(ZIG(3,35),2))
 *50,STICK,COLORRED,LINETHICK6;
 DRAWICON(QM,70,34);
 QP:(ZIG(3,35)<REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)>REF(ZIG(3,35),2))
 *50,STICK,COLORGREEN,LINETHICK4;
 DRAWICON(QP,70,35);
 
多空MACDKD均线:100,LINETHICK0,COLORRED;
 工作WLRSIVOL:100,LINETHICK0,COLORRED;
 {1多空指标}
 BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
 DRAWICON (C<BBI,90,35);
DRAWICON(C>BBI,90,34);
 {2MACD指标}
 DIFF:=EMA(C,F11)-EMA(C,F);
 DEA:=EMA(DIFF,F12);
 MACD:=2*(DIFF-DEA);
 DRAWICON(MACD<REF(MACD,1),80,35);
DRAWICON(MACD>REF(MACD,1),80,34);
{3KDJ指标}
 RSV:=(C-LLV(L,F))/(HHV(H,F)-LLV(L,F))*100;
 K:=SMA(RSV,F10,1);
 D:=SMA(K,F15,1);
 J:=3*K-2*D;
 DRAWICON(J<REF(J,1),70,35);
DRAWICON(J>REF(J,1),70,34);
 {4均线指标}
 VAR6:=(2*C+H+L)/4;
VAR8:=LLV(L,34);
VARB:=HHV(H,34);
VARC:=EMA((VAR6-VAR8)/(VARB-VAR8)*100,8);
VARD:=EMA(VARC,5);
DRAWICON (VARC-VARD<0,60,35);
 DRAWICON(VARC-VARD>0,60,34);
{5,47天均线工作线}
 MA1:=EMA(C,F13);
 DRAWICON (C<MA1,50,35);
DRAWICON(C>MA1,50,34);
 
{6威廉LWR,7,3天交叉指标}
 RSX:=(HHV(H,F)-C)/(HHV(H,F)-LLV(L,F))*100;
 LWR1:=SMA(RSX,F13,1);
 LWR2:=SMA(LWR1,F15,1);
 DRAWICON (LWR1>LWR2,40,35);
DRAWICON(LWR1<LWR2,40,34);
 {7RSI强弱指标7,13}
 LC := REF(C,1);
 RSI1:=SMA(MAX(C-LC,0),F13,1)/SMA(ABS(C-LC),F13,1)*100;
 RSI2:=SMA(MAX(C-LC,0),F10,1)/SMA(ABS(C-LC),F10,1)*100;
 DRAWICON (RSI1<RSI2,30,35);
DRAWICON(RSI1>RSI2,30,34);
{8成交量指标}
 VAR2:=AMOUNT/VOL/100;
 短期:=MA(VAR2,10);
 DRAWICON (C<短期,20,35);
DRAWICON(C>短期,20,34);
{9买卖指标}
 VAR01:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
 VAR02:=HIGH-REF(HIGH,1);
 VAR03:=REF(LOW,1)-LOW;
 VAR04:=SUM(IF(VAR02>0 AND VAR02>VAR03,VAR02,0),25);
 VAR05:=SUM(IF(VAR03>0 AND VAR03>VAR02,VAR03,0),25);
 VAR06:=VAR04*100/VAR01;
 VAR07:=VAR05*100/VAR01;
 VAR08:=MA(ABS(VAR07-VAR06)/(VAR07+VAR06)*100,15);
 VAR09:=(VAR08+REF(VAR08,15))/2;
 A:=(VAR07>VAR06 AND VAR07>25 AND VAR06<25);
 B:=ZIG(3,50/5)*100,COLORRED,LINETHICK2;
 G:=MA(B,2),COLORGREEN,LINETHICK2;
 DD:=CROSS(B,G)*1000,COLORRED;
 W:=CROSS(G,B)*1000,COLORBLUE;
 E:=REF(INDEXC,1);
 F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);
 VAR10:=F AND F<8;
 VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 VAR12:=SMA(VAR11,3,1);
 VAR13:=SMA(VAR12,3,1);
 VAR14:=VAR13 AND VAR13<20;
 MM:=A AND DD AND VAR10 AND VAR14 ;
 DRAWICON(W=1000,10,19);
 DRAWICON(DD=1000,10,23);
 
VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
 VAR301:=SMA(SMA(VAR200,3,1),3,1)/28.57;
 VAR400:=EMA(VAR301,5);
 操盘:=3*VAR301-2*VAR400;
 A111:=CROSS(操盘,VAR301) AND VAR301<2.1 AND C>O;
 STICKLINE(A111,30,0,4,0),COLOR770077;
 STICKLINE(A111,30,0,3,0),COLOR990099;
 STICKLINE(A111,30,0,2,0),COLORBB00BB;
 STICKLINE(A111,30,0,1,0),COLORDD00DD;
 STICKLINE(A111,30,0,0.3,0),COLORFF00FF;
 {DRAWTEXT(A111,36,'财神到'),COLORRED;};
 
VAR55:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K55:=SMA(VAR55,3,1);
D55:=SMA(K55,3,1);
J55:=SMA(D55,3,1);
 TJ1:=D55>=REF(D55,1) AND REF(D55,1)<REF(D55,2);
 
VAR34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K34:=SMA(VAR34,3,1);
D34:=SMA(K34,3,1);
J34:=SMA(D34,3,1);
 TJ2:=D34>=REF(D34,1) AND REF(D34,1)<REF(D34,2);
 
VAR9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K9:=SMA(VAR9,3,1);
D9:=SMA(K9,3,1);
J9:=SMA(D9,3,1);
 TJ3:=D9>=REF(D9,1) AND REF(D9,1)<REF(D9,2);
 
VAR3:=(CLOSE-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3))*100;
K3:=SMA(VAR3,3,1);
D3:=SMA(K3,3,1);
J3:=SMA(D3,3,1);
 TJ4:=D3>=REF(D3,1) AND REF(D3,1)<REF(D3,2);
 XG:=TJ2 AND TJ3 AND TJ4 AND TJ1;
 STICKLINE(XG,0,50,3,0),COLOR00FFFF;
 
STICKLINE(REF("KDJ.J",1)<0 AND "KDJ.J">0,25,0,3,0),COLOR00FFFF;
 DRAWTEXT(CURRBARSCOUNT=89,10,'★五里警告一：纪律、止损、
 趋势第一!人脑服从电脑,坚决执行信号!'),COLOR00FFFF;
 

寻宝1号——成交量之窗：是九星老师的杰作，龙飞蛇钻地是我折腾的，也是论坛上和网上公开的源码每有秘密了。
 先看图片在上附件：
 龙飞了。
 

贯穿一年行情的它，长满黄磷了吧。
 
 

蛇钻地了
 
 

最差的小青龙。
 

寻宝1号——成交量之窗
 ——寻宝楼推荐系列指标之一
 精典VOL量指标是大家最常用的指标之一，今在原有的VOL的基础上增加一些内容，以此“抛砖引玉”，希望有更好的改进意见，可继续优化，完成后转“指标助战”区进行验证；
 增加内容及用法：
 1、量能饱和度指示框；当量能红色充满全框，股价有一暴发行情，股价若在顶部即会下跌，股价若在底部即会上涨；
 2、底部增加了彩色框：黄框即为见底信号，绿框即可加仓；
 3、地量柱：当出现地量，会出现一细长深绿柱；
 4、彩桩：黄色为立桩量，红色为主力进货，绿色为主力减仓，兰色为主力出货；
 5、均线：五日均线改为双色线，提示为：红买黄卖5日线；
          三十五日均线（白色），提示为：主力洗盘35日线；
          一百三十五日线线（洋红色），提示为：资金异动135日线；
 此外，在第一行还增加了：成交量比、预测量、量比、换手、天量高柱筑顶（即凡见量柱过高，说明是筑顶信号）
 以上修改如有不妥之处，欢迎大家多多指正，让我们一起讨论出更好的实用指标；
 
寻宝1号——成交量之窗
 ——寻宝楼推荐系列指标之一
 精典VOL量指标是大家最常用的指标之一，今在原有的VOL的基础上增加一些内容，以此“抛砖引玉”，希望有更好的改进意见，可继续优化，完成后转“指标助战”区进行验证；
 增加内容及用法：
 1、量能饱和度指示框；当量能红色充满全框，股价有一暴发行情，股价若在顶部即会下跌，股价若在底部即会上涨；
 2、底部增加了彩色框：黄框即为见底信号，绿框即可加仓；
 3、地量柱：当出现地量，会出现一细长深绿柱；
 4、彩桩：黄色为立桩量，红色为主力进货，绿色为主力减仓，兰色为主力出货；
 5、均线：五日均线改为双色线，提示为：红买黄卖5日线；
          三十五日均线（白色），提示为：主力洗盘35日线；
          一百三十五日线线（洋红色），提示为：资金异动135日线；
 此外，在第一行还增加了：成交量比、预测量、量比、换手、天量高柱筑顶（即凡见量柱过高，说明是筑顶信号）
 以上修改如有不妥之处，欢迎大家多多指正，让我们一起讨论出更好的实用指标；