ARKANCE - globální Platinum partner Autodesk ARKANCE | KONTAKT - CZ | SK | EN | DE
Přes 123.000 registrovaných u nás, celkem 1.130.000 registrovaných (CZ+EN). Tipy pro AutoCAD 2027, pro Inventor 2027 a pro Revit 2027. Nový Kalkulátor nosníků, Spirograf generátor a Regresní křivky v sekci Převodníky. Kompletní příkazy a proměnné AutoCADu 2027.
Be.Smart Connector - ACC-Bluebeam
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

?
CAD 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, 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 emea.support.arkance.world
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenozadání bodu
 Odpovědět Odpovědět archiv
Autor
  Najít Téma Najít Téma  Možnosti tématu Možnosti tématu
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1676
 Přímý odkaz na tuto zprávu Téma: zadání bodu
    Zasláno: 22.pro.2008 v 17:15
Ano, máte pravdu. V MAPu 2006 se v příkazu BOD (_POINT) zadá jeden bod a příkaz končí, nemusí se entrovat prázdné zadání a tudíž ta dvojce uvozovek je zbytečná.
Nezkoušel jsem to před napsáním příspěvku a už si ani nepamatuji v jaké verzi to takhle fungovalo a jestli jsem se prostě nespletl... Embarrassed
Zpět nahoru
chlebovsky Zobrazit panel
Zasloužilý člen
Zasloužilý člen
Avatar

Přihlášen: 18.čer.2007
Lokalita: ČR (JM)
Používám:
Autocad R9 - 2022
Stav: Offline
Bodů: 112
 Přímý odkaz na tuto zprávu Zasláno: 22.pro.2008 v 10:09
Pokud se jedná o křivku tak bych to řešil takto :
(defun c:kkk (/)
  (setq pocet 601)
  (setq ent (list (cons 0 "LWPOLYLINE")
    (cons 100 "AcDbEntity")
    (cons 67 0)
    (cons 410 "Model")
    (cons 8 "0")
    (cons 100 "AcDbPolyline")
    (cons 90  pocet)
    (cons 70 0)
    (cons 43 0.0)
    (cons 38 0.0)
    (cons 39 0.0)))
  (while (> pocet 0)
    (setq x (* 0.01 (- pocet 601)))
    (setq y (* 2 pocet))
    (setq ent (append ent (list (cons 10 (list x y 0.0)))))
    (setq ent (append ent (list (cons 40 0.0))))
    (setq ent (append ent (list (cons 41 0.0))))
    (setq ent (append ent (list (cons 42 0.0))))
    (setq pocet (- pocet 1))
  )
  (setq ent (append ent (list (cons 210 (list 0.0 0.0 1.0)))))
  (entmakex ent)
)
 
Jinak s těma uvozovkama to ale není tak úplně pravda. Záleží na verzi cadu, jestli se jedná o samotný dod, či multibod.
To ale otestujete tak že prostě napíšete :
a) (command "_point" (list x y)) a příkaz skončí
nebo
b) (command "_point" (list x y)) a příkaz bude chtít zadávat další bod, pak budete muset ty uvozovky napsat.


 
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
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1676
 Přímý odkaz na tuto zprávu Zasláno: 21.pro.2008 v 22:32
bod musí být ve formátu LIST.
(list x y z)
např. bod X,Y,Z=1,2,3  je :
(list 1 2 3)
jde to zadat i takhle:
'(1 2 3)

Pokud Vám to nepůjde zkuste se podívat jaký formát vrací funkce (getpoint)

Ve Vašem případě to bude :
(command "_point" (list x y) "")

PZN: ty koncové uvozovky "" jsou protože při příkazu _POINT je potřeba odentrovat pro ukončení příkazu
Zpět nahoru
zchmela Zobrazit panel
Diskutér
Diskutér

Přihlášen: 11.kvě.2007
Lokalita: ČR (Pha)
Používám:
adt 2007, max 3ds
Stav: Offline
Bodů: 31
 Přímý odkaz na tuto zprávu Zasláno: 21.pro.2008 v 21:51
Dobrý den potřeboval bych poradit s jednoduchým prográmkem v lispu na kreslení křivky určené body x,y :
 
  (setq pocet 601)
  (while (> pocet 0)
    (setq x (* 0.01 (- pocet 601)))
    (setq y (* 2 pocet))
    (command "_point" x y)  ----- zde nevím jak zadat správnou syntaxi !!!
    (setq pocet (- pocet 1))
  )
Díky za radu
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 3660:Jak uchopit bod ležící uprostřed mezi dvěma body?
Tip 6745:Jak měnit měřítko objektu vkládaného ze schránky (ctrl+v)?
Tip 14920:Zadávání bodů geodetickou souřadnicí Lat,Long namísto X,Y
Tip 11622:Nefunguje mi odměřování v AutoCADu resp. v DWG TrueView.
Tip 9054:Volba typu 3D pohledu v Revitu - perspektivní, ortografický
Tip 12404:Jak získat střed skupiny vybraných objektů.


 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,289 sekund.
CADfórum
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 © 2026 | Web reklama na tomto serveru | Ochrana soukromí, podmínky
ARKANCE (CAD Studio) - Autodesk Platinum Partner & Training Center & Services Partner
KONTAKT:
webmaster.cz@arkance.world | tel. +420 910 970 111
FB LN TW YT TW Blog RSS
.
TOPlist
img