function event=eventday(stationname,period)

data=load([stationname,datestr(period,'YY'),datestr(period,'mm'),datestr(period,'dd'),'.CLS']);
if data(2)==1 | data(3)==1
event=1;
else
    event=0;
end

end