通达信小仙均线主图指标公式

F:=MACD.DIF;
D:=MACD.DEA;
M:=MACD.MACD;
HT:=BARSLAST(CROSS(FD));
HT1:=SUMBARS(HT=02);
LT:=BARSLAST(CROSS(DF));
LT1:=SUMBARS(LT=02);
H1:=BARSLAST(H=HHV(HHT+1));
H2:=REF(H1LT)+CONST(LT);
H3:=REF(H1LT1-1)+CONST(LT1);
L1:=BARSLAST(L=LLV(LLT+1));
L2:=REF(L1HT1-1)+CONST(HT1);
L3:=REF(L1HT)+CONST(HT);
DRAWLINE(CURRBARSCOUNT=CONST(H2)+1HCONST(M)>0 AND CURRBARSCOUNT=CONST(H1)+1H1)COLORRED;
DRAWLINE(CURRBARSCOUNT=CONST(L2)LCONST(M)>0 AND CURRBARSCOUNT=CONST(L1)+1L1)COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=CONST(H3)HCONST(M)<0 AND CURRBARSCOUNT=CONST(H1)+1H1)COLORRED;
DRAWLINE(CURRBARSCOUNT=CONST(L3)+1LCONST(M)<0 AND CURRBARSCOUNT=CONST(L1)+1L1)COLORYELLOW;
N1:=1;
AX:=REF(HN1)=HHV(H2*N1+1);
B1:=FILTER(AXN1);
C1:=BACKSET(B1N1+1);
D1:=FILTER(C1N1);{高点}
A2X:=REF(LN1)=LLV(L2*N1+1);
B2:=FILTER(A2XN1);
C2:=BACKSET(B2N1+1);
D2:=FILTER(C2N1);{低点}
E1:=(REF(LLV(L2*N1)1)+REF(HHV(H2*N1)1))/2; E2:=(H+L)/2;{高低点出现在同一K线上时可作取舍}
H11:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
L11:=(D2 AND NOT(D1 AND E1<E2)); H21:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H11)1)+1; F1:=BACKSET(H11 AND COUNT(L11X1)>0LLVBARS
(IF(L11L10000)X1));
G1:=F1>REF(F11); I1:=BACKSET(G12); LD:=I1>REF(I11);{过滤后低点}
L21:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L21)1)+1; F2:=BACKSET(L21 AND COUNT(H21X2)>0HHVBARS
(IF(H21H0)X2));
G2:=F2>REF(F21); I2:=BACKSET(G22); HD:=I2>REF(I21);{过滤后高点}
R1:=BACKSET(ISLASTBARBARSLAST(HD)+1); S1:=R1>REF(R11); {前一高}
T1:=BACKSET(ISLASTBARBARSLAST(LD)+1); U1:=T1>REF(T11); {前一低}
R2:=BACKSET(S1REF(BARSLAST(HD)1)+2); S2:=R2>REF(R21); {前二高}
T2:=BACKSET(U1REF(BARSLAST(LD)1)+2); U2:=T2>REF(T21); {前二低}
T3:=BACKSET(U2REF(BARSLAST(LD)1)+2); U3:=T3>REF(T31); {前三低}
T4:=BACKSET(U3REF(BARSLAST(LD)1)+2); U4:=T4>REF(T41); {前四低}
R3:=BACKSET(S2REF(BARSLAST(HD)1)+2); S3:=R3>REF(R31); {前三高}
R4:=BACKSET(S3REF(BARSLAST(HD)1)+2); S4:=R4>REF(R41); {前四高}
短期压力:DRAWLINE(S2HS1H1)COLORRED;
短期支撑:DRAWLINE(U2LU1L1)COLORGREEN;
A77:=(2*C+H+L)/4;
支撑:LLV(A7721)COLORMAGENTADOTLINE;
压力:HHV(A7721)COLORGREENDOTLINE;
IF(C>压力 OR 压力>REF(压力1)压力DRAWNULL)COLORREDLINETHICK1;
DRAWTEXT(ISLASTBAR压力'压力')COLORGREEN;
DRAWTEXT(ISLASTBAR支撑'支撑')COLORMAGENTA;