Compass Signpost

Run the code to find the distance from where you are to Paris. Try other cities:
1.
GeoDistanceHere,
In[]:=
Find the direction from where you are to Paris. Try other cities:
2.
GeoDirectionHere,
In[]:=
Get the xy coordinates of Paris relative to where you are:
Hint: type deg to get the degree symbol (°).
3.
QuantityMagnitudeCoordinateTransform"Polar""Cartesian",GeoDistanceHere,,90°GeoDirectionHere,
In[]:=
Draw lines from where you are to the locations of various other cities. Try other cities:
4.
GraphicsLine[{{0,0},QuantityMagnitude[CoordinateTransform["Polar""Cartesian",{GeoDistance[Here,#],90°GeoDirection[Here,#]}]]}]&/@,,,,
In[]:=
Label the cities with their names:
5.
GraphicsWith[{pt=QuantityMagnitude[CoordinateTransform["Polar""Cartesian",{GeoDistance[Here,#],90°GeoDirection[Here,#]}]]},{Line[{{0,0},pt}],Text[#,pt]}]&/@,,,,
In[]:=
Add the distances. Try other cities:
6.