Creating Declination and Right ascendance for my earth model

Questions
,
1

Hi everybody, I need help to create a Celestial sphere around my earth model. Or least to make that mathematica would understand the longitude and altitude and mark the object on my earth.
I have created my earth model using RevolutionPlot3D by using wikicode earth package:

First@RevolutionPlot3D[{Sin@t, Cos@t}, {t, 0, Pi}, 
  PlotStyle -> {Texture@
     Import["earthpicture"]}, 
  TextureCoordinateFunction -> ({#5, 1 - #4} &), Mesh -> None, 
  PlotPoints -> 50]

Suggestions, hints and codes are welcome.
Thank you very much.

2

Conversion between celestial and horizontal coordinates is discussed in