通达信〖定海针〗以定海针为中心的上下支撑压力带源码

涨跌幅:=C/REF(C,1)-1;
STICKLINE(涨跌幅>0 AND O< C,涨跌幅,0,1,0),COLORLIRED;
STICKLINE(涨跌幅>0 AND O>C,涨跌幅,0,1,0),COLORGREEN;
极值高:H/REF(C,1)-1,COLORSTICK;
极值低:L/REF(C,1)-1,COLORSTICK;
定海针:(REF(H,1)+REF(L,1)+REF(C,1)+REF(O,1))/4/C-1,CIRCLEDOT,COLORYELLOW;
风浪幅:=REF(HIGH,1)-REF(LOW,1);
上压界:=定海针+(0.5*风浪幅/C);
上压带:=定海针+(0.618*风浪幅/C);
STICKLINE(1,上压界,上压带,2,-1);
下撑界:=定海针-(0.5*风浪幅/C);
下撑带:=定海针-(0.618*风浪幅/C);
STICKLINE(1,下撑界,下撑带,2,-1);
0.05;
DRAWICON(定海针>=0.05,-0.1,1);