在设计公式时，我们经常遇到这样的问题，如何使买卖信号一一对应？

　　比如下面的代码：

input:n(26,5,300),p(2,0.1,10);

close;

mid : ma(close,n);

upper: mid + p*std(close,n);

lower: mid – p*std(close,n);

tjb:=cross(close,lower);

tjs:=cross(upper,close);

drawicon(tjb,close,4);

drawicon(tjs,close,5);

图示如下，可以看出，买入信号连续发出多次后，才出现卖出信号，卖出信号连续发出多次后，才发出买入信号。

如何过滤连续的买入、卖出信号，使买入后只要没有发出卖出信号，就不再发出买入信号；同样，卖出后只要没有出现买入信号，就不再发出卖出信号。即买入、卖出信号一一对应。

　　容易想到的是使用过滤函数filter()，但这个函数是难以实现的，因为未来有多少个连续的买入（或卖出）信号是未知的。

　　另一种方法是，从前一次卖出（或买入）信号开始累加买入（或卖出）信号，如果累加次数等于１，则发出真正的买入（或卖出）信号。

　　但这里还有一个问题，如果首次信号是卖出信号的话，也应该过滤，因为没有买入哪来卖出？应让首次信号是买入信号才合理。方法是，在第1根K线的位置，虚拟一个卖出信号。

　　以下是实现上述想法的常规函数代码：

input:n(26,5,300),p(2,0.1,10);

close;

mid : ma(close,n);

upper: mid + p*std(close,n);

lower: mid – p*std(close,n);

//以下为常规函数处理代码//

tjb:=cross(close,lower);//初始买入信号，可换成其它任意买入条件

tjs:=cross(upper,close);//初始卖出信号，可换成其它任意卖出条件

{以下代码，使买、卖信号一一对应}

tsb:=barssince(tjb);

tss:=barssince(tjs);

if tjs[datacount]

a:=setlbound(tjs,1);

tjs:=tjs or barpos=1;

end;

tjbuy:=count(tjb,barslast(tjs))=1 and tjb; //买入信号

tjsell:=count(tjs,barslast(tjb))=1 and tjs; //卖出信号

drawicon(tjbuy,low,4);

drawicon(tjsell,high,5);

图示如下：

(文章来源：股票入门 http://www.stockcl.com)