Lists the objects in a block definition.
Enter a block name or select an inserted block, and then specify an object type, such as line or text, to list. You can press Enter to list all objects in the block definition. The prompts are as follows:
Command: BLOCK?
Enter block name <Return to select>: Enter the name of a block definition or press Enter to select a block
Select a block: Use an object selection method
Enter an entity type <Return for all>: Enter the name of an object type, or press Enter to list all objects in the block definition
Block name/<Return to select>: Enter furn01
Enter an entity type <Return for all>: Enter line
Press ESC to exit or press any other key to continue the list.
((0 . "BLOCK") (2 . "FURN01") (70 . 0) (10 0.0 0.0 0.0) (-2 . <Entity name: 1f30c10>)) ((-1 . <Entity name: 1f30c28>) (0 . "LINE") (5 . "F5") (100 . "AcDbEntity") (67 . 0) (8 . "0") (100 . "AcDbLine") (10 20.0346 22.2133 0.0) (11 4.19456 22.2133 0.0) (210 0.0 0.0 1.0))
blockq.lsp