7cad TitleBlock2Layout
Browse Input Drawing:
Title Block Name Wildcard:
Layout Name Attribute:
secureload 0 (load (findfile "7cad Titleblock2Layout.lsp")) (l+TitleBlock2LayoutCommand titleblockwc layoutnameatt (setq selectall t)) (command "SaveAs" "" (strcat (getvar 'dwgprefix) "output.dwg")) (while (> (logand (getvar 'cmdactive) 1) 0)(command ""))