<%
子刷心()
暗淡 outRed 、 outBlue 、 blueBall 、 redBall(8) 、a 、 I
隨機化
a=32
我=13
藍球 =int(I*rnd()+1)
對於 i=1 到 7
tmp = int(a*rnd()+1)
相同=假
對於 j=1 到 i-1
如果 redBall[j]=tmp 則 isSame=true
下一個
如果 isSame=false 那麼
紅球[i] = tmp
別的
我 = 我 - 1
結束如果
下一個
outBlue = 藍球： & blueBall
outRed = 紅球：
對於 i = 1 到 7
出紅 = 出紅 & 紅球 & ,
下一個
response.write outRed 和 outBlue
結束子
%>