<% dim EventoSim, NumNotEsq 'EventoSim define janela de eventos, NumNotEsq define nº de notícias na coluna EventoSim = false NumNotEsq = 4 if EventoSim then NumNotEsq = 3 %>

<% end if dim j for j=2 to 8 step 2%>

< <%=Nsecao(j)%> >

<%=data(j)%>

<%=tit(j)%>

<% if img(j) <> "" then %>

<% end if %>

<%=chm(j)%>

<%if j<8 then%>

<% end if %>

<%next%>

<%if codigoG1<>"" then%>

<%if imgG1 <> empty then%>

<% end if %>

<%=titG1%>

<%=chamG1%>

<%end if%> <%for j=0 to 1%>

< <%=Nsecao(j)%> >

<%=data(j)%>

<%=tit(j)%>

<% if img(j) <> "" then %>

<% end if %>

<%=chm(j)%>

<%next%> <%for j=3 to 7 step 2%>

< <%=Nsecao(j)%> >

<%=data(j)%>

<%=tit(j)%>

<% if img(j) <> "" then %>

<% end if %>

<%=chm(j)%>

<%if j<7 then%>

<% end if %>

<%next%>