偶看新闻与感情有染与爱无关:动态买卖
来源：百度文库 编辑：偶看新闻 时间：2024/05/04 19:47:01
http://bbs.datianxia.net/thread-35404-1-1.html
附图指标：盘中选股：
VAR0:=VOL/CLOSE/2;
VAR1:=SUM(IF(VAR0>100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR2:=SUM(IF(VAR0>100 AND CLOSE
VAR4:=SUM(IF(VAR0<100 AND CLOSE
VAR6:=IF(BARSTATUS=2,100*VAR1/VAR5,0);
VAR7:=IF(BARSTATUS=2,100*VAR2/VAR5,0);
VAR8:=IF(BARSTATUS=2,100*VAR3/VAR5,0);
VAR9:=IF(BARSTATUS=2,100*VAR4/VAR5,0);
机构买盘:VAR1,LINETHICK3,COLORFF55FF;
机构卖盘:VAR2,LINETHICK3,COLORFFFF55;
散户买盘:VAR3,COLOR5555FF;
散户卖盘:VAR4,COLOR55FF55;
DRAWTEXTREL(1003,870,'机构买盘'),LINETHICK2,COLORFF55FF;
DRAWTEXTREL(1003,570,'机构卖盘'),LINETHICK2,COLORFFFF55;
DRAWTEXTREL(1003,320,'散户买盘'),LINETHICK2,COLOR5555FF;
DRAWTEXTREL(1003,50,'散户卖盘'),LINETHICK2,COLOR55FF55;
IF BARSTATUS=2 THEN BEGIN
DRAWTEXTREL(1020,750,''+FLOOR(VAR6)+'%'),LINETHICK2,COLORFF55FF;
END
IF BARSTATUS=2 THEN BEGIN
LOOP0:=FLOOR(VAR7);
VAR10:=''+LOOP0;
VAR11:=VAR10 + '%';
DRAWTEXTREL(1020,460,VAR11),LINETHICK2,COLORFFFF55;
END
IF BARSTATUS=2 THEN BEGIN
LOOP1:=FLOOR(VAR8);
VAR12:=''+LOOP1;
VAR13:=VAR12+'%';
DRAWTEXTREL(1020,200,VAR13),LINETHICK2,COLOR5555FF;
END
IF BARSTATUS=2 THEN BEGIN
LOOP2:=FLOOR(VAR9);
VAR14:=''+LOOP2;
VAR15:=VAR14+'%';
DRAWTEXTREL(1020,-50,VAR15),LINETHICK2,COLOR55FF55;
END
选股公式：
VAR0:=VOL/CLOSE/2;
VAR1:=SUM(IF(VAR0>100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR2:=SUM(IF(VAR0>100 AND CLOSE
VAR4:=SUM(IF(VAR0<100 AND CLOSE
VAR1>VAR2 AND VAR3>VAR4 AND VAR1>REF(VAR1,1) AND
REF(VAR1,1)>REF(VAR1,2) AND
(VAR1+VAR3)/VAR5*100>60;
VAR0:=VOL/CLOSE/2;
VAR1:=SUM(IF(VAR0>100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR2:=SUM(IF(VAR0>100 AND CLOSE
VAR4:=SUM(IF(VAR0<100 AND CLOSE
VAR6:=IF(BARSTATUS=2,100*VAR1/VAR5,0);
VAR7:=IF(BARSTATUS=2,100*VAR2/VAR5,0);
VAR8:=IF(BARSTATUS=2,100*VAR3/VAR5,0);
VAR9:=IF(BARSTATUS=2,100*VAR4/VAR5,0);
机构买盘:VAR1,LINETHICK3,COLORFF55FF;
机构卖盘:VAR2,LINETHICK3,COLORFFFF55;
散户买盘:VAR3,COLOR5555FF;
散户卖盘:VAR4,COLOR55FF55;
分时主图：一：
rcc:=DYNAINFO(3); s2:=sma(c,3,1); s6:=sma(c,5,1);
dk:=10*(s2-s6); kk:=IF(DATATYPE=8,0.95,1);
STICKLINE(dk>0,rcc*kk,rcc*kk+dk,0,1),COLORRED;
STICKLINE(dk<0,rcc*kk,rcc*kk+dk,0,1),COLORCYAN;
XG:HHV(H,480),DOTLINE,COLORRED;
xl:LLV(l,480),DOTLINE,COLORgreen;
STICKLINE(FILTER(CROSS(C,REF(XG,1)),10),C*0.99,C,8,0),COLORGREEN;
DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10),C*0.99,'上突'),COLORred;
T:=BARSCOUNT(C);
TP:= FILTER( C>=HHV(H,T) AND V>MA(V,0)*2 AND DYNAINFO(17)>1 AND TIME0>39600 ,240) ;
DRAWTEXT(TP,L,'★突破'),COLORyellow;
VERTLINE( tp,1),COLORGREEN,LINETHICK1;
HHV(h,T),DOTLINE,Color00FFFF;
DRAWTEXTABS(2,160,'所属板块：'+BKNAME),COLORFF50FF,linethick1;
流通盘大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(2,175,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,COLORRED;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
销售毛利率:=FINANCE2(12);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
DRAWTEXTABS(160,175,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;
DRAWTEXTABS(260,175,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
DRAWTEXTABS(160,190,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLORRED;
DRAWTEXTABS(2,190,'销售毛利率：'+NUMTOSTRN(销售毛利率,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(160,205,'主营收入同比增长：'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,ColorYELLOW;
二：
input:N(60,1,111);
a1:=INDEXC;
a2:=INDEXO;
a3:=DISPSTATUS=1;
a4:=BARSLAST(a3);
a5:=(REF(a1,a4))/(REF(CLOSE,a4));
a6:=IF(a3,CLOSE,(REF(CLOSE,a4)));
a7:=IF(a3,(a1/a5),(REF((a1/a5),a4)));
a8:=a6-a7;
a9:=a2/a5;
a10:=INDEXH/a5;
a11:=INDEXL/a5;
a12:=(CLOSE>OPEN)OR((CLOSE=OPEN)AND(CLOSE>(REF(CLOSE,1))));
a13:=(a1>a2)OR((a1=a2)AND(a1>(REF(a1,1))));
大盘:STICKLINE(a13,(a10 +a8),(a11 +a8),0,0),colorRed;
STICKLINE(a13,((a1/a5) +a8),(a9 +a8),5,0),colorRed;
STICKLINE(NOT(a13),(a11+a8),(a10+a8),0,0),colorGreen;
STICKLINE(NOT(a13),((a1/a5)+a8),(a9+a8),5,0),colorGreen;
PARTLINE(CLOSE,CLOSE>(a1/a5),RGB(255,0,0)),linethick2,colorRed;
PARTLINE(CLOSE,CLOSE>(a1/a5)AND(CLOSE<(REF(CLOSE,1))),RGB(255,0,255)),linethick2,colorMagenta;
PARTLINE(CLOSE,(CLOSE>(a1/a5)AND((MA(CLOSE,30))>(REF((MA(CLOSE,30)),1))))AND((MA((a1/a5),30))<(REF((MA((a1/a5),30)),1))),RGB(255,255,0)),linethick2,colorYellow;
STICKLINE((((REF(a1,1))<(REF(a2,1))) AND(a1>(REF(a1,1)))),((a1/a5)+a8),CLOSE,1,1),Color606060;
STICKLINE((((REF(a1,1))>(REF(a2,1)))AND(a1<(REF(a1,1)))),((a1/a5)+a8),CLOSE,1,1),Color606060;
a14:=MA(CLOSE,10);
a15:=(((EMA(CLOSE,5))*7)+((EMA(CLOSE,10))* 3))/10;
a16:=((SMA((MAX((CLOSE-(REF(CLOSE,1))),0)),6,1))/(SMA(ABS((CLOSE-(REF(CLOSE,1)))),6,1)))* 100;
DRAWTEXT(((DATE >700101)AND(CROSS(84,a16))),HIGH,'▼'),colorGreen;
a17:=(((2*CLOSE)+HIGH)+LOW)/4;
a18:=LLV(LOW,34);
a19:=HHV(HIGH,34);
a20:=EMA((((a17-a18)/(a19-a18))*100),6);
a21:=EMA(((0.667*(REF(a20,1)))+(0.333*a20)),4);
a22:=LLV(LOW,120);
a23:=HHV(HIGH,120);
a24:=a23-a22;
a25:=HHVBARS(CLOSE,N);
REF(CLOSE,a25),POINTDOT,ColorFF0000;
突破:FILTER(((CROSS(CLOSE,((REF(REF(CLOSE,a25),1))*1.001)))AND(REF((a25>= 5),1))),10),POINTDOT,linethick0;
STICKLINE(突破,(CLOSE*0.99),CLOSE,5,0),ColorF600A9;
DRAWTEXT((((SUM((突破>0),0))=1)AND 突破),(CLOSE*0.99),'最佳买点'),colorWhite;
DRAWTEXT((((SUM((突破>0),0))=2)AND 突破),(CLOSE*0.99),'次佳买点'),colorWhite;
DRAWTEXT((((SUM((突破>0),0))=3)AND 突破),(CLOSE*0.99),'理想买点'),colorWhite;
DRAWTEXT((((SUM((突破> 0),0))=4)AND 突破),(CLOSE * 0.99),'及格买点'),colorWhite;
DRAWTEXT((((SUM((突破> 0),0))>=5) AND 突破),(CLOSE * 0.99),'突破'),colorWhite;
a26:=(CLOSE<(a1/a5))AND(CROSS(80,a16));
DRAWICON(a26,CLOSE,8);
DRAWICON((CLOSE>(a1/a5)AND(CROSS(a16,17))),CLOSE,7);
DRAWICON((CROSS(a16,10)),CLOSE,7);
DRAWICON((CROSS(90,a16)),CLOSE,8);
DRAWICON((CROSS(CLOSE,(a1/a5))),CLOSE,11);
DRAWTEXT(((IF(((((((COUNT((CLOSE<(REF(CLOSE,1))),8))/8)>0.3) AND(COUNT((a20>a21),3)))AND((REF(LOW,1))=a22))AND(CLOSE>OPEN)),1,0))AND(CROSS(a16,15))),LOW,'★小底'),ColorFF8080;
a27:=DYNAINFO(3);
a28:=SMA(CLOSE,2,1);
a29:=SMA(CLOSE,6,1);
a30:=2*(a28-a29);DRAWTEXTABS(10,200,'■所属板块：'+BKNAME),ColorYELLOW,linethick1;
流通盘大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(280,220,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,ColorYELLOW;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
销售毛利率:=FINANCE2(12);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
DRAWTEXTABS(170,220,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;
DRAWTEXTABS(170,240,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
DRAWTEXTABS(170,260,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLORRED;
DRAWTEXTABS(20,220,'销售毛利率：'+NUMTOSTRN(销售毛利率,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(20,240,'主营收入同比增长：'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(20,260,'净利润同比增长：'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,COLOR00FF00;