fori=1 to 9do beginwh[1]=hh[d];wl[1]=ll[d];if hh[d+1]>hh[d] thenbeginwh[i+1]=hh[d+i];wl[i+1]=ll[d+i];endelse beginwh[i+1]=hh[i];endif ll[d+1]<wl[i] thenbeginwl[i+1]=ll[i+1];endelse beginwl[i+1]=ll[i+1];endwd[i]=wh[i]-wl[i];end;//以上定义wh、wl、wd组的十个数值
iflarge(wd,10,1)<30 then goto abc;endabc@ if c<hhd(h,10)-30 then buy(holding=0,1,marketr);