Author Topic: Hatch Areas to Attributed Block  (Read 1218 times)

0 Members and 1 Guest are viewing this topic.

GDF

  • Water Moccasin
  • Posts: 2081
Hatch Areas to Attributed Block
« on: June 25, 2017, 03:47:21 PM »
I'm looking to improve the code included. The routine works...but needs  help.

For one thing you can't divide by zero.
Refer to: (setq ELEV-BBOT%
                  (strcat (rtos (/ (* ELEV-BBOTsf 100) TOTELEVBOTsf) 2 (atoi ARCH#DECI))
                          " %"))
           (ARCH:ATTUPDATE en "ELEV-BBOT%" ELEV-BBOT%)

Thanks for any help you can give.

Gary
Why is there never enough time to do it right, but always enough time to do it over?
BricsCAD 2020x64 Windows 10x64

GDF

  • Water Moccasin
  • Posts: 2081
Re: Hatch Areas to Attributed Block
« Reply #1 on: June 25, 2017, 03:59:56 PM »
oops

please move to the lisp forum
Why is there never enough time to do it right, but always enough time to do it over?
BricsCAD 2020x64 Windows 10x64