<%
c=request("c")
cc=split(c,",")
i=ubound(cc)
'response.write i&"
"
if i=0 then
   if cc(i)<>1 then
      for j=1 to cint(cc(i))-1
          response.write "0 "
      next
      response.write "
"
      response.write "1 "
    else
      response.write "1 "
    end if
else
    for k=0 to i
        response.write "1 "
    next
    response.write "
"
    i=ubound(cc)
    for s=1 to (20-i-1)
        response.write "0 "
    next
end if
%>