input: Len(20), numdevsdn(2);
var: uband(0), Lband(0), l_d(0);
var: bulltrend(false), beartrend(false);
var:l_MA1(0),l_MA2(0),l_n(len*2);
var:smaflag(0),l_mp(0);
uband=bollingerband(C, len, numdevsdn);
Lband=bollingerband(C, len, -numdevsdn);
l_MA1=average(c,len);
l_MA2=average(c,maxlist(l_n,len*0.5));
bulltrend = l_MA1>l_MA2;
beartrend = l_MA1<l_MA2;
l_mp = marketposition;
if l_mp<>l_mp[1] then smaflag=0;
if l_mp=0 then l_n=len*2;
if l_mp<>0 then l_n=l_n-1;
if bulltrend then
buy ("BB buy") next bar Lband limit;
if beartrend then
sellshort ("BB sell") next bar uband limit;
附上程式碼來求指教 |