Use procedure while another interactive command is active?

Hello,

I wrote the following skill procedure and bound it to the spacebar:

zoomin=1
scale=20.0
procedure( ZoomToPoint()
    let((winId coords)
    winId=hiGetCurrentWindow()
    coords=hiGetPoint(winId)
        if((zoomin==1)
            then hiZoomWindowAtPoint(winId scale coords)
                (hiPan winId coords)
                 zoomin=0
                ;printf("\nZoomin\n" )
            
            else
                hiZoomRelativeScale(hiGetCurrentWindow() 1/scale)
                zoomin=1
                ;printf("\nZoomout\n")
            )
    );let

    )

So when pressing space it zooms to the cursor and when pressing it again it zooms out.

What I want to do with it is to be able to place objects quickly and more precisely. So for example I want to select an object and start the movecommand, than zoom to the point where I want to place it, so I can place it precisely and than zoom out again using spacebar.

The problem is that my function does not work, when I am in the middle of an interactive command.

Thanks

David

Using Cadence 5.141