彩带均线主图源码希望大家优化无未来介绍
彩带均线主图源码希望大家优化无未来
DRAWTEXTABS(10,5,'所属板块：'+BKNAME),COLORFF50FF,linethick1;
总股本:=finance2(35)/1000000*100;
流通盘大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(350,25,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,COLORGREEN;
DRAWTEXTABS(350,45,'总股本大小：'+NUMTOSTRN(总股本,2)+'亿'),LINETHICK1,COLORGREEN;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
DRAWTEXTABS(190,25,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLORred;
DRAWTEXTABS(190,45,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
DRAWTEXTABS(190,65,'历史最高：'+HHV(HIGH,0)+'元'),Colorred;
DRAWTEXTABS(10,25,'主营收入同比增长：'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,ColorYELLOW;
DRAWTEXTABS(10,45,'净利润同比增长：'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,COLORyellow;
DRAWTEXTABS(10,65,'历史最低：'+LLV(LOW,0)+'元'),COLORyellow;
MA5:MA(CLOSE,5),COLORFFFFFF,LAYER0;
MA10:MA(CLOSE,10),COLOR00FFFF,LAYER0;
MA20:MA(C,20),COLORFF00FF,LAYER0;
MA30:MA(C,30),COLOR00FF00,LAYER0;
FILLRGN(MA(CLOSE,20),MA(CLOSE,30),MA(CLOSE,20)>MA(CLOSE,30),RGB(255,255,0));
FILLRGN(MA(CLOSE,10),MA(CLOSE,20),MA(CLOSE,10)>MA(CLOSE,20),RGB(255,0,0));
STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
STICKLINE(C<=O,C,O,8,0),Color7B7b00;
STICKLINE(C<=O,C,O,6,0),Color909000;
STICKLINE(C<=O,C,O,4,0),ColorA8a800;
STICKLINE(C<=O,C,O,2,0),COLORcece00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;
QWX1:=(HHVALL(HIGH)-LLVALL(LOW))/64;
QWX2:=LLVALL(LOW)+QWX1;
{MACD}
DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26));
DEA:=EMA(DIF,9);
MCD:=(DIF-DEA)*2+QWX2;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
DRAWICON(底背离,qwx2*0.99,15) ;
DRAWTEXT(底背离,qwx2*1,'花开'),COLOR00FFFF,ALIGN1;
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1;
DRAWICON(低位金叉,qwx2*0.99,15) ;
DRAWTEXT(低位金叉,qwx2*1,'花开'),COLOR00FFFF,ALIGN1;
工作线:=EMA(C,2);
短线:=EMA(SLOPE(C,9)*20+C,37);
买:=CROSS(工作线,短线);
卖:=CROSS(短线,工作线);
DRAWICON( 卖,H*1.03,12),ALIGN1;
DRAWTEXT(买,L*0.99,'B'),LINETHICK4,ALIGN1,COLORyellow;
FILLRGN(MCD,QWX2,MCD>QWX2,RGB(255,0,0)),PRECIS2;
FILLRGN(QWX2,MCD,QWX2>=MCD,RGB(0,255,250)),PRECIS2;
gd12966
