相關標簽:

?

DRAWTEXTEX(c,1,5,5,'所屬板塊:' + BLKNAME),ALIGN4,colorred;
DD:=FINANCE( 1);
SS:=FINANCE( 7);
BL:=SS/DD*100;
GG:=FINANCE(33);
TH:=DYNAINFO(39);
JZ:=FINANCE(34);
DRAWTEXTEX(c,1,5,55,'總股本:'+NUMTOSTR(DD,0)+'萬股' +'流通A股:'
+NUMTOSTR(SS,0)+'萬股'+'流通比例:'+NUMTOSTR(BL,3)+'%'+'市盈率:'
+NUMTOSTR(TH,2)+' 倍'+'收益:'+NUMTOSTR(GG,3)+' 元'+'凈資產:'
+NUMTOSTR(JZ,3)+' 元'),COLORGREEN;{http://www.weiqiv.net.cn}

生命線:sum(vol*(o+c)/2,88)/sum(vol,88),colorff80ff,linethick2;
分離線:MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),colorf4e202,linethick2;
MA17:MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),linethick2,colorf4e202;
持股線:IF(MA(CLOSE,17)<MA17,MA17,MA(CLOSE,17)),color00d500;
PARTLINE(持股線=MA17,持股線),color80ffff,linethick2;

STICKLINE(c>=ref(c,1),o,c,8,1),color000000;
STICKLINE(c<ref(c,1),o,c,8,1),color000000;
CXH1:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));
CXH2:=((REF(CXH1,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH3:=((REF(CXH2,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH4:=((REF(CXH3,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH5:=((REF(CXH4,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH6:=((REF(CXH5,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH7:=((REF(CXH6,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH8:=((REF(CXH7,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH9:=((REF(CXH8,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXHA:=((REF(CXH9,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXHB:=((REF(CXHA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXHC:=((REF(CXHB,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
STICKLINE((((((((((((CXH1 OR CXH2) OR CXH3) OR CXH4) OR CXH5) OR CXH6) OR CXH7) OR CXH8) OR CXH9) OR CXHA) OR CXHB) OR CXHC),C,REF(C,1),7,0),Color0000DD;
STICKLINE((((((((((((CXH1 OR CXH2) OR CXH3) OR CXH4) OR CXH5) OR CXH6) OR CXH7) OR CXH8) OR CXH9) OR CXHA) OR CXHB) OR CXHC),L,H,0.5,0),Color0000DD;

CXHD:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));
CXHE:=((REF(CXHD,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXHF:=((REF(CXHE,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH10:=((REF(CXHF,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH11:=((REF(CXH10,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH12:=((REF(CXH11,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH13:=((REF(CXH12,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH14:=((REF(CXH13,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH15:=((REF(CXH14,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH16:=((REF(CXH15,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
CXH17:=((REF(CXH16,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
CXH18:=((REF(CXH17,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
STICKLINE((((((((((((CXHD OR CXHE) OR CXHF) OR CXH10) OR CXH11) OR CXH12) OR CXH13) OR CXH14) OR CXH15) OR CXH16) OR CXH17) OR CXH18),C,REF(C,1),7 ,0 ),Color00DD00;
STICKLINE((((((((((((CXHD OR CXHE) OR CXHF) OR CXH10) OR CXH11) OR CXH12) OR CXH13) OR CXH14) OR CXH15) OR CXH16) OR CXH17) OR CXH18),H,L,0.5 ,0 ),Color00DD00;

CXH19:=(REF((((((((((((CXHD OR CXHE) OR CXHF) OR CXH10) OR CXH11) OR CXH12) OR CXH13) OR CXH14) OR CXH15) OR CXH16) OR CXH17) OR CXH18),1) AND CXH1);
CXH1A:=(REF((((((((((((CXH1 OR CXH2) OR CXH3) OR CXH4) OR CXH5) OR CXH6) OR CXH7) OR CXH8) OR CXH9) OR CXHA) OR CXHB) OR CXHC),1) AND CXHD);
STICKLINE(CXH19,REF(CLOSE,1),REF(CLOSE,2),7 ,0 ),ColorDDDDDD;
STICKLINE(CXH1A,REF(CLOSE,1),REF(CLOSE,2),7,0),ColorDD8800;

{買賣指標}
AA05:MA(C,5),linethick0;
MM5:=(c-AA05)/AA05*100;
BB05:=atan((aa05/ref(aa05,1)-1)*100)*180/3.1416;
NN5:=sma(ema((AA05-ref(AA05,1))/ref(AA05,1),3)*100,3,1);
NNNN5:ema((NN5-ref(NN5,1)),3),linethick0;
AA10:MA(C,10),linethick0;
AA20:=MA(c,20);
BB10:=atan((aa10/ref(aa10,1)-1)*100)*180/3.1416;
AA30:MA(C,30),linethick0;
MM30:(c-AA30)/AA30*100,linethick0;
CXH1:=(AA20-AA30)>ref((AA20-AA30),1) and AA20>ref(aa20,1) and AA30>ref(AA30,1);
CXH2:=(AA30-AA20)<ref((AA30-AA20),1) and AA20<ref(aa20,1) and AA30<ref(AA30,1);
BB30:=atan((aa30/ref(aa30,1)-1)*100)*180/3.1416;
強勢:=filter(BB30>30 and BB10>45 and cross(BB05,60),10);
加倉:=filter(count(cross(BB05,30),5)>=1 and AA05>ref(aa05,1)and MM30>ref(MM30,1) and AA10>ref(AA10,1)
and NNNN5>ref(NN5,1) and NN5>ref(NN5,1),10) ;
清倉:=filter(count(cross(30,BB05),5)>=1 and (c>AA30 or O>AA30) and AA05<ref(aa05,1)and MM30<ref(MM30,1) and AA10<ref(AA10,1),10);
JC:=cross(0,MM5) and MM30<ref(MM30,1) and AA10>ref(AA10,1) ;
減倉:=filter(JC,10);
MR:=count(cross(MM30,0),3)>=1 and MM30>ref(MM30,1) and AA05>ref(AA05,1) and (c/ref(c,1)-1)*100>5 and ref(c,1)<AA30;
買入:=filter(MR,10);
DRAWTEXT((買入),low*0.945,'⊙'),linethick2,ALIGN1,COLORYELLOW;
DRAWTEXT((買入),low*0.965,'⊙'),linethick2,ALIGN1,COLORYELLOW;
DRAWTEXT((買入),low*0.985,'⊙'),linethick2,ALIGN1,COLORYELLOW;
drawtext(減倉,high*1.06,'◇'),ALIGN2,linethick3,colorcyan;
drawtext(減倉,high*1.05,'◇'),ALIGN1,linethick3,colorcyan;
drawtext(減倉,high*1.059,'◇'),ALIGN0,linethick3,colorcyan;
DRAWTEXT((加倉),low*0.985,'⊙'),linethick2,ALIGN1,colorWhite;
DRAWTEXT((加倉),low*0.965,'⊙'),linethick2,ALIGN1,colorWhite;
DRAWTEXT((加倉),low*0.945,'⊙'),linethick2,ALIGN1,colorWhite;
DRAWTEXT((強勢),low*0.985,'⊙'),linethick2,ALIGN1,COLORred;
DRAWTEXT((強勢),low*0.965,'⊙'),linethick2,ALIGN1,COLORred;

{短線強勢}
流通:=(AMOUNT / VOL);
資金流量:=(close-ref(close,1))*流通;
CXH111:=SMA(資金流量,10,1);
MID111:=MA(CXH111,26);
UPPER111:=MID111 + 2*STD(CXH111,26);
短線強勢:=CROSS(CXH111,UPPER111) and C>=O;
STICKLINE(短線強勢,CLOSE ,OPEN,7,0),color00AAFF;

大盤:=EMA(INDEXC,500)/EMA(C,500);
大盤線:INDEXC/大盤,LINETHICK1,COLORYELLOW;

{絕對強勢}
aa_Q:=(C/REF(C,1)-1)*100;
bb_Q:=(INDEXC/REF(INDEXC,1)-1)*100;
dd_Q:=aa_Q>2.8 AND aa_Q-bb_Q>2;
DIFF_Q := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA_Q:= EMA(DIFF_Q,9);
MACD_Q := 2*(DIFF_Q-DEA_Q);
ee_Q:=MACD_Q>0 and macd_Q>=ref(macd_Q,1);
ma10_Q:=MA(C,10);
ma20_Q:=MA(C,20);
角度ma10_Q:=atan((ma10_Q/ref(ma10_Q,1)-1)*100)*180/3.1416;
角度ma20_Q:=atan((ma20_Q/ref(ma20_Q,1)-1)*100)*180/3.1416;
xg_Q:=C>=MA(C,10) AND 角度ma10_Q>40 and 角度ma20_Q>35
and ma(c,120)>ref(ma(c,120),1);
A5_Q:=Count(ma(close,21)>ma(close,34) and ma(close,34)>ma(close,55) and ma(close,55)>ma(close,89),3)=3 and isup;
條件成立:=xg_Q and dd_Q and ee_Q and C>=O;
PARTLINE(條件成立,L*0.96),CROSSDOT,LINETHICK6,COLORFF33FF;
PARTLINE(條件成立,L*0.96),CIRCLEDOT,LINETHICK1,COLOR00CCFF;
{程序化交易 www.weiqiv.net.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?