外盤:=sum(if(DYNAINFO(23)*close,DYNAINFO(23),0),0)*0.003906;
內(nèi)盤:=sum(if(DYNAINFO(22)*close,DYNAINFO(22),0),0)*0.003906;
主動(dòng)率:=(外盤-內(nèi)盤)/(內(nèi)盤+外盤)*100;
PD:=”DDX.DDX”=0;
買入單數(shù):= IF(PD,”DDEDATA@ORDER”(1),ORDER(1));
賣出單數(shù):= IF(PD,”DDEDATA@ORDER”(2),ORDER(2));
單數(shù)比:=賣出單數(shù)/買入單數(shù);
ZDLR:=IF(PD,(“DDEDATA@BIGORDER”(1,1)-“DDEDATA@BIGORDER”(1,2)),bigorder(1,1)-bigorder(1,2));
ZDLC:=IF(PD,(“DDEDATA@BIGORDER”(2,1)-“DDEDATA@BIGORDER”(2,2)),bigorder(2,1)-bigorder(2,2));
DDLR:=IF(PD,”DDEDATA@BIGORDER”(1,2)-“DDEDATA@BIGORDER”(1,3),bigorder(1,2)-bigorder(1,3));
DDLC:=IF(PD,”DDEDATA@BIGORDER”(2,2)-“DDEDATA@BIGORDER”(2,3),bigorder(2,2)-bigorder(2,3));
TDLR:=IF(PD,”DDEDATA@BIGORDER”(1,3),bigorder(1,3));
TDLC:=IF(PD,”DDEDATA@BIGORDER”(2,3),bigorder(2,3));
XDLR:=IF(PD,1-“DDEDATA@BIGORDER”(1,1),1-bigorder(1,1));
XDLC:=IF(PD,1-“DDEDATA@BIGORDER”(2,1),1-bigorder(2,1));
ZLLR:=IF(PD,”DDEDATA@BIGORDER”(1,2),bigorder(1,2));
ZLLC:=IF(PD,”DDEDATA@BIGORDER”(2,2),bigorder(2,2));
ZLJL:=(ZLLR-ZLLC);
通吃:=(ZLLR-ZLLC)*AMOUNT;
通吃率:=通吃/AMOUNT*100;
DRAWTEXTABS(20,110,’主 動(dòng) 率：’+ NUMTOSTRN(主動(dòng)率,2)),COLOR00FFFF;
DRAWTEXTABS(170,110,’單 數(shù) 比：’+ NUMTOSTRN(單數(shù)比,2)),COLOR00FFFF;
DRAWTEXTABS(20,130,’通 吃 率：’+ NUMTOSTRN(通吃率,2)),COLOR00FFFF;
DRAWTEXTABS(170,15,’■所屬板塊：’+BKNAME),ColorYELLOW,linethick1;
流通盤大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(20,15,’流通盤大?。?#8217;+NUMTOSTRN(流通盤大小,2)+’億’),LINETHICK1,ColorYELLOW;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股凈資產(chǎn):=FINANCE2(4);
銷售毛利率:=FINANCE2(12);
主營(yíng)收入同比:=FINANCE2(11);
凈利潤(rùn)同比增長(zhǎng):=FINANCE2(10);
DRAWTEXTABS(170,30,’每股收益:’+NUMTOSTRN(每股收益,2)+’元’),COLORRED;
DRAWTEXTABS(170,50,’每股市盈率:’+NUMTOSTRN(每股市盈率,1)+’倍’),COLORRED;
DRAWTEXTABS(170,70,’每股凈資產(chǎn):’+NUMTOSTRN(每股凈資產(chǎn),2)+’元’),COLORRED;
DRAWTEXTABS(20,30,’銷售毛利率：’+NUMTOSTRN(銷售毛利率,2)+’%’),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(20,50,’主營(yíng)收入同比增長(zhǎng)：’+NUMTOSTRN(主營(yíng)收入同比,2)+’%’),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(20,70,’凈利潤(rùn)同比增長(zhǎng)：’+NUMTOSTRN(凈利潤(rùn)同比增長(zhǎng),2)+’%’),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(170,90,’歷史最高價(jià)：’+HHV(HIGH,0)),Colorred,LINETHICK0;
DRAWTEXTABS(20,90,’歷史最低價(jià)：’+LLV(LOW,0)),COLOR00FF00,LINETHICK0;
DRAWTEXTABS(170,1,’恭喜發(fā)財(cái)’),COLORff00ff;
DRAWTEXTABS(20,0,’☆阿旺☆均線主圖’),COLORff00ff;
交易分鐘數(shù):=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
預(yù)測(cè)量1:=IF(BARSTATUS=2,VOL/交易分鐘數(shù)*240,VOL);
預(yù)測(cè)量:if(DYNAINFO(4)=0,v,預(yù)測(cè)量1),COLOR00FFFF,LINETHICK0;
DDX:=ZLJL*vol/capital*100;
天量:HHV(V,30),COLOR00FF00,linethick0;
地量:=IF(V=LLV(V,30),V,REF(V,BARSLAST(V=LLV(V,30))));
三十日地量:REF(地量,1),colorred,linethick0;
drawtext(天量=預(yù)測(cè)量 and DDX<0 and sum(DDX,3)<0 and REF(c,30)>0,HIGH,’壓’),COLOR00FF00;
drawtext(三十日地量>預(yù)測(cè)量 and sum(DDX,3)>0 and REF(c,30)>0,LOW-0.1,’底’),COLORRED;
drawtext(REF(V,1)=三十日地量 and DDX>0 and sum(DDX,3)>0 and REF(c,30)>0,LOW,’拉’),COLOR00FFFF;
drawtext(REF(V,1)=天量 and 預(yù)測(cè)量<天量 and DDX<0 and REF(c,30)>0,HIGH+0.1,’跌’),COLOR00FF00;
委買1:=買入單數(shù);
委賣1:=賣出單數(shù);
交易分鐘數(shù):=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
預(yù)測(cè)買1:=IF(BARSTATUS=2,委買1/交易分鐘數(shù)*240,委買1);
委買:=if(DYNAINFO(4)=0,委買1,預(yù)測(cè)買1);
預(yù)測(cè)賣1:=IF(BARSTATUS=2,委賣1/交易分鐘數(shù)*240,委賣1);
委賣:=if(DYNAINFO(4)=0,委賣1,預(yù)測(cè)賣1);
ST:=STRFIND(stkname,’ST’,1)>0;
S:=STRFIND(stkname,’S’,1)>0;
停牌:=DYNAINFO(4)=0;
流通股價(jià):=FINANCE2(36)<50000 AND C<30 or FINANCE2(36)<80000 AND C<15;
委:=流通股價(jià) and not(ST) and not(停牌) and not(S) and 委買<400 and 委賣<400;
XDJL:=(XDLR-XDLC)*3;
ZDJL:=(ZDLR-ZDLC)*3;
ZLJL1:=(ZLLR-ZLLC)*3;
主籌:=sum(ZLJL1,3);
派籌:=sum(XDJL+ZDJL,3);
搶籌:=sum(ZLJL1+ZDJL,3);
drawtext(搶籌>3 and 主籌>派籌,LOW+0.7,’持’),COLORRED;
STICKLINE(搶籌>1 and 主籌>派籌,CLOSE,OPEN,8.5,0),COLORRED;
STICKLINE(搶籌>2 and 主籌>派籌,CLOSE,OPEN,9.5,0),COLOR00FFFF;
DIFF:= EMA(CLOSE,12) – EMA(CLOSE,26);
DEA:= EMA(DIFF,9);
A1:=BARSLAST(REF(CROSS(DIFF,DEA ),1));
DRAWTEXT(REF(C,A1+1)>C AND REF(DIFF,A1+1)0,L-0.2,’M’),COLOR00FFFF;{MACD底背離};
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,13)-LLV(LOW,9))*100;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
A2:=BARSLAST(REF(CROSS(K1,D1),1));
DRAWTEXT(REF(C,A2+1)>C AND REF(K1,A2+1) LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
DRAWTEXT(REF(C,A3+1)>C AND REF(RSI1,A3+1)0,L-0.4,’強(qiáng)’),COLOR0000FF;{RSI底背離};
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
DRAWTEXT(REF(C,C1+1)DIFF AND CROSS(DEA,DIFF)>0,H+0.2,’M’),COLOR00FF00;{MACD頂背離};
C2:=BARSLAST(REF(CROSS(D1,K1),1));
DRAWTEXT(REF(C,C2+1)K1 AND CROSS(D1,K1)>0,H+0.3,’K’),COLORFFFFCC;{KDJ頂背離}
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
DRAWTEXT(REF(C,C3+1)RSI1 AND CROSS(RSI2,RSI1)>0,H+0.4,’弱’),COLORFF9900;{RSI頂背離};
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW-0.6,’買’) ,LINETHICK2,COLORRED;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH+0.6,’賣’),LINETHICK2,COLORGREEN;
重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
操盤線:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK4;
PARTLINE(操盤線,重心>操盤線,RGB(255,0,0), 重心<操盤線,RGB(0,255,0)),linethick2;
變:EMA(CLOSE,5),LINETHICK1,COLORYELLOW;
PARTLINE(變,變>REF(變,1),RGB(255,0,0), 變 DRAWTEXT( BARSTATUS=2,變,’雷’),COLORRED;
DRAWTEXT( BARSTATUS=2,操盤線,’操’),COLORRED;
控盤:=(EMA(EMA(CLOSE,9),9)-REF(EMA(EMA(CLOSE,9),9),1))/REF(EMA(EMA(CLOSE,9),9),1)*1000;
DRAWTEXT(CROSS(控盤,0),l-0.1,’控’),COLOR00FFFF;
STICKLINE(控盤>0,CLOSE,OPEN,1.5,0),COLORff00ff;
STICKLINE(100*WINNER(CLOSE*0.95)>50 AND COST(85)0,CLOSE,OPEN,3.6,0),COLORff00ff;
STICKLINE(CLOSE/REF(CLOSE,1)>1.06 AND VOL>MA(VOL,5) and 單數(shù)比>1.15 and ZLLR>ZLLC and ZLLR*v>v/2,CLOSE,OPEN,6.5,0),color1e90ff;
乖離線:=((c-ref(ma(c,20),1))/20+ma(c,20))*1.20;
STICKLINE(cross(c,乖離線),HHV(HIGH,1),c,7.5,0),COLORGREEN;
結(jié)線:=((REF(HIGH,1)+REF(LOW,1))/(2))*(IF((DATE<=9990314),1,0));
馬線:=MA(CLOSE,20)+((2)*(STD(CLOSE,20)))*(IF((DATE<=9990314),1,0));
STICKLINE(CROSS(結(jié)線,馬線),open,c,7.5,0),CoLor008000;
散買數(shù):=amount*XDLR/10000/(200/c);
散賣數(shù):=amount*XDLC/10000/(200/c);
主買數(shù):=amount*bigorder(1,2)/10000/(2000/c);
主賣數(shù):=amount*bigorder(2,2)/10000/(2000/c);
散凈:=sum(散買數(shù)-散賣數(shù),30);
主凈:=sum(主買數(shù)-主賣數(shù),30);
牛插:=CROSS(主凈,散凈);
死牛:=CROSS(主凈,散凈);
平主:=ma(主凈,3);
平散:=ma(散凈,3);
STICKLINE(CROSS(平散,散凈) and 平散REF(平主,1) and 主凈>REF(主凈,1),open,c,3.5,0),COLOR00FFFF;
STICKLINE(CROSS(散凈,主凈),open,c,6.5,0),colorwhite;
STICKLINE(CROSS(主凈,散凈),open,c,6.5,0),colorbrown;
主莊:=主凈>0;
PARTLINE(變,主凈>0),pointdot,linethick3,COLOR00FFFF;
STICKLINE(委,LLV(LOW,1),OPEN,7.5,0),COLOR00FFFF;
阻:=REF((1+7/100)*(DMA(CLOSE,ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20))),1);
平:=EMA(EMA(EMA(HIGH+(3.2*SLOPE(EMA(CLOSE,3),2)),3),4),4);
回:=EMA(EMA(EMA(HIGH+(3.2*SLOPE(EMA(CLOSE,3),2)),3),4),4)*0.95;
支:=REF((1-7/100)*(DMA(CLOSE,ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20))),1);
DRAWTEXT( CROSS(支,平),l,’價(jià)底’);
DRAWTEXT( CROSS(平,支),l,’啟動(dòng)’);
DRAWTEXT( CROSS(回,阻),l,’漲’);
DRAWTEXT( CROSS(阻,平),h,’離’);
DRAWTEXT( CROSS(阻,回),h,’逃’);
趨勢(shì)線:=EMA((3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1)),3);
STICKLINE(趨勢(shì)線>90 and 趨勢(shì)線>ref(趨勢(shì)線,1),h+(h*0.015),h+(h*0.01),15,1),COLORFFFF00;
STICKLINE(趨勢(shì)線<=13,LLV(LOW,10)-(LLV(LOW,10)*0.015),LLV(LOW,10)-(LLV(LOW,10)*0.01),5,0),colorcc9900;
散買數(shù):=amount*XDLR/10000/(200/c);
散賣數(shù):=amount*XDLC/10000/(200/c);
主買數(shù):=amount*ZLLR/10000/(2000/c);
主賣數(shù):=amount*ZLLC/10000/(2000/c);
散凈:=sum(散買數(shù)-散賣數(shù),30);
主凈:=sum(主買數(shù)-主賣數(shù),30);
平主:=ma(主凈,3);
平散:=ma(散凈,3);
{drawtext(散凈>0 and 散凈>平散 and 散凈>REF(散凈,1),HHV(HIGH,1)+(HHV(HIGH,1)*0.1),’↓’),COLORGREEN;
drawtext(主凈>0 and 主凈>平主 and 主凈>REF(主凈,1),LLV(LOW,1)-(LLV(LOW,1)*0.1),’↑’),COLORRED;}
季底:=ma(LLV(l,66),3);
月底:=ma(LLV(l,26),3)-0.1;
周底:=ma(LLV(l,5),3)-0.15;
DRAWTEXT( CROSS(月底,周底) and CROSS(季底,周底),LOW-0.5,’3底’),color0000ff;
季高:=ma(HHV(H,66),3);
月高:=ma(HHV(H,26),3)+0.1;
周高:=ma(HHV(H,5),3)+0.15;
DRAWTEXT( CROSS(周高,月高) and CROSS(周高,季高),HIGH+0.5,’三高’),COLORFFFF00;