Programming
- AutoCAD Fast Lisp Scripts – library of AutoCAD shortcuts and scripts to speed up CAD drafting
- Legend Lisp – Create a legend of AutoCAD Entities
- AutoLisp Modes and Tables
- FLC Simulation in C and C++ Language
- MS Access Developer
IntroductionIn the contemporary realm of data management and analytics, the efficacy of data extraction tools is paramount. The “DCS_scrapper.bas”, a sophisticated Visual Basic for Applications (VBA) script, stands as a testament to this need. Designed to adeptly navigate through and extract data from various Excel files, this script exemplifies automation’s role in streamlining data processes….
(Defun FC (Func N Xo dx) ( (Setq LP ‘()) (Setq Int (/ dx N) (Setq x (-Xo Int)) (Repeat (+ N 1) (Setq x (+x Int)) (Setq y (FuncA x)) (Setq LPP (List x y)) (Setq LP (Cons LPP LP)) ) ) ) (Defun FuncA (V) (* V V) ) (Defun DrawF (ListP) (Setq…
;;; SHORCUTS BY V. MENDEZ ;;; SHORCUTS BY V. MENDEZ ;SHOWS THE BLOCK NAME OF AN ENTITY (DEFUN C:BB(/ bb name) (SETQ bb(entget(car(entsel)))) (SETQ name (cdr(assoc 2 bb))) (SETQ name (strcat “Block Name… ” name)) (ALERT name) (princ) ) ;SHOWS THE LAYER NAME OF AN ENTITY (DEFUN C:CC(/ bb name) (SETQ bb(entget(car(entsel)))) (SETQ name…
Problem: The operations supervisor needs a tool that allows him to over impose different data sets with a minimal programming interaction. Data sets are constantly gather and saved by more than 50 sensors through out the plant. It is necessary to be able to visualize how this data set relates to each other under a…
; If an error (such as CTRL-C) occurs ; while this command is active… (defun at_err (st) (if (and (/= st “Function cancelled”) (/= st “quit / exit abort”)) (princ (strcat “\nError: ” st)) );end if ;Restore modified modes (setvar “regenmode” 1) (setvar “cmdecho” 1) (if (= (type rtfile) ‘FILE) (close rtfile) );end if (setq…