{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;{符合上述條件，從開盤價(jià)到中間用藍(lán)色}

　　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}

　　{昨天的收盤價(jià)=近4天的最高值，或者，今天的收盤價(jià)<前天的收盤價(jià) 或 前天的收盤價(jià)=近4天的最高值，或者，昨天的收盤價(jià)>3天前的收盤價(jià) 或 3天前的收盤價(jià)=近4天的最高值，

　　或者，昨天的收盤價(jià)>前天的收盤價(jià)，或者，前天的收盤價(jià)>=近4天的最高值，或者，今天的收盤價(jià)<昨天的收盤價(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;{符合上述條件，從開盤價(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}

　　{十字光標(biāo)提示}

　　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,'明日收盤價(jià)<'+numtostrn(udd,2)+',出現(xiàn)S點(diǎn)\n','若明日收盤價(jià)>'+numtostrn(upp,2)+',出現(xiàn)B點(diǎn)\n');{1.BS點(diǎn):}

　　tr1:=ifs(s1=1,'明日收盤價(jià)<'+numtostrn(ls,2)+',短線賣出機(jī)會(huì)','若明日收盤價(jià)>'+numtostrn(hs,2)+'短線買入機(jī)會(huì)');{2.短線:}

　　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.短線:}

　　tr4:='3.能量級(jí)別:'+numtostrn(d3,1)+'級(jí)';{3.能量級(jí)別:}

　　{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)+'買賣點(diǎn)決策系統(tǒng)提示“B.S”\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS點(diǎn):'+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提示“買”“賣”，僅供對(duì)比參考';

　　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)+'元 利潤(rùn)增長(zhǎng)：'+FINANCE2(10)+'% 市盈率：'+NUMTOSTRN(市盈率,1)+'倍 '+' 每股公積金：'+NUMTOSTRN(每股公積金,2)+'元'),Color888888{,COLORYELLOW};

　　DRAWTEXTABS(0,40,'總 股 本： '+NUMTOSTRN(總股本,2)+'萬股'+' 流通A股：'+NUMTOSTRN(流通股,2)+'萬股'+' 限售A股：'+NUMTOSTRN(限售A股,2)+'萬股'),Color888888{,COLORYELLOW};

上一頁  [1] [2]