FWZ [1a] Temporary Track -1 & 2

_mac — 2008-11-26 09:12:35

[QUOTE=Pavel][QUOTE=maker] Thanks, Rab.But, like I said, it would be better to load a 'mid2points' lisp routine. I found some on the net - but, for some reason, they don't load in Zwcad ;( This macros is working [CODE](setq p1(getpoint"1-я точка :")p2(getpoint p1 "2-я точка :")p(polar p1(angle p1 p2)(/(distance p1 p2)2)));'[/CODE] Good luck! or you can add this routine to your start up suite (defun m2p (/ pt1 pt2) (setq pt1 (getpoint "'nEnter first point: ")) (setq pt2 (getpoint pt1 "'nEnter second point: ")) (polar pt1 (angle pt1 pt2) (/ (distance pt1 pt2) 2.0)) ) You can use this in the middle of a command by typing in (m2p). Regards, Mac_mac2008-11-26 09:38:41

maker — 2008-06-04 11:07:23

Thanks, Rab. But, like I said, it would be better to load a 'mid2points' lisp routine. I found some on the net - but, for some reason, they don't load in Zwcad ;( Probably because some system variables don't work exactly the same. It probably isn't too difficult to modify them to work on Zwcad. when I get the time I'll learn more autolisp and do it. I'll post the result here

zw_admin — 2008-06-04 10:03:38

Hello, Maker. Thank you for your share! Yes, That is fun and useful. With the feature of Temporary Track and compared coordinate, ZWCAD users can make drawing more precisely and conveniently.