Leaderboard

Their IT department even has a slogan (and I'm not kidding here) : You name it , we block it

The reason I clean the drawing is I once wrote a program to generate instrument loop diagrams from an excel file. I found the most stable and easy way was not to use a script but stay in the current drawing and from there save(as) each loop. I also made use from templates and also had the option to update the drawing in stead of generating the entire drawing. But at some time some templates had been given an update to a block definition and to be certain the latest version was used I had to make sure the old block was purged. Overkill , some times yes , but in my case it worked as it should. In this case , dxfin , probably overkill , but it doesn't hurt either. I tested it on Bricad 22 and the dwg extension was no problem, it worked as it should. The recommendation from the annoying paperclip oh , sorry , AI its called these days , to pimp the filename and use vla-saveas is not wrong though. Just didn't need it on my computer. Had it gave me an error I would have fixed it but it worked right from the start for me.

I'll this topic a "wrap" Thanks to all here! rlx: I also have worked at my last company of fifteen years within a very locked down IT environment. Here and now, I am free! One caveat here is that there are limitations in acquiring additional Microsoft tools i.e., Power Platform tools, etc. due to the complexity introduced from being a client of an widely known commercial web hosting service. Happy, happy, happy! Clint

Use this and simply switch: *dist* (- *dist*) To: (- *dist*) *dist*

@Danielm103 ""with mtext, you have to use a fixed width font" I agree, Monotxt.sHx I think was what I used. monotxt_.ttf EXTRA FONTS A-Z.txt Banner heading3.lsp

Just use: (command "_.OFFSET" dist ent "_non" offsetpt "") And you no longer need to worry about OSMODE.

You would still need Visual Studio or similar and packages installed. Even for Visual Studio Code and LISP, I get PowerShell errors due to IT blocking it as well as the need to download the extension. Main issue is just lazy IT departments not wanting to due proper security, every issue I have had a work shows "improper server configuration" and/or "improper firewall configuration" when searching the issue. Anyone using Autodesk products (maybe other programs as well) has to manually override the proxy server on each restart of their computer or we have licensing issues. I had to to do all of the leg work on getting that issue resolved. Unfortunately that's just how many IT "professionals" are trained, "when in doubt, block it out". I normally don't have issues getting programs installed, just usually they are in no hurry to get it done. Autodesk is partly to blame, should be a better way to get apps, add-ons, etc. than needing an IT install. Even Microsoft, why do I need to update Windows and MS Office tools separately and need IT to allow use of PowerShell? To be honest though, I am just the AutoCAD guy, so they don't understand how programming with other tools is relevant.

This version should work in all cases, regardless of the complexity of the polygons ;******************* p o r d e s i a r g o ******************** ;************************ G L A V C V S ************************* ;************************** F E C I T *************************** (defun c:RectOffBatch (/ selset dist i ent pts offsetpt a70 es l le p1 p2 o sDir) (defun sDir (le i? / p1 p2 p ar ang ab dir tl) (foreach l le (if (and (= (car l) 10) (setq p (cdr l))) (progn (if p2 (if p1 (setq dir (cond ((< (abs (setq ang (- (setq ar (angle p1 p2)) (setq ab (angle p2 p))))) PI) ang) (T (if (<= ar PI) (+ ar (- (* 2 PI) ab)) (- (- ar (* 2 PI)) ab))) ) ) ) ) (if dir (setq tl (+ (if tl tl 0) dir))) (setq p1 p2 p2 p dir nil) ) ) ) (if (minusp tl) (if i? + -) (if i? - +)) ) (prompt "\nSelect rectangles (polylines): ") (setq selset (ssget '((0 . "*POLYLINE")))) (vl-cmdf "_.CONVERTPOLY" "_Light" selset "") (if selset (if (setq i -1 dist (getdist "\nEnter the offset distance: ")) (repeat (sslength selset) (setq ent (ssname selset (setq i (1+ i)))) (setq o (sDir (setq le (entget ent)) nil)); <-- CHANGE 'nil' TO 'T' FOR OFFSET INWARD TOWARD INTERIOR OF THE POLYGONS (if (= (rem (cdr (setq a70 (assoc 70 le))) 2) 0) (entmod (subst (cons 70 (+ (cdr a70) 1)) a70 le))) (setq pr (vlax-curve-getPointAtParam ent 0.5)) (setq offsetpt (polar pr (o (angle (vlax-curve-getPointAtParam ent 0) pr) (/ PI 2.)) 0.1)) (command "_.OFFSET" dist ent offsetpt "") ) ) ) (princ) )

I tested the code on your drawing and it works correctly. Perhaps you didn't use it correctly. Nikon1.mp4

Yikes! Working with your arms tied.. No way I could work effectively without my tools, I would at least need autohotkey. Last company I worked for, I automated their whole system, mostly because I was lazy and I wanted to eat donuts all day. AutoCAD ships with .NET, nothing to install, I would be rolling some goodies for sure. “We At ACME corporation stifle innovation by making everyone think inside the box”

For most things I do this is my default option, rarely need to do much other than that and if I do, drag and drop.

There's an app for that: https://apps.autodesk.com/ACD/en/Detail/Index?id=3434696327413675915&appLang=en&os=Win32_64

new to Bricad but this seems to work : (defun c:DxfToDwg ( / actDoc dxf-folder dxf-list ) (setq actDoc (vla-get-activedocument (vlax-get-acad-object))) (vl-load-com) (cond ((not (setq dxf-folder (_getfolder "Select folder with dxf files"))) (princ "\nNo folder selected")) ((not (vl-consp (setq dxf-list (_getfiles dxf-folder "*.dxf")))) (princ (strcat "\nNo dxf files in folder " dxf-folder))) (t (command ".undo" "mark")(setvar "expert" 2) (foreach dxf dxf-list (command ".erase" "all" "") (vla-purgeall actDoc) (vl-cmdf "_.dxfin" dxf) (vla-ZoomExtents (vlax-get-acad-object)) (command ".save" (strcat (vl-filename-directory dxf) "\\" (vl-filename-base dxf))) ) (command ".undo" "back") ) ) (princ) ) ; generic getfolder routine with possibility to create a new subfolder (_getfolder "select path") (defun _getfolder ( m / f s) (if (and (setq s (vlax-create-object "Shell.Application")) (setq f (vlax-invoke s 'browseforfolder 0 m 65536 "")))(setq f (vlax-get-property (vlax-get-property f 'self) 'path)) (setq f nil))(vl-catch-all-apply 'vlax-release-object (list s)) (if f (vl-string-translate "\\" "/" f))) (defun void (x) (or (eq x nil) (and (listp x)(not (vl-consp x))) (and (eq 'STR (type x)) (eq "" (vl-string-trim " \t\r\n" x))))) (defun _getfiles ( fol ext / lst) (cond ((or (void fol) (not (vl-file-directory-p fol))) (princ (strcat "\nInvalid folder :" (vl-princ-to-string fol)))) (t (if (vl-consp (setq lst (vl-directory-files fol ext 1))) (setq lst (mapcar '(lambda (x)(strcat fol "/" x)) lst)))) ) lst )

Most of the members here have real jobs as well and provide help as their own busy schedules allow. I do not believe anyone was being rude, just nudging you along to do a little work for yourself.

I have done something like this a couple of years ago :

with mtext, you have to use a fixed width font import traceback from pyrx import Ap, Db, Ed import art @Ap.Command() def doit(): try: db = Db.curDb() mt = Db.MText() mt.setDatabaseDefaults() val = art.text2art("Sup Dude!", font="big", sep ="\\P") mt.setContents("{\\Fmonotxt8|c0;" + val + "}") db.addToModelspace(mt) except Exception as err: traceback.print_exception(err)

I have to agree with Bigal about to (new)bee or not to (new)bee but to give you an idea ; (setq val (getentitytransparency (car (entsel)))) (defun getentitytransparency ( ent ) (cond ((= 'vla-object (type ent))(vla-get-entitytransparency ent)) ((= 'ename (type ent))(getentitytransparency (vlax-ename->vla-object ent))))) ; (< lower-limit test-number upper-limit) ; (putentitytransparency (car (entsel)) "ByBlock") (putentitytransparency (car (entsel)) 100) (defun putentitytransparency (e v / i o) (cond ((null v)(setq v "ByLayer"))((and (numberp v)(< 0 v 90))(setq v (itoa (fix v)))) ((and (= (type v) 'STR) (distof v) (>= 0 (setq i (fix (distof v))) 90))(setq v (itoa i))) ((and (= (type v) 'STR) (member (strcase v t)'("bylayer" "byblock"))) v)(t (setq v "0"))) (if (setq o (e->o e))(vla-put-entitytransparency o v)))

A simple script made with notepad. Open dwg1.dxf qsave dwg1 close Open dwg2.dxf qsave dwg2 close Open dwg3.dxf qsave dwg3 close Open dwg3.dxf qsave dwg3 close The dwg1 would be like "C:\\mydxfiles\\project123\\dwg1" There are various ways to make a list of dwg names, how many are we talking about ?

This was my 'Offset Inside' program: ;; Offset Inside - Lee Mac - www.lee-mac.com ;; Offsets a set of objects by a specified distance to the inside. (defun c:OffInside ( / acsel pos ) (if (and (setq *dist* (cond ( (getdist (strcat "\nOffset Distance" (if *dist* (strcat " <" (rtos *dist*) ">: ") ": ") ) ) ) ( *dist* ) ) ) (ssget '( (-4 . "<OR") (0 . "CIRCLE,ARC,ELLIPSE") (-4 . "<AND") (0 . "LWPOLYLINE,SPLINE") (-4 . "&=") (70 . 1) (-4 . "AND>") (-4 . "<AND") (0 . "POLYLINE") (-4 . "&=") (70 . 1) (-4 . "<NOT") (-4 . "&") (70 . 120) (-4 . "NOT>") (-4 . "AND>") (-4 . "OR>") ) ) ) (progn (vlax-for obj (setq acsel (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object)) ) ) (vl-catch-all-apply 'vla-offset (list obj (if (and (setq pos (vl-position (vla-get-objectname obj) '("AcDbPolyline" "AcDb2dPolyline"))) (LM:ListClockwise-p (LM:GroupByNum (vlax-get obj 'coordinates) (+ pos 2))) ) *dist* (- *dist*) ) ) ) ) (vla-delete acsel) ) ) (princ) ) ;; List Clockwise-p - Lee Mac ;; Returns T if the point list is clockwise oriented (defun LM:ListClockwise-p ( lst ) (minusp (apply '+ (mapcar (function (lambda ( a b ) (- (* (car b) (cadr a)) (* (car a) (cadr b))) ) ) lst (cons (last lst) lst) ) ) ) ) ;; Group by Number - Lee Mac ;; Groups a list into a list of lists, each of length 'n' (defun LM:GroupByNum ( l n / r) (if l (cons (reverse (repeat n (setq r (cons (car l) r) l (cdr l)) r)) (LM:GroupByNum l n) ) ) ) (vl-load-com) (princ)

You are correct, need the .NET SDK, and Extensions to build modules with Visual Studio Code. It’s been a while since I’ve done .NET, I think version 4 had the compiler, you could build with notepad and the command line ugh BTW, I’ve had companies reach out to me to support zero-install Python packages for AutoCAD. They wanted to validate the modules, and block PIP. Basically it’s: 1, Grab Python embedded package from the Python site, it’s a minimal, portable zipped interpreter for Windows. 2, add the most commonly used packages, pyrx, pyopenxl, pypdf, genre specific tools, like shapely, or gdal 3, deploy it as a .bundle. I've been meaning to write something about this, lazy i guess lol

Add this code below '(command " rectangle"... ', load it, and try running the code again (if (not (tblsearch "block" roomName)) (command "_block" roomName (setq pt (list (min (car fc) (car fc)) (min (cadr fc) (cadr fc)))) (setq cj (ssadd (entlast))) "") (princ (strcat "\n" roomName " already exist...")) ) (command "_.insert" roomName pt "" "" "")

That's definitely the best option. Thank you, @Lee Mac

I forgot to mention that: I haven't done anything with 'osmode' because I think it's convenient to manage it from the F3 key at runtime: you can activate or deactivate it during command execution by pressing F3.

If you want to change the offset direction, you just need to change the 'i?' parameter used to call 'sDir' from 'nil' to 'T' (as indicated in the code comment). Nikon2.mp4 PS: The video shows the execution of the code with 'i?' set to 'T'.

So that it only offsets outwards, for example, like this (defun c:RectOffBatch (/ selset dist i ent pts offsetpt a70 es l le p1 p2 a midP) (prompt "\nSelect rectangles (polylines): ") (setq selset (ssget '((0 . "*POLYLINE")))) (vl-cmdf "_.CONVERTPOLY" "_Light" selset "") (if selset (progn (setq dist (getdist "\nEnter the offset distance: ") i 0) (repeat (sslength selset) (setq ent (ssname selset i)) (setq pts (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (setq le (entget ent))))) (if (= (rem (cdr (setq a70 (assoc 70 le))) 2) 0) (entmod (subst (cons 70 (+ (cdr a70) 1)) a70 le))) (setq midP (mapcar '(lambda(v) (/ v (length pts))) (apply 'mapcar (cons '+ pts)))) (setq offsetpt (polar (car pts) (angle midP (car pts)) 0.01)) (command "_.OFFSET" dist ent offsetpt "") (setq i (1+ i)) ) ) ) (princ) )

As I said I did some testing about method, just get your closed plines, then check there CW or CCW direction and change if needed. Then use (getvar 'extmax) as offset point.In code below I use pedit "R" as the Reverse command is not available in Bricscad. CCW is offset out for a positive value using VLA-Offset. ; Checking if pline is CW or CCW and set to CCW ; Orignal idea by Kent Cooper, 1 August 2018 Offsetinorout.lsp ; By Alan H July 2020 (defun AH:chkcwccw (ent / objnew area1 area2 obj minpoint maxpoint) (setq obj (vlax-ename->vla-object ent)) (vla-GetBoundingBox obj 'minpoint 'maxpoint) (setq pointmin (vlax-safearray->list minpoint)) (setq pointmax (vlax-safearray->list maxpoint)) (setq dist (/ (distance pointmin pointmax) 20.0)) (vla-offset obj dist) (setq objnew (vlax-ename->vla-object (entlast))) (setq area1 (vlax-get objnew 'Area)) (vla-delete objnew) (vla-offset obj (- dist)) (setq objnew (vlax-ename->vla-object (entlast))) (setq area2 (vlax-get objnew 'Area)) (vla-delete objnew) (if (> area1 area2) (command "Pedit" ent "R" "") ) (princ) )

(70 . 1) or (70 . 128) will filter a selection set for closed polyline - (70 . 1) is usually enough

PS: 2D polylines do not support offset, so they need to be converted first. I haven't tested it extensively, but it should work for what you need.

If the polygons aren't too irregular, using your own code, maybe this... (defun c:RectOffBatch (/ selset dist i ent pts maxpt offsetpt a70 es l le p1 p2 a) (prompt "\nSelect rectangles (polylines): ") (setq selset (ssget '((0 . "*POLYLINE")))) (vl-cmdf "_.CONVERTPOLY" "_Light" selset "") (if selset (progn (setq dist (getreal "\nEnter the offset distance or ENTER to indicate on screen: ")) (setq p1 (getpoint "\nPick on/near one of the rectangles to be offset...")) (if (and (setq es (car (nentselp p1))) (= (wcmatch (cdr (assoc 0 (entget es))) "LWP*"))) (progn (setq p2 (getpoint p1 "\nPoint to get direction (or distance) to offset: ")) (if (not dist) (setq dist (distance p1 p2))) (setq l (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget es)))) (setq midP (mapcar '(lambda(v) (/ v (length l))) (apply 'mapcar (cons '+ l)))) (setq a (if (> (distance p1 midP) (distance p2 midP)) 0 PI) i 0 ) (repeat (sslength selset) (setq ent (ssname selset i)) (setq pts (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (setq le (entget ent))))) (if (= (rem (cdr (setq a70 (assoc 70 le))) 2) 0) (entmod (subst (cons 70 (+ (cdr a70) 1)) a70 le))) (setq maxpt (list (apply 'max (mapcar 'car pts)) (apply 'max (mapcar 'cadr pts)))) (setq midP (mapcar '(lambda(v) (/ v (length pts))) (apply 'mapcar (cons '+ pts)))) (setq offsetpt (polar (car pts) (+ a (angle (car pts) midP)) 0.01)) (command "_.OFFSET" dist ent offsetpt "") (setq i (1+ i)) ) ) ) ) ) (princ) )

What they're talking about, I believe, is a matter of fairness. You ask for help but provide none in return. Most of us have other commitments, but we make time to teach and to help others. Not only that, learning a bit about AutoLISP will make your work easier and faster.

Even if I wanted to use a different language I wouldn't be able because at my work I'm unable to install any software that's not supplied in our software center , also certain extensions like *.bat are a big freaking no no so my dragon claws are tied in that respect. But I can get vl-some satisfaction however whenever I can create something that at first glance seems impossible to do and then come up with something that actually works.

What programming language to use ? There are so many, Lisp, Pascal, VBA, C##, now .NET, Python and of course the push product by Autodesk Dynamo but only on certain platforms. Yeah the macro record almost useless. As I have said before years ago macro record in a CAD program wrote VBA code. There is lisp2C from years ago that converted lisp code to C## code, hey Daniel what about convert lisp to Python ? The main advantage in lisp is the non compile, just run, I use code that is 30+ years old still works. Any compiled code every few years has to be recompiled to work as versions change. Dont forget how many years ago now Autodesk said VBA support would be removed, it's still there.

It’s more of, ‘pick the right tool for the right job’. In this case, ObjectARX, and by extension, Python, can provide a clean new drawing to import your DXFs into every time, whereas lisp may not. I don’t remember what all is stored in DXF, i.e. if there are things that are non-purgeable. An example is an existing text, dimension, or table style, that are named “Standard”. Nested references, Associated Styles (the text style for a dimension style). There may be user variables stored per drawing CLAYER, LTSCALE: So, using lisp DXFIN -> purge -> save on repeat may have subtle side effects. This may or may not be an issue for you

.... so it isn't importing the DXF file? Still holidays till Monday so CAD is still off but what happens if you do the 'dxfin' line manually: (command "DXFIN" (strcat "-FolderName"- "\\" "-fileName-" ) "Default" "" "")

Lee's code allows the user to automatically generate polylines in modelspace representing the outline of a selected paperspace viewport, all viewports in the active paperspace layout, or all viewports found in all paperspace layouts. As long as the current layer is displayed in the Key Plan Viewport model space all those rectangles should display already. troggarf's code puts a copy of selected objects in paperspace.

Even i have a real job. I just ask you to respect me and if it bothers you, don't respond. I don't want any controversy. Anyway, Happy New Year to everyone.

Greetings to all members of Cad Tutor, Based on the upcoming holidays and New Year, I'v made something interesting which I want it to share with you. Everything was made using a Lisp. I hope it will interesting to all of you and maybe give some inspiration to the next year to made something different and share it with rest of us . Notice (it is on cyrillic, in Serbian language): - ЗИМСКА СЛУЖБА = Winter service on roads; - СРЕЋНА НОВА ГОДИНА = HAPPY NEW YEAR; - XO-XO-XOO = HO-HO-HOO (). Happy New Year 2026 to all members, and wish you all the best and new codes . NovaGodina2026_CadTutor.mp4 Best regards, Saxlle.

here's your big text import traceback from pyrx import Ap, Db, Ed ascii = {'A': ['▄████▄ ', '██ ██ ', '██████ ', '██ ██ ', '██ ██ '], 'B': ['█████ ', '██ ██ ', '█████ ', '██ ██ ', '█████ '], 'C': ['▄█████ ', '██ ', '██ ', '██ ', '▀█████ '], 'D': ['█████ ', '██ ██ ', '██ ██ ', '██ ██ ', '█████ '], 'E': ['▄█████ ', '██ ', '█████ ', '██ ', '▀█████ '], 'F': ['██████ ', '██ ', '████ ', '██ ', '██ '], 'G': ['▄█████ ', '██ ', '██ ███ ', '██ ██ ', '▀████▀ '], 'H': ['██ ██ ', '██ ██ ', '██████ ', '██ ██ ', '██ ██ '], 'I': ['██ ', '██ ', '██ ', '██ ', '██ '], 'J': [' ██ ', ' ██ ', ' ██ ', '██ ██ ', '██████ '], 'K': ['██ ██ ', '██ ██ ', '█████ ', '██ ██ ', '██ ██ '], 'L': ['██ ', '██ ', '██ ', '██ ', '█████ '], 'M': ['▄██████▄ ', '██ ██ ██ ', '██ ██ ██ ', '██ ██ ', '██ ██ '], 'N': ['██ ██ ', '███ ██ ', '██████ ', '██ ███ ', '██ ██ '], 'O': ['▄████▄ ', '██ ██ ', '██ ██ ', '██ ██ ', '▀████▀ '], 'P': ['█████ ', '██ ██ ', '█████ ', '██ ', '██ '], 'Q': [' ████ ', '██ ██ ', '██▀▄██ ', '██ ██ ', ' ███ █ '], 'R': ['█████ ', '██ ██ ', '█████ ', '██ ██ ', '██ ██ '], 'S': ['▄████ ', '██ ', '▀███▄ ', ' ██ ', '████▀ '], 'T': ['██████ ', ' ██ ', ' ██ ', ' ██ ', ' ██ '], 'U': ['██ ██ ', '██ ██ ', '██ ██ ', '██ ██ ', ' ████ '], 'V': ['██ ██ ', '██ ██ ', '██ ██ ', ' ██ ██ ', ' ███ '], 'W': ['██ █ ██ ', '██ █ ██ ', '██ █ ██ ', '▀█████▀ ', ' █ █ '], 'X': ['██ ██ ', '██ ██ ', ' ██ ', '██ ██ ', '██ ██ '], 'Y': ['██ ██ ', '██ ██ ', ' ████ ', ' ██ ', ' ██ '], 'Z': ['██████ ', ' ██ ', ' ██ ', '██ ', '██████ '], '0': [' ████ ', '██ ██ ', '██▀▄██ ', '██ ██ ', ' ████ '], '1': [' ██ ', '▄███ ', ' ██ ', ' ██ ', ' ██ '], '2': [' ████ ', '█ ██ ', ' ██ ', '██ ', '██████ '], '3': ['█████ ', ' ██ ', '█████ ', ' ██ ', '█████ '], '4': ['██ ██ ', '██ ██ ', '██████ ', ' ██ ', ' ██ '], '5': ['█████ ', '██ ', '████ ', ' ██ ', '████ '], '6': [' █████ ', '██ ', '█████ ', '██ ██ ', ' ████ '], '7': ['██████ ', ' ██ ', ' ██ ', ' ██ ', '██ '], '8': [' ████ ', '██ ██ ', ' ████ ', '██ ██ ', ' ████ '], '9': [' ████ ', '██ ██ ', ' █████ ', ' ██ ', ' ███ '], ':': [' ', '██ ', ' ', '██ ', ' '], '&': [' ███ ', '██ ██ ', ' █████ ██ ', '██ ███ ', ' █████ ██ '], ' ': [' ',' ',' ',' ',' '] } def _Big_text(text: str): lines = [""] * 5 text = text.upper() for char in text: pattern = ascii.get(char, [" ??? " ] * 5) for i in range(5): lines[i] += pattern[i] for line in lines: print(line) @Ap.Command() def doit1(): try: _Big_text("Sup coders") except Exception as err: traceback.print_exception(err)

There's also art https://pypi.org/project/art/ might take some work to get it in am mtext import traceback from pyrx import Ap, Db, Ed import art @Ap.Command() def doit1(): try: art.tprint("Sup coders") except Exception as err: traceback.print_exception(err)

Made a custom interface for logging measurements of parts so no cad. need to output errors or other prompts to the screen that can be seen from about 5 feet. wouldn't mind taking a look at the lisp also guessing its mtext?

@mhupp do you want a lisp version of that ? It works same way uses "*". I think it was 1990.s used it as header in lisp programs.

@Danielm103 I have Gotten into Python haven't used it for CAD yet. This will output to the terminal when you really need to see something. ascii = {'A': ['▄████▄ ', '██ ██ ', '██████ ', '██ ██ ', '██ ██ '], 'B': ['█████ ', '██ ██ ', '█████ ', '██ ██ ', '█████ '], 'C': ['▄█████ ', '██ ', '██ ', '██ ', '▀█████ '], 'D': ['█████ ', '██ ██ ', '██ ██ ', '██ ██ ', '█████ '], 'E': ['▄█████ ', '██ ', '█████ ', '██ ', '▀█████ '], 'F': ['██████ ', '██ ', '████ ', '██ ', '██ '], 'G': ['▄█████ ', '██ ', '██ ███ ', '██ ██ ', '▀████▀ '], 'H': ['██ ██ ', '██ ██ ', '██████ ', '██ ██ ', '██ ██ '], 'I': ['██ ', '██ ', '██ ', '██ ', '██ '], 'J': [' ██ ', ' ██ ', ' ██ ', '██ ██ ', '██████ '], 'K': ['██ ██ ', '██ ██ ', '█████ ', '██ ██ ', '██ ██ '], 'L': ['██ ', '██ ', '██ ', '██ ', '█████ '], 'M': ['▄██████▄ ', '██ ██ ██ ', '██ ██ ██ ', '██ ██ ', '██ ██ '], 'N': ['██ ██ ', '███ ██ ', '██████ ', '██ ███ ', '██ ██ '], 'O': ['▄████▄ ', '██ ██ ', '██ ██ ', '██ ██ ', '▀████▀ '], 'P': ['█████ ', '██ ██ ', '█████ ', '██ ', '██ '], 'Q': [' ████ ', '██ ██ ', '██▀▄██ ', '██ ██ ', ' ███ █ '], 'R': ['█████ ', '██ ██ ', '█████ ', '██ ██ ', '██ ██ '], 'S': ['▄████ ', '██ ', '▀███▄ ', ' ██ ', '████▀ '], 'T': ['██████ ', ' ██ ', ' ██ ', ' ██ ', ' ██ '], 'U': ['██ ██ ', '██ ██ ', '██ ██ ', '██ ██ ', ' ████ '], 'V': ['██ ██ ', '██ ██ ', '██ ██ ', ' ██ ██ ', ' ███ '], 'W': ['██ █ ██ ', '██ █ ██ ', '██ █ ██ ', '▀█████▀ ', ' █ █ '], 'X': ['██ ██ ', '██ ██ ', ' ██ ', '██ ██ ', '██ ██ '], 'Y': ['██ ██ ', '██ ██ ', ' ████ ', ' ██ ', ' ██ '], 'Z': ['██████ ', ' ██ ', ' ██ ', '██ ', '██████ '], '0': [' ████ ', '██ ██ ', '██▀▄██ ', '██ ██ ', ' ████ '], '1': [' ██ ', '▄███ ', ' ██ ', ' ██ ', ' ██ '], '2': [' ████ ', '█ ██ ', ' ██ ', '██ ', '██████ '], '3': ['█████ ', ' ██ ', '█████ ', ' ██ ', '█████ '], '4': ['██ ██ ', '██ ██ ', '██████ ', ' ██ ', ' ██ '], '5': ['█████ ', '██ ', '████ ', ' ██ ', '████ '], '6': [' █████ ', '██ ', '█████ ', '██ ██ ', ' ████ '], '7': ['██████ ', ' ██ ', ' ██ ', ' ██ ', '██ '], '8': [' ████ ', '██ ██ ', ' ████ ', '██ ██ ', ' ████ '], '9': [' ████ ', '██ ██ ', ' █████ ', ' ██ ', ' ███ '], ':': [' ', '██ ', ' ', '██ ', ' '], '&': [' ███ ', '██ ██ ', ' █████ ██ ', '██ ███ ', ' █████ ██ '], ' ': [' ',' ',' ',' ',' '] } def _Big_text(text: str): lines = [""] * 5 text = text.upper() for char in text: pattern = ascii.get(char, [" ??? " ] * 5) for i in range(5): lines[i] += pattern[i] for line in lines: print(line) inpt = input("Enter a string: ") _Big_text(inpt)

Back in the old days, it was SDS and vanilla lisp lol. There’s a blog here that mentions support for FAS/VLX https://www.intellicad.org/articles-and-press-releases/2025-recap-intellicad-14-developer-tools-and-ecosystem-momentum One of the contributors to the Python project made a super cool test suite, so I have some coverage with IcARX(ARC). I don’t have a unit test for lisp except for resbuf wrapper that I pass to the lisp engine, those pass. It will be interesting to see how they progress.

I post the 3d house image often and a version of that software was available for Intellicad back in the 90's, there was no VL lisp in those days. It was very good then and seen as a competitor to LT,

I was able to connect with ITC Directly and report the items I felt are important from an API perspective. AcRxClass::dxfName() is null with AcDbObject AcDbObject::close() has an access violation if called twice. I think the next release or so of IntelliCAD will be a real competitor in the space. Assuming pricing is stable, there’s no reason to buy any ‘lite’ version of CAD

But there’s stuff missing, from the automated tests in PyRx "collecting ... collected 529 items / 210 deselected / 3 skipped / 319 selected" There are 210 tests that I had to disable to get a clean run. I’m still working through them, I disabled the whole class on some tests all the test_Ax**** tests are not accurate, I've not worked through them yet Filename NextLine -------- -------- test_Ax3DFace.py class TestAx3dFace: test_Ax3DPolyline.py class TestAx3DPolyline: test_Ax3DSolid.py class TestAx3DSolid: test_AxAcadSortentsTable.py class TestAcadSortentsTable: test_AxAcadSortentsTable.py test_AxApplication.py class TestAxApplication: test_AxArc.py class TestAxArc: test_AxAttribute.py class TestAxAttribute: test_AxBlock.py class TestAxBlock: test_AxBlockReference.py class TestAxBlockReference: test_AxBlockReference.py class TestAxDynBlockReference: test_AxCircle.py class TestAxCircle: test_AxDatabase.py class TestAxDatabase: test_AxDocument.py class TestAxDocument: test_AxEllipse.py class TestAxEllipse: test_AxEntity.py class TestAxEntity: test_AxGroup.py fail test_AxLayout.py class TestAxLayout: test_AxLWPolyline.py def test_getcoordinate(self): test_AxLWPolyline.py test_AxMenu.py class TestAxMenu: test_AxModelSpace.py class TestAxModelSpace: test_AxObject.py class TestAxObject: test_AxPoint.py class TestAxPoint: test_AxPolygonMesh.py class TestAxPolygonMesh : test_AxPolyline.py class TestAxPolyline: test_AxPreferences.py class TestAxPreferences: test_AxPreferences.py class TestSelection: test_AxPreferences.py class TestDrafting: test_AxPreferences.py class TestDisplay: test_AxPreferences.py class TestPrefFiles: test_AxSummaryInfo.py class TestAxSummaryInfo: test_AxTable.py class TestAxTable: test_AxUtility.py class TestAxUtility: test_Brep.py class TestBrep: test_AssocPersSubentIdPE.py test_AttributeDefinition.py (mtext attributes) test_AttributeDefinition.py test_Database.py def test_dbopbject_dxfname(self, db_06457: Db.Database): test_Database.py def test_getSummaryInfo(self): test_Database.py def test_blocktable(self, db_06457: Db.Database): test_Database.py def test_GeoPositionMarker(self, db_geo: Db.Database): test_Database.py def test_GeoData(self, db_geo: Db.Database) -> None: test_Database.py def test_GeoData_transformFromLonLatAlt(self, db_geo: Db.Database) -> None: test_Database.py def test_tdusrtimer(self) -> None: test_DbObject.py def test_property_ids2(self): test_DbObject.py def test_undo_recording(self): test_DbObject.py def test_BinaryData(self): test_DbObject.py def test_BinaryXdData(self): test_entity.py def test_dbtext(self): test_entity.py def test_dbleader(self): test_entity.py def test_table_cells1(self, db_06457: Db.Database): //missing iterator test_entity.py def test_table_cells2(self, db_06457: Db.Database): //missing iterator test_entity.py def test_table_cellValues1(self, db_06457: Db.Database): //missing iterator test_entity.py def test_table_cellValues2(self, db_06457: Db.Database): //missing iterator test_entity.py def test_table_cellValues4(self, db_06457: Db.Database): //missing iterator test_entity.py def test_table_calcTextExtents(self): test_entity.py def test_create_wipout(self): test_entity.py def test_create_extruded_surface(self): test_SortentsTable.py def test_getinstance(self): test_XrefGraph.py def test_XrefGraph(self, db_xrefGraph: Db.Database): test_Editor.py def test_evaluateDiesel(self): test_Curve2d.py def test_ge2dcurve_length(self): test_Curve3d.py def test_Ge_lineseg3d_1(self): test_Curve3d.py def test_ge3dcurve_length(self): test_GsCore.py def test_gs_getBlockImage(self, db_dynblock: Db.Database): test_RxObject.py def test_name(self): test_SheetSet.py class TestSheetSet: test_wx.py def test_wx_CallAfter(self): test_block_reference.py def test_get_attribute(self, db_06457: Db.Database): test_prompt.py def test_select_entity_without_type(self): test_prompt.py def test_select_entity_with_single_type(self): test_prompt.py def test_select_entity_with_multiple_types(self): test_reload.py class Test_Reload: test_reload.py class Test_reload_func:

Thanks! I’m always rooting for the underdog, I guess to promote competition in the space. I’ve been goofing around with the clones since the early days. I think before version 9. Every year, I download the trial and try out the IARX SDK. The trial is 14 days, this is the first time I was able to get past day 1 and run some real tests. Here’s my little mini review of the API. - I was able to compile my custom object https://github.com/CEXT-Dan/ArxTin While I didn’t test all the protocols, the important ones work great! dwgOutFields, dwgInFields, subWorldDraw, subTransformBy etc. The most impressive thing besides it working, is the subWorldDraw performance. In this sample, I’m pushing 10s of thousands of edges to the graphics interface and transformby is as fast a moving a line. A $250 cad is out performing a $1200 cad by 10x

You need to search for convert Raster to Vector programs. You can use Raster Design on the image files, but still requires some work, it doesn't work on the PDFs though. If they refuse to properly create Vector PDFs or give you a .dwg, your only option is to do them in a separate Raster/Vector program, Raster Design or trace them in AutoCAD.

pp.mp4

My mail box thinks you're spam , well punk are you? (with the voice of Clint Eastwood ) Oh I thought you wanted all ents inside block updated... silly me... good news is nos problemos, the bad news is , dragons never know when to stop and just have to go over the top so its gonna take more time before I'm satisfied (not the youngest dragon on the block anymore ya know)