源码
{【交易护驾】-- 作者：AHFYXL----保密级别**}
DRAWGBK((DATE > 0),COLORRGB(0,33,0),COLORRGB(0,33,0),1);
{【交易护驾】通达信版 - 完全修正}
Z_1:=C-REF(C,1);
空头:EMA(EMA(Z_1,6),6)/EMA(EMA(ABS(Z_1),6),6)*20,COLOR00FF00,LINETHICK2;
多头:空头*2-FORCAST(空头,9),COLORFF59FF,LINETHICK2;
{警报部分}
JJ_1:=VALUEWHEN(多头<=空头,多头);
JJ_2:=VALUEWHEN(多头>空头,空头);
K1:=IF(多头>空头,1,IF(多头<空头,-1,0));
K2:=VALUEWHEN(K1<>0,K1);
警报:IF(K2>0,JJ_1,JJ_2),COLOR00B4FF,LINETHICK2;
{引力指标}
RSV:=(C-LLV(L,3))/(HHV(H,3)-LLV(L,3))*100;
K:=SMA(RSV,2,1);
D:=SMA(K,2,1);
J:=3*K-2*D;
引力:SMA(J,2,1)-SMA(J,3,1),COLORSTICK;
{近台比计算}
JT_B1:=(O+L+H+C*3)/6;
WMA_VAL:=(5*JT_B1+4*REF(JT_B1,1)+3*REF(JT_B1,2)+2*REF(JT_B1,3)+REF(JT_B1,4))/15;
JT_B2:=REVERSE(JT_B1)+2*WMA_VAL;
JT_B3:=3*JT_B2-2*SMA(JT_B2,2,1);
B1:=BARSLAST(C>JT_B3);
B2:=BARSLAST(C<=JT_B3);
JT_B4:=REF(JT_B3,B1);
JT_B5:=REF(JT_B3,B2);
JT_B6:=IF(C<=JT_B3,JT_B4,JT_B5);
近台比:=(C-JT_B6)/JT_B6*100;
{显示文本}
DRAWTEXT_FIX(1,0.95,0,0,IF(近台比>REF(近台比,1),'↑','↓')),COLORYELLOW;
