| 【大智慧】智慧持股（持股線、大盤股、小盤股、中盤古）-指標公式源碼 IF(FINANCE2(37)/10000>=100) THEN BEGIN DRAWTEXTREL(0,950,'【超大盤0.7%】 流通A股'+FINANCE2(37)/10000+'億股'),LINETHICK2,ColorFF00FF; end; IF(FINANCE2(37)/10000<100 and FINANCE2(37)/10000>=10) THEN BEGIN DRAWTEXTREL(0,950,'【大盤股9.0%】 流通A股'+FINANCE2(37)/10000+'億股'),LINETHICK2,ColorFF00FF; end; IF(FINANCE2(37)/10000<10 and FINANCE2(37)/10000>=5) THEN BEGIN DRAWTEXTREL(0,950,'【中盤股12.7%】 流通A股'+FINANCE2(37)/10000+'億股'),LINETHICK2,ColorFF00FF; end; IF(FINANCE2(37)/10000<5 and FINANCE2(37)/10000>=1) THEN BEGIN DRAWTEXTREL(0,950,'【小盤股55.3%】 流通A股'+FINANCE2(37)/10000+'億股'),LINETHICK2,ColorFF00FF; end; IF(FINANCE2(37)/10000<1) THEN BEGIN DRAWTEXTREL(0,950,'【超小盤22.3%】 流通A股'+FINANCE2(37)/10000+'億股'),LINETHICK2,ColorFF00FF; end; AA1:=AMOUNT/V; BB1:=L<AA1*0.9; CC1:=(C-REF(C,1))/REF(C,1)*100>1.2; DD1:=L<MA(C,5)*0.921; EE1:=V<MA(V,5)*1.5; FF1:=BB1 AND CC1 AND DD1 AND EE1; DRAWTEXT(ff1,(LOW* 0.99),'↖鼠'),Color4080FF; STICKLINE(ff1,O,C,6,0),COLORyellow; STICKLINE(ff1,O,C,2.5,0),COLORred; MTM:=C-REF(C,1); DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6); 買:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0); DRAWTEXT(filter(買=1,5),LOW-0.08,'↖低') ,COLORAAAAFF; STICKLINE(filter(買=1,5),O,C,6,0),COLORyellow; STICKLINE(filter(買=1,5),O,C,2.5,0),COLORred; cc:=(h-c)/(c-o)<0.33; dd:=(c/ref(c,1)-1)>=0.0502 and c>ref(c,1) and (o-l)/(c-o)>=1.48 and l<ref(l,1) and l<ref(l,2); ee:=(c/ref(c,1)-1)>=0.08; aa:=VOL>REF(VOL,1)*1.9 and c>ref(c,1) and c/ref(c,1)-1>=0.049 and cc; bb:=(c/ref(c,1)-1)>=0.0502 and c>ref(c,1) and v>ref(v,1) and VOL>REF(VOL,1)*2.5 and cc; DRAWTEXT(FILTER(aa or bb or dd or ee,34),l,'↖異動'),COLOrffff00; STICKLINE(FILTER(aa or bb or dd or ee,34),O,C,6,0),COLORyellow; STICKLINE(FILTER(aa or bb or dd or ee,34),O,C,2.5,0),COLORRED; AAA:=(3*C+H+L+O)/6; VAR41:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR41; 立樁量:=FILTER(TJ1,5); TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0))); 突破:=TJ2=1; TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0))); 三天法則:=TJ3=1; 成立:=三天法則 AND 突破; 條件成立:=FILTER(成立,3); DRAWTEXT(條件成立,L*0.97,'↖立樁量'),COLORYELLOW; VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3); VAR2222:=CROSS(VAR1111,0.9); 壓力:= REF(HIGH,BARSLAST(VAR2222)); STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST (VAR2222)),0.5,1),COLOREA91B5,LINETHICK1; STICKLINE(CLOSE<OPEN and ref(CLOSE,1)>ref(OPEN,1),ref(close,1),ref(close,1),33,0),COLORwhite,LINETHICK1; DD:=FINANCE2(35); SS:=FINANCE2(37); GG:=FINANCE2(3); TH:=DYNAINFO(39); DRAWTEXTREL(0,70,'總股本:'+NUMTOSTRn(DD,0)+'萬股' +' 流通A股:'+NUMTOSTRn(SS,0)+'萬股'+' 市盈率:'+NUMTOSTRn(TH,2)+' 倍'+' 每股收益:'+NUMTOSTRn(GG,3)+' 元'),ColorFFFF00; gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100); 明日阻力:=l+(gj-l)+(c-l); 明日支撐:=l+(c-gj); 今日阻力:=REF(明日阻力 , 1); 今日支撐:=REF(明日支撐 , 1); STICKLINE(DISPSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000FF; STICKLINE(DISPSTATUS=2 and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00; STICKLINE(DISPSTATUS=2 and c>=今日支撐,今日支撐,今日支撐,20,0),ColorFF00FF; STICKLINE(DISPSTATUS=2 and c<今日支撐,今日支撐,今日支撐,20,0),ColorFF9900; DRAWTEXTREL(850,890,'今日支撐：'+NUMTOSTRN(今日支撐 ,2 )),Colorred; DRAWTEXTREL(850,950,'今日阻力：'+NUMTOSTRN(今日阻力 ,2 )),ColorGREEN; DRAWTEXTREL(0,20,'所屬板塊:'+BKNAME),ColorRED; DRAWTEXTREL(0,120,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市凈率:'+NUMTOSTRN((CLOSE / FINANCE2(4)),2)+'元'+' 凈資產(chǎn):'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF; DRAWTEXTREL(0,270,'歷史最高價:'+HHV(HIGH,0)),Colorred; DRAWTEXTREL(160,270,'歷史最低價:'+LLV(LOW,0)),ColorAFFF00; 銷售毛利率:=FINANCE2(12); 主營收入同比:=FINANCE2(11); 凈利潤同比增長:=FINANCE2(10); DRAWTEXTREL(0,170,'銷售毛利率：'+NUMTOSTRN(銷售毛利率,2)+'%'),LINETHICK1,COLORff00ff; DRAWTEXTREL(180,170,'主營收入同比增長：'+NUMTOSTRN(主營收入同比,2)+'%'),LINETHICK1,ColorYELLOW; DRAWTEXTREL(0,220,'凈利潤同比增長：'+NUMTOSTRN(凈利潤同比增長,2)+'%'),LINETHICK1,COLOR00FF00; LJL07:=(3*C+L+O+H)/6; |
聯(lián)系客服
