天潭趨勢（黑馬贏家黑馬營等）源碼、圖

蔚藍心愿 2015-05-05

展開全文

MA1:MA(CLOSE,3),COLOR00ff00,LINETHICK2;

MA2:MA(CLOSE,5),COLORFF00FF,LINETHICK2;

MA3:MA(CLOSE,10),COLORE66878,LINETHICK2;

MA4:MA(CLOSE,30),COLORCYAN,LINETHICK2;

MA5:MA(CLOSE,60);

MA6:MA(CLOSE,120);

X1:=(C+L+H)/3;BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;

EMA8:=EMA(C,8);DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),

EMA8,'45'),COLORYELLOW,ALIGN1,VALIGN0;

趨勢線:ema(REF(CLOSE,1),2),COLORFFCC00,LINETHICK1;

PARTLINE(趨勢線,CLOSE>=趨勢線),colorred,LINETHICK4;

PARTLINE(趨勢線,CLOSE<=趨勢線),COLORGREEN,LINETHICK4;

A1:=C=HHV(C,13);

A2:=BARSLAST(A1);

A3:=IF(A2>0,REF(C,A2),REF(C,A2));

A4:=CROSS(C,REF(A3,1));

一號旗:=A4 AND COUNT(A4,5)=1;

DRAWTEXT(一號旗=1,L-0.1,'旗'),COLORBLUE,ALIGN1,VALIGN2;

D1:=C=HHV(C,89);

D2:=BARSLAST(D1);

D3:=IF(D2>0,REF(C,D2),REF(C,D2));

D4:=CROSS(C,REF(D3,1));

紅旗:=D4 AND COUNT(D4,5)=1;

DRAWTEXT(紅旗=1,L-0.1,'旗'),COLORRED,ALIGN1,VALIGN1;

DRAWTEXT(WINNER(C)*100>65 and (c-ref(c,1))/c*100>0.1 and (winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100<26=1,H-0.2,'黑'),COLORWHITE,ALIGN1,VALIGN2;

B:='-----------';

DRAWTEXT(VOL=HHV(VOL,13),C ,B),COLORGREEN;

上軌:MA(REF(HHV(C,30),1),2),COLORWHITE;

DRAWTEXT((HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.4,H,'上'),COLORYELLOW,ALIGN1,VALIGN2;

DRAWTEXT((MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.4,L-0.05,'下'),COLORYELLOW,ALIGN1,VALIGN2;

DRAWTEXT(CROSS(C,上軌),LOW-0.1,'啟'),COLORYELLOW,ALIGN1,VALIGN0;

下軌:MA(REF(LLV(C,30),1),2),COLORGRAY;

DRAWTEXT(CROSS(WINNER(C)*100, lfs),LOW-0.3,'短'),COLORYELLOW,ALIGN1,VALIGN2;

DRAWTEXT(FILTER(ATAN((MA(C,30)/REF(MA(C,30),1)-1)*100)*180/3.1416>30 AND ATAN((MA(C,10)/REF(MA(C,10),1)-1)*100)*180/3.1416>45 AND CROSS(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.1416,60),10),LOW*0.98,'阻'),COLORYELLOW,ALIGN1,VALIGN2;

DRAWTEXT(IF((CROSS(EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),25),L) AND MA(C,5)>MA(C,30) AND HHV(0.01*EMA(AMOUNT,13)/EMA(VOL,13),10)>10 AND HHV(0.01*EMA(AMOUNT,34)/EMA(VOL,34),15)>18 AND EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),8)>EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),25)),15,0),L,'槍B'),COLORYELLOW,ALIGN1,VALIGN0;

DRAWTEXT((REF(CLOSE/REF(CLOSE,1),3)>1.099 OR REF(CLOSE/REF(CLOSE,1),6)>1.099 OR REF(CLOSE/REF(CLOSE,1),4)>1.099 OR REF(CLOSE/REF(CLOSE,1),5)>1.099 OR REF(CLOSE/REF(CLOSE,1),2)>1.099) AND CROSS(EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),8),LOW) AND EMA (EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),25),3),LOW*0.97,'槍A'),COLORMAGENTA;

DRAWTEXT((CLOSE/REF(CLOSE,1)>1.03 AND VOL/CAPITAL*100>2.5 AND EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),3)> EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),8) AND EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),3)> EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),25) AND C> EMA(IF(C>REF(C,1),(3*H+4*C+3*OPEN+2*L)/12,(2*H+4*C+3*OPEN+3*L)/12),3) AND (WINNER(C-C*0.01/100)-WINNER(C-C*20/100))*100>50 AND (0.01*EMA(AMOUNT,13)/EMA(VOL,13)/REF(0.01*EMA(AMOUNT,13)/EMA(VOL,13),1)-1)*100>1) OR ((CLOSE-0.01*EMA(AMOUNT,13)/EMA(VOL,13))/ 0.01*EMA(AMOUNT,13)/EMA(VOL,13)*100>11 AND (CLOSE-0.01*EMA(AMOUNT,13)/EMA(VOL,13))/ 0.01*EMA(AMOUNT,13)/EMA(VOL,13)*100<30 AND (0.01*EMA(AMOUNT,13)/EMA(VOL,13)/REF(0.01*EMA(AMOUNT,13)/EMA(VOL,13),1)-1)*100>1 AND CLOSE/REF(CLOSE,1)>1.03),LOW-0.6,'營'),COLORWHITE,ALIGN1,VALIGN0;

DRAWTEXT((ref(h,1)-max(ref(o,1),ref(c,1)))/abs(ref(c,1)-ref(o,1))>3 and close>open,L-0.1,'兵'),COLORYELLOW,ALIGN1,VALIGN2;

DRAWTEXT(ref((CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100,1) and c>o and (c-o)>ref(hhv(abs(c-o),1),1)*1.001 and c>ref(hhv(h,1),1),L-0.2,'突'),COLORYELLOW,ALIGN1,VALIGN0;

DRAWTEXT(CROSS(C, (MA(C,3)+ MA(C,5))/2) AND ((MA(C,3)+ MA(C,5))/2>=REF((MA(C,3)+ MA(C,5))/2,1) AND REF((MA(C,3)+ MA(C,5))/2,1)<REF((MA(C,3)+ MA(C,5))/2,2) OR C>REF((O-C)/2+C,2)) AND MA(C,5)>= MA(C,30)AND MA(C,30)>REF(MA(C,30),1) AND MA(C,5)>REF(MA(C,5),1),L-0.2,'抓'),COLORWHITE;

DRAWTEXTREL(600,975,'證券代碼: '+STKLABEL+' 證券名稱: '+STKNAME+''),ColorFFAA00;

總股本:=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};

{ 原文鏈接：http://www./soft/sort013/sort03/down-83923.html }