拐点捉妖 通达信副图指标源码

N:=2;M:=30;

DRAWGBK(CURRBARSCOUNT=1 , RGB(0,0,0),RGB(0,0,0),0,'1',0);

gsptcom:(EMA(C,5) * 7 + EMA(C,10) * 3) / 10,LINETHICK2,COLORWHITE;

A1:=(H + L + O + C) / 4;

A2:=EMA(A1,13) - EMA(A1,34);

A3:=EMA(A2,5);

A4:=(A2 - A3) * 5;

A5:=IF(A4 >= 1000,1000,IF(A4 <= A1,A1,A4));

A6:=FORCAST(FORCAST(A5,32),10);

A7:=(C - EMA(C,13)) / EMA(C,13) * (0 - 100);

A8:=EMA(A7 / 10 + EMA(C,13),8);

A9:=EMA(C,3);

A10:=EMA(SLOPE(C,22) * 20 + C,45);

A11:=IF(PERIOD >8 AND PERIOD < 11,MA(A10,1),IF(PERIOD = 8,MA(A10,4),IF(PERIOD = 7,MA(A10,8),IF(PERIOD = 6,MA(A10,16),IF(PERIOD = 5,MA(A10,32),0)))));

A12:=A11 * 0.865;

A13:=IF(A9 > A11,A9,A12);

买卖线:REVERSE(A13) + 2 * A6,LINETHICK1, COLORMAGENTA;

拐点:IF(EMA((1 - C / SMA(C,5,1)) * 100 * C / 100 + EMA(C,13),9) < gsptcom AND gsptcom > 买卖线,EMA((1 - C / SMA(C,5,1)) * 100 * C / 100 + EMA(C,13),9),gsptcom),LINETHICK2, COLORRED;IF(gsptcom <= 买卖线,gsptcom,DRAWNULL),LINETHICK3,COLORGREEN;

A14:=C * V;

A15:=EMA((EMA(A14,3) / EMA(V,3) + EMA(A14,6) / EMA(V,6) + EMA(A14,12) / EMA(V,12) + EMA(A14,24) / EMA(V,24)) / 4,13);

A16:=1.06 * A15;

A17:=(C - REF(C,1)) / REF(C,1) * 100 > 8.5;

A18:=EMA(H,10) * (1 + 5 / 100);

捉妖:CROSS(gsptcom,MA(H,30) * (1 + 13 / 100)) * 10,NODRAW;

A19:=(C - O) / REF(C,1) * 100;

A20:=REF(H,N) = HHV(H,2 * N + 1);

A21:=FILTER(A20,N);

A22:=BACKSET(A21,N + 1);

A23:=FILTER(A22,N);

A24:=REF(L,N) = LLV(L,2 * N + 1);

A25:=FILTER(A24,N);

A26:=BACKSET(A25,N + 1);

A27:=FILTER(A26,N);

A28:=(REF(LLV(L,2 * N),1) + REF(HHV(H,2 * N),1)) / 2;

A29:=(H + L) / 2;

A30:=(A23 AND NOT(A27 AND A28 >= A29)) OR ISLASTBAR OR BARSCOUNT(C) = 1;

A31:=A27 AND NOT(A23 AND A28 < A29);

A32:=REF(BARSLAST(A30),1) + 1;

A33:=BACKSET(A30 AND COUNT(A31,A32) > 0,LLVBARS(IF(A31,L,10000),A32));

A34:=A33 > REF(A33,1);

A35:=BACKSET(A34,2);

A36:=A35 > REF(A35,1);

A37:=A36 OR ISLASTBAR OR BARSCOUNT(C) = 1;

A38:=REF(BARSLAST(A37),1) + 1;A39:=BACKSET(A37 AND COUNT(A23 AND NOT(A27 AND A28 >= A29),A38) > 0,HHVBARS(IF(A23 AND NOT(A27 AND A28 >= A29),H,0),A38));

A40:=A39 > REF(A39,1);

A41:=BACKSET(A40,2);

A42:=A41 > REF(A41,1);

A43:=BACKSET(ISLASTBAR,BARSLAST(A42) + 1);

A44:=A43 > REF(A43,1);

A45:=BACKSET(A44,REF(BARSLAST(A42),1) + 2);

A46:=A45 > REF(A45,1);

短期压力:DRAWLINE(A46,H,A44,H,1),LINETHICK2,COLORBLUE;

STICKLINE(gsptcom >= 买卖线,C,H,0,0),COLORRED;

STICKLINE(gsptcom >= 买卖线 AND C > O,C,O,2.5,1),COLORRED;

STICKLINE(gsptcom >= 买卖线,L,O,0,0),COLORRED;

STICKLINE(gsptcom >= 买卖线 AND C <= O,O,C,3,1),COLORRED;

STICKLINE(gsptcom >= 买卖线 AND C <= O,O,C,1,0),COLORAAAA00;

STICKLINE(gsptcom < 买卖线 AND C <= O,C,O,1.5,0),COLORCYAN;

STICKLINE(gsptcom < 买卖线 AND C <= O,O,H,0,0),COLORCYAN;

STICKLINE(gsptcom < 买卖线 AND C <= O,L,C,0,0),COLORCYAN;

STICKLINE(gsptcom < 买卖线 AND C >= O,L,O,0,0),COLORCYAN;

STICKLINE(gsptcom < 买卖线 AND C >= O,C,H,0,0),COLORCYAN;

STICKLINE(gsptcom < 买卖线 AND C >= O,O,C,2.5,1),COLORCYAN;

STICKLINE(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(L + H + O) / 3,O,3,0),COLORRED;

STICKLINE(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(H + O) / 2,C,3,0),COLORYELLOW;STICKLINE(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(H + O) / 2,(L + H + O) / 3,3,0),COLORFF0000;

STICKLINE(CROSS(gsptcom,MA(H,30) * (1 + 13 / 100)),MA(H,30) * (1 + 13 / 100),MA(H,30) * (1 + 13 / 100) * 1.0052,8,0),COLORYELLOW;

STICKLINE(C >= REF(C,1) * 1.095 AND C = O AND L < C,C,O,5,0),COLORWHITE;

STICKLINE(C >= REF(C,1) * 1.095 AND C = O AND L < C,C,L,0,0),COLORWHITE;

STICKLINE(A19 > 7.5 AND REF(A19,1) < -5 AND C > REF(O,1),H,L,0,0),COLORFF0099;

STICKLINE(A19 > 7.5 AND REF(A19,1) < -5 AND C > REF(O,1),C,O,3,0),COLORFF0099;