Leaderboard

For learning AutoLISP, VLISP and DCL I recommend... AutoLISP Tutorial | AutoLISP Quick Start | CADTutor Learn AutoLISP for AutoCAD productivity | AfraLISP and Debugging | AfraLISP The Old AfraLISP- AfraLisp | The AutoLisp & VBA resource for AutoCAD users Error Message Troubleshooter | Lee Mac Programming (lee-mac.com) and Tutorials | Lee Mac Programming (lee-mac.com) The Ultimate AutoLisp Tutorial (jefferypsanders.com) AutoCAD 2022 Developer and ObjectARX Help | Tutorial: Getting Started (AutoLISP) | Autodesk DCL if you want as well... Getting Started with Dcl Dialogs (autolisp-exchange.com)

Re coreconsole will try to find the file needed to be loaded for VLA to work. (ARXLOAD XXXX) have it some where. http://www.theswamp.org/index.php?topic=57471.msg609440#msg609440

as a response to this thread https://www.cadtutor.net/forum/topic/86222-script-to-change-status-stamp-block-across-300-drawings-please/#comment-642701 uses https://github.com/CEXT-Dan/PyRx changes the drawings found in a folder import traceback from pyrx_imp import Rx, Ge, Gs, Gi, Db, Ap, Ed import wx import os, pathlib def findIdsByName(db, blkname):# -> list: ids = [] allids = db.objectIds(Db.BlockReference.desc()) for id in allids: ref = Db.BlockReference(id) if ref.getBlockName() == blkname: ids.append(id) return ids def changeit(db : Db.Database, blkname): refids = findIdsByName(db, blkname) for id in refids: dyn = Db.DynBlockReference(id) if not dyn.isDynamicBlock(): continue for prop in dyn.getBlockProperties(): if prop.propertyName() != 'Visibility1': continue vals = dict([(p.getString(), p) for p in prop.getAllowedValues()]) prop.setValue(vals['AS CONSTRUCTED']) def openSideDrawing(path, blkname): print("\nProcessing {} ".format(path)) db = Db.Database(False, True) db.readDwgFile(path) db.closeInput(True) changeit(db,blkname) db.saveAs(path) def PyRxCmd_doit(): try: blkname = 'PTA_Stamp_Dynamic' dlg = wx.DirDialog(None, "Choose input directory","", wx.DD_DEFAULT_STYLE | wx.DD_DIR_MUST_EXIST) if dlg.ShowModal() != wx.ID_OK: print("You Cancelled The Dialog!") return fnames = next(os.walk(dlg.GetPath()), (None, None, []))[2] dwgex = ".dwg".casefold() for fname in fnames: ext = pathlib.Path(fname).suffix.casefold() if ext != dwgex: continue fpath = '{}\\{}'.format(dlg.GetPath(),fname) openSideDrawing(fpath, blkname) print("yay") except Exception as err: traceback.print_exception(err)