MakeMore (vl-remove-if-not)
in LISP
Hello, I would like to ask for help with debugging MakeMore lisp from Mosad H. Elewa & Kent Cooper.
In BricsCAD (v21) it always shows "WARNING: Recommend resetting", even if the values are ~ 1 or ByLayer ... bug.
It works well in ACAD. In my opinion, the error is most likely in evaluation of
(or
(vl-remove-if-not '(lambda (x) (member (car x) '(62 6 48 370))) data)
(and (assoc 39 data) (/= (*ed 39) 0)); LWPolylines have thickness entry even if 0
); and
I personally don't know how to reformulate it.
Thank you very much for your help.
Martin
In BricsCAD (v21) it always shows "WARNING: Recommend resetting", even if the values are ~ 1 or ByLayer ... bug.
It works well in ACAD. In my opinion, the error is most likely in evaluation of
(or
(vl-remove-if-not '(lambda (x) (member (car x) '(62 6 48 370))) data)
(and (assoc 39 data) (/= (*ed 39) 0)); LWPolylines have thickness entry even if 0
); and
I personally don't know how to reformulate it.
Thank you very much for your help.
Martin
0
Comments
-
Hello,
it seems best to open a SupportRequest :
- provide a sample dwg, best with 1 entity only, where the problem appears
- add this Lisp file
- add a clear description of scenario : which command to start, what to (potentially) enter as options on input etc.
So we coudl easily inspect and fix what is wrong ...
many greetings !0 -
Hello Torsten,
thank you for suggestion.
Result: I updated BricsCAD to V21.2.07 and everything is now working properly.
Group code 370 was probably repaired to be default value of "not omitted". And everything is working as it should.
Martin0 -
Dear Martin,
many thanks for feedback, glad to hear about :-)
I roughly remembered that few issues with "default values" were fixed, but was not sure about :-)
many greetings !0