Projecting in Perspective Viewport / Projecting to a point

My RhinoScript one is linked from

-Pascal