|
ZWCAD : Die Mitte von zwei nichtverbundenen Punkten wählen
holfort am 07.10.2009 um 12:25 Uhr (0)
Mit diesem kleinen LISP-Programm kann z.B. die Mitte der Endpunkte zwischen 2 nichtverbundenen Linien gefangen werden: Bedienung:Aufruf mit "(M2P)"z.B. Befehl Linie aufrufen, in der Kommandozeile "(M2P)" eingeben und 1. Punkt anwählen, danach wieder "(M2P)" eingeben und 2. Punkt anwählen. LISP:(defun m2p (/ pt1 pt2) (setq pt1 (getpoint "
Ersten Punkt wählen: ")) (setq pt2 (getpoint pt1 "
Zweiten Punkt wählen: ")) (polar pt1 (angle pt1 pt2) (/ (distance pt1 pt2) 2.0)))Als Download: * M2P.LSP--------- ...
| | In das Form ZWCAD wechseln |
|
ZWCAD : Lisp-Editor für ZWCAD
holfort am 18.03.2010 um 09:14 Uhr (0)
Geplant ist es für die Version 2011 - früher rechne ich nicht damit.Grüße Lars------------------Lars Holfort www.zw-cad.deKonstruktionswerk GmbH - 40211 Düsseldorf
| | In das Form ZWCAD wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |