TXTBLK-bgol (Insert Block at Text Insertion Point)

Command Type: AutoLISP routine (works in AutoCAD, BricsCAD, ZWCAD and most AutoLISP-compatible CAD platforms)
Developed by: BGol Community, bgol.in

Inspired by the general concept of placing a block at a text entity's insertion point, used in survey point-flagging drafting. This is an original, independently written routine, new file name, new command name, new source code, created so the CAD community has a free, editable, open-source alternative.

Overview

IBOT finds the insertion point of each selected TEXT or MTEXT entity and inserts a copy of a chosen block precisely there, useful for visually flagging a specific labeled point (e.g. a point-number label) with a marker block.

How to Use

1. Load TXTBLK-bgol.lsp into your CAD session (drag-and-drop the file onto the drawing window, or use the APPLOAD command).
2. Type IBOT at the command line and press Enter.
3. Select the text entity (or entities) whose insertion point should receive a block, then press Enter to finish selection.
4. Type the name of the block to insert when prompted.
5. A copy of that block is inserted at the exact insertion point of each selected text, placed on a dedicated layer, BGOL-IBOT (colour orange).

Why Use It

• Precision, places a block at the exact insertion point of a chosen text, removing guesswork or manual snapping errors.
• Time savings, automates a repetitive placement task, useful when flagging or symbolizing many labeled points in a drawing.
• Simplicity, a straightforward select-text-and-run workflow requiring no complex setup.

Where to Use It

• Flagging or symbolizing specific labeled points (e.g., point numbers, station labels) in survey drawings with a marker block.
• Any drafting task requiring a block to be positioned exactly at a text entity's insertion point rather than approximated by eye or grip-snap.

Notes

• Works on both TEXT and MTEXT entities; you may select several text entities at once in a single run.
• Block scale and rotation default to 1/1/0; edit *bgol-ibot-scale* and *bgol-ibot-rot* near the top of the .lsp file to change the defaults.
• Source code is fully open, feel free to study, modify, and redistribute it under the same open, free-for-all spirit.

Credits

Developed and shared for the CAD community by BGol Community. Website: https://bgol.in/ Free and open-source, use it, modify it, share it, for personal or commercial work alike.