|
通达信资金突破主图+竞价魔星幅图（排序）指标 源码 附图 这个指标是同花顺的竞价魔星（副图指标），按照同花顺版本，编写了通达信版本的排序+副图指标      1、资金突破主图：{微信公众号：尊重市场}买线:=EMA(C,2);卖线:=EMA(SLOPE(C,21)*20+C,42);BU:=CROSS(买线,卖线);SEL:=CROSS(卖线,买线);STICKLINE(买线>=卖线,LOW,HIGH,0.01,0),COLORRED;STICKLINE(买线>=卖线 AND C> O,CLOSE,OPEN,3,1),COLORRED;STICKLINE(买线>=卖线 AND C<=O,CLOSE,OPEN,3,0),COLORRED;STICKLINE(买线<卖线,LOW,HIGH,0.01,0),COLORFFF000;STICKLINE(买线<卖线 AND C> O,CLOSE,OPEN,3,1),COLORFFF000;STICKLINE(买线<卖线 AND C<=O,CLOSE,OPEN,3,0),COLORFFF000;Z1:=REF(HIGH,4)=HHV(HIGH,2*4+1);Y1:=FILTER(Z1,3);C1:=BACKSET(Y1,3+1);D1:=FILTER(C1,3);A2:=REF(LOW,3)=LLV(LOW,2*3+1);V2:=FILTER(A2,3);C2:=BACKSET(V2,3+1);D2:=FILTER(C2,3);E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E2:=(HIGH+LOW)/2;H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR=1 OR BARSCOUNT(CLOSE)=1;H2:=D1 AND NOT(D2 AND E1>=E2);L1:=D2 AND NOT(D1 AND E1=E2);X1:=REF(BARSLAST(H1),1)+1;F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));G1:=F1>REF(F1,1);I1:=BACKSET(G1,2);LD:=I1>REF(I1,1);L2:=LD OR ISLASTBAR=1 OR BARSCOUNT(CLOSE)=1;X2:=REF(BARSLAST(L2),1)+1;F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));G2:=F2>REF(F2,1);I2:=BACKSET(G2,2);HD:=I2>REF(I2,1);UU2:=BACKSET(ISLASTBAR=1,BARSLAST(HD)+1);VV2:=UU2>REF(UU2,1);WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);XX2:=WW2>REF(WW2,1);突破线:REF(H,BARSLAST(VV2)),COLORFFFFFF;持仓线:REF(H,BARSLAST(XX2)),COLORYELLOW;TP1:=CROSS(C,突破线);TP2:=CROSS(C,持仓线);{STICKLINE(TP1,C,O,3,0),COLOR009999;STICKLINE(TP1,C,O,2,0),COLOR00BBBB;STICKLINE(TP1,C,O,1,0),COLOR00DDDD;STICKLINE(TP1,H,L,0.1,0),COLORYELLOW;DRAWTEXT(TP1,LOW*0.98,' 突破'),LINETHICK1,COLORFFFFFF;STICKLINE(TP2,C,O,3,0),COLOR009999;STICKLINE(TP2,C,O,2,0),COLOR00BBBB;STICKLINE(TP2,C,O,1,0),COLOR00DDDD;STICKLINE(TP2,H,L,0.1,0),COLORYELLOW;DRAWTEXT(TP2,LOW*0.98,' 突破'),LINETHICK1,COLORYELLOW;}成本90均线:EMA(COST(90),10),COLORFFFFCC,LINETHICK2;成本34均线:EMA(COST(34),10),COLOR00FFFF,LINETHICK2;获利盘:=WINNER(C)*100;近邻筹码:=(WINNER(C*1.075)-WINNER(C*0.925))*100;近邻浮筹:=近邻筹码/WINNER(HHV(H,0));获利纵横:获利盘-近邻浮筹,COLORFFFFFF,NODRAW;TJAA:=CROSS(PWINNER(14,CLOSE),0.915) AND LWINNER(5,CLOSE)>0.9 AND 获利纵横>50;STICKLINE(TJAA,C,O,3,0),COLOR009999;STICKLINE(TJAA,C,O,2,0),COLOR00BBBB;STICKLINE(TJAA,C,O,1,0),COLOR00DDDD;STICKLINE(TJAA,H,L,0.1,0),COLORYELLOW;DRAWICON(CROSS(PWINNER(14,CLOSE),0.915) AND LWINNER(5,CLOSE)>0.9 AND 获利纵横>50 ,CLOSE,5);DRAWTEXT(TJAA,LOW*0.98,' 突破'),LINETHICK1,COLORYELLOW;WH1:=IF(L=LLV(L,9),L,0);WH2:=CONST(BARSLAST(WH1!=0));WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);进场:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORYELLOW,DOTLINE;DRAWTEXT(ISLASTBAR,进场,'进场线'),COLORYELLOW;MA5:MA(C,5),COLORFFFFFF,DOTLINE;IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLORF00FFF,LINETHICK2;趋势线:=EMA(C,55),COLOR00FF00,LINETHICK2;{所属题材}所属板块:=STRCAT(STRCAT(STRCAT(' ',HYBLOCK),STRCAT(' ',DYBLOCK)),STRCAT(' ',GNBLOCK));DRAWTEXT_FIX(ISLASTBAR,0.00,0.01,0,'【所属板块】'),COLORGREEN;DRAWTEXT_FIX(ISLASTBAR,0.10,0.01,0,所属板块),COLOR00FFFF;利润同比:=FINANCE(43);净利润:=FINANCE(30)/100000000;JJJ1A:=STRCAT(STRCAT(' 利润同比增长：',CON2STR(利润同比,2)),' % ');JJJ2A:=IF(FINANCE(30)> 100000000,STRCAT(CON2STR(FINANCE(30)/100000000,2),' 亿元 '), IF(FINANCE(30)<=100000000,STRCAT(CON2STR(FINANCE(30)/10000,2),' 万元 '),DRAWNULL));JJJ3A:=STRCAT('当期净利润：',JJJ2A);DRAWTEXT_FIX(ISLASTBAR,0.00,0.07,0,'【净利分析】'),COLORGREEN;DRAWTEXT_FIX(ISLASTBAR,0.10,0.07,0,STRCAT(JJJ3A,JJJ1A)),COLORFFFFFF;开盘换手1:=DYNAINFO(15)/O/FINANCE(46)*100,NODRAW;JJCJL:=DYNAINFO(15)/DYNAINFO(4)/100;JJJEDW:=IF(DYNAINFO(15)>=100000000,' 亿元',IF(DYNAINFO(15)>=10000,' 万元',' 元'));JJJE:=IF(DYNAINFO(15)>=100000000,CON2STR(DYNAINFO(15)/100000000,2),IF(DYNAINFO(15)>=10000,CON2STR(DYNAINFO(15)/10000,2),CON2STR(DYNAINFO(15),2)));JJ1:=STRCAT(JJJE,JJJEDW);JJS:=STRCAT(' 今竞价：',STRCAT(CON2STR(JJCJL,0),' 手，'));JJS1:=STRCAT(JJS,' 共 ');JJJ1:=STRCAT(STRCAT(JJS1,JJ1),' ');Z开盘换手:=REF(SIGNALS_USER(9601,0),1)/REF(O,1)/FINANCE(46)*100,COLORRED,LINETHICK3,NODRAW;ZJJCJL:=REF(SIGNALS_USER(9601,0),1)/REF(O,1)/100;JJJEDW2:=IF(REF(SIGNALS_USER(9601,0),1)>=100000000,' 亿元',IF(REF(SIGNALS_USER(9601,0),1)>=10000,' 万元',' 元'));JJJE2:=IF(REF(SIGNALS_USER(9601,0),1)>=100000000,CON2STR(REF(SIGNALS_USER(9601,0),1)/100000000,2),IF(REF(SIGNALS_USER(9601,0),1)>=10000,CON2STR(REF(SIGNALS_USER(9601,0),1)/10000,2),CON2STR(REF(SIGNALS_USER(9601,0),1),2)));JJ2:=STRCAT(JJJE2,JJJEDW2);ZJJS:=STRCAT(' 昨竞价：',STRCAT(CON2STR(ZJJCJL,0),' 手，'));ZJJS1:=STRCAT(ZJJS,' 共 ');ZJJJ1:=STRCAT(STRCAT(ZJJS1,JJ2),' ');KPHS1:=IF(O>REF(C,1),STRCAT(STRCAT(STRCAT('开盘换手: ',CON2STR(开盘换手1,3)),'%'),' 做多，红柱！'), IF(O=REF(C,1),STRCAT(STRCAT(STRCAT('开盘换手: ',CON2STR(开盘换手1,3)),'%'),' 平开，白柱！'), IF(O 2、竞价魔星幅图：KF:=(OPEN/REF(C,1)-1)*100;JJJE:=DYNAINFO(15);竞价金额万:JJJE/10000;开盘量比:JJJE/OPEN/100/DYNAINFO(16);竞价换手:JJJE/OPEN/FINANCE(46)*100;竞昨成交比:JJJE/OPEN/100/REF(VOL,1)*100;LC:=REF(CLOSE,1);强弱1:=SMA(MAX(OPEN-LC,0),14,1)/SMA(ABS(OPEN-LC),14,1)*100;强弱:IF(强弱1>50,强弱1,0);动能:KF*竞价换手;ZT:=C>=ZTPRICE(REF(C,1),0.1) AND H=C;TJ1:=IF(REF(ZT,1) AND O>REF(C,1) AND 动能>1.6 AND RANGE(竞价换手,0.5,2) AND 竞价金额万>1000,1,0);TJ2:=IF(REF(C<o,1) and="" o1.6="" ref(hsl.hsl1000,1,0);xg:="" tj1="" or="" tj2="" ;昨连板:ref(barslastcount(zt),1);开幅:(open="" ref(c,1)-1)*100; |
|
|
