Commute: variable. I use the Christopher street PATH station, which is
noww the furthest station downtown. Everyone who used to take the PATH to
WTC now takes the ferry or the PATH to Christopher. THe line to get into
the station in the evening comes all the way up to the street. How far down
the block it goes is a variable. Some days it barely makes it to the
sidewalk, but it usually makes it another 100 feet or so, which brings it to
the corner of 7th avenue. I have, however, seen it wrap all the way around
the block.
Other than that, and the very noticeable change in my view downtown when
walking to work, nothing has changed.
relative paths - somewhere int eh back of my mind I knew that they could be
typed in, so I should have known that a lisp routine could be written. But,
I'm not sure I could get my users to grasp the concept, so no paths still
seems easier, until I can set relative paths as a default option within
acad.
"Peter Friedrich"
wrote in message
news:6C6B466DA4ADDC0F302D2F8ECCA901BF@in.WebX.maYIadrTaRb...
> Rob- yep: the
> ..\dir\dwg
> method
>
> see attached and scroll to the bottom for instructions
> I havent used it recently- and don't warrant its use on any version!
> note the following:
> 1- nested xrefs will mess up everthing! start at the deepest level first.
> 2- ALWAYS check the result - sooner or later you'll get an Unwelcome
> surprise!
> 3- it is fast - and UNDO will work if the result is undesired.
>
> -good luck
>
> Charles--
> How's your commute been? (since Sept?)
>
>
>
> "Rob Tomson" wrote in message
> news:C546D5AB6DAA39DCBFB9A607103EE810@in.WebX.maYIadrTaRb...
> > what do you mean by relative paths? do you mean like ..\xrefs\plan.dwg
> ?
> > if that's what you're talking about then you CAN use relative paths but
> you
> > have to type them in manually and then save the path but i'm sure
there's
> a
> > lisp routine that could take care of that.
> >
> > Rob
> > --
> > 'There is no knowledge that is not power.'
> > W2k, A2K2, VB6, VB.NET, ADN (new)
> >
> > "Charles Prettyman" wrote in message
> > news:4D9FFD1CC7923F7E876E5D54CB5DDD2B@in.WebX.maYIadrTaRb...
> > > Hey Peter, where are you now? Actually, when you were at AKF, I think
> we
> > > were both active int eh AUGI ADT mailing list - did that ever get
> revived
> > > after tehy had to shut it down to stop it from mailing everyone a
> hundred
> > > copies of everything?
> > >
> > > There was a thread a while back on "staff drawing like amateurs" that
> had
> > a
> > > collection of everyones favorite bad procedures. You should add your
to
> > the
> > > list - it was pretty fun to have such a thorough list of what not to
do.
> > >
> > > lisp to rework the paths would woork, but I really think it's simplest
> to
> > > just keep all the current files in one directory, and then not save
> paths.
> > > A lot of people have wished for a way to save relative paths, and that
> > would
> > > be ok. But, in the end, we are going to have to share data, and if I
> get
> > > muy office to always put the base plan, title block, and sheet files
> inthe
> > > same directory, and not save paths, then no extra steps are needed.
> > >
> > > "Peter Friedrich" wrote in message
> > > news:F9EACACCE1638C7C591E33F641296C28@in.WebX.maYIadrTaRb...
> > > > Charles!
> > > > (haven't seen this group since my days at AKF- good to see you're
> still
> > > > here!)
> > > > Would Lisp that re-works the paths do OK? I did that a few years
> back-
> > > but
> > > > it's still that 'extra step' that we dread.
> > > >
> > > > As for this thread... I could write a book as to all the ways people
> use
> > > > ACAD... I've freelanced for 12 of the last 19 months--- and GAWD,
what
> > > Awful
> > > > procedures I've seen!
> > > > I will document a few- just not now - sorry.
> > > >
> > > > "Charles Prettyman" wrote in
> message
> > > > news:7FBE3DDC28D28DF985D2B0D3521E80EC@in.WebX.maYIadrTaRb...
> > > > We don't bind. We have started using the etransmit tool, which
strips
> > > saved
> > > > xref paths. I actually set the standard to not save the path, for a
> > > variety
> > > > of reasons, but I have not found a way to make not saving the
default
> > > > (there's probably a registry hack for that, maybe someone knows what
> it
> > > is.
> > > >
> > > > Ideally, I'd use paper space all the time, and put all annotation in
> > paper
> > > > space. But, ADT cannot yet tag through xrefs and paper space. Nor
> can
> > > you
> > > > save a block with both PS and MS elements (If you could, and you
> > inserted
> > > > the block in ms, where would it insert the ps components - I wonder)
> > So,
> > > we
> > > > are horribly inconsistent. I hate it, but it's the best we can do
at
> > the
> > > > current state fo the program.
> > > >
> > > > Post wishes! Let them know how you need the program to work. And
> post
> > > the
> > > > mile long list of questions, I'll answer as best I can.
> > > > "dqueen" wrote in message
> > > > news:f0cfa92.8@WebX.maYIadrTaRb...
> > > > The learning curve is a problem. Our Architects use ADT3.3 but do
not
>
> > use
> > > it
> > > > to its fullest. I am trying to figure out if we are way behind other
> > > > companies but from the replies I have gotten it seems we are all in
> the
> > > same
> > > > boat. There is so much out there but money and learning is always an
> > > issue.
> > > > Do you use paper space at all times? Do you bind xref's before
sending
> > to
> > > a
> > > > client. There are more questions I could ask but don't want this
post
> to
> > > be
> > > > a mile long. Thanks for your input.
> > > >
> > > >
> > >
> > >
> >
> >
>
>
----------------------------------------------------------------------------
----
;; XRP - SIMPLE VERSION FOR DWG NAMES = XREF NAMES
;; OK FOR r13, r14 12/23/97
;; (c) 1997 P. FRIEDRICH (908) 508-9217
(DEFUN look_for_EXT () ; ;(if (= 1 go) --- (A)- REM'D OUT
(if (wcmatch XREF_PATHSPEC "*.dwg,*.DWG" ) ; test for _____.DWG [UC / LC]
(SETQ STUB_LGTH (STRLEN XREF_PATHSPEC)
XREF_PATHSPEC (SUBSTR XREF_PATHSPEC 1 (- Stub_lgth 4)))
; ...then get remaining string
(print XREF_PATHSPEC)
) ) ;); ...else (no test) ---SEE (A)
(DEFUN look_for_dir () ; ;(if (= 1 go) ---SEE (A)
(SETQ XREF_NEWPATH NIL)
(progn
(SETQ FLAGDIR nil)
(if (wcmatch XREF_PATHSPEC "*`\\*" ) ; test for \
(SETQ FLAGDIR 0) ; ...then get end of string
)
(if (= FLAGDIR 0) (SETQ CHAR# 2))
) 😉 ---SEE (A)
(while (= FLAGDIR 0)
(progn
(SETQ XREF_NEWPATH (SUBSTR XREF_PATHSPEC CHAR#))
(print XREF_NEWPATH)
(if (wcmatch XREF_NEWPATH "*`\\*" ) ; test for \
(SETQ CHAR# (+ 1 CHAR#)) ; Then...
(SETQ FLAGDIR NIL) ; ELSE...
) ) ) ; end if ; end progn / while
(SETQ FLAGDIR nil)
(IF (= NIL XREF_NEWPATH)(SETQ XREF_NEWPATH XREF_PATHSPEC))
)
(DEFUN xrsetup () ; (testacadver) ---SEE (A)
; (if (= 1 go) ---SEE (A)
(SETQ XREF_PATHSPEC '()
XBLK_NAME '() ; was xref#
BLK (TBLNEXT "BLOCK" 'T)
BLK00 BLK ; KEPT - FOR DEBUG
) ; ) ---SEE (A)
)
(DEFUN find_xrefs ()
(xrsetup)
(WHILE BLK
(IF (= (LOGAND (CDR (ASSOC 70 BLK)) 4) 4)
(progn
(SETQ XBLK_NAME
(APPEND XBLK_NAME (LIST (CDR (ASSOC 2 BLK)) )
) )
(SETQ BLK_ENAME
(APPEND BLK_ENAME (LIST (CDR (ASSOC -2 BLK)) )
) )
(SETQ XREF_PATHSPEC
(APPEND XREF_PATHSPEC (list (CDR (ASSOC 1 BLK)) )
) )
) ) ;; end if / progn
(SETQ BLK (TBLNEXT "BLOCK"))
) ;; end while
)
(DEFUN xr_data ()
(IF (> (LENGTH XBLK_NAME) 0) XBLK_NAME NIL )
(SETQ loop# (length XBLK_NAME)
xpath_remain XREF_PATHSPEC
xblks_remain XBLK_NAME
)
;;; now I have the block table reset to the start and lists: 1 of xref
names, 1 of xref paths
;;; also, the # of xrefs
)
(DEFUN xr_revise ()
(command "LAYER" "MAKE" "XREF" "COLOR" "2" "" "LOCK" "" "")
(SETQ xblks_remain XBLK_NAME) ; List of block names
(repeat loop#
(SETQ XBLKN_EDIT (car xblks_remain) ; 1st of xblks_remain
xblks_remain (cdr xblks_remain) ; - bal of xblks_remain
BLKXREF (CAR XBLK_NAME)
XBLK_NAME (CDR XBLK_NAME)
XREF_PATHSPEC (car xpath_remain) ; 1st of xpath_remain
xpath_remain (cdr xpath_remain) ; - bal of xpath_remain
)
(look_for_EXT)
(look_for_dir)
;;; LINE 96 #####################################################
(SETQ newpath (strcat "..\\ARCH\\" XREF_NEWPATH))
(command "xref" "path" blkXREF newpath)
) ;; **** END OF REPEAT
(command "LAYER" "SET" "0" "")
(command "qtext" "off")
)
(defun msg ()
(alert " \n\n double check this-- all xrefs should now be correct ...
\n")
(command "_xref")
)
(DEFUN C:XRP ()
(find_xrefs)
(xr_data)
(xr_revise)
(msg)
)
;;; go back to line 96--- edit for YOUR directory structure
![Autodesk Design & Make Report](https://forums.autodesk.com/t5/image/serverpage/image-id/1350519iCB55845EBFC43016/image-size/large?v=v2&px=999" "Autodesk Design & Make Report")