Short description
π CopyPaste2BasePoint is an AutoCAD AutoLISP productivity tool for copying selected drawing objects with a fixed base point at 0,0,0 and pasting clipboard content back at the same origin-based coordinate.
Command:
π Main commands:
– Copy2BasePoint: selects drawing entities and runs AutoCAD COPYBASE using 0,0,0 as the base point.
– PasteBasePoint: runs AutoCAD PASTECLIP using 0,0,0 as the insertion point.
π§© Header reference:
– CB: documented as copy with base point 0,0,0 in the original header.
– PB: documented as paste with base point 0,0,0 in the original header.
Description:
π CopyPaste2BasePoint streamlines a common CAD coordination workflow: copying geometry from one drawing and pasting it into another drawing while preserving the same origin reference.
π§ Instead of manually choosing a base point each time, the routine uses the fixed coordinate 0,0,0 for both COPYBASE and PASTECLIP operations.
π This is useful for AutoCAD, Civil 3D, and infrastructure drafting workflows where xrefs, base drawings, layouts, design references, or copied model geometry must stay aligned by drawing origin.
π‘οΈ Before running the copy or paste command, the program temporarily disables object snaps and command echo settings to reduce accidental snap interference.
π After the operation, it restores OSMODE, CMDECHO, optional 3DOSMODE, and optional AECBOSMODE values so the user’s drafting environment is returned to its previous state.
Helper function: (if any)β
π§° CB_PB_COMMON_SETVAR: starts an undo mark, stores current drafting variables, disables OSMODE, disables 3DOSMODE when available, suppresses CMDECHO, and optionally sets AECBOSMODE to zero.
π CB_PB_COMMON_RESTORE: restores OSMODE, AECBOSMODE, 3DOSMODE, and CMDECHO, then closes the undo mark and clears temporary global values.
π§ GET_AECBOSMODE: checks whether AECBOSMODE exists and extracts its current value from the AutoCAD command prompt so the previous setting can be restored safely.
π vl-load-com handling: ensures Visual LISP COM access is available before ActiveDocument and undo mark operations are used.
Functionalities:
π Copy selected objects using AutoCAD COPYBASE with base point 0,0,0.
π Paste clipboard geometry using AutoCAD PASTECLIP at insertion point 0,0,0.
π§ Supports origin-based CAD transfer workflows between drawings.
π Temporarily disables OSMODE to prevent object snap interference during copy and paste operations.
π§ Temporarily disables 3DOSMODE when the variable exists, improving reliability in 3D snap environments.
ποΈ Handles AECBOSMODE when available, making the routine more compatible with AutoCAD MEP and AEC-based installations.
π Temporarily suppresses CMDECHO for a cleaner command-line workflow.
β©οΈ Wraps operations in AutoCAD undo marks using ActiveX document methods.
β
Restores previous drafting settings after the command completes.
Result:
β
The result is a faster and safer AutoCAD copy-paste workflow for moving geometry between drawings while keeping objects aligned to the same 0,0,0 base point.
π The tool reduces manual base point mistakes, supports coordinated model-space transfers, and helps maintain drawing origin consistency in production CAD environments.

Leave a Reply
You must be logged in to post a comment.