INPUT:N1(5,1,21,,1),N2(21,5,34,1),M1(0.3,0.1,0.5,0.01),M2(0.3,0.1,0.5,0.01)，ss(1,1,100,1);//参数值
昨高:=CALLSTOCK(STKLABEL,VTHIGH,6,-1);//昨高
昨低:=CALLSTOCK(STKLABEL,VTLOW,6,-1);//昨低
昨收:=CALLSTOCK(STKLABEL,VTCLOSE,6,-1);//昨收
今日开盘价：=Valuewhen(date<>ref(date,1),open);
S1:=max(昨收-昨低，昨高-昨收）；//中间变量
S:=max(昨收*0.008，S1）；//中间变量
上轨:max(HHV(HIGH,3),今日开盘价+M1*S);//求上轨
下轨:min(LLV(LOW,3),今日开盘价-M2*S);//求下轨
短期均线:ma(CLOSE,N1);//求短期均线
长期均线:ma(CLOSE,N2);//求长期均线
手数:=SS;
//条件
开仓条件:=C>上轨 and 短期均线 > 长期均线；//开多条件
平仓条件:=C< 下轨 and 短期均线 < 长期均线;//平仓条件
//交易系统
IF TIME>090000 AND HOLDING = 0 THEN BEGIN
开多:BUY(开仓条件 ,手数,上轨);
开仓日期:=date;
END
IF CURRENTDATE > 开仓日期 AND HOLDING > 0 THEN BEGIN
平仓:BUYSHORT(平仓条件 ,手数,下轨);
END