当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：牛三斤谷顶底主图+选股 源码分享
软件名称：[B]牛三斤谷顶底主图+选股 源码分享[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2023-05-03 00:15:15
软件简介:
牛三斤谷顶底主图
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;
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;
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;
寻底 信号的选股源码：
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;
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<15 AND REF(VABS34,1)<15 AND VEBS5<18 AND VBS13>REF(VBS13,1) ANDCROSS(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<-27AND COUNT((C-MA(C,55))/MA(C,55)*100<-30 AND (C-MA(C,89))/MA(C,89)*100<-27,2)=1AND (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;
JDBT1:=(VARF11 OR VARF31)*10,COLOR0000FF,LINETHICK2;
JDBT2:=LONGCROSS(VARF21,-23,3);
JDXG:=JDBT1 OR JDBT2;
选股:FILTER(FZXG OR JDXG,5);
[url=http://www.70822.com/soft/sort013/sort05/down-167432.html]牛三斤谷顶底主图+选股 源码分享[/url]