谢谢,请帮帮忙~
参数S:12,P:26,M:9
DIF : EMA(CLOSE,S) - EMA(CLOSE,P);
DEA : EMA(DIF,M),COLORYELLOW,linethick2;
MACD : 2*(DIF-DEA), COLORSTICK,COLORRED;
{先画红绿柱}
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,5,1),COLOR6058FF;
STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,5,0),COLOR6058FF;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,5,1),COLORFFFF00;
STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,5,0),COLORFFFF00;
{先画红绿柱}
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,5,1),COLOR6058FF;
STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,5,0),COLOR6058FF;
STICKLINE(MACD< 0 AND MACD>=REF(MACD,1),0,MACD,5,1),COLORFFFF00;
STICKLINE(MACD< 0 AND MACD< REF(MACD,1),0,MACD,5,0),COLORFFFF00;
缩头:=IF(MACD>0 AND REF(MACD,1)>REF(MACD,2) AND MACD< REF(MACD,1),1,0);
缩脚:=IF(MACD<0 AND REF(MACD,1)< REF(MACD,2) AND MACD>REF(MACD,1),1,0);
DRAWICON(FILTER(缩头,3) AND 缩头,MACD+0.01,5),ALIGN0;
DRAWICON(FILTER(缩脚,3) AND 缩脚,MACD,4),ALIGN1;
PARTLINE(1,DIF),COLORWHITE,LINETHICK1;
PARTLINE(1,DEA),COLORYELLOW,LINETHICK1;
交叉 :CROSS(DIF,DEA),COLORGREEN,linethick0;
前叉 :=BARSLAST(交叉<>0);
LDIF :=ref(dif,前叉+1);
LLDIF:=ref(LDIF,1);
金叉:REF(前叉,1)<30 AND 交叉 AND LLDIF<LDIF AND HHV(DIF,前叉+1)<1,COLORRED,linethick0;
DRAWICON(金叉,DEA,12);
RHIGH:=REF(HIGH,1);
RLOW:=REF(LOW,1);
RCLOSE:=REF(CLOSE,1);
CDP0:=(RHIGH+RLOW+RCLOSE)/3;
AH:CDP0+RHIGH-RLOW,COLORMAGENTA,linethick0;
NH:CDP0*2-RLOW,COLORRED,linethick0;
CDP:CDP0,COLORWHITE,linethick0;
NL:CDP0*2-RHIGH,COLORYELLOW,linethick0;
AL:CDP-(RHIGH-RLOW),COLORGREEN,linethick0;
震幅:=100*(high-low)/REF(CLOSE,1);
活跃:=COUNT(震幅>=5 AND DATATYPE=6,100),COLORGREEN,linethick0;
股本:=FINANCE( 1)/10000,COLORYELLOW,linethick0;
流通:=FINANCE( 7)/10000,COLORWHITE,linethick0;
月度:=MOD(FINANCE( 0),100);
季度:=INTPART(月度/3);
每股收益:=FINANCE(33)*4/季度;;
市盈:=CLOSE/每股收益,COLORYELLOW,linethick0;
市净:=CLOSE/FINANCE(34),COLORRED,linethick0;
市销率:10*CLOSE*FINANCE( 1)/FINANCE(20),COLORBLACK,linethick0;
DRAWTEXTEX(DATATYPE=6,0,5,0,' 所属板块:'+BLKNAME+'(活跃度:'+NUMTOSTR(活跃,0)+'%)'),COLORYELLOW;
DRAWTEXTEX(DATATYPE=4,0,5,0,' 股本: '+NUMTOSTR(股本,2)+' 流通股: '+NUMTOSTR(流通,2)+' 市销率:'+NUMTOSTR(市销率,2)+' 市盈率:'+NUMTOSTR(市盈,0)+' 市净率: '+NUMTOSTR(市净,2)),COLORYELLOW;