《自动测幅》(源码、主图、通达信\大智慧)
昨天《领带低点涨停》指标发出后,下载的坛友不少,有坛友索取用于测幅的主图,源码送给大家,对您也许有帮助。
{自动测幅}
N:=5;
M:=10;
HH:=HHV(H,N);
LL:=LLV(L,N);
A1:=REF(HH,1);
A2:=REF(LL,1);
B1:=IF(C>A1,1,IF(C<A2,-1,0));
B2:=REF(B1,1);
STICKLINE(B2=1 AND B1=-1,H,L,0,0),COLORRED;
STICKLINE(B2=1 AND B1=-1,C,O,3,0),COLORRED;
STICKLINE(B2=-1 AND B1=1,H,L,0,0),COLORGREEN;
STICKLINE(B2=-1 AND B1=1,C,O,3,0),COLORGREEN;
DRAWICON(B2=1 AND B1=-1,H*1.02,2);
DRAWICON(B2=-1 AND B1=1,L*0.98,1);
DRAWTEXT(B2=1 AND B1=-1,H*1.05,'卖'),COLORRED;
DRAWTEXT(B2=-1 AND B1=1,L*0.95,'买'),COLORGREEN;