Incompatible with Autocad 2020

[neam]

Hi everyone

I have a lisp that reads three text files and writes its contents to the Alignment.
But this Lisp does not work in AutoCAD 2020.
Thank you for helping me find the cause.

Enter initial length : 0

Block to use < >: 000

Enter Height Text : 0.5

[ВeekeeCZ]

Seems perfectly fine in 2022. 

BTW how about to CLOSE all the files? If you open files, you need to close them too! (open pat3 "r")

[calderg1000]

Regards @neam 

I tried the routine in the 2020 version and it works fine. If you're working on a new file, you should just copy the block for it to recognize.

[Sea-Haven]

(setq blk (getstring (strcat "\nBlock to use < >: ")))

Use (tblsearch "BLOCK" blk) this will return T if exists if nil then use Insert directory+blk 0,0 1 1 0 then explode and erase, then it exists in your dwg. You can also use Lee-mac steal to get block from say a template dwg. 

[neam]

Thanks everybody.
So the problem is not Lisp.
There seems to be a problem with my system.