How do you zoom and pan function behave changeing so that it behaves like in rhino3d?

Hold down CTRL and drag with the right mouse button = zoom (like the mouse wheel)
Hold SHIFT and drag while holding the right maustast = PAN

I want this necessarily converge - with great effort - script or deeper engagement
someone here has an idea?
this is even possible?