大智慧黄金分割主图指标源码
大智慧黄金分割主图指标源码
{黄金分割}
MA5:MA(CLOSE,5),linethick0;
MA10:MA(CLOSE,10),linethick0;
MA20:MA(CLOSE,20),linethick0;
MA30:MA(CLOSE,30),linethick0;
m60:MA(C,60),linethick0;
m89:MA(C,89),linethick0;
m152:ma(c,152),linethick0;
m246:ma(c,246),linethick0;
tj1:=c>=MA20;
tj2:=c<MA20;
STICKLINE(tj1,l,h,0,0),color1122ff;
STICKLINE(tj1,o,c,7,0),color1122ff;
STICKLINE(tj2,l,h,0,0),color22ff55;
STICKLINE(tj2,o,c,7,0),color22ff55;
lhnh:=BARSLAST(DISPSTATUS=1)+1;
nnl:=DISPSTATUS=2;
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
hh:=HHV(h ,lhnh);
ll:=llV(l ,lhnh);
q809:=ll+(hh-ll)*0.809;
q618:=ll+(hh-ll)*0.618;
q500:=ll+(hh-ll)*0.5;
q382:=ll+(hh-ll)*0.382;
q191:=ll+(hh-ll)*0.191; {GUPIAOFF.COM}
PARTLINE(hh,qqqq,RGB(255,18,28));
PARTLINE(q191,qqqq,RGB(198,248,248));
PARTLINE(q382,qqqq,RGB(18,108,208));
PARTLINE(q500,qqqq,RGB(198,8,118));
PARTLINE(q618,qqqq,RGB(98,98,228));
PARTLINE(q809,qqqq,RGB(158,228,158));
PARTLINE(ll,qqqq,RGB(238,238,28));
DRAWTEXT(nnl,hh*0.998,'最高价：'+hh),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q809,'19.1%：'+q809),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q618,'38.2%：'+q618),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q500,'50%：'+q500),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q382,'61.8%：'+q382),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q191,'80.9%：'+q191),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,ll*1.01,'最低价：'+ll),ALIGN2,VALIGN2,Color00FFFF;
DRAWTEXT(nnl,hh,' Ｋ'),ColorFF9900,VALIGN0,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.85,' 线'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.71,' 有'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.57,' 路'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.43,' 勤'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.29,' 为'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.15,' 径'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll,' wafox'),color1122ff,VALIGN2,linethick3;
DRAWTEXT(nnl,hh,' 股'),ColorFF00FF,VALIGN0,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.85,' 海'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.71,' 无'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.57,' 涯'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.43,' 苦'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.29,' 作'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.15,' 舟'),ColorFF00FF,VALIGN1,linethick3;
S:='股票代码：'+STKLABEL;
基本:=' 流通盘'+ FINANCE(7)+'万股'+' 净资产'+FINANCE(35)+'元'+' 公积金'+FINANCE(18)+'元'+' 每股收益'+FINANCE(33)+'元'+' 每股未分配'+FINANCE(32)+'元'+' 市盈率'+DYNAINFO(39);
drawtext(nnl,hh*1.02,s+基本),align2,Color80FFFF;
if DISPSTATUS=2 then begin;
var1:=llv(low,BARSLAST(dispstatus=1));
var2:=hhv(high,BARSLAST(dispstatus=1));
var3:var1-(var2-var1)*0.075;
var100:='所属板块：'; {GUPIAOFF.COM}
