{57}
varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
stickline(varcQ,o,(o+c)/2,7.5,0),COLOR8D0B00;{符合上述條件,從開盤價到中間用藍色}
stickline(varcQ,o,(o+c)/2,6,0),COLORC70E00;
stickline(varcQ,o,(o+c)/2,5,0),COLORFA1C10;
stickline(varcQ,o,(o+c)/2,4,0),COLORFF6044;
stickline(varcQ,o,(o+c)/2,2.5,0),COLORF97C0D;
stickline(varcQ,o,(o+c)/2,1,0),COLORFBA960;
{65}
{昨天的收盤價=近4天的最高值,或者,今天的收盤價<前天的收盤價 或 前天的收盤價=近4天的最高值,或者,昨天的收盤價>3天前的收盤價 或 3天前的收盤價=近4天的最高值,
或者,昨天的收盤價>前天的收盤價,或者,前天的收盤價>=近4天的最高值,或者,今天的收盤價<昨天的收盤價}
vardQ:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1);
stickline(vardQ,o,(o+c)/2,7.5,0),color003300;{符合上述條件,從開盤價到中間用綠色}
stickline(vardQ,o,(o+c)/2,6,0),color005500;
stickline(vardQ,o,(o+c)/2,5,0),color007700;
stickline(vardQ,o,(o+c)/2,4,0),color009900;
stickline(vardQ,o,(o+c)/2,2.5,0),color00bb00;
stickline(vardQ,o,(o+c)/2,1,0),Color00E100;
{75}
{十字光標提示}
a:="LTFunc5@FORLT2";
s1:="LTFunc5@LT_S1";
hs:="LTFunc5@LT_HS";
ls:="LTFunc5@LT_LS";
p1:="LTFunc5@LT_P1";
upp:="LTFunc5@LT_UPP";
udd:="LTFunc5@LT_UDD";
{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
d1:=ema(abs("ddx.ddx"),60);
d2:=max("ddx.ddx"/d1+7.5,7.5);
d3:=min("ddx.ddx"/d1,10);
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'明日收盤價<'+numtostrn(udd,2)+',出現S點\n','若明日收盤價>'+numtostrn(upp,2)+',出現B點\n');{1.BS點:}
tr1:=ifs(s1=1,'明日收盤價<'+numtostrn(ls,2)+',短線賣出機會','若明日收盤價>'+numtostrn(hs,2)+'短線買入機會');{2.短線:}
tr2:=ifs(p1=1,ifs(cross(p1,0),'B點','持股'),ifs(cross(1,p1),'S點','持幣'));{1.BS點:}
tr3:=ifs(s1=0,'向下,','向上,');{2.短線:}
tr4:='3.能量級別:'+numtostrn(d3,1)+'級';{3.能量級別:}
{94}
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;
{97}
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;
{100}
RSV:=(CLOSE-LLV(LOW,N日))/(HHV(HIGH,N日)-LLV(LOW,N日))*100;
K:SMA(RSV,K線,1),LINETHICK0;
D:SMA(K,K線,1),LINETHICK0;
J:3*K-2*D,LINETHICK0;
{105}
買入:=IF((J-D),CROSS(J, K),0);
賣出:=IF((J-D),CROSS(D, K),0);
DRAWTEXT(買入>0,L-0.25,'買'),LINETHICK4,ALIGN1,COLOR00FFFF;
DRAWTEXT(賣出>0,H+0.45,'賣'),LINETHICK4,ALIGN1,COLOR33FF33;
{110}
bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'買賣點決策系統(tǒng)提示“B.S”\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+'\n'+'<*t=006000*><*c=FFFFFF*><*p=95*>'+'衛(wèi)東KDJ提示“買”“賣”,僅供對比參考';
drawflagtext(1,fb,bs);
{113}
DRAWTEXTREL(0,0,'日K線'),COLORYELLOW;
DRAWTEXTREL(600,975,'證券代碼: '+STKLABEL+' 證券名稱: '+STKNAME+''),ColorFFAA00;
DRAWTEXTABS(30,0,'《QQ:512764231制作》'),COLOR0000FF;
總股本:=FINANCE2(35) ;
流通股:=FINANCE2(37);
限售A股:=FINANCE2(41);
每股收益:=FINANCE2(3);
市盈率:=DYNAINFO(39);
每股公積金:=FINANCE2(7);
所屬板塊:=BKNAME;
DRAWTEXTABS(0,14, '所屬板塊: '+所屬板塊),Color888888{,COLORYELLOW};
DRAWTEXTABS(0,27,'每股收益: '+NUMTOSTRN(每股收益,3)+'元 利潤增長:'+FINANCE2(10)+'% 市盈率:'+NUMTOSTRN(市盈率,1)+'倍 '+' 每股公積金:'+NUMTOSTRN(每股公積金,2)+'元'),Color888888{,COLORYELLOW};
DRAWTEXTABS(0,40,'總 股 本: '+NUMTOSTRN(總股本,2)+'萬股'+' 流通A股:'+NUMTOSTRN(流通股,2)+'萬股'+' 限售A股:'+NUMTOSTRN(限售A股,2)+'萬股'),Color888888{,COLORYELLOW};
(南方財富網SOUTHMONEY.COM)