STICKLINE(close>open,close,open,7.5,1),COLOR4444FF;
STICKLINE(open>=close,close,open,7.5,0),ColorFFFF00;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),COLOR4444FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),COLOR4444FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5,0),ColorFFFF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5,0),ColorFFFF00;
高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
基准:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1));
{
stickline(A1X>=0,突破,突破,10,0),coloryellow,LAYER6;
stickline(A1X<0,突破,ref(突破,1),0,-1000),LAYER6;
}
STICKLINE(A1X>=0,基准,突破,10,0),COLOR000099,LAYER6;
STICKLINE(A1X<0,基准,突破,10,0),COLOR00CC66,LAYER6;
b:="LTFunc6@FORLT2";
s1:="LTFunc6@LT_S1";
p0:="LTFunc6@LT_P0";
p1:="LTFunc6@LT_P1";
hs:="LTFunc6@LT_HS";
ls:="LTFunc6@LT_LS";
upp:="LTFunc6@LT_UPP";
udd:="LTFunc6@LT_UDD";
d2:="Lxddx.ddx"/ema(abs("Lxddx.ddx"),60)+8;
d3:=min("Lxddx.ddx"/ema(abs("Lxddx.ddx"),60),10);
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'明日<'+numtostrn(udd,2)+',出现S点','明日>'+numtostrn(upp,2)+',出现B点');
tr1:=ifs(s1=1,'明日<'+numtostrn(ls,2)+',短线卖出','明日>'+numtostrn(hs,2)+',短线买入');
tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股待涨'),ifs(cross(1,p1),'S点','持币观望'));
tr3:=ifs(s1=0,'向下 ','向上 ');
tr4:=' 能量级别:'+numtostrn(d3,1)+'级';
{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd;}
d1:=ema(abs("ddx.ddx"),60); {ddx绝对值60日指数平滑移动平均}
d2:=max("ddx.ddx"/d1+7.5,7.5);
d3:=min("ddx.ddx"/d1,10); {能量级别:当日ddx与60日平均值的比值,最高10.0}
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价>'+numtostrn(upp,2)+',出现B点\n');
tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');
tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币'));
tr3:=ifs(s1=0,'向下,','向上,');
tr4:='3.能量级别:'+numtostrn(d3,1)+'级';
bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'买卖点决策系统提示\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS点:'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2.短线:'+tr3+tr1+'\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+tr4;
drawflagtext(1,fb,bs); {1120,0415新版用代码}
drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0;
drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2;
drawbmp(s1=1 and ref(s1,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0;
drawbmp(s1=0 and ref(s1,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2;
|
