【原】通达信主图指标支撑压力（附源码)

 通达信主图指标支撑压力（附源码)

DRAWNUMBER(ISLASTBAR ,C,C),COLORMAGENTA;

SJTJ:=DATE<1590301;

HH1:=IF(HIGH <REF(HIGH,2) AND REF(HIGH,1)<REF(HIGH,2),REF(HIGH,2),0);

LL1:=IF(LOW >REF(LOW,2) AND REF(LOW,1)>REF(LOW,2),REF(LOW,2),0);

HH2:=IF(HH1>0,HH1,REF(HH1,BARSLAST(HH1>0)));

LL2:=IF(LL1>0,LL1,REF(LL1,BARSLAST(LL1>0)));

K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));

K2:=IF(K1<0 OR K1>0,K1,REF(K1,BARSLAST(K1<0 OR K1>0)));

W1:=K2;

G:=IF(K2=1,HH2,LL2);

操盘手支撑位:IF(NOT(K2=1) AND SJTJ,G,DRAWNULL),LINETHICK2,COLORRED;

压力位:IF(K2=1 AND SJTJ,G,DRAWNULL),LINETHICK2,COLORGREEN;

W2:=(OPEN-CLOSE) ;

HT:=IF(OPEN>CLOSE,OPEN,CLOSE);

LT:=IF(OPEN<CLOSE,OPEN,CLOSE);

STICKLINE((W2>0 AND K2=-3 AND SJTJ),O,C,2,0),COLORRED;

STICKLINE((W2>0 AND K2=-3 AND SJTJ),O,H,0.0,0),COLORRED;

STICKLINE((W2>0 AND K2=-3 AND SJTJ),C,L,0.0,0),COLORRED;

STICKLINE((W2<=0 AND K2=-3 AND SJTJ),O,C,2,1),COLORRED;

STICKLINE((W2<=0 AND K2=-3 AND SJTJ),O,L,0.0,0),COLORRED;

STICKLINE((W2<=0 AND K2=-3 AND SJTJ),C,H,0.0,0),COLORRED;

STICKLINE((W2>0 AND K2=1 AND SJTJ),O,C,2,0),COLORGREEN;

STICKLINE((W2>0 AND K2=1 AND SJTJ),O,H,0.0,0),COLORGREEN;

STICKLINE((W2>0 AND K2=1 AND SJTJ),C,L,0.0,0),COLORGREEN;

STICKLINE((W2<=0 AND K2=1 AND SJTJ),C,O,2,1),COLORGREEN;

STICKLINE((W2<=0 AND K2=1 AND SJTJ),C,H,0.0,0),COLORGREEN;

STICKLINE((W2<=0 AND K2=1 AND SJTJ),O,L,0.0,0),COLORGREEN;

DRAWTEXT(K2=1 AND REF(K2,1)=-3,H*1.003,'空'),COLORYELLOW;

DRAWTEXT(K2=-3 AND REF(K2,1)=1,LOW*0.997,'多'),COLORYELLOW;

DRAWNUMBER(ISLASTBAR ,G,G),COLORYELLOW;

最新价:IF(SJTJ, C,DRAWNULL),LINETHICK0,COLORYELLOW;