Fadenkreuz ausrichten
N&W
ich verwende sehr haeufig den Befehl, Raster bzw. Fadenkreuz an Linie
ausrichten. Allerdings kenne ich diesen nur aus diversen
Applikationen. Gibt es eine Moeglichkeit, dies ohne grossen Aufwand
allein mit AutoCAD 14 zu tun?
Gruesse Karin Schlosser
_______________________________________________
Nachtrieb & Weigel Nachtrieb-Weigel @T-Online.de
Städtebau . Umweltplanung
Markus Rieder IWS
es gibt die Optionen FANG und RASTER in AutoCAD. Das Raster ist eintellbar.
Ein-/Ausschalten über F-Tasten.
Grüße aus Augsburg... :-)
IWS Systemhaus für CAD, Internet und Kommunikation
Markus Rieder
www.iws-cad.de
N&W schrieb in Nachricht <3699b54...@news.btx.dtag.de>...
Michael Wolf
hallo,
meinst Du villeicht "bks"?
damit wird das BenutzerKoordinatenSystem gedreht.
> Hallo Leute,
> ich verwende sehr haeufig den Befehl, Raster bzw. Fadenkreuz an Linie
> ausrichten. Allerdings kenne ich diesen nur aus diversen
> Applikationen. Gibt es eine Moeglichkeit, dies ohne grossen Aufwand
> allein mit AutoCAD 14 zu tun?
grusz michael
Heinz Schmirl
ein Auszug aus dem Hilfetext zu Deinem Problem:
Die Systemvariable SNAPANG legt den Fangdrehwinkel für das aktuelle
Ansichtsfenster fest, ohne den Rasterwinkel zu ändern. Mit SNAPBASE wird der
Basispunkt für den Fangmodus im aktuellen Ansichtsfenster festgelegt.
Gegenüber den Dialogfeldern haben Systemvariablen den Vorteil, daß hier der
Basispunkt oder der Drehwinkel mit Hilfe des Zeigegeräts festgelegt werden
kann.
Weiters gibt es die Möglichkeit, das BKS an einem Objekt auszurichten:
Tastatur:
bks
o (Buchstabe "o")
Linienobejkt anklicken, an dem das BKS ausgerichtet werden soll. (Dazwischen
jeweils noch die Eingabetaste)
Gruß,
Heinz
N&W schrieb in Nachricht <3699b54...@news.btx.dtag.de>...
>Hallo Leute,
>
>ich verwende sehr haeufig den Befehl, Raster bzw. Fadenkreuz an Linie
>ausrichten. Allerdings kenne ich diesen nur aus diversen
>Applikationen. Gibt es eine Moeglichkeit, dies ohne grossen Aufwand
>allein mit AutoCAD 14 zu tun?
>
Karin Schlosser
>
>meinst Du villeicht "bks"?
>damit wird das BenutzerKoordinatenSystem gedreht.
>
>
gerade das BKS wollte ich nicht drehen.
Bei Spirit z.B. gibt es die Funtion unter Geometrie, das Fadenkreuz
parallel an einer vorhandenen Linie anzugleichen und das mit einem
Mausklick ! Nun bin ich auf der Suche nach einer aehnlichen Funktion
nur eben mit acad.
Gruesse, Karin
Peter Hellinger
N&W <Nachtrie...@t-online.de> schrieb in Nachricht
3699b54...@news.btx.dtag.de...///
>ich verwende sehr haeufig den Befehl, Raster bzw. Fadenkreuz an Linie
>ausrichten. Allerdings kenne ich diesen nur aus diversen
>Applikationen. Gibt es eine Moeglichkeit, dies ohne grossen Aufwand
>allein mit AutoCAD 14 zu tun?
Probiers mal damit. Nach dem Laden steht der Befehl WINKEL über die
Tastatur zur Verfügung. Man kann einen Winkel direkt eingeben oder das
Fadenkreuz direkt an einem Objekt ausrichten.
Helli
;;; Funktion C:WINKEL
(defun wink_1(w / lin_1 lin_el lin_pa lin_pe pick_p corner os_old)
(cond
((= w "Objekt")
(setq os_old (getvar "osmode"))
(setvar "osmode" 512)
(setq lin_1 (entsel "\nObjekt waehlen:"))
(setq lin_el (entget (car lin_1)))
(setq lin_pa (cdr (assoc 10 lin_el)))
(setq lin_pe (cdr (assoc 11 lin_el)))
(setq pick_p (cadr lin_1))
(if (< (distance lin_pa pick_p) (distance lin_pe pick_p))
(setq corner lin_pa pick_p (polar lin_pa (angle lin_pa lin_pe)
(distance lin_pa pick_p)))
(setq corner lin_pe pick_p (polar lin_pe (angle lin_pe lin_pa)
(distance lin_pe pick_p)))
)
(setvar "snapang" (angle corner pick_p))
(setvar "snapmode" 1)
(setvar "osmode" os_old)
)
((/= w nil)
(setvar "snapang" (aib w))
)
)
(setq w_act (getvar"snapang"))
(if (and (<= w_act (* pi 1.5)) (> w_act (/ pi 2))) (setq w_act (- w_act
pi)))
(prin1)
)
(defun wink( / w kpm t_win osm proz)
(if (not s_win) (setq s_win 0))
(setq w_act (getvar "snapang"))
(initget "% Objekt <<0 <<45 <<90 <<135 <<180 <<225 <<270 <<315")
(setq w (getreal (strcat "\nWinkel eingeben oder %/Objekt/<" (rtos (bia
(getvar"snapang"))) ">:")))
(cond
((= w "%")
(setq proz (getreal "\nSteigung oder Gefaelle in % :"))
(if (or (> proz 100.0) (< proz -100.0))
(alert "\nFehlerhafte Eingabe !")
(progn
(setq w (bia (angle (list 0 0) (list 100 proz))))
(wink_1 w)
)
)
)
((= w "Objekt")
(wink_1 w)
)
((= w "<<0") (wink_1 0))
((= w "<<45") (wink_1 45))
((= w "<<90") (wink_1 90))
((= w "<<135") (wink_1 135))
((= w "<<180") (wink_1 180))
((= w "<<225") (wink_1 225))
((= w "<<270") (wink_1 270))
((= w "<<315") (wink_1 315))
(t
(wink_1 w)
)
)
(prin1)
)
(defun C:WINKEL( / w)
(wink)
(setq w (getvar "snapang"))
(if (or (= w (aib 90.0)) (= w (aib 180.0)) (= w (aib 270.0)))
(setvar "snapang" 0)
)
(prin1)
)
Peter Hellinger
Peter Hellinger <ma...@helli.de> schrieb in Nachricht
77e4sj$tdm$1...@thetenth.astat.de...///
>Probiers mal damit. Nach dem Laden steht der Befehl WINKEL über die
>Tastatur zur Verfügung. Man kann einen Winkel direkt eingeben oder das
>Fadenkreuz direkt an einem Objekt ausrichten.
Sorry, da fehlen noch die Funktionen aib und bia, bitte am Anfang der
Lisp-Datei einfügen:
(defun aib (w) (* pi (/ w 180.0)))
(defun bia (w) (/ (* 180.0 w) pi))
Helli
Heinz Schmirl
Peter Hellinger schrieb in Nachricht <77e8d6$v8u$2...@thetenth.astat.de>...
>
>Peter Hellinger <ma...@helli.de> schrieb in Nachricht
>77e4sj$tdm$1...@thetenth.astat.de...///
>>Probiers mal damit. Nach dem Laden steht der Befehl WINKEL über die
>>Tastatur zur Verfügung. Man kann einen Winkel direkt eingeben oder das
>>Fadenkreuz direkt an einem Objekt ausrichten.
Hallo zusammen,
nachdem ich am Wochenede meine ersten Gehversuche mit Lisp erfolgreich
absolviert habe, werd ich mir die Routinen von Peter natürlich noch näher
betrachten.
Trotzdem scheint es sinnvoll, zwischendurch auch einmal auf eine einfache
Lösungsmöglichkeit aufmerksam zu machen:
Die acad.pgp mit einem Editor öffnen und ans Ende der Auflistung gehen.
Dort den Eintrag SN, *SNAPANG vornehmen (Format wie in der Datei
enthalten),
Sichern und die pgp schließen.
(Für weniger Routinierte: erst die acad.pgp sichern)
Nach Neustart oder Neuinit der pgp steht der Kurzbefehl sn zur Verfügung:
Tastatur: sn; und Klick und Klick ......schon weist das Fadenkreuz in die
gezeigte Richtchtung (";" steht für Eingabetaste)
Mit sn;0; ist die Ausgangsrichtung wieder hergestellt (0 = null)
Das ganze könnte auch noch in einem eigenen Werkzeugkasten untergebracht
werden:
^C^Cofang;näc;snapang;\\ofang;kei; oder ' statt ^C^C wenn der Befehl
transparent sein soll. Auf das zweite Icon wird dann ^C^Csnapang;0; gelegt.
Für die beiden Klicks steht der Objaktfang "nachster Punkt" zur Verfügung.
Wenn man mit ständig aktivem Ofang arbeitet, müßte man sich eine geegnete
Variante überlegen.
Könnte möglicherweise sinnvoll sein, für den Einsazt von snapang dem
Winkelmaß in den Voreinstellungen (Einheiten) mehr als 0 Dezimalstellen zu
geben. (Müßte man ausprobieren).
Grüße,
Heinz
Karin Schlosser
>Die acad.pgp mit einem Editor öffnen und ans Ende der Auflistung gehen.
>Dort den Eintrag SN, *SNAPANG vornehmen (Format wie in der Datei
>enthalten),
>Sichern und die pgp schließen.
Hallo,
klasse, genauso hab ich mir das vorgestellt.
Hab die gleich mit dem Command Alias Editor auprobiert (geht doch
etwas schneller als mit dem Editor, und man muss Acad nicht neu
starten etc. Den gleichen Befehl mit 0 bestaetigt, bringt das
Fadenkreuz wieder gerade, super!
Mit Lisp hab ich noch wenig Erfahrung, werde die aber demnaechst auch
mal testen.. Danke an alle!
Gruesse, Karin