Old code not working in AutoCAD 2022

[cadconcepts]

Hi All
I have a great deal of code that I use to speed up my drawing process that I have used for years without a problem until 2022. The latest software update resolved a few of problems I was experiencing but not all of them. I am not quite sure what about the following code keeps hanging up. It works fine in all versions up 2021. You can substitute "wdstud" with any block you wish to test the routine with. Thank you for any help you can provide.
Manuel A. Ayala

(if (setq pt1 (getpoint "\nInsert point: "))   
  (progn
    (command "_.insert" "wdstud" pt1 "" "" "")
    (setq ent1 (entlast))
    (princ "\nRotate: ")
    (command "_.rotate" ent1 "" pt1 pause)
    (command "_.copy" ent1 "" "m" pt1)
    (setq pt2 pt1)
    (while (and pt2 (/= pt2 "done"))
      (setq pt2 (getpoint pt1 "\nSecond point of displacement <done>: "))
      (cond 
        ((null pt2)(setq pt2 "done")(command))
         ((LISTP pt2) (command pt2))
       )
     )
  )
)

[Tom Beauford]

What command is it hanging on? Insert, rotate, or copy?
You should also add code to test to see if the block is defined in the drawing

(tblsearch "block" "wdstud")

before trying to insert it.

[GreyHippo]

You should try and see which line of code it is throwing an error.

[cadconcepts]

Hi Tom
In my full routine, I do check to see if the block exists with a tblsearch. Thanks.
Manuel

- - - Updated - - -

It seems to hang up on the copy command. Having said that, if I run the code line by line at the command prompt it works. It works in every previous version AutoCAD except 2022. I am puzzled as to what is the problem.
Manuel

[cadconcepts]

After much testing I think the problem is a bug in the copy command. Apparently, AutoCAD doesn't regren between picks so you don't see the objects you have placed. It also doesn't show your crosshairs moving so you are led to believe that it is not working. When you cancel the command it forces a regen which then displays the blocks you have placed. I have a similar problem happen with a revision cloud routine where the application doesn't regen between picks so you don't see the cloud until you cancel the routine. It appears that the latter problem has been reported to AutoDesk but I am not sure aboutt the copy command issue. Unless someone knows how to issue a regen between point selections, I will have to wait until the problem is addressed, hopefully, in the next software update. Thanks.
Manuel

[Tom Beauford]

Hi Tom
In my full routine, I do check to see if the block exists with a tblsearch. Thanks.
Manuel

- - - Updated - - -

It seems to hang up on the copy command. Having said that, if I run the code line by line at the command prompt it works. It works in every previous version AutoCAD except 2022. I am puzzled as to what is the problem.
Manuel

Posting the full routine would make it easier to fix.
Try using entupd (AutoLISP) https://help.autodesk.com/view/ACD/2...A-288DD347A783
Updates the screen image of an object (entity)
At a glance adding

(entupd (entlast))

after

(command pt2)

should do the trick.

[Tom Beauford]

Looking again at what you're doing why not just use the MOCORO (Express Tool) https://help.autodesk.com/view/ACD/2...B-71C7D19409F5
Moves, copies, rotates, and scales selected objects with a single command.
Built in command that does the same thing but looks slicker with help available by hitting F1 like any other AutoCAD command.