CelestiaContent/scripts/marktype.celx
2003-05-05 06:57:02 +00:00

19 lines
473 B
Plaintext

function mark_spectraltype(x)
local obs = celestia:getobserver()
local nstars = celestia:getstarcount()
local i = 0
while i < nstars do
star = celestia:getstar(i)
first, last = string.find(star:spectraltype(), x, 1, true)
if first == 1 then
star:mark("#ff99ff", "triangle", 10)
end
i = i + 1
end
end
spectral = "O"
celestia:flash("Marking all " .. spectral .. " stars.")
mark_spectraltype(spectral)