头大的问题

<%
Response.buffer=false
Server.ScriptTimeOut=150
%>
<Html>
<Head>
<Title>满天星</Title>
</Head>
<Body bgcolor=#000000>
<%
dim startx
dim k,i
dim nextsecond
for k=1 to 60
    nextsecond=dateadd("s",2,time)
    do while imte<nextsecond
    loop
    Randomize
    star=int(50*rnd())
    for i=1 to star
    Response.Write "<font color=000000>&nbsp;</font>"
    Next
    Response.Write "<font color=#00ffff>*</font>"
    if k mod 3=2 then response.write "<br>"
next
%>
</body>
</html>
---------------------------------------------------------------------------
do while imte<nextsecond
    loop
这个语句在这里面是干什么的？？
真的不知道意思。谁可以讲一下吗
但是我去掉这个语句结果就不对了