合力的计算公式主力成本公式

2020年9月25日发(作者：宗之发)
【通达信】优化组合（获利线、动态成本、主力成本、取舍线）-指标公式源码
以下为公式内容，请直接复制：

利:WINNER(CLOSE)*100,NODRAW,COLORRED;
马:DRA WLINE(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:=
买1:=CROSS(KDJ_J,0) OR (CROSS(KDJ_J,KDJ_K) AND KDJ_D<26);
买2:=CROSS(
买3:=CROSS(
买0:=买1+买2+买3;
买:=IF(买0>1,买0,0);
掏底:IF(买,L*0.9978-0.03,D RAWNULL),POINTDOT,COLOR00FFFF,LINETHICK5;
选股:= FILTER(CROSS(
低吸:IF(选股,L*0.988-0.01,DRAWNULL),P OINTDOT,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*RE F(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17 )+2*REF(MID,18)+REF(MID,
20))210,LINETHICK1,COL ORYELLOW;
生命线: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;
DR AWICON(CROSS(WY分时1线,WY分时21线),LOW*0.99,5),COLORYELL OW;
{蓝}
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3 ,0),COLORFF7700;
STICKLINE(OPEN>=CLOSE,CLOSE,O PEN,2.2,0),COLORFF9900;
STICKLINE(OPEN>=CLOSE, CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(OPEN> =CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
{红}
S TICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099; < br>STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR000 0CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),CO LOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0. 5,0),COLORCC66FF;
VAR1:=AMOUNTVOL100;
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);
DRAWTE XT(FILTER(B1>0,5),L*0.94,'M底'),COLORGREEN;{MACD底背离 }
A2:=BARSLAST(REF(CROSS(
B2:=REF(C,A2+1)>C AND REF(
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);
DRAWTE XT(FILTER(D1>0,5),H*1.07,'M顶'),COLOR0066FF;{MACD顶背 离}
C2:=BARSLAST(REF(CROSS(
D2:=REF(C,C2+1)DRAWICON(FILTER(D2>0,5),H*1.05,12); DRAWTEXT(FILTER(D2>0,5),H*1.05,'K顶'),COLORRED;{K DJ顶背离}
C3:=BARSLAST(REF(CROSS(
D3:=REF(C,C3+1)DRAWICON(FILTER(D3>0,5),H*1.03,12),; < br>DRAWTEXT(FILTER(D3>0,5),H*1.03,'R顶'),COLORMAGEN TA,;{RSI顶背离};
ST:=
QQ:=FILTER(C>ST,22);
IF(QQ,L*0.998-0.01,DRAWNULL),POINTDOT,LINETHICK5, COLORRED;
IF(QQ,L*0.998-0.04,DRAWNULL),POINTDO T,LINETHICK5,COLOR55FF33;
IF(QQ,L*0.998-0.07,D RAWNULL),POINTDOT,LINETHICK5,COLORFF00FF;
{RSI底背}
A3:=BARSLAST(REF(CROSS(
B3:=REF(C,A3+1)>C AND REF(
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*85);
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(VAR2 222)),0.5,1),COLOREA91B5,L
INETHICK3;
支撑:= REF(LOW,BARSLAST(VAR4444));
STICKLINE(CLOSE,R EF(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(H IGH,BARSLAST(CROSS(W24,DDD)))),COLORFFFFFF;
压力位:=IF(ISLASTBAR,压力2,DRAWNULL);
STICKLINE(ISLASTBAR ,压力位,压力位,120,0),LINETHICK4,COLORFFFFFF;
底部:=LLV(HIGH,30),COLOR00FF00;