麻烦各位大侠帮忙编个小程序：
取昨日行情的最高价与最低价的中间值为参照线，当3个5分钟K线的收盘价低于中间值，且第四根K线的开盘价不低于（中间值-200），确定卖空。
万分感谢！！
zh:=REFDATE(h,ref(date,1));
zl:=REFDATE(l,ref(date,1));
zz:=(zh+zl)/2;
if ref(c,3)<zz and ref(c,2)<zz and ref(c,1)<zz and o>zz-200 then sellshort(holding<0,1,market);
1.用callstock引用下昨天的最高最低价，然后加起来除以2
aaa:=callstock('if00',vtlow,6,-1)+callstock('if00',vthigh,6,-1);
zjz:aaa/2;
2.如果是5分钟k线图就不需要引用，其他周期则引用数据
if ref(c,3)<zjz and ref(c,2)<zjz and ref(c,1)<zjz and o<=(zjz-200) then buyshort(holding=0,1,thisclose);