fldcount = int((fldsecs+0.5)/fldperiod) + 1
if (fldcount .ne. prevfldcount) then
count0 = fldcount
count1 = fldcount + 1
integer fldcount
fldcount = int(fldsecs/fldperiod) + 1