自用华丽主图详解 通达信源码贴图

指标公式详细说明

自用华丽主图，结合了多个指标进行组合优化，特别是清仓k线组合，公布源码，供大家进行优化

na:=strcat(con2str(year,0),' 年 '); 
ya:=strcat(con2str(month,0),' 月 '); 
ra:=strcat(con2str(day,0),' 日 '); 
sj:=strcat(strcat(na,ya), ra); 
drawtext_fix(c>0,0.88,0,0,sj);


vard:=close<ref(close,1) and close<ref(close,2);
vare:=ref(vard,1) and close>=ref(close,1) and close<=ref(close,2);
varf:=ref(vare,1) and close<=ref(close,1) and close>=ref(close,2);

mid:=(3*close+low+open+high)/6;
取舍线:(20*mid+19*ref(mid,1)+18*ref(mid,2)+17*ref(mid,3)+16*ref(mid,4)+15*ref(mid,5)+14*ref(mid,6)+13*ref(mid,7)+12*ref(mid,8)+11*ref(mid,9)+10*ref(mid,10)+9*ref(mid,11)+8*ref(mid,12)+7*ref(mid,13)+6*ref(mid,14)+5*ref(mid,15)+4*ref(mid,16)+3*ref(mid,17)+2*ref(mid,18)+ref(mid,20))/210;
生命线:ma(取舍线,6);
五日线:ma(close,5);
水平面:ma(close,60);
hdy:=ema (100*(c-llv(low,34))/(hhv(h,34)-llv(low,34)),3);
高位:=hdy>80;
警示:=(cross(hdy,45) or hdy>45) and (hdy/ref(hdy,1)-1)*100*180/3.14159>45;
total:=if(period=1,5,if(period=2,15,if(period=3,30,if(period=4,60,if(period=5,240,1)))));
 mtime:=mod(fromopen,total);
 ctime:=if(mtime<0.5,total,mtime);
 vvol:=(currbarscount=1,vol*total/ctime);
放量:=vvol>ma(v,250)*1.5;
szjd:=(五日线/ref(五日线,1)-1)*100*180/3.14159;
smxzf:=abs(生命线-ref(生命线,1))/生命线;
qsxzf:=abs(取舍线-ref(取舍线,1))/取舍线;
qmxzf:=abs(生命线-取舍线)/生命线;
tj3:=cross(五日线,取舍线) and smxzf<0.025 and 五日线>ref(五日线,1) and qmxzf<0.03 and 警示 and 放量 and 五日线>水平面 and 取舍线>水平面 and 生命线>水平面 and 五日线>取舍线 and cross(取舍线,生命线) and (五日线/ref(五日线,1)-1)*100*180/3.14159>60;
hxlxa:=ma(close,5);
hxlxb:=ma(close,10);
hxlxc:=(hxlxa-close)/close>13/100;
hxlxd:=(close-ma(close,13))/ma(close,13)*100/0.7;
hxlxe:=(close-ma(close,6))/ma(close,6)*100*2;
hxlxf:=(close-ma(close,11))/ma(close,11)*100/0.3/1.3/1.5;
hxlxg:=count(hxlxd<-12,4)>1;
hxlxh:=count(hxlxe<-9,4)>1;
hxlxi:=count(hxlxf<-12,4)>1;
bj:=hhv(high,5)/c;
jl:=llv(l,5)/c;
ha:=(hhv(high,5)+llv(low,5))/2/c;
rn:=(llv(low,5)*hhv(high,5))/c/c;
hxlxj:=count(cross(1.2,rn),4)=1;
hxlxk:=count(cross(1.1,rn),4)=1;
hxlxl:=count(rn>=1.2,4)=1;
hxlxm:=hxlxg and hxlxh and hxlxi and hxlxj and hxlxk and hxlxl;
zjmd1:=ref(close,1);
zjmd2:=sma(max(close-zjmd1,0),7,1)/sma(abs(close-zjmd1),7,1)*100;
zjmd3:=(c-ma(c,6))/ma(c,6)*100;
zjmd4:=(c-ma(c,12))/ma(c,12)*100;
zjmd5:=(c-ma(c,24))/ma(c,24)*100;
zjmd6:=(zjmd3+2*zjmd4+3*zjmd5)/6;
zjmd7:=ma(zjmd6,3);
smmd1:=ma((2*c+h+l)/4,5);
smmd2:=smmd1*(200-102)/100;
smmd3:=(1-7/100)*dma(c,abs((2*c+h+l)/4-ma(c,20))/ma(c,20));
smmd4:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
smmd5:=3*sma(smmd4,3,1)-2*sma(sma(smmd4,3,1),3,1);
smmd6:=((h+l+c)/3-ma((h+l+c)/3,14))/(0.015*avedev((h+l+c)/3,14));
smmd7:=smmd2<smmd3&&smmd5>ref(smmd5,1)&&ref(smmd5,1)<ref(smmd5,2)&&smmd6<-100&&smmd6>ref(smmd6,1);
wvr := sum((if(close>open,vol,0)+if(close=open,vol/2,0)),26)/
sum((if(close<open,vol,0)+if(close=open,vol/2,0)),26)*100;
rsv:=(indexc-llv(indexl,18))/(hhv(indexh,18)-llv(indexl,18))*100;
k:=sma(rsv,12,1);
wrsv:=(close-llv(low,9))/(hhv(high,9)-llv(low,9))*100;
wk:=sma(wrsv,3,1);
d:=sma(wk,3,1);
k1:=sma(rsv,3,1);
d1:=sma(k1,3,1);
j:=3*k1-2*d1;
midv:=ma(close,20);
upper:=midv+2*std(close,20);
lower:=midv-2*std(close,20);
ljd:=((ma(c,30)-l)/ma(c,60))*200;
gzd:=(count(hxlxd<-12,3)+count(hxlxe<-9,3)+count(hxlxf<-12,3)+count(cross(1.2,rn),3)+count(cross(1.1,rn),3)+count(rn>=1.2,3)+count(cross(zjmd6,zjmd7) and zjmd7<-9.5,3)+count(smmd7,3)+count(cross(70,wvr),3)+count(cross(k,20),3)+count(cross(wk,d)&&wk<20,3)+count(cross(j,0),3)+count(cross(close,lower),3)+count(ljd>30,3))>=7;
drawtext(gzd,low*0.89,'共'),colorred;
drawtext(gzd,low*0.87,'振'),colorred;
drawtext(gzd,low*0.85,'底'),colorred;
drawtext(hxlxm,low*0.97,'◆'),colorred;
drawtext(hxlxm,low*0.95,'底'),colorred;
drawtext(hxlxm,low*0.93,'显'),colorred;
drawtext(hxlxm,low*0.91,'◆'),colorred;
drawicon(tj3,low*0.99,13);
drawtext(tj3,low*0.97,'◆'),colorred;
drawtext(tj3,low*0.95,'启'),colorred;
drawtext(tj3,low*0.93,'动'),colorred;
drawtext(tj3,low*0.91,'◆'),colorred;

ttt:=barslast(tj3);
ll1:=高位;

gwfl1:=放量 and c<ref(c,1) and ll1;
gwfl2:=放量 and (c-o)/ref(c,1)*100<3 and c>=ref(c,1) and ll1;


lxjx:=(h-max(c,o))/abs(c-o)>1.5 and (min(c,o)-l)/abs(c-o)>1.5;
向下跳空缺口:=h<ref(l,1); 

大阴线:=(ref(c,1)-c)/ref(c,1)*100>3 and (h-l)/ref(c,1)*100>5;

长十字:=close=open and high/low >1.03;
垂死十字:=close=open and close=low and close!=high;
黄昏之星:=ref(close,2)/ref(open,2) > 1.03 and ref(open,1) > ref(close,2) and abs(ref(open,1)-ref(close,1))/ref(close,1)<0.02 and
 close/open<0.97 and close<ref(close,2);
黄昏十字星:=ref(close,2)/ref(open,2) > 1.05 and ref(open,1) > ref(close,2) and ref(open,1)=ref(close,1) and
 close/open<0.95 and close<ref(close,2);
吊颈:=high = max(open,close) and high-low > 3*(high-min(open,close)) and close>ma(close,5);
穿头破脚:=(ref(close,1)/ref(open,1)>1.03 and close/open<0.96 and close<ref(open,1) and open>ref(close,1))
 or (ref(close,1)/ref(open,1)<0.97 and close/open>1.04 and close>ref(open,1) and open<ref(close,1));
身怀六甲:=abs(ref(close,1)-ref(open,1))/ref(close,1) > 0.04 and max(close,open) < max(ref(close,1),ref(open,1)) and min(close,open) > min(ref(close,1),ref(open,1));
十字胎:=abs(ref(close,1)-ref(open,1))/ref(close,1) > 0.04 and close=open and
 close < max(ref(close,1),ref(open,1)) and close > min(ref(close,1),ref(open,1));
长上影:=h-max(o,c)>abs(o-c);
长下影:=min(o,c)-l>abs(o-c);
十字星:=close=open and high!=low;
乌云盖顶:=ref(close,1)/ref(open,1)>1.03 and close/open<0.97 and open>ref(close,1) and close<ref(close,1);

ll3:=向下跳空缺口 or 大阴线 or 长十字 or 垂死十字 or 黄昏之星 or 黄昏十字星 or 吊颈 or 穿头破脚 or 身怀六甲 or 十字胎 or 长下影 or 长上影 or 十字星 or 乌云盖顶;

ll4:=ll1 and ll3;



ttt1:=barslast(ll4)<4;

drawtext(filter(gwfl1 and ll3,7),high*1.07,'收'),colorffff00;
drawtext(filter(gwfl1 and ll3,7),high*1.05,'阴'),colorffff00;
drawtext(filter(gwfl1 and ll3,7),high*1.03,'清'),colorffff00;
drawtext(filter(gwfl1 and ll3,7),high*1.01,'仓'),colorffff00;


b008:=ref(close,1);
b009:=((((sma(max((close - b008),0),19,1) / sma(abs((close - b008)),19,1)) * 100) - 50) * 1.25);
b010:=((((sma(max((close - b008),0),34,1) / sma(abs((close - b008)),34,1)) * 100) - 50) * 1.25);
b011:=((((sma(max((close - b008),0),72,1) / sma(abs((close - b008)),72,1)) * 100) - 50) * 1.25);
b012:=ema(((((b009 + b010) / 2) - b011) * 5),6);
drawtext(cross(b012,5),l*0.87,'强'),colorgreen;
drawtext(cross(b012,5),l*0.85,'多'),colorgreen;
年:=year,nodraw;
月:=month,nodraw;
星期:=weekday,nodraw;
日1:=datetoday(date);
上市日:=ref(date,totalbarscount-currbarscount);
自然日:=日1-datetoday(上市日)+1;
zb:=(自然日-ref(自然日,1))!=星期-ref(星期,1)
or totalbarscount-currbarscount=0;
本周第几天:=barslast(zb)+1;
本月第几天:=barslast(年*100+月!=ref(年*100+月,1))+1;
ma1:=ref(c,本周第几天);
ma2:=ref(ma1,本周第几天);
ma3:=ref(ma2,本周第几天);
ma4:=ref(ma3,本周第几天);
ma5:=ref(ma4,本周第几天);
ma6:=ref(ma5,本周第几天);
ma7:=ref(ma6,本周第几天);
ma8:=ref(ma7,本周第几天);
ma9:=ref(ma8,本周第几天);
十周价:=(c+ma1+ma2+ma3+ma4+ma5+ma6+ma7+ma8+ma9)/10;
出击突破:refdate(十周价,date),colorlimagenta,dotline;
drawtext(islastbar,出击突破,' 出击突破'),colorlimagenta;
ma10:=ma(close,10),coloryellow,linethick0;
ma54:=ma(close,54),colorffcccc,linethick0;
pl1:=(((close - ma54) / ma54) < 0.1);
pl2:=(((close - ma10) / ma10) < 0.3);
偏离率:=(((pl1 = 1) and (pl2 = 1)) * 0.2);
平台突破:=((((偏离率 = 0) and (ref(偏离率,1) = 0.2)) and (ref((count((偏离率 = 0.2),10) = 10),1) = 1)) * 1);
drawtext(平台突破,l,'＝＝＝突破★牛股＝＝＝＝＝＝＝＝＝＝'),colorred;
varw1:=ma(hhv(high,485),17);
varw2:=ma(hhv(high,222),17);
varw3:=ma(hhv(high,96),17);
varw4:=ma(llv(low,485),17);
varw5:=ma(llv(low,222),17);
varw6:=ma(llv(low,96),17);
varw7:=ma((varw4*0.96+varw5*0.96+varw6*0.96+varw1*0.558+varw2*0.558+varw3*0.558)
/6,17);
varw8:=ma((varw4*1.25+varw5*1.23+varw6*1.2+varw1*0.55+varw2*0.55+varw3*0.65)/6,17);
varw9:=ma((varw4*1.3+varw5*1.3+varw6*1.3+varw1*0.68+varw2*0.68+varw3*0.68)/6,17);
bara:=ma((varw7*3+varw8*2+varw9)/6*1.738,17);
barb:=if(date<=1341231,bara,bara*day);
barc:=low;
bard:=ref(low,1);
bare:=sma(abs(barc-bard),3,1)/sma(max(barc-bard,0),3,1)*100;
barf:=ma(if(close*1.35<=barb,bare*10,bare/10),3);
varw10:=llv(low,30);
varw11:=hhv(barf,30);
varw12:=1341231;

tj:=if(date<=varw12,ma(if(low<=varw10,(barf+varw11*2)/2,0),3),100000000);
挖坑:=ref(tj,2)>ref(tj,3)and tj<ref(tj,1);
vars1:=ref((low+open+close+high)/4,1); 
vars2:=sma(abs(low-vars1),13,1)/sma(max(low-vars1,0),10,1); 
vars3:=ema(vars2,10);
vars4:=llv(low,33);
vars5:=ema(if(low<=vars4,vars3,0),3);
主力进场:=vars5>ref(vars5,1);
drawtext(filter(挖坑,2) and ref(vars5,1)>0 and ref(vars5,1)=hhv(vars5,5),l*0.87,'绝'),colorred;
drawtext(filter(挖坑,2) and ref(vars5,1)>0 and ref(vars5,1)=hhv(vars5,5),l*0.85,'底'),colorred;
difc:="macd.dif#month"(6,13,5);
dec:="macd.dea#month"(6,13,5);
ck:="kdj.k#month"(9,3,3);
cd:="kdj.j#month"(9,3,3);
mk月金叉:=cross(difc,dec) and cross(cd,ck);
drawtext(mk月金叉,l*0.83,'月'),coloryellow;
drawtext(mk月金叉,l*0.81,'金'),coloryellow;
drawtext(mk月金叉,l*0.79,'叉'),coloryellow;
drawtext(mk月金叉,l*0.77,'共'),coloryellow;
drawtext(mk月金叉,l*0.75,'振'),coloryellow;
difb:="macd.dif#week"(6,13,5); 
deb:="macd.dea#week"(6,13,5); 
bk:="kdj.k#week"(9,3,3);
bd:="kdj.j#week"(9,3,3);
mk周金叉:=cross(difb,deb) and cross(bd,bk);
drawtext(mk周金叉,l*0.83,'周'),colorred;
drawtext(mk周金叉,l*0.81,'金'),colorred;
drawtext(mk周金叉,l*0.79,'叉'),colorred;
drawtext(mk周金叉,l*0.77,'共'),colorred;
drawtext(mk周金叉,l*0.75,'振'),colorred;

指标公式下载地址

上一指标公式：直观准确好用的副图指标详解 通达信直观准确

下一指标公式：量学五彩K线转载和谐完全加密指标详解 通达信指标和谐

相关通达信公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文自用华丽主图详解 通达信源码贴图仅供学习研究。