Code: Select all
-- star tour
celestia:print("Hello, Universe!", 5, 0, 0, 0, 0)
obs = celestia:getobserver()
stars = celestia:getstarcount()
for i = 1,stars do
j = math.random(stars)
obj = celestia:getstar(j)
obs:goto(obj,20)
while obs:travelling() do wait(0.5) end
celestia:print(" Welcome to "..obj:name(), 2, 0, 0, 0, 0)
end
(Just cut and paste the script code into a text file with a ".celx" file type. Then double-click on the file to launch Celestia and it will run the script.)
It's especially nice with FT galaxies in the background.
- Hank