同花顺承压六九 撑压源码

以下是同花顺承压六九 撑压源码

蓝线无阻力买进，黄线有阻力卖出，

A:=EMA(C,14),colorwhite,LINETHICK1;

B:=(A-REF(A,1))/REF(A,1)*100,NODRAW;

支撑:IF(B>=0,REF(EMA(C,14),BARSLAST(CROSS(B,0))+1),DRAWNULL),colorblue,LINETHICK2;

阻力:IF(B<0,REF(EMA(C,14),BARSLAST(CROSS(0,B))+1),DRAWNULL),colorgreen,LINETHICK2;

VAR1:=ZIG(3,2.88)<REF(ZIG(3,2.88),1) AND REF(ZIG(3,2.88),1)>REF(ZIG(3,2.88),2);

VAR2:=ZIG(3,2.88)>REF(ZIG(3,2.88),1) AND REF(ZIG(3,2.88),1)<REF(ZIG(3,2.88),2);

STICKLINE(VAR1,C,O,8,0),COLOR00FF00;

STICKLINE(VAR1,C,O,5,0),COLOR00FF00;

STICKLINE(VAR1,H,L,2,0),COLOR00FF00;

DRAWTEXT(VAR1,H*1.007,'  ↓'),COLOR80FFFF;

STICKLINE(VAR2,C,O,7,0),COLOR0000FF;

STICKLINE(VAR2,C,O,5,0),COLOR0000FF;

STICKLINE(VAR2,H,L,2,0),COLOR0000FF;

DRAWTEXT(VAR2,L*0.993,'  ↑'),COLOR43D0FA;

VAR3:=ZIG(3,4.88)<REF(ZIG(3,4.88),1) AND REF(ZIG(3,4.88),1)>REF(ZIG(3,4.88),2);

VAR4:=ZIG(3,4.88)>REF(ZIG(3,4.88),1) AND REF(ZIG(3,4.88),1)<REF(ZIG(3,4.88),2);

STICKLINE(VAR3,C,O,8,0),COLOR00FF00;

STICKLINE(VAR3,C,O,5,0),COLOR00FF00;

STICKLINE(VAR3,H,L,2,0),COLOR00FF00;

VAR9:=ZIG(3,8.88)<REF(ZIG(3,8.88),1) AND REF(ZIG(3,8.88),1)>REF(ZIG(3,8.88),2);

VAR10:=ZIG(3,8.88)>REF(ZIG(3,8.88),1) AND REF(ZIG(3,8.88),1)<REF(ZIG(3,8.88),2);

DRAWTEXT(VAR9,H*1.007,'九'),COLOR00FF00;

DRAWTEXT(VAR10,L*0.993,'六'),COLOR00FFFF;

VAR13:=ZIG(3,15.88)<REF(ZIG(3,15.88),1) AND REF(ZIG(3,15.88),1)>REF(ZIG(3,15.88),2);

VAR14:=ZIG(3,15.88)>REF(ZIG(3,15.88),1) AND REF(ZIG(3,15.88),1)<REF(ZIG(3,15.88),2);

DRAWTEXT(VAR13,H*1.02,'A'),COLOR00FF00;

DRAWTEXT(VAR14,L*0.975,'V'),COLOR00FFFF;

VAR15:=ZIG(3,0.23)<REF(ZIG(3,0.23),1) AND REF(ZIG(3,0.23),1)>REF(ZIG(3,0.23),2);

VAR16:=ZIG(3,0.23)>REF(ZIG(3,0.23),1) AND REF(ZIG(3,0.23),1)<REF(ZIG(3,0.23),2);

DRAWICON(VAR15,H,5);

DRAWICON(VAR16,L,4);