if date<>ref(date,1) then begin dayopen:=open; predayrange:=predayhigh-predaylow; brange:=open*minrange*0.01; if predayrange<brange then predayrange:=brange; end else begin dayopen:=ref(dayopen,1); predayrange:=ref(predayrange,1); blongstoped:=ref(blongstoped,1); bshortstoped:=ref(bshortstoped,1); end