lisp\script for ampoweredit > scale > midpoint

[alokmpatel]

Dear All

 

i am able to generate model space according to my need.

but i get stucked in viewport management.

i have 7-8 viewports in one layout with specific layer name.

 

i want to do following process.

1) ampoweredit

2) select any one viewport

3) give scale (see attachment of dialog box)

4) select midpoint (see attachment of dialog box)

5) give cordinate of mid point

6) select ok.

 

i am using script for above process.

 

but it is not working from point 3 (after dialog box open).

is there any lisp\script that can do above process.

 

it will help me a lot.

Thanks in advance.