通达信撑压互换 主图源码

DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
STICKLINE(C>=O,H,L,0,1),COLOR0000FF;
STICKLINE(C>O,C,O,2,0),COLOR000066;
STICKLINE(C>O,C,O,1.5,0),COLOR000088;
STICKLINE(C>O,C,O,1,0),COLOR0000AA;
STICKLINE(C>O,C,O,0,0),COLOR0000CC;
STICKLINE(C<O,H,L,0,1),COLORCYAN;
STICKLINE(O>=C,C,O,2,0),COLORFF8800;
STICKLINE(O>=C,C,O,1.5,0),COLORFFAA00;
STICKLINE(O>=C,C,O,1,0),COLORFFCC00;
STICKLINE(O>=C,C,O,0,0),COLORFFEE00;
ZT:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.009*100/REF(C,1)),2,0) AND C=H;
STICKLINE(ZT,H,L,0,0),COLORFF00FF;
STICKLINE(ZT,O,C,2,0),COLORFF00FF;
DT:=IF((REF(C,1)-C)*100/REF(C,1)>=(10-0.009*100/REF(C,1)),2,0) AND C=L;
STICKLINE(DT,H,L,0,0),COLOR00EE00;
STICKLINE(DT,O,C,2,0),COLOR00EE00;
SP:=IF((C<100),C,(C/100));
DS:=INTPART(((4*(LOG(SP)/LOG(2)))+1));
H1:=((DS-1)/4);
支撑:IF((C>100),(POW(2,H1)*100),POW(2,H1)),POINTDOT,LINETHICK4,COLORBROWN;
DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLOR0000EE;
压力:IF((C>100),(POW(2,(H1+(1/4)))*100),POW(2,(H1+(1/4)))),
POINTDOT,LINETHICK4,COLOR009900;
DRAWTEXT(ISLASTBAR,压力,'压力'),COLOREE0000;