//确定起止时间点
vEndT:=20190122T;            //指定日
stockID:="m2001-C-2900";

SetSysParam(pn_stock(),stockID); //指定合约
SetSysParam(PN_Cycle(),cy_day());   //日线
SetSysParam(PN_date(),vEndT);     //当前时间
refT:=ref(sp_time(),1);       //上一个日线交易日
if refT=0 then     //当前时间为上市日，不存在上个交易日，则向前推三天为起点
  refT:=sp_time()-3;

begT:=refT+16/24;    //设置开始时间点为上一个日线交易日的收盘时间点
endT:=vEndT+16/24;   //设置截止时间点为当天收盘时间点-与begt形成完整时间周期
setsysparam(pn_cycle(),cy_1m());//修改当前周期为分钟线

//取数，有了开始时间截止时间，可以直接用markettable提取
return select ['date'],['close'],['vol'],['low'],['cjbs'] from markettable datekey begt to endt of stockID end;

---------------------------------------------------------------------
//若需要用nday提取，去掉上一句代码后，接着实现如下
N :=tradedays(begT,endT); //取分钟线下的时间区间交易周期数
setsysparam(pn_date(),endT);//不可省，nday的起始点靠这个确定
return nday(N,"time",datetimetostr(sp_time()),"open",open(),"close",close(),"settle",settlement(),"vol",vol());