setVar $i 810
While ($i > 0)
  send "snt1*ql2*snl185*snl285*snl3*ql36*"
  subtract $i 1
end