2007-05-29 10:37:36 -06:00
|
|
|
-- Title: Travel to Randomly Picked Stars
|
|
|
|
|
|
2003-05-01 11:43:42 -06:00
|
|
|
obs = celestia:getobserver()
|
|
|
|
|
while 1 do
|
|
|
|
|
nstars = celestia:getstarcount()
|
|
|
|
|
index = math.floor(nstars * math.random())
|
|
|
|
|
star = celestia:getstar(index)
|
|
|
|
|
celestia:select(star)
|
|
|
|
|
obs:goto(star, 10)
|
|
|
|
|
wait(10)
|
|
|
|
|
end
|
