当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码:金蕴扶摇,黄金分割线 自用纯K,黄蓝带升级版

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

1、金蕴扶摇,出票一般都立涨

公式介绍:
金蕴系列~金蕴扶摇,预警出票一般都立涨,买入,随便大肉!
公式用法:
可以用选股公式设置预警,次日开盘价买入!
不含未来函数,不漂移!

{金蕴扶摇 源码}
DRAWGBK(C>O,RGB(10,0,0),RGB(0,0,0),1,2,1);
NE:=IF(NAMELIKE('S') OR NAMELIKE('*S'),0.05,0.1);{通用个股/ST股}
ZT:=C/REF(C,1)-1>=NE-0.01/REF(C,1) AND C=H AND PERIOD=5;{仅在日线上变色}
ZX:=O+((C-O)*0.618);
XJ:=DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),LINETHICK2;
XG:=ZT AND C>XJ AND ZX>XJ ;
HB:=FILTER(XG,3);
周M:="MACD.MACD#WEEK";
月M:="MACD.MACD#MONTH";
年M:="MACD.MACD#YEAR";
日M:=MACD.MACD;
HB1:= HB AND 周M>0 AND 月M>0 AND 年M>0  AND 日M>0 ;
T:=O>REF(H,1) AND L>REF(H,1) AND C>=O AND HB  ;
STICKLINE(HB AND T, 0,22, 0.2, 0),COLORLIMAGENTA;
STICKLINE(HB AND T, 0,11, 0.8, 0),COLORYELLOW;
DRAWICON(HB AND T,22,17);
DRAWICON(HB AND T,23,18);
 


2、黄金分割线 自用纯K

{黄金分割线}

{自用纯K}
N:=34;
高1:=REF(HHV(H,N),3);
低1:=REF(LLV(L,N),3);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.500;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),COLORRED,DOTLINE;
一:REFDATE(H1,DATE),COLORGRAY,DOTLINE;
二:REFDATE(H2,DATE),COLORGRAY,DOTLINE;
三:REFDATE(H3,DATE),COLORRED,DOTLINE;
四:REFDATE(H4,DATE),COLORGRAY,DOTLINE;
五:REFDATE(H5,DATE),COLORGRAY,DOTLINE;
低:REFDATE(低1,DATE),COLORGREEN,DOTLINE;
TT4:=(CURRBARSCOUNT=34);
DRAWTEXT(TT4 AND 顶,顶,'---顶---'),COLORCYAN;
DRAWTEXT(TT4 AND 一,一,'-0.809-'),COLORCYAN;
DRAWTEXT(TT4 AND 二,二,'-0.618-'),COLORCYAN;
DRAWTEXT(TT4 AND 三,三,'-0.500-'),COLORCYAN;
DRAWTEXT(TT4 AND 四,四,'-0.382-'),COLORCYAN;
DRAWTEXT(TT4 AND 五,五,'-0.191-'),COLORCYAN;
DRAWTEXT(TT4 AND 低,低,'---底---'),COLORCYAN;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
DRAWTEXT(CURRBARSCOUNT=1,顶,CON2STR(顶,2)),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,一,CON2STR(一,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,二,CON2STR(二,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,三,CON2STR(三,2)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,四,CON2STR(四,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,五,CON2STR(五,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,低,CON2STR(低,2)),COLORMAGENTA;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
{K线------------------------------------------------绿} 
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,0.1,0),COLOR00CC00; 
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,3.1,0),COLOR00CC00;
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,2.7,0),COLOR003300;
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,2.1,0),COLOR006600;
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,1.5,0),COLOR009900;
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,0.9,0),COLOR00CC00;
STICKLINE(CLOSE<=REF(C,1),CLOSE,OPEN,0.3,0),COLOR00FF00;
{K线------------------------------------------------红}
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,0.1,0),COLOR0000FF; 
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,3.1,0),COLOR0000FF;
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,2.7,0),COLOR000077; 
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,2.1,0),COLOR000099; 
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,1.5,0),COLOR0000BB;
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,0.9,0),COLOR0000DD;
STICKLINE(CLOSE>REF(C,1),CLOSE,OPEN,0.3,0),COLOR0000FF;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
{涨跌停}
今涨停:ZTPRICE(REF(C,1),0.1),COLORRED,NODRAW; 
今跌停:DTPRICE(REF(C,1),0.1),COLOR00A600,NODRAW;
明涨停:ZTPRICE(C,0.1),COLORRED,NODRAW; {盘后挂单看};
明跌停:DTPRICE(C,0.1),COLOR00A600,NODRAW;{盘后挂单看};
{主题投资,主营业务}
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(1,0.00,0.00,0,'主题投资:'),COLORGREEN;
DRAWTEXT_FIX(1,0.06,0.00,0,EXTERNSTR(0,1)),COLORCYAN;
DRAWTEXT_FIX(1,0.00,0.035,0,'主营业务:'),COLORGREEN;
DRAWTEXT_FIX(1,0.06,0.035,0,EXTERNSTR(0,2)),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.07,0,STRCAT(Z3,GNBLOCK)),COLORCYAN;
{涨_下跌_具体数据}
上涨家数:=STRCAT('【沪深上涨家数】:',CON2STR(DYNAINFO(60),0));
下跌家数:=STRCAT('【沪深下跌家数】:',CON2STR(DYNAINFO(61),0));
上涨百分比:=DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100;
下跌百分比:=DYNAINFO(61)/(DYNAINFO(60)+DYNAINFO(61))*100;
DRAWTEXT_FIX(1,0.0575,0.105,0,上涨家数),COLORRED;
DRAWTEXT_FIX(1,0.16,0.105,0,STRCAT(STRCAT('(',VAR2STR(上涨百分比,2)),'%)')),COLORRED;
DRAWTEXT_FIX(1,0.22,0.105,0,下跌家数),COLORGREEN;
DRAWTEXT_FIX(1,0.32,0.105,0,STRCAT(STRCAT('(',VAR2STR(下跌百分比,2)),'%)')),COLORGREEN;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
{右上角年月日}
TA0:=YEAR AND MONTH AND DAY;
TA1:=STRCAT(CON2STR(YEAR,0),'年');
TA2:=STRCAT(CON2STR(MONTH,0),'月');
TA3:=STRCAT(CON2STR(DAY,0),'日');
TA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
TA5:=STRCAT(STRCAT(STRCAT(TA1,TA2),STRCAT(TA3,TA4)),'');
DRAWTEXT_FIX(TA0,0.37,0.105,0,TA5),COLORWHITE;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
时间:=VAR2STR(9.25,2);
DRAWTEXT_FIX(C>0,0.001,1,0,VARCAT('时间:',时间)),COLORMAGENTA;
竞价成交金额:=VAR2STR(DYNAINFO(15),2);
DRAWTEXT_FIX(C>0,0.055,1,0,VARCAT('竞价成交金额:',竞价成交金额)),COLORMAGENTA;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
★★:=(SUM(EMA((CLOSE+LOW)/2,1)/3,3)),COLORWHITE,LINETHICK1;
☆☆:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,9))/3,LINETHICK1,DOTLINE,COLORMAGENTA;
∑:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/21,COLORGREEN,LINETHICK1;
◎:(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/21,COLORWHITE,LINETHICK1,DOTLINE;
☆:(3*H+2*REF(H,1)+1*REF(H,2))/6,COLORGREEN,LINETHICK1,DOTLINE;
★:=(3*L+2*REF(L,1)+1*REF(L,2))/6,COLORRED,LINETHICK1,DOTLINE;
◆:=MA(MA(C,5),3),COLORWHITE,LINETHICK1,DOTLINE;
DA:=(3*CLOSE+OPEN+LOW+HIGH)/6;
≌:=(20*DA+19*REF(DA,1)+18*REF(DA,2)+17*REF(DA,3)+16*REF(DA,4)+15*REF(DA,5)+14*REF(DA,6)
+13*REF(DA,7)+12*REF(DA,8)+11*REF(DA,9)+10*REF(DA,10)+9*REF(DA,11)+8*REF(DA,12)
+7*REF(DA,13)+6*REF(DA,14)+5*REF(DA,15)+4*REF(DA,16)+3*REF(DA,17)+2*REF(DA,18)+
REF(DA,20))/210,COLORCYAN,LINETHICK1;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
HK:=EMA(C,3),COLORMAGENTA;
№H:=MA(HK,6),COLORCYAN,LINETHICK1,NODRAW;
{深蓝色柱}
STICKLINE(C>№H AND №H>O AND C>O,C,O,2.7,0),COLORB20000;
STICKLINE(C>№H AND №H>O AND C>O,C,O,2.7,0),COLOREC0000;
STICKLINE(C>№H AND №H>O AND C>O,C,O,2.1,0),COLORFF4600;
STICKLINE(C>№H AND №H>O AND C>O,C,O,1.5,0),COLORFF6300;
STICKLINE(C>№H AND №H>O AND C>O,C,O,0.9,0),COLORFF8B00;
STICKLINE(C>№H AND №H>O AND C>O,C,O,0.3,0),COLORFFAB00;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
BK:=EMA(C,6),COLORMAGENTA;
⊙H:=MA(BK,3),COLORRED,LINETHICK1;
{黄色柱}
STICKLINE(C>⊙H AND ⊙H>O AND C>O,O,(O+C)/2,2.7,0),COLOR335555;
STICKLINE(C>⊙H AND ⊙H>O AND C>O,O,(O+C)/2,2.1,0),COLOR338888;
STICKLINE(C>⊙H AND ⊙H>O AND C>O,O,(O+C)/2,1.5,0),COLOR33AAAA;
STICKLINE(C>⊙H AND ⊙H>O AND C>O,O,(O+C)/2,0.9,0),COLOR33CCCC;
STICKLINE(C>⊙H AND ⊙H>O AND C>O,O,(O+C)/2,0,0),COLOR33EEEE;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
{白色柱}
STICKLINE(CROSS(⊙H,№H) AND C>O,C,O,2.7,0),COLOR555555;
STICKLINE(CROSS(⊙H,№H) AND C>O,C,O,2.7,0),COLOR777777;
STICKLINE(CROSS(⊙H,№H) AND C>O,C,O,2.1,0),COLOR999999;
STICKLINE(CROSS(⊙H,№H) AND C>O,C,O,1.5,0),COLORBBBBBB;
STICKLINE(CROSS(⊙H,№H) AND C>O,C,O,0.9,0),COLORDDDDDD;
STICKLINE(CROSS(⊙H,№H) AND C>O,C,O,0.3,0),COLORFFFFFF;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
№:MA(HK,6),COLORCYAN,LINETHICK1;
⊙:MA(BK,3),COLORRED,LINETHICK1;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓}
{涨_下跌_具体数据}
涨停:=(CLOSE/REF(C,1)>=1.09)AND C=H;
STICKLINE(涨停,CLOSE,OPEN,0.1,0),COLORYELLOW;
跌停:=(C/REF(C,1)<=0.91)AND C=L;
STICKLINE(跌停,CLOSE,OPEN,0.1,0),COLORWHITE;
{〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓};



3、黄蓝带升级版

黄蓝带升级版( 股 民 学 院 : http://www.58188.net )
 
M1:=7;
M2:=12;
M3:=30;
M4:=50;
M5:=99;
M6:=144;
N:=20;
N1:=7;
N2:=79;
操盘:EXPMA(CLOSE,M1);
工作:EXPMA(CLOSE,M2);
生命:MA(CLOSE,M3),LINETHICK2;
中趋:EXPMA(CLOSE,M4);
长趋:EXPMA(CLOSE,M5);
牛熊:EXPMA(CLOSE,M6);
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0); 
STICKLINE(VAR3P>90,L,L*0.92,1,0),COLORFF00FF;
DRAWTEXT(VAR3P>90,LOW*0.92,'追涨'),COLORFF00FF;
SS:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(SS,2);
买:=MR AND NOT(REF(MR,1)),COLORYELLOW;
STICKLINE(买,L,L*0.95,1,0),COLORRED;
DRAWTEXT(买,L*0.95,'必涨'),COLORRED;
 
A1:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*1,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*1,5,1),COLOR330066;
A2:=(EMA(A1,5)-REF(EMA(A1,5),1))/REF(EMA(A1,5),1)*1;
A5:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*1;
JJ:=(CLOSE+HIGH+LOW)/3;
A:=EMA(JJ,10);
B:=REF(A,1);
STICKLINE(A>B,A,B,5,0),COLORYELLOW;
STICKLINE(A<B,A,B,5,0),COLORBLUE;
M11:=EMA(CLOSE,3);
M22:=EMA(CLOSE,8);
M33:=EMA(M2,13);
M44:=EMA(M2,55);
VAR1:=EMA(M3,55);
M55:=EMA(M4,81);
M66:=EMA(VAR1,144), COLORRED,LINETHICK2; 
WWW58188COM:=EMA(M4,81);
VAR2:=(REF(HIGH,1)+REF(LOW,1))/2;
VAR3:=MA(CLOSE,N)+2*STD(CLOSE,N);
DRAWICON(CROSS(VAR2,VAR3),HIGH*1.035,2);
DRAWTEXT(CROSS(VAR2,VAR3),HIGH*1.02,'卖出'), COLORGREEN;
VAR4:=REF(CLOSE,1);
VAR5:=SMA(MAX(CLOSE-VAR4,0),N1,1)/SMA(ABS(CLOSE-VAR4),N1,1)*100;
VAR6:=CROSS(N2,VAR5);
VAR7:=FILTER(VAR6,4); 
DRAWICON(VAR7,HIGH*1.035,2); 
DRAWTEXT(VAR7,HIGH*1.02,'卖出'), COLORGREEN; 
A7:=(2*C+H+L)/4; 
VAR10:=LLV(LOW,34); 
VAR11:=HHV(HIGH,34); 
SK:=EMA((A7-VAR1)/(VAR2-VAR1)*100,7);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);
DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>6/10 AND VOL>=1.5*MA(VOL,5) AND COUNT(SK>=SD,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,'●买进') ,COLORRED; DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>6/10 AND COUNT(SK>SD,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND OPEN>REF(CLOSE,1),1,0),LOW,'●买进'), COLORRED; 
D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'●抄底'),COLORRED;
STICKLINE(C/REF(C,1)>1.098 AND C=H,O,C,2,0),COLORYELLOW;

上一篇:通达信公式下载:黄金macd金叉,翻倍标王,黄金坑-谷神

下一篇:通达信源码:换手率多彩,陆家嘴谷神主力控盘,非妖不买和涨停妖