Author Topic: BricsCAD users  (Read 989 times)

0 Members and 1 Guest are viewing this topic.

GDF

  • Water Moccasin
  • Posts: 1968
BricsCAD users
« on: December 14, 2017, 09:48:25 AM »
How about adding a child board for BricsCAD users?
Why is there never enough time to do it right, but always enough time to do it over?
BricsCAD 2019x64 Windows 10x64

Mark

  • Custom Title
  • Seagull
  • Posts: 28675
Re: BricsCAD users
« Reply #1 on: December 14, 2017, 10:01:22 AM »
Sure! Can we get rid of New to CAD?
TheSwamp.org  (serving the CAD community since 2003)

MP

  • Seagull
  • Posts: 17341
Re: BricsCAD users
« Reply #2 on: December 15, 2017, 09:25:07 AM »
\|// Set goal. Experiment tirelessly until
|Oo| practice has become expertise.  Loop.
|- | LinkedIn | Dropbox

GDF

  • Water Moccasin
  • Posts: 1968
Re: BricsCAD users
« Reply #3 on: December 15, 2017, 04:59:28 PM »
When having AutoCAD and BricsCAD on the same machine, it would be nice to have a forum to work out any problems...etc.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Find ACAD.exe ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun ARCH:FINDACAD#PATH  (/ program)
  (setq program (substr (getvar "acadver") 6 (- (strlen (getvar "acadver")) 1)))
  (cond ((/= program "BricsCAD")
         (progn (setq ACAD#PATH (findfile "acad.exe")
                      ROAM#ROOT (getvar "ROAMABLEROOTPREFIX")
                      ACAD#ENVR (getenv "ACAD")
                      ACAD#NAME (substr ACAD#PATH 1 (- (strlen ACAD#PATH) 8)))
                ))
        ((= program "BricsCAD")
         (progn (setq ACAD#PATH (findfile "bricscad.exe")
                      ROAM#ROOT (getvar "ROAMABLEROOTPREFIX")
                      ACAD#ENVR (getenv "ACAD")
                      ACAD#NAME (substr ACAD#PATH 1 (- (strlen ACAD#PATH) 12)))
                )))
  (princ))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ARCH Registry ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun ARCH:PATH_REGISTRY  () 
  (ARCH:FINDACAD#PATH)
  (ARCH:READKEYS)
  (setq ARCH_AmendedSetup
         (strcat (substr ARCH#SUPF 1 (- (strlen ARCH#SUPF) 1))
                 ";"
                 (strcat (substr ARCH#SUPF 1 (- (strlen ARCH#SUPF) 1)) "/V_all")
                 ";"
                 (substr ARCH#FONF 1 (- (strlen ARCH#FONF) 1))
                 ";"
                 (substr ARCH#PATF 1 (- (strlen ARCH#PATF) 1))
                 ";"
                 ACAD#ENVR)) 
  (setenv "ACAD" ARCH_AmendedSetup)   
  (princ))
Why is there never enough time to do it right, but always enough time to do it over?
BricsCAD 2019x64 Windows 10x64