Leaderboard

Apollonius problem : (PPP, LPP, LLP, LLL, CPP, CLP, CLL, CCP, CCL, CCC) P - point L - line C - circle Routine finds all CIRCLES that touches or passes (point) as tangent curves to combination of (C - circle; L - line; P - point) Relevant page on Wikipedia : https://en.wikipedia.org/wiki/Problem_of_Apollonius And my video demonstrating my routine : https://youtu.be/cuo4M9UGZmA Number of circles demonstrated in video corresponds to Wikipedia table at the end of page... Regards, Marko Ribar, d.i.a. (architect)

This program will calculate the total length of Lines/Polylines/LWPolylines/Arcs/Ellipses/Circles/Splines with an optional filter. The Filter may be used to select only those lines that are on a certain layer, or perhaps have a certain linetype or colour. The results of the calculation can be displayed in an ACAD Table within the drawing, or written to either a CSV or TXT File. The Table-Style may be selected from the drop-down in the main dialog. Main interface The main dialogue box allows the user to filter lines by layer, linetype or colour and select the table style. Multiple selected items can filtered. A filter string may be entered to help the user quickly find the filter items that he/she requires. Options The options dialogue box allows the user to specify which object types should be included and the type of output, table in the drawing, CSV file or TXT file. Demo Function Syntax: LenCal For instructions on how to run the program see here. Any comments, criticism and suggestions are welcome. Either PM me directly, or reply to the original thread.

Multiple Toggles is a library routine that allows you to create as many Toggles of input as required (subject to Autocad limits) using a dialouge rather than the command line. Its use is intended where you want the user to pick one or more values. It can be used where you want to run a number of functions, pick multiple values to be used. It can be used in most lisp code with just a couple of lines of code, compared to a hard coded solution of around 50+ lines repeated every time you want to use a dcl. To use just save the "Multiple Toggles.lsp" to a directory that is included in you Autocad search path. If you need more information how to do this send an email to info@alanh.com.au It only requires 2 lines of code in any lisp to use. (if (not AH:Toggs)(load "Multiple toggles.lsp")) (setq ans (AH:toggs (list "Change blank for yes " "Blocks" "Dimension" "Hatch" "Images" "Viewports" ))) In the example above the variable ans will have the toggle Values 1 or 0 for a toggle clicked on eg ("1" "0" "1" "0" "1") depending on toggle selected. If you want further information or conversion of your code email info@alanh.com.au

This AutoLISP file can be used to measure the total length or area of all polylines on a selected layer. Instructions on how to load and run this file in AutoCAD are given in this thread.