主力成本公式

【通达信】优化组合（获利线、动态成本、主力成本、取舍线）-指标公式源码

以下为公式内容，请直接复制：

利:WINNER(CLOSE)*100,NODRAW,COLORRED;

马:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORYELLOW,LINETHICK 2;

获利线:COST(98);

动态成本:COST(50),COLORBLUE;

主力成本:COST(5),COLORGREEN;

KDJ_K:="KDJ.K"(9,3,3);KDJ_D:="KDJ.D"(9,3,3);KDJ_J:="KDJ.J"(9,3,3);

买1:=CROSS(KDJ_J,0) OR (CROSS(KDJ_J,KDJ_K) AND KDJ_D<26);

买2:=CROSS("RSI.RSI1"(6,2,2),20) OR CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));

买3:=CROSS("MACD.DIF","MACD.DEA") OR CROSS("MACD.MACD",0);

买0:=买1+买2+买3;

买:=IF(买0>1,买0,0);

掏底:IF(买,L*0.9978-0.03,DRAWNULL),POINTDOT,COLOR00FFFF,LINETHICK5;

选股:=FILTER(CROSS("KDJ.K","KDJ.D")&&CROSS("MACD.DIF","MACD.DEA"),50);

低吸:IF(选股,L*0.988-0.01,DRAWNULL),POINTDOT,COLORFF00FF,LINETHICK7;

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

取舍线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MI D,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7 *REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID, 20))/210,LINETHICK1,COLORYELLOW;

生命线:MA(取舍线,6),LINETHICK1,COLORRED;

五日线:MA(CLOSE,5),COLORLIBLUE;

水平面:MA(CLOSE,60),COLORGREEN;

MA1:=MA(CLOSE,5);

MA2:=MA(CLOSE,10);

MA3:=MA(CLOSE,30);

MA4:=MA(CLOSE,60);

WYA001:=(2*CLOSE+HIGH+LOW)/4;

WYA002:=EMA(WYA001,4);

WYA003:=EMA(WYA002,4);

WYA004:=EMA(WYA003,4);

WYA柱:=(WYA004-REF(WYA004,1))/REF(WYA004,1)*100;

WYA线1:=MA(WYA柱,2);

WYA线2:=MA(WYA柱,1);

WY分时1线:=MA(CLOSE,1);

WY分时21线:=MA(CLOSE,21);

DRAWICON(WYA线1>0.25 AND WYA线2>0.25 AND CROSS(WYA线1,WYA线2),HIGH*1.0128,6); DRAWICON(WYA线1<0 AND WYA线2<0 AND CROSS(WYA线1,WYA线2),HIGH*1.0128,6); DRAWICON( CROSS(WY分时21线,WY分时1线),HIGH*1.0128,6) ;

DRAWICON(WYA线1<-0.25 AND WYA线2<-0.25 AND CROSS(WYA线2,WYA线1),LOW*0.99,5);

DRAWICON(WYA线1>0 AND WYA线2>0 AND CROSS(WYA线2,WYA线1),LOW*0.99,5),COLORYELLOW; DRAWICON(CROSS(WY分时1线,WY分时21线),LOW*0.99,5),COLORYELLOW;

{蓝}

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;

{红}

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;

VAR1:=AMOUNT/VOL/100;

VAR2:=(2*CLOSE+HIGH+LOW)/4;

VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);

VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4);

散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;

庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3;

DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.05,'←低吸'),COLORLIRED;

DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.05,'←高抛'),COLORGREEN;

DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA);

A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)

DRAWICON(FILTER(B1>0,5),L*0.94,10);

DRAWTEXT(FILTER(B1>0,5),L*0.94,'M底'),COLORGREEN;{MACD底背离}

A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));

B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");

DRAWICON(FILTER(B2>0,5),L*0.96,10);

DRAWTEXT(FILTER(B2>0,5),L*0.96,'K底'),COLORYELLOW;{KDJ底背离}

C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));

D1:=REF(C,C1+1)DIFF AND CROSS(DEA,DIFF);

DRAWICON(FILTER(D1>0,5),H*1.07,12);

DRAWTEXT(FILTER(D1>0,5),H*1.07,'M顶'),COLOR0066FF;{MACD顶背离}

C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));

D2:=REF(C,C2+1)"KDJ.K" AND CROSS("KDJ.D","KDJ.K");

DRAWICON(FILTER(D2>0,5),H*1.05,12);

DRAWTEXT(FILTER(D2>0,5),H*1.05,'K顶'),COLORRED;{KDJ顶背离}

C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));

D3:=REF(C,C3+1)"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"); DRAWICON(FILTER(D3>0,5),H*1.03,12),;

DRAWTEXT(FILTER(D3>0,5),H*1.03,'R顶'),COLORMAGENTA,;{RSI顶背离};

ST:="MCST";

QQ:=FILTER(C>ST,22);

IF(QQ,L*0.998-0.01,DRAWNULL),POINTDOT,LINETHICK5,COLORRED;

IF(QQ,L*0.998-0.04,DRAWNULL),POINTDOT,LINETHICK5,COLOR55FF33;

IF(QQ,L*0.998-0.07,DRAWNULL),POINTDOT,LINETHICK5,COLORFF00FF;

{RSI底背}

A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));

B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");

IF(B3,L*0.9978-0.05,DRAWNULL),POINTDOT,COLORCYAN,LINETHICK5;

Z1:=REF(H,8)=HHV(H,2*8+1);

Y1:=FILTER(Z1,8);

X1:=BACKSET(Y1,8+1);

W1:=FILTER(X1,8);{高点}

R11:=BACKSET(ISLASTBAR,BARSLAST(W1)+1); S11:=R11>REF(R11,1);

DRAWLINE(W1,H,S11,H,1),COLORBLUE;

Z2:=REF(L,8)=LLV(L,2*8+1);

Y2:=FILTER(Z2,8);

X2:=BACKSET(Y2,8+1);

W2:=FILTER(X2,8);{低点}

T11:=BACKSET(ISLASTBAR,BARSLAST(W2)+1); U11:=T11>REF(T11,1);

DRAWLINE(W2,L,U11,L,1),COLORBLUE;

M:=INTPART(3*8/5);

Z12:=REF(H,M)=HHV(H,2*M+1);

Y12:=FILTER(Z12,M);

X12:=BACKSET(Y12,M+1);

W12:=FILTER(X12,M);{高点}

R112:=BACKSET(ISLASTBAR,BARSLAST(W12)+1); S112:=R112>REF(R112,1);

DRAWLINE(W12,H,S112,H,1),COLORRED;

Z22:=REF(L,M)=LLV(L,2*M+1);

Y22:=FILTER(Z22,M);

X22:=BACKSET(Y22,M+1);

W22:=FILTER(X22,M);{低点}

T112:=BACKSET(ISLASTBAR,BARSLAST(W22)+1); U112:=T112>REF(T112,1);

DRAWLINE(W22,L,U112,L,1),COLORRED;

VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);

VAR2222:=CROSS(VAR1111,0.9);

VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);

VAR4444:=CROSS(VAR3333,0.9);

压力:= REF(HIGH,BARSLAST(VAR2222));

STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),COLOREA91B5,L INETHICK3;

支撑:= REF(LOW,BARSLAST(VAR4444));

STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),COLOR00B4FF,LIN ETHICK3;

下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);

RRRSV:=SMA(下档线,3,1);

KKK:=SMA(RRRSV,3,1);

DDD:=((3 * RRRSV) - (2 * KKK));

JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);

RSV24:=SMA(JJ12,3,1);

K24:=SMA(RSV24,3,1);

W24:=((3 * RSV24) - (2 * K24));

压力2:=IF(CROSS(W24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(W24,DDD)))),COLORFFFFFF; 压力位:=IF(ISLASTBAR,压力2,DRAWNULL);

STICKLINE(ISLASTBAR ,压力位,压力位,120,0),LINETHICK4,COLORFFFFFF;

底部:=LLV(HIGH,30),COLOR00FF00;