Can anyone create a LISP for TX command in YQArch?

[jacob_donaldson4M2NV]

I have AutoCAD LT so I cannot use the plugin YQArch.  However, it has one command (TX) that would be very helpful to be able to replicate.  I don't have much experience with writing LISP so I'm not sure if it's even possible but I thought I'd ask the community.

My main goal is to quickly clean up drawings where walls are drawn with two lines (each face).  Where they intersect/join, I'd like to be able to trim all of the lines so that only the faces of the walls have lines.  I've been doing this manually by trimming but on larger projects this takes a considerable amount of time to complete.

Thank you!!

[pendean]

@jacob_donaldson4M2NV TX command works like this

https://www.youtube.com/watch?v=A1G5rNg9Kfw&t=1s

https://www.youtube.com/watch?v=swwDirFKB9o 

Your posted images are just a MIRROR command fix?

LISP to replicate TX like this perhaps (not tested in LT)

https://forums.autodesk.com/t5/autocad-forum/one-click-to-trim-this-trim-off-intersecting-lines-with... 

[jacob_donaldson4M2NV · Accepted solution]

Thank you for your reply @pendean, this is what I was hoping for! The LISP seems to work very well for fully intersecting conditions. However, it doesn't work for the case shown in the pictures (sorry about the mirroring, these are from different areas of my project). Where the interior walls connect to the exterior walls, they aren't fully intersecting but I still want to trim the portion of the exterior wall that overlaps. 

[Sea-Haven · Accepted solution]

Using CAB's Breakall.lsp may be helpful it will break intersections into small lines. You can then find those lines that are say a length and erase them, have used this very successfully.

[jacob_donaldson4M2NV]

Thank you, @Sea-Haven -- this is an excellent tool and works very well for this application!!