Leaderboard

It helps my routine. You pointed out exactly what I didn't know. I'll study some more.

I'd be asking other companies (at least another 2) to evaluate what you need and give their quotes. If they are all saying that you need the same level of gear then that's probably what you do need. Remember that whatever you go with should have some extra capacity - for when you get that big contract and take on another 5 CAD users. PS. Don't forget to ask for a raise when you end up administrating the new system, as no doubt you will. It starts by them asking for advice, then ask you to look after the backups, then ......., and the job creeps up on you. (Been there, done that).

I'd agree that your Synology solution would be more proportionate given the number of users. I guess it depends on whether you see that number staying stable over the next 3 years or so, or whether it's likely to increase. The other consideration might be functionality of a Windows? based server over one running the Synology OS. Having said that, I've found the Synology backup options to be excellent - probably the single biggest consideration when it comes to functionality.

this is help you.. Align Area Text.lsp

(defun c:test (/ s h i e g l r) (if (and (setq s (ssget '((0 . "IMAGE")))) (setq h (getvar 'textsize)) (setq g (/ h 2.0)) ) (repeat (setq i (sslength s)) (setq e (ssname s (setq i (1- i)))) (vla-getboundingbox (vlax-ename->vla-object e) 'l 'r) (setq l (vlax-safearray->list l) r (vlax-safearray->list r) ) (and l r (entmake (list (cons 0 "TEXT") (cons 10 (polar (mapcar '(lambda (j k) (/ (+ j k) 2.0)) l r) 0.0 (+ g (/ (distance l (list (car r) (cadr l) 0.0)) 2.0)) ) ) (cons 40 h) (cons 1 (getpropertyvalue e "ImageName")) ) ) ) ) ) (princ) ) (vl-load-com)

Don't have a time to test, but try replacing (this kind of syntax wherever it occurs) : (entmake (list (cons 0 "TEXT") (cons -1 ent1) (cons 330 ent2) (cons 8 lay0) (cons 40 0.5) (cons 1 tx) (cons 50 ro) (cons 7 sty) (cons 71 0) (cons 72 1) (cons 73 2) (cons 10 kor2) (cons 11 kor2) ) ) (command "bpoly"kor2"") with this (syntax) : (command "bpoly"kor2"") (setq c (LM:PolyCentroid (entlast))) (entmake (list (cons 0 "TEXT") (cons -1 ent1) (cons 330 ent2) (cons 8 lay0) (cons 40 0.5) (cons 1 tx) (cons 50 ro) (cons 7 sty) (cons 71 0) (cons 72 1) (cons 73 2) (cons 10 c) (cons 11 c) ) ) Note : It is important that you change order of things that are processed - you should firstly get "c" - centroid and then create TEXT... And make sure you load this sub before you run LISP, or implement it along within... http://www.lee-mac.com/polygoncentroid.html BTW. Sub function (LM:PolyCentroid e) is only applicable for LWPOLYLINE entity that have all segments straight - polygonal LWPOLYLINE - it must not have arcs and shape doesn't matter - so it can be irregular (not just like POLYGON command functionality)... But be aware that correct look - (not selfintersecting) and property - (closed) play important role in determining correct centroid position... Also, for good practice - not to go too deeply in all possible situations, change current UCS to WCS and apply (LM:PolyCentroid lw) function only on LWPOLYLINE entities that lie in WCS (they are drawn normal way) before applying routine...

I find if I need to select things over and over ill build a simple SSGET. When I have a need to use QSE its to find niche things like arc's on a layer that are smaller than or equal to x radius. ;;----------------------------------------------------------------------------;; ;; Select Similar Objects command shortcut (defun C:SS () (vl-cmdf "_Selectsimilar") ) ;;----------------------------------------------------------------------------;; ;; Filter Down Selection to Blocks only (defun C:SB (/ SS) (if (ssget "_I") ; If there are preselected objects [= Implied selection] (sssetfirst nil (ssget "_I" '((0 . "INSERT")))) ; Select Only Blocks among them (sssetfirst nil (ssget "_:L" '((0 . "INSERT")))) ) (princ) )

Like the pline bit. As before using cmd in WIN 10, for us oldies DOS. copy c:\mylisps\license.lsp+mylisp22.lsp c:\mylisp\compile\mylisp22.lsp When you look in \compile\mylisp22.lsp it will have the serial code added no need to copy and paste make a fas of that one. I use a Bat file to do around a 100 in one go. Happy to provide more info how to make. Send the end user a fas of the display ID no mention of what it is. They email you back the ID number BFEBFBFF040908EA