通达信分享自用金拐点主图贴图未加密选股指标公式源码

SHORT:=12;LONG:=26;M:=12;

dif:=Ema(CLOSE,SHORT)-ema(CLOSE,LONG);

DEA:=EMA(DIF,M);

MacD:=2*(DIF-DEA);

KK:=IF(DIF>DEA,5,-5);

JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));{计算出金叉死叉时的DIFF值}

DD:=(macd/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));{计算出明日MACD=MACD时的DIFF值}

DIF拐头价:=(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1)))COLORCYAN,POINTDOT;

金死叉价:=(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),NODRAW;

柱变向价:=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORBLUE,POINTDOT;

黄铢消失见顶:=IF(柱变向价>=DIF拐头价,柱变向价,DRAWNULL),COLORBLUE,CIRCLEDOT,LINETHICK1;

上拐:IF(DIF拐头价<柱变向价,DIF拐头价,DRAWNULL),COLORWHITE,LINETHICK4;

下拐:IF(DIF拐头价>=柱变向价,DIF拐头价,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4;

ZJ:=上拐,COLOR0000FF;

HY:=金死叉价,COLORFF00FF;

IF(ZJ>REF(ZJ,1),ZJ,DRAWNULL),COLORWHITE,LINETHICK2;

IF(HY>REF(HY,1),HY,DRAWNULL),COLORLIMAGENTA,LINETHICK2,NODRAW;

IF(HY<REF(HY,1),HY,DRAWNULL),COLORYELLOW,LINETHICK2,NODRAW;

STICKLINE(C>ZJ AND C>O,H,C,0,0 ),COLORWHITE;

STICKLINE(C>ZJ AND C>O,L,O,0,0 ),COLORWHITE;

STICKLINE(C>ZJ AND C>O,O,C,2.8,1),COLORWHITE;

STICKLINE(C>ZJ AND C<=O,H,L,0,0 ),COLORWHITE;

STICKLINE(C>ZJ AND C<=O,O,C,2.8,0),COLORWHITE;

STICKLINE(CLOSE=ZJ,H,L,3,0),COLORRED;

STICKLINE(CLOSE<ZJ,H,L,0,0),COLORBLUE;

STICKLINE(CLOSE<ZJ,O,C,2.5,0),COLORBLUE;

STICKLINE(C<HY AND C>O,H,C,0,0),COLORGREEN;

STICKLINE(C<HY AND C>O,O,L,0,0),COLORGREEN;

STICKLINE(C<HY AND C>O,O,C,2.8,1),COLORGREEN;

STICKLINE(C<HY AND C<=O,H,L,0,0),COLORGREEN;

STICKLINE(C<HY AND C<=O,O,C,2.8,0),COLORGREEN;

HD0:=crOSS(DIF,DEA);

金收:REF(L,BArslAST(HD0)),COLORBLUE,DOTLINE;

LD0:=CROSS(DEA,DIF);

死收:REF(H,BARSLAST(LD0)),COLOR00FF00,DOTLINE;

买入准备:DRAWICON(CROSS(柱变向价,DIF拐头价),上拐,34);

卖出准备:DRAWICON(CROSS(DIF拐头价,柱变向价),下拐,35);

SBL:=STRCAT(STRCAT(STRCAT(STRCAT(DYBLOCK,HYBLOCK),FGBLOCK),GNBLOCK),ZDBLOCK);

DRAWTEXT_FIX(ISLASTBAR,0.01,0.005,0,SBL),COLORGREEN;