设为首页收藏本站
开启辅助访问 切换到窄版
搜索
牛牛公式网-牛牛指标网-牛牛网»论坛 › 通达信 › 选股预警 › 用它抄股我看行！抄底牵牛利器--五里操盘主图、副图、选 ...

用它抄股我看行！抄底牵牛利器--五里操盘主图、副图、选股原码

[复制链接]
查看50 | 回复0 | 2022-7-24 05:48:37 | 显示全部楼层 |阅读模式

用它抄股我看行！抄底牵牛利器--五里操盘主图、副图、选股原码

1.指标设计理念：有人星夜赶考，也有人辞官归故，股市亦如此，无论A股牛或熊，有人爱抄底，有人喜牵牛。多年的实战，结合A股国情，五里头稍有一些感悟，抄底：要抄基本面优质、盘小、价低、股价严重超跌后初转强的个股，但因熊市不言底，底下有底，所以抄底一定要谨慎，设好止赢与止损，指标应用上可以F30为主；牵牛：就是要在市场企稳或进入牛市，个股强势进入牛势初期时发现并介入、捂股，享受牛市成长的快乐，直到牛结束！
   2.本指标设计的依据：依据上述理念，利用1）价、量及其关系；2）个股与大盘比较；3）反映个股基本面的指标多方面的因素，设计出熊市抄底、牛市牵牛与逃顶的各级信号：
   ★【底部橙块】--股价进入严重超跌区，密切关注等待抄底信号出现；
   ★【金底】+【反弹】+【谷底】--为一组抄底信号; 
    ★【牛三金】--个股进入牛势初期牵牛信号!!!  
    ★【★顶】--牛市初期见(★顶)为洗盘, 可以不予理会，高位或熊市见(★顶)坚决收兵!!
　　3.本次把主、副图与选股指标一起发出。
    4.友情提示：本指标禁用商业用途，不喜者请绕道！
 问题答复:
     1.有部分朋友反映主图压缩厉害,原因在

SJBT:FILTER(MJBT AND JJC AND VJBT,5);在这句加=就行;SJBT:=FILTER(MJBT AND JJC AND VJBT,5);
      多谢121楼阿贵天狼同学的提醒!
     2.不喜欢背景的朋友,可以把公式的第一行:


DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);
 

源码：

{五里操盘-副图 牛牛指标网提供www.tdx001.com}
DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);
DIF:=(EMA(C,12)-EMA(C,26));
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
MJBT:=EXIST((CROSS(DIF,DEA) AND DIF>0) OR CROSS(DIF,0),5) ;
MVOL5:=MA(V,5);
MVOL10:=MA(V,10);
MVOL20:=MA(V,20);
量托:=MVOL5>=MVOL20 AND CROSS(MVOL10,MVOL20) AND REF(MVOL10,1)<REF(MVOL20,1);
VJBT:=EXIST(CROSS(MVOL5,MVOL10) OR  量托,5);
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA60:=MA(C,60);
MA120:=MA(C,120);
T1:=BARSLAST(REF(LONGCROSS(MA60,MA120,55),1));
JJC:=CROSS(MA5,MA10) AND T1<30;
SJBT:FILTER(MJBT AND JJC AND VJBT,5);
DRAWBAND(0,RGB(0,0,0),SJBT*18,RGB(218,218,18));
DRAWTEXT(SJBT,16,'牛三金'),COLOR0078FF;
RSV:=(((C-LLV(L,60))/(HHV(H,60)-LLV(L,60)))*100);
K:SMA(RSV,10,1),COLOR0000FF,LINETHICK1; 
D:SMA(SMA(RSV,10,1),3,1),COLORFFFFFF,LINETHICK1;
J:SMA(K,10,1),COLOR00FF00,LINETHICK1;
DBU:=(((C/COST(13))<=0.78)*17);
STICKLINE(DBU,0,6,3,0),COLOR0067DF;
BT01:=LONGCROSS(K,16.18,5) AND D<19.1;
BT02:=LONGCROSS(K,D,8) AND D<16.18;
FTBT:=FILTER(COUNT(BT01 OR BT02,3)=2,3)
DRAWBAND(0,RGB(0,0,0),FTBT*15,RGB(218,18,218));
DRAWTEXT(FTBT,16,'★反弹'),COLORFF00FF;
BT03:=FILTER(CROSS(K,D) AND EXIST(DBU=17,3),3);
DRAWBAND(0,RGB(0,0,0),BT03*18,RGB(218,18,18));
DRAWTEXT(BT03,16,'★金底'),COLOR0000FF;
ST01:=LONGCROSS(K,80,5) AND D>76;
ST02:=LONGCROSS(D,K,5) AND D>70;
ST:=ST01 OR ST02;
DRAWBAND(100,RGB(18,18,218),100-ST*17,RGB(18,18,18));
DRAWTEXT(ST,80,'★顶'),COLOR00FF00;
底线:20,COLORFF00FF,LINETHICK1,DOTLINE;
分水线:50,COLORFFFFFF,LINETHICK1,DOTLINE;
顶线:80,COLOR00FF00,LINETHICK1,DOTLINE;
{RSI}
LC:=REF(C,1);
RSI5:=SMA(MAX(C-LC,0),5,1)/SMA(ABS(C-LC),5,1)*1000;
DC:=RSI5-LLV(RSI5,10);
AV:=(MA(DC,3)*5+DC*15)/20;
DXRSI:=IF(AV>13,MA(AV,3),AV)/6;
MADXRSI:=MA(DXRSI,5),COLORBBBBBB;
DXBT:=CROSS(DXRSI,1) AND DXRSI<30;
{BIAS}
ABS34:=MA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),20);
BS13:=-100*(HHV(H,13)-C)/(HHV(H,13)-LLV(L,13));
EBS5:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),5);
VBS13:=BS13+100;
VABS34:=ABS34+100;
VEBS5:=EBS5+100;
底区:=(VABS34<12 AND VEBS5<8 AND (VBS13<7.2 OR REF(VBS13,1)<5) AND (VEBS5>REF(VEBS5,1)
OR VBS13>REF(VBS13,1))) OR (VABS34<8 AND VEBS5<7 AND VBS13<15 AND VBS13>REF(VBS13,1))
 OR (VABS34<10 AND VEBS5<7 AND VBS13<1);
低金:=(VABS34<15 AND REF(VABS34,1)<15 AND VEBS5<18 AND VBS13>REF(VBS13,1) AND
CROSS(VBS13,VABS34) AND VBS13>VEBS5  AND (REF(VBS13,1)<5 OR REF(VBS13,2)<5 )  AND
 (VEBS5>=VABS34 OR REF( VBS13,1)<1 ));
FZBT:=DXBT AND 低金;
FZXG:=低金 OR FZBT;
VARF11:=(C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27
AND COUNT((C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27,2)=1
AND (O-REF(C,1))/REF(C,1)>-0.07 AND COUNT(C=O,6)=0,COLORCCCCCC;
VARF21:=(C-DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL))/DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL)*100,COLOR00AAAA;
VARF31:=REF(VARF21,1)<-46 AND VARF21>REF(VARF21,1) AND REF(VARF21,1)<REF(VARF21,2) AND VARF21-REF(VARF21,1)>2.2;{-42,1.8}
JDBT1:=(VARF11 OR VARF31)*10,COLOR0000FF,LINETHICK2;
JDBT2:=LONGCROSS(VARF21,-23,3);
JDXG:=JDBT1 OR JDBT2;
W118:=FILTER(FZXG OR JDXG,5);
DRAWBAND(0,RGB(0,0,0),W118*17,RGB(218,218,218));
DRAWTEXT(W118,18,'★谷底'),COLORFFFFFF;
DRAWTEXT_FIX(1,0.0,0.003,0,'★原理1: 根据60KDJ判断买点!!!  【橙块底部关注区】+【金底】+【反弹】
+【谷底】为抄底信号;  【牛三金】为牵牛信号!!!'),COLORBBBBBB;
DRAWTEXT_FIX(1,0.0,0.083,0,'★原理2: 根据K线-MACD-量VOL三金叉判断买点!!!  当C>MA60时的三金叉为五里牛三金,是可靠的买入信号!!!'),COLOR0078FF;

--------------------------------------------------------

{五里操盘-主图 牛牛指标网提供www.tdx001.com}
DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);
DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);
DRAWBAND(MA(CLOSE,5),RGB(123,23,123),MA(CLOSE,10),RGB(23,123,123));
DRAWBAND(MA(CLOSE,60),RGB(118,38,38),MA(CLOSE,120),RGB(38,88,38));
MA60:MA(CLOSE,60),COLOR0000FF,LINETHICK1,NODRAW;
MA120:MA(CLOSE,120),COLOR00FF00,NODRAW;
MA5:MA(CLOSE,5),COLORFF00FF;
MA10:MA(CLOSE,10),COLORFFFF00;
MA20:MA(C,20),COLOR0079FF,LINETHICK1;
DRAWKLINE(H,O,L,C);
DIF:=(EMA(C,12)-EMA(C,26));
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
MJBT:=EXIST((CROSS(DIF,DEA) AND DIF>0) OR CROSS(DIF,0),5) ;
MVOL5:=MA(V,5);
MVOL10:=MA(V,10);
MVOL20:=MA(V,20);
量托:=MVOL5>=MVOL20 AND CROSS(MVOL10,MVOL20) AND REF(MVOL10,1)<REF(MVOL20,1);
VJBT:=EXIST(CROSS(MVOL5,MVOL10) OR  量托,5);
T1:=BARSLAST(REF(LONGCROSS(MA60,MA120,55),1));
JJC:=CROSS(MA5,MA10) AND T1<30;
SJBT:FILTER(MJBT AND JJC AND VJBT,5);
STICKLINE(SJBT,C,O,3,0),COLOR000088;
STICKLINE(SJBT,C,O,1,0),COLOR0000AA;
STICKLINE(SJBT,C,O,0.3,0),COLOR0000CC;
STICKLINE(SJBT,C,O,0.0,0),COLOR0000FF;
DRAWTEXT(SJBT,L*0.98,'★牛三金'),COLOR0078FF;
RSV:=(((C-LLV(L,60))/(HHV(H,60)-LLV(L,60)))*100);
K:=SMA(RSV,10,1),COLOR0000FF,LINETHICK1; 
D:=SMA(SMA(RSV,10,1),3,1),COLORFFFFFF,LINETHICK1;
J:=SMA(K,10,1),COLOR00FF00,LINETHICK1;
DBU:=(((C/COST(13))<=0.78)*17);
BT01:=LONGCROSS(K,16.18,5) AND D<19.1;
BT02:=LONGCROSS(K,D,8) AND D<16.18;
FTBT:=FILTER(COUNT(BT01 OR BT02,3)=2,3);
STICKLINE(FTBT,C,O,3,0),COLOR880088;
STICKLINE(FTBT,C,O,1,0),COLORAA00AA;
STICKLINE(FTBT,C,O,0.3,0),COLORCC00CC;
STICKLINE(FTBT,C,O,0.0,0),COLORFF00FF;
DRAWTEXT(FTBT,L*0.99,'★反弹'),COLORFF00FF;
BT03:=FILTER(CROSS(K,D) AND EXIST(DBU=17,3),3);
STICKLINE(BT03,C,O,3,0),COLOR000088;
STICKLINE(BT03,C,O,1,0),COLOR0000AA;
STICKLINE(BT03,C,O,0.3,0),COLOR0000CC;
STICKLINE(BT03,C,O,0.0,0),COLOR0000FF;
DRAWTEXT(BT03,L*0.99,'★金底'),COLOR0000FF;
ST01:=LONGCROSS(K,80,5) AND D>76;
ST02:=LONGCROSS(D,K,5) AND D>70;
ST:=ST01 OR ST02;
STICKLINE(ST,C,O,3,0),COLOR008800;
STICKLINE(ST,C,O,1,0),COLOR00AA00;
STICKLINE(ST,C,O,0.3,0),COLOR00CC00;
STICKLINE(ST,C,O,0.0,0),COLOR00FF00;
DRAWTEXT(ST,H*1.009,'★顶'),COLOR00FF00;
LC:=REF(C,1);
RSI5:=SMA(MAX(C-LC,0),5,1)/SMA(ABS(C-LC),5,1)*1000;
DC:=RSI5-LLV(RSI5,10);
AV:=(MA(DC,3)*5+DC*15)/20;
DXRSI:=IF(AV>13,MA(AV,3),AV)/6;
MADXRSI:=MA(DXRSI,5),COLORBBBBBB;
DXBT:=CROSS(DXRSI,1) AND DXRSI<30;
{BIAS}
ABS34:=MA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),20);
BS13:=-100*(HHV(H,13)-C)/(HHV(H,13)-LLV(L,13));
EBS5:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),5);
VBS13:=BS13+100;
VABS34:=ABS34+100;
VEBS5:=EBS5+100;
底区:=(VABS34<12 AND VEBS5<8 AND (VBS13<7.2 OR REF(VBS13,1)<5) AND (VEBS5>REF(VEBS5,1)
OR VBS13>REF(VBS13,1))) OR (VABS34<8 AND VEBS5<7 AND VBS13<15 AND VBS13>REF(VBS13,1))
 OR (VABS34<10 AND VEBS5<7 AND VBS13<1);
低金:=(VABS34<15 AND REF(VABS34,1)<15 AND VEBS5<18 AND VBS13>REF(VBS13,1) AND
CROSS(VBS13,VABS34) AND VBS13>VEBS5  AND (REF(VBS13,1)<5 OR REF(VBS13,2)<5 )  AND
 (VEBS5>=VABS34 OR REF( VBS13,1)<1 ));
FZBT:=DXBT AND 低金;
FZXG:=低金 OR FZBT;
VARF11:=(C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27
AND COUNT((C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27,2)=1
AND (O-REF(C,1))/REF(C,1)>-0.07 AND COUNT(C=O,6)=0,COLORCCCCCC;
VARF21:=(C-DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL))/DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL)*100,COLOR00AAAA;
VARF31:=REF(VARF21,1)<-46 AND VARF21>REF(VARF21,1) AND REF(VARF21,1)<REF(VARF21,2) AND VARF21-REF(VARF21,1)>2.2;{-42,1.8}
JDBT1:=(VARF11 OR VARF31)*10,COLOR0000FF,LINETHICK2;
JDBT2:=LONGCROSS(VARF21,-23,3);
JDXG:=JDBT1 OR JDBT2;
W118:=FILTER(FZXG OR JDXG,5);
STICKLINE(W118,C,O,3,0),COLOR008888;
STICKLINE(W118,C,O,1,0),COLOR00AAAA;
STICKLINE(W118,C,O,0.3,0),COLOR00CCCC;
STICKLINE(W118,C,O,0.0,0),COLOR00FFFF;
DRAWTEXT(W118,L*0.99,'★谷底'),COLOR00FFFF;
IF(MA60>=MA120,MA60,DRAWNULL),COLOR0000FF; 
IF(MA120>=MA60,MA120,DRAWNULL),COLORFF9900;
IF(MA60>=MA120,MA120,DRAWNULL),COLOR00FFFF;
IF(MA120>=MA60,MA60,DRAWNULL),COLOR00FF00;
DRAWTEXT_FIX(1,0.0,0.003,0,'★原理1:【橙块底部关注区】+【金底】+【反弹】
+【谷底】--为抄底信号;  【牛三金】--为牵牛信号!!!'),COLORBBBBBB;

 

 

----------------------------------------------

{五里操盘-选股 牛牛指标网提供www.tdx001.com}

DIF:=(EMA(C,12)-EMA(C,26));
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
MJBT:=EXIST((CROSS(DIF,DEA) AND DIF>0) OR CROSS(DIF,0),5) ;
MVOL5:=MA(V,5);
MVOL10:=MA(V,10);
MVOL20:=MA(V,20);
量托:=MVOL5>=MVOL20 AND CROSS(MVOL10,MVOL20) AND REF(MVOL10,1)<REF(MVOL20,1);
VJBT:=EXIST(CROSS(MVOL5,MVOL10) OR  量托,5);
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA60:=MA(C,60);
MA120:=MA(C,120);
T1:=BARSLAST(REF(LONGCROSS(MA60,MA120,55),1));
JJC:=CROSS(MA5,MA10) AND T1<30;
SJBT:=FILTER(MJBT AND JJC AND VJBT,5);
RSV:=(((C-LLV(L,60))/(HHV(H,60)-LLV(L,60)))*100);
K:=SMA(RSV,10,1),COLOR0000FF,LINETHICK1; 
D:=SMA(SMA(RSV,10,1),3,1),COLORFFFFFF,LINETHICK1;
J:=SMA(K,10,1),COLOR00FF00,LINETHICK1;
DBU:=(((C/COST(13))<=0.78)*17);
BT01:=LONGCROSS(K,16.18,5) AND D<19.1;
BT02:=LONGCROSS(K,D,8) AND D<16.18;
FTBT:=FILTER(COUNT(BT01 OR BT02,3)=2,3);
BT03:=FILTER(CROSS(K,D) AND EXIST(DBU=17,3),3);
XG01:=SJBT OR FTBT OR BT03;
LC:=REF(C,1);
RSI5:=SMA(MAX(C-LC,0),5,1)/SMA(ABS(C-LC),5,1)*1000;
DC:=RSI5-LLV(RSI5,10);
AV:=(MA(DC,3)*5+DC*15)/20;
DXRSI:=IF(AV>13,MA(AV,3),AV)/6;
MADXRSI:=MA(DXRSI,5),COLORBBBBBB;
DXBT:=CROSS(DXRSI,1) AND DXRSI<30;
ABS34:=MA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),20);
BS13:=-100*(HHV(H,13)-C)/(HHV(H,13)-LLV(L,13));
EBS5:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),5);
VBS13:=BS13+100;
VABS34:=ABS34+100;
VEBS5:=EBS5+100;
底区:=(VABS34<12 AND VEBS5<8 AND (VBS13<7.2 OR REF(VBS13,1)<5) AND (VEBS5>REF(VEBS5,1)
OR VBS13>REF(VBS13,1))) OR (VABS34<8 AND VEBS5<7 AND VBS13<15 AND VBS13>REF(VBS13,1))
 OR (VABS34<10 AND VEBS5<7 AND VBS13<1);
低金:=(VABS34<15 AND REF(VABS34,1)<15 AND VEBS5<18 AND VBS13>REF(VBS13,1) AND
CROSS(VBS13,VABS34) AND VBS13>VEBS5  AND (REF(VBS13,1)<5 OR REF(VBS13,2)<5 )  AND
 (VEBS5>=VABS34 OR REF( VBS13,1)<1 ));
FZBT:=DXBT AND 低金;
FZXG:=低金 OR FZBT;
VARF11:=(C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27
AND COUNT((C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27,2)=1
AND (O-REF(C,1))/REF(C,1)>-0.07 AND COUNT(C=O,6)=0,COLORCCCCCC;
VARF21:=(C-DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL))/DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL)*100,COLOR00AAAA;
VARF31:=REF(VARF21,1)<-46 AND VARF21>REF(VARF21,1) AND REF(VARF21,1)<REF(VARF21,2) AND VARF21-REF(VARF21,1)>2.2;{-42,1.8}
JDBT1:=(VARF11 OR VARF31)*10,COLOR0000FF,LINETHICK2;
JDBT2:=LONGCROSS(VARF21,-23,3);
JDXG:=JDBT1 OR JDBT2;
XG02:=FILTER(FZXG OR JDXG,5);
XG:=XG01 OR XG02;
{基本面部分}
LTP:=FINANCE(7)<300000000 AND FINANCE(1)<500000000;   {流通盘股小于3亿股,总盘小于5亿}
MGSY:=FINANCE(33)>0.02 AND BARSCOUNT(C)>30;
SYL:=C/FINANCE(33)<200 AND C/FINANCE(33)>5; {市盈率低于200}
JZC:=FINANCE(34)>2;{ 每股净资产}
{通达信去掉*、S、ST}
S2:=IF(NAMELIKE('S'),0,1);
S3:=IF(NAMELIKE('*'),0,1);
GJFW:=DYNAINFO(7)>3 AND DYNAINFO(7)<40;{3元-40元价格的股}
XGJ:=LTP AND MGSY AND SYL  AND JZC AND S2 AND S3  AND GJFW;
W18:EXIST(XG AND XGJ,3);

 

753322313.bmp

753322313.bmp

回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

昔日

689

主题

0

回帖

2083

积分

金牌会员

Rank: 6Rank: 6

积分
2083
回复楼主 返回列表