极品主图input:n(26,5,300),p(2,0.1,10);
MA13:MA(C,13),COLORFF9900,DOTLINE;
MID : MA(CLOSE,N),DOTLINE;
UPPER: MID + P*STD(CLOSE,N),DOTLINE;
LOWER: MID - P*STD(CLOSE,N),DOTLINE;
水平面:MA(CLOSE,50),COLORYELLOW,CROSSDOT;
DRAWTEXT(LOW>REF(HIGH,1),L,'上缺口'),COLORYELLOW;
DRAWTEXT(HIGH<REF(LOW,1),H,'下缺口'),COLORGREEN;
DRAWTEXTABS(230,17,'▓历史最高价: '+NUMTOSTRN(HHV(HIGH,0),2)+'元 ' ),Color00FFFF,LINETHICK1;
DRAWTEXTABS(230,32,'▓历史最低价: '+NUMTOSTRN(LLV(LOW,0),2)+'元 ' ),Color00FF00,LINETHICK1;
DRAWTEXTABS(230,47,'▓十日内最高价: '+NUMTOSTRN(hhv(h,10),2)+'元'),Color0099FF,LINETHICK1;
DRAWTEXTABS(230,62,'▓十日内最低价: '+NUMTOSTRN(LLV(LOW,10),2)+'元'),ColorFF9900,LINETHICK1;
X:=BARSLAST(DISPSTATUS=1)+1;
E:=llvall(llv(l,x))*0.95;
DIFF :EMA( EMA(CLOSE,12) - EMA(CLOSE,26),3),COLOR0000FF,LINETHICK0;
DEA : EMA(DIFF,9),COLOR00FF00,LINETHICK0;
MACD : 2*(DIFF-DEA),LINETHICK0;
STICKLINE(MACD>0,E+MACD*3,E,18,0),Color0000FF;
STICKLINE(MACD<0,E+MACD,E,1,0),Color00FF00;
DRAWGBK(MACD>0 ,STRIP(RGB(0,0,255),RGB(140,0,80),0)),LAYER0;
VERTLINE(CROSS(REF(WMA(C,13),1),WMA(C,13)) AND MACD>0 and MA13>MID,2),LAYER0,COLOR00FFff;
PARTLINE(UPPER ,UPPER and MACD>0,rgb(255,120,0)),LINETHICK3,LAYER0;
PARTLINE(MID ,MID and MACD>0,rgb(0,255,0)),LINETHICK3,LAYER0;
PARTLINE(MA13 ,MA13 and MACD>0,rgb(255,255,0)),LINETHICK3,LAYER0;
PK:=CROSS(0,MACD) AND MACD<0;
DRAWTEXT(PK,LOWER*0.999,'●'),LAYER3,ALIGN1,COLOR0000FF,LINETHICK2;
DRAWTEXT(PK,LOWER*0.981,'【哈】'),LAYER0,ALIGN1,COLOR00FFFF,LINETHICK1;
DRAWTEXT(PK,LOWER*0.963,'【买】'),LAYER0,ALIGN1,COLOR00FFCC,LINETHICK1;
DRAWTEXT(PK,LOWER*0.946,'【了】'),LAYER0,ALIGN1,COLOR00FFAA,LINETHICK1;
DRAWTEXT(PK,LOWER*0.929,'【就】'),LAYER0,ALIGN1,COLOR00FF77,LINETHICK1;
DRAWTEXT(PK,LOWER*0.912,'【涨】'),LAYER0,ALIGN1,COLOR00FF00,LINETHICK1;
SW1: (EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10,colorCyan,linethick1;
SW: DMA(EMA(CLOSE,12),SUM(VOL,5)/3/CAPITAL),linethick4,POINTDOT, colorgray;
A:=SW1>=REF(SW1,1) ;
BB:=CROSS( C,SW ) AND O<SW1 AND A=1;
STICKLINE(BB=1,O,C,5,0),COLORYELLOW;
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
MA1:sma(c,2,1),linethick1,COLORYELLOW;
MA2:ema(c,7),linethick1,COLORblue;
a:="LTFunc6@FORLT2"(N); {计算BS点}
s1:="LTFunc6@LT_S1"(N); {s1=0,向下; s1=1,向上}
hs:="LTFunc6@LT_HS"(N); {短线买入机会}
ls:="LTFunc6@LT_LS"(N); {短线卖出机会}
p1:="LTFunc6@LT_P1"(N); {p1=1,显示BS,p1上穿0线,B点 ; p1下穿1线,S点}
upp:="LTFunc6@LT_UPP"(N);{明日B点预测}
udd:="LTFunc6@LT_UDD"(N);{明日S点预测}
{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);
STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),color5454ff;
STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),colorblack;
STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff;
STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff;
STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff;
STICKLINE(p1=1 and c<=o,o,c,7.5,1),color5454ff;
STICKLINE(p1=1 and c<=o,l,c,0.5,1),color5454ff;
STICKLINE(p1=1 and c<=o,h,o,0.5,1),color5454ff;
STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),colorffff54;
STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),colorffff54;
STICKLINE((p1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),colorffff54;
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;
{分析家公式网www.88gs.com}
DRAWTEXTREL(0,940,'主题投资：'+SELFSTRING('主题投资')),Color0099FF;
DRAWTEXTREL(0,980,'千股千评：'+SELFSTRING('千股千评')),COLORRED;
DRAWTEXTABS(00,260,BKNAME ),colorDDDDDD;
DRAWTEXTABS(00,230,'流通盘：'+CAPITAL/100+'万股，利润增长：'+FINANCE2(10)+'%。每股收益：'+FINANCE2(3)+'元。' ),colorAABBAA;
DRAWTEXTABS(00,245,'涨幅：['+
(c-ref(c,1))/ref(c,1)*100+'%] ['+
(ref(c,1)-ref(c,2))/ref(c,2)*100+'%] ['+
(ref(c,2)-ref(c,3))/ref(c,3)*100+'%] 三日：['+
(ref(c,0)-ref(c,3))/ref(c,3)*100+'%]'),color99aa99; |
