量化顶底绝密副图指标源码

中心价 := (2*C + H + L) / 4;
近期低34 := LLV(L, 34);
近期高34 := HHV(H, 34);
近期低21 := LLV(L, 21);
近期高21 := HHV(H, 21);
强度A := EMA((中心价 - 近期低21) / (近期高21 - 近期低34) * 100, 5);
强度B := EMA((中心价 - 近期低34) / (近期高34 - 近期低34) * 100, 8);
多能量: 强度B, COLORFFFF00;
强度平滑 := EMA(强度B, 5);
STICKLINE(强度B > 强度平滑, 强度B, 强度平滑, 4, 1), COLORFF00FF;
RSV1 := (CLOSE - LLV(LOW, 7))  / (HHV(HIGH, 7)  - LLV(LOW, 7)) * 100;
RSV2 := (CLOSE - LLV(LOW, 38)) / (HHV(HIGH, 38) - LLV(LOW, 38)) * 100;
做多线:= SMA(RSV2, 5, 1), COLOR00FFFF, LINETHICK2;
短线:=   SMA(RSV1, 3, 1), COLOR0000BB, LINETHICK2;
信号线:= SMA(短线, 3, 1), COLORCC5500, LINETHICK2;
多空分界:= SMA(做多线, 10, 1), COLOR00FF00, LINETHICK2;
STICKLINE(做多线 > 多空分界, 做多线, 多空分界, 1, 0), COLOR0000FF;
STICKLINE(做多线 <= 多空分界, 做多线, 多空分界, 1, 0), COLOR005500;
休息区: (做多线 > 多空分界 AND 短线 > 信号线), COLORFFFFFF, NODRAW;
STICKLINE(休息区, 13, 14, 4, 0), COLOR0000FF;
STICKLINE(NOT(休息区), 13, 14, 4, 0), COLORFFFFFF;
DIF:= EMA(CLOSE, 10) - EMA(CLOSE, 23), COLORFF00FF, NODRAW;
DEA:= EMA(DIF, 9), COLOR00FF00, NODRAW;
MACD:= 2*(DIF - DEA), NODRAW;
A1 := BARSLAST(REF(CROSS(DIF, DEA), 1));
底背离: REF(CLOSE, A1+1) > CLOSE AND DIF > REF(DIF, A1+1) AND CROSS(DIF, DEA), NODRAW;
STICKLINE(底背离, 15, 28, 6, 0), COLORFF5500;
DRAWTEXT(底背离, 32, '底背离'), COLORFFFFFF;
V1 := (2*C + H + L)/4;
V2 := LLV(LOW, 20);
VA := HHV(HIGH, 26);
FB := EMA((V1 - V2) / (VA - V2) * 100, 10);
FBB := EMA(0.618*REF(FB,1) + 0.382*FB, 2);
AK := EMA(0.382*REF(FB,2) + 0.618*FB, 12), COLORYELLOW;
B := EMA((V1 - V2) / (VA - V2) * 100, 8);
B1 := EMA(B, 5);
顶钝化: REF(B,1) > 80 AND CROSS(B1, B), NODRAW;
DRAWTEXT(顶钝化 AND REF(B,1) > REF(B,2), B-2, '顶钝化'), COLORFF00FF;
DRAWTEXT(顶钝化 AND REF(B,1) > REF(B,2) AND REF(C,1) > REF(C,2), B+2, '顶背离'), COLOR00FFFF;
DRAWICON(CROSS(做多线, 多空分界), 多空分界, 1);
DRAWICON(CROSS(多空分界, 做多线), 多空分界, 2);