{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;{符合上述條件,從開(kāi)盤(pán)價(jià)到中間用藍色}
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}
{昨天的收盤(pán)價(jià)=近4天的最高值,或者,今天的收盤(pán)價(jià)<前天的收盤(pán)價(jià) 或 前天的收盤(pán)價(jià)=近4天的最高值,或者,昨天的收盤(pán)價(jià)>3天前的收盤(pán)價(jià) 或 3天前的收盤(pán)價(jià)=近4天的最高值,
或者,昨天的收盤(pán)價(jià)>前天的收盤(pán)價(jià),或者,前天的收盤(pán)價(jià)>=近4天的最高值,或者,今天的收盤(pán)價(jià)<昨天的收盤(pán)價(jià)}
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;{符合上述條件,從開(kāi)盤(pán)價(jià)到中間用綠色}
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,'明日收盤(pán)價(jià)<'+numtostrn(udd,2)+',出現S點(diǎn)\n','若明日收盤(pán)價(jià)>'+numtostrn(upp,2)+',出現B點(diǎn)\n');{1.BS點(diǎn):}
tr1:=ifs(s1=1,'明日收盤(pán)價(jià)<'+numtostrn(ls,2)+',短線(xiàn)賣(mài)出機會(huì )','若明日收盤(pán)價(jià)>'+numtostrn(hs,2)+'短線(xiàn)買(mǎi)入機會(huì )');{2.短線(xiàn):}
tr2:=ifs(p1=1,ifs(cross(p1,0),'B點(diǎn)','持股'),ifs(cross(1,p1),'S點(diǎn)','持幣'));{1.BS點(diǎn):}
tr3:=ifs(s1=0,'向下,','向上,');{2.短線(xiàn):}
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線(xiàn),1),LINETHICK0;
D:SMA(K,K線(xiàn),1),LINETHICK0;
J:3*K-2*D,LINETHICK0;
{105}
買(mǎi)入:=IF((J-D),CROSS(J, K),0);
賣(mài)出:=IF((J-D),CROSS(D, K),0);
DRAWTEXT(買(mǎi)入>0,L-0.25,'買(mǎi)'),LINETHICK4,ALIGN1,COLOR00FFFF;
DRAWTEXT(賣(mài)出>0,H+0.45,'賣(mài)'),LINETHICK4,ALIGN1,COLOR33FF33;
{110}
bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'買(mǎi)賣(mài)點(diǎn)決策系統提示“B.S”\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS點(diǎn):'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2.短線(xiàn):'+tr3+tr1+'\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+tr4+'\n'+'<*t=006000*><*c=FFFFFF*><*p=95*>'+'衛東KDJ提示“買(mǎi)”“賣(mài)”,僅供對比參考';
drawflagtext(1,fb,bs);
{113}
DRAWTEXTREL(0,0,'日K線(xiàn)'),COLORYELLOW;
DRAWTEXTREL(600,975,'證券代碼: '+STKLABEL+' 證券名稱(chēng): '+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)+'元 利潤增長(cháng):'+FINANCE2(10)+'% 市盈率:'+NUMTOSTRN(市盈率,1)+'倍 '+' 每股公積金:'+NUMTOSTRN(每股公積金,2)+'元'),Color888888{,COLORYELLOW};
DRAWTEXTABS(0,40,'總 股 本: '+NUMTOSTRN(總股本,2)+'萬(wàn)股'+' 流通A股:'+NUMTOSTRN(流通股,2)+'萬(wàn)股'+' 限售A股:'+NUMTOSTRN(限售A股,2)+'萬(wàn)股'),Color888888{,COLORYELLOW};
(南方財富網(wǎng)SOUTHMONEY.COM)