AutoLisp 2014
Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: CAD programování
Popis fóra: Otázky programování - nadstavby a utility pro CAD a GIS aplikace Autodesk (VBA, AutoLISP, ARX/C++, .Net, JavaScript, Python, MEL...)
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=17491
Datum vytištění: 15.kvě.2026 v 02:07
Téma: AutoLisp 2014
Odeslal: Kamil Hronovský
Předmět: AutoLisp 2014
Datum odeslání: 11.čvc.2013 v 15:32
Zdravím,
je nějaký rozdíl v funkčnosti lispu mezi 2013 a 2014?
mám takovýhle prográmek, který čísluje body - nakreslí kružnici a osadí blok s číslem které se inkrementálně zvyšuje o 1.
Ve verzi 2014 ale nečísluje - vyskočí tabulka "Zadejte atributy" a atribut je přednastaven vždy na 1.
;*
; PRIKAZ "vykot" VYPISUJE CISLO BODU DO KROUZKU
; vhodne pro posloupnost cislovani napr: vytycovaciho schematu
;___________________________________________________________________________
;**
(defun c:vykot ()
(setvar "cmdecho" 0) (setvar "expert" 2)
;****** meritko ********************************************
(setq meritko (getreal "\nZadej meritko pro vykresleni vykresu - 1:<100> : "))
(if (= meritko nil) (setq meritko 100.0))
(setq nasobek (* meritko 1))
;****** reseni **********************************************************
(setq cislo (getint "\nCISLOVANI OD : "))
(setq natoc(getreal "\nNATOCENI TEXTU:"))
(setq r (* nasobek 0.5))
(while (setq bod (getpoint "\nBod popisu do krouzku : "))
(command "_circle" bod r)
(command "_insert" "cislo" pause nasobek nasobek natoc cislo)
(setq cislo (+ cislo 1))
)
(setvar "cmdecho" 1) (setvar "expert" 1)
)
díky za pomoc
|
Odpovědi:
Odeslal: alfred
Datum odeslání: 11.čvc.2013 v 16:32
Dialog pro zadání hodnot atributů při vložení bloku?
Není špatně nastavena proměnná [VAR]ATTDIA[/VAR]?
|
Odeslal: Vladimír Michl
Datum odeslání: 11.čvc.2013 v 16:37
V LISPu by být rozdíl neměl - spíš jsou možná jinak nastavené ATTREQ a podobné parametry chování samotného příkazu _-INSERT. Zkuste jej nejprve ručně, jestli se v onom výkresu neptá na něco dalšího.
-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
|
Odeslal: Kamil Hronovský
Datum odeslání: 11.čvc.2013 v 16:53
Problém byl s proměnnou ATTDIA - po změně na 0, pracuje jak má.
|
|