Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk - od firmy Arkance Systems [www.cadforum.cz]
CZ | SK | EN | DE
Přihlášení
či registrace
   právě nás čte: 6417 
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

 

NápovědaCAD diskuze, rady, výměna zkušeností

 
CAD Fórum - Homepage Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi. Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy ARKANCE (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.arkance-systems.cz
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Chytrá severka

 Odpovědět Odpovědět archiv
Autor
martinhainc Zobrazit panel
Nováček
Nováček

Přihlášen: 25.led.2024
Lokalita: Czech Republic
Používám:
AutoCadLT2023, Revit21, Revit24, Civil3D2023
Stav: Offline
Bodů: 2
Možnosti příspěvku Možnosti příspěvku   Poděkování (0) Poděkování0   Citace martinhainc Citace  OdpovědětOdpověď Přímý odkaz na tuto zprávu Téma: Chytrá severka
    Zasláno: 25.led.2024 v 13:52
Ahoj!
zpracovávám aktuálně velké množství situačních výkresů a chtěl bych vědět, zda je možnost vytvořit třeba blok, který se bude samostatně orientovat na základě úhlu otočení modelu v rozvržení.
Chtěl bych tedy "chytrou severku", kterou bych mohl umístit do Legendy a nemusel v průběhu práce kontrolovat zda je orientována správně.

Děkuji,
MH
Zpět nahoru
johny Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 24.led.2006
Lokalita: ČR (JM)
Používám:
C3D 2022
Stav: Offline
Bodů: 1696
Možnosti příspěvku Možnosti příspěvku   Poděkování (0) Poděkování0   Citace johny Citace  OdpovědětOdpověď Přímý odkaz na tuto zprávu Zasláno: 26.led.2024 v 13:52
Pokud budete držet trochu nějaký systém, tak můžete mít takovou řekněme chytře se tvářící hloupou severku.
Ten systém. V každém rozvržení budete mít jeden blok jménem ChytraSeverka a jeden výřez v hladině VYREZ-CHS. No a pak spustíte příkaz ChytraSeverka, který vám je v celým výkrese je ponatáčí.

(vl-load-com)

(defun c:ChytraSeverka ( / v b)

  (if (and (setq v (ssget "_x" '((0 . "VIEWPORT") (8 . "VYREZ-CHS"))))     ; jméno hladiny výřezu
   (setq b (ssget "_x" '((0 . "INSERT")   (2 . "ChytraSeverka")))) ; jméno bloku
   (setq v (mapcar '(lambda (e) (cons (cdr (assoc 410 (entget e))) e)) (mapcar 'cadr (ssnamex v))))
   (setq b (mapcar '(lambda (e) (cons (cdr (assoc 410 (entget e))) e)) (mapcar 'cadr (ssnamex b))))
   )
    (foreach e b (if (setq i (cdr (assoc (car e) v))) (setpropertyvalue (cdr e) "Rotation" (getpropertyvalue i "TwistAngle")))))
  (princ)
  )



Upravil johny - 26.led.2024 v 14:17
Zpět nahoru
PepaR Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 29.lis.2004
Lokalita: ČR (ZL)
Používám:
ruky a hlavu (občas ;)
Stav: Offline
Bodů: 6189
Možnosti příspěvku Možnosti příspěvku   Poděkování (0) Poděkování0   Citace PepaR Citace  OdpovědětOdpověď Přímý odkaz na tuto zprávu Zasláno: 27.led.2024 v 10:04
Praktický požadavek, díky johny za tip na lsp. Přemýšlím jen, zdali by byla možná i cesta integrovat přímo do dynamického bloku na základě provázání hodnoty v poli, parametru a následné akci.
Zpět nahoru
Jílková Zobrazit panel
Diskutér
Diskutér

Přihlášen: 28.zář.2019
Lokalita: ČR (PA)
Používám:
AutoCAD 2016
Stav: Offline
Bodů: 40
Možnosti příspěvku Možnosti příspěvku   Poděkování (0) Poděkování0   Citace Jílková Citace  OdpovědětOdpověď Přímý odkaz na tuto zprávu Zasláno: 27.led.2024 v 10:56
V Mapu nebo Civilu je funkce severky s automatickým natočením. Ale tak jak to popisujete, stačí dát severku do modelu a bude správně otočená i v natočených rozvrženích, nebo ne?
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 10492:Proč je někdy severka pootočená?
Tip 8907:Pootočená severka.
Tip 10417:Jak opravit rozsáhlé 3D modely před 3D tiskem?
Tip 10058:Jak prohlížet na mobilu DWG/DXF přílohy e-mailů?
Tip 9858:Zobrazení DWG včetně aktuální GPS polohy na mobilním telefonu nebo tabletu.
Tip 6073:DWFx - prohlížení CAD dat bez prohlížeče.


 Odpovědět Odpovědět

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 0,641 sekund.