大智慧极品主图公式

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;
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;