CAD FÓRUM - TIPY A TRIKY | UTILITY | DISKUZE | BLOKY | PODPORA | POMOC A RADY
Děkujeme za účast na konferenci CADfórum 2025 - podívejte se na reportáž
Přes 120.000 registrovaných u nás, celkem 1.105.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků.
Vyzkoušejte nový přesný Inženýrský kalkulátor a
proměnné prostředí AutoCADu.
AUTOCAD
INVENTOR
REVIT
CIVIL 3D
FUSION
Diskuzní fórum, poradna
?CAD diskuze, rady, výměna zkušeností
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, 3ds Max, Vault a s dalšími CAD/BIM/PDM 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
|
Posun entity o přesnou hodnotu
Odpovědět 
|
archiv |
| Autor | |
Radim Cech 
TOP uživatel 
Přihlášen: 01.říj.2004 Lokalita: ČR (MS) Používám: Autodesk Civil 2020 Stav: Offline Bodů: 848 |
 Téma: Posun entity o přesnou hodnotuZasláno: 30.čer.2008 v 09:07 |
|
Dobrý den, obracím se na znalé LISPu s prosbou o drobnou pomoc. Při popisování příčných řezů jsou dvě výškové kóty nad sebou a překrývají se, musím vždy jednu posunout o 0.15 jednotek vlevo nebo vpravo podle polohy u obrubníku. Asi lze vytvořit nalou aplikaci, která by v sobě měla pevně danou vzálenost 0.15, zeptala se jen na entitu a ukázáním směru od vybrané entity by se provedlo posunutí.
Je mi někdo ochoten něco takového vyrobit?
Předem děkuji za pomoc.
|
|
|
R.C.
OSTRAVA |
|
 |
|
|
chlebovsky
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Zasloužilý člen 
Přihlášen: 18.čer.2007 Lokalita: ČR (JM) Používám: Autocad R9 - 2022 Stav: Offline Bodů: 112 |
Zasláno: 30.čer.2008 v 13:20 |
|
(defun c:pos-p ( / os en)
;;; nejprve nactu osmode
(setq os (getvar "osmode"))
(setvar "osmode" 0)
;;; provedu výběr entit
(setq en (ssget ()))
;;; posunu doprava
(command "_move" en "" (list 0.0 0.0 0.0)(list 0.15 0.0 0.0))
;;; nastavím zpátky osmode
(setvar "osmode" os)
)
(defun c:pos-l ( / os en)
;;; nejprve nactu osmode
(setq os (getvar "osmode"))
(setvar "osmode" 0)
;;; provedu výběr entit
(setq en (ssget ()))
;;; posunu doprava
(command "_move" en "" (list 0.0 0.0 0.0)(list -0.15 0.0 0.0))
;;; nastavím zpátky osmode
(setvar "osmode" os)
)
spouští se to pos-l nebo pos-p |
|
|
Ing. Martin Chlebovský
www.kde-je-auto.cz GPS monitoring provozu vozidel a osob. WebDeveloper. Programátor aplikací pro Autocad a MS Office. Tvorba WWW aplikací. Modelování domů a staveb.&l |
|
|
|
Možnosti tématuPro technickou podporu CAD
kontaktujte Helpdesk
|
Odpovědět
|
|
| Přejít na fórum | Oprávnění fóra Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 0,348 sekund.
CADfórum
Tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion, Forma, Vault, PowerMill a další Autodesk aplikace (support firmy ARKANCE). Viz O portálu.
Copyright © 2025 | Web reklama na tomto serveru | Ochrana soukromí, podmínky
