您现在的位置:好股网 >> 股票公式 >> 通达信公式 >> 一键转帖:绝品MACD 副图 源码

绝品MACD 副图 源码


指标功能:[B]国产软件[/B]
指标类型:简体中文
所需积分:0
推荐星级:
授权方式:共享版
公式大小:0 Bytes
更新时间:2011-12-23 08:47:00
公式简介:

{n1(1,100,6); n2(1,100,18); n3(1,100,54); n4(1,1000,162)}
l2:=ma(c,3);
l3:=ma(c,60);
l4:=ma(c,120);
l5:=ma(c,40);
var1:=sum(winner(close)*100,13)/10-(sum(winner(close)*100,1)/20+10);
狂龙出海: if(cross(l2,l3) and close<l4,-60,0);
var2:=close/l5*100<78;
var3:=close/l3*100<74;
var4:=high>(low*1.051);
var5:=var4 and count(var4,5)>1;
var6:=close/hhv(high,barscount(close>0))*100;
var7:=ema(ema(close,13),13);
控盘:= (var7-ref(var7,1))/ref(var7,1)*5000;
a1:=cross(控盘,0);
控盘1:if(a1,180,0),coloryellow,linethick1;
drawtext(控盘1>0,160,'★控盘!'),colord411ff;
狂龙探底: if((ref(c,13)-close)/ref(c,13)*100*var3>15 and sum(vol/capital,13)

*100<18 and vol/capital*100<2.5 and (ref(c,1)-close)/ref(c,1)*100<8 and

var6<=50 and var5 and (var2 or var3),80,0);
{drawicon(filter(狂龙探底,6),35,1);}
drawtext(filter(狂龙探底,6),70,'狂龙探底');
diff:(ema(close,12) - ema(close,26))*600,Color95008C,linethick2;
dea:ema(diff,9), colorffffff,linethick1;
drawtext(cross(diff,dea),diff,'▲'),linethick2,coloryellow;
drawtext(cross(dea,diff),dea,'▼'),linethick2,colorwhite;
ddiff:=(ema(close,12) - ema(close,26));
ddea:=ema(ddiff,9);
macd:=1200*(ddiff-ddea);
stickline(macd>=0,macd,0,4,1),colorf00ff0;
stickline(macd<0,macd,0,4,1),colorwhite;
stickline(macd<ref(macd,1)and macd>0,0,macd,4,0 ),color00aaff;
stickline(macd<ref(macd,1)and macd>0,0,macd,3.3,0 ),color00bbff;
stickline(macd<ref(macd,1)and macd>0,0,macd,2.2,0 ),color00ccff;
stickline(macd<ref(macd,1)and macd>0,0,macd,1.65,0 ),color00ddff;
stickline(macd<ref(macd,1)and macd>0,0,macd,1.1,0 ),color00eeff;
stickline(macd<ref(macd,1)and macd>0,0,macd,0.55,0 ),color00ffff;
stickline(macd>=ref(macd,1)and macd>0,0,macd,4 ,0 ),color0000aa;
stickline(macd>=ref(macd,1)and macd>0,0,macd,3.3 ,0 ),color0011bb;
stickline(macd>=ref(macd,1)and macd>0,0,macd,2.2,0 ),color0022cc;
stickline(macd>=ref(macd,1)and macd>0,0,macd,1.65 ,0 ),color0033dd;
stickline(macd>=ref(macd,1)and macd>0,0,macd,1.1 ,0 ),color0044ee;
stickline(macd>=ref(macd,1)and macd>0,0,macd,0.55 ,0 ),color0055ff;
stickline(macd>ref(macd,1)and macd<0,0,macd,4,0 ),coloraa00bb;
stickline(macd>ref(macd,1)and macd<0,0,macd,3.3 ,0 ),colorbb11bb;
stickline(macd>ref(macd,1)and macd<0,0,macd,2.2,0 ),colorcc22bb;
stickline(macd>ref(macd,1)and macd<0,0,macd,1.65,0 ),colordd33bb;
stickline(macd>ref(macd,1)and macd<0,0,macd,1.1,0 ),coloree44bb;
stickline(macd>ref(macd,1)and macd<0,0,macd,0.55 ,0 ),colorff55bb;
stickline(macd<=ref(macd,1)and macd<0,0,macd,4,0 ),colorffaa00;
stickline(macd<=ref(macd,1)and macd<0,0,macd,3.3 ,0 ),colorffbb11;
stickline(macd<=ref(macd,1)and macd<0,0,macd,2.2,0 ),colorffcc22;
stickline(macd<=ref(macd,1)and macd<0,0,macd,1.65 ,0 ),colorffdd33;
stickline(macd<=ref(macd,1)and macd<0,0,macd,1.1 ,0 ),colorffee44;
stickline(macd<=ref(macd,1)and macd<0,0,macd,0.55 ,0 ),colorffff55;
macd1:=2*(ddiff-ddea)*600,colorred,linethick1;
macd2:=ma(macd1,3);
macdl:=hhv(macd2,13);
stickline(macdl<macd1,macd1,macd2,2,0),colorred;
多空生命:=(ma(close,100)+ma(close,100)+ma(close,100)+ma(close,1000))/4;
日线:=ma(close,5);
神龙出海: if(cross(日线,多空生命) and 日线>多空生命,200,0),

colorwhite,linethick2;
drawtext(神龙出海>0,200,'☆开仓!'), colorwhite;
var03:=(close-ma(close,6))/ma(close,6)*100;
var04:=(close-ma(close,24))/ma(close,24)*100;
var05:=(close-ma(close,32))/ma(close,32)*100;
var06:=(var03+var04+var05)/3;
var07:=ema(var06,5);
指标:ema(ema(var03,5),5)*3, colorstick;
var08:=if(var06<=-20,10,0);
var09:=hhv(var08,10);
stickline(var08=10,20,10,5,0),color6666ff;
vara:=if(var09 and cross(ma(close,3),ma(close,5)),20,0);
drawtext(var08=10 and filter(var08=10,5),-10{15},'接近底部'),linethick1,coloryellow;
stickline(var08=10 and filter(var08=10,5),-1.6{20},-10,5,0),coloryellow;
drawtext(vara=20,15,'底部'),linethick1,colorwhite;
vare:=ma(100*(close-llv(close,34))/(hhv(high,34)-llv(low,34)),5)-20;
varf:=100-3*sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1)

+2*sma(sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
var010:=100-3*sma((open-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1)

+2*sma(sma((open-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
var011:=varf<ref(var010,1) and vol>ref(vol,1) and close>ref(close,1);
drawtext(var011 and count(var011,30)=1,-25,'大资金'),linethick1,colorff00ff;
stickline(var011 and count(var011,30)=1,1,20,10,0),colorffcc66;
var012:=(high+low+close)/3;
var013:=(var012-ma(var012,14))/(0.015*avedev(var012,14));
var014:=(var012-ma(var012,70))/(0.015*avedev(var012,70));
var015:=if(var013>=150 and var013<200 and var014>=150 and var014<200,10,0);
var016:=if(var013<=-150 and var013>-200 and var014<=-150 and var014>-200,-

10,var015);
var017:=(close-ma(close,13))/ma(close,13)*100;
var018:=100-abs(var017);
var019:=if(var018<90,var018,100);
var1a:=if(vare>0,vare,0);
var1b:=if(var014>=200 and var013>=150,15,if(var014<=-200 and var013<=-150,-

15,var016))+60;
var1c:=var1a>48 and var1b>60 and var019<100;
drawtext(var1c and count(var1c,30)=1,-30,'出货'),linethick1,colorffcc66;
stickline(var1c and count(var1c,30)=1,0,20,10,0),colorffffff;
 


 


 


[url=http://www.goodgupiao.com/gupiaogongshi/17005.html][B]绝品MACD 副图 源码[/B][/url]