通达信股市农耕主图指标(源码)

2015-02-26 21:33:00来源:本站整理浏览:573

LL1:=IF(CONST((HH+LL)/2)<CONST(C),LL,HL);{当现价小于中间值时以最小值为最低点，反之以HL为最低点}
HLMAX:=MAX(HH1,LL1);{设定所要叠加副图比例的最大值}
HLMIN:=MIN(HH1,LL1);{设定所以叠加副图比例的最小值}
HLMN1:=(HLMAX+HLMIN)/2;{取设定所要叠加副图比例的最大最小值的中间值}
HLMN2:=HLMAX-HLMIN;{取设定所要叠加副图比例的最大最小值的差值}
HLMN3:=(100-0)/2;
HLMN4:=100-0;
{(50-50)*HLMN2/100+HLMN1,COLOR555555;}
{(20-50)*HLMN2/100+HLMN1,COLOR555555;
(80-50)*HLMN2/100+HLMN1,COLOR555555;}
{(100-50)*HLMN2/100+HLMN1,COLOR555555;}
{以上定义叠加副图坐标}
{STICKLINE(吸筹,(0-50)*HLMN2/100+HLMN1,(VAR999-50)*HLMN2/100+HLMN1,2,10),COLORFF00FF;
STICKLINE(J<=0,(90-50)*HLMN2/100+HLMN1,(100-50)*HLMN2/100+HLMN1,4,0),COLORYELLOW;
IF(反转=50,(50-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORRED;
IF(买=35,(35-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORYELLOW,LINETHICK1.5;
IF(跟进=10,(10-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORRED;}
{KZ:(K-50)*HLMN2/100+HLMN1,COLORFFFFFF;
DZ:(D-50)*HLMN2/100+HLMN1,COLOR00FFFF;
JZ:(J-50)*HLMN2/100+HLMN1,COLORMAGENTA;}
{KDJ_K:="KDJ.K"(9,3,3);
KDJ_D:="KDJ.D"(9,3,3);
KDJ_J:="KDJ.J"(9,3,3);
买1:=CROSS(KDJ_J,0) OR (CROSS(KDJ_J,KDJ_K) AND KDJ_D<26);
买2:=CROSS("RSI.RSI1"(6,2,2),20) OR CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
买3:=CROSS("MACD.DIF","MACD.DEA") OR CROSS("MACD.MACD",0);
买0:=买1+买2+买3;
买:IF(买0>1,买0,0);
DRAWICON(买0>1,L*0.98,16);};