CAD Fórum : Ukončení lisp programu https://www.cadforum.cz/forum/ Sun, 14 Jun 2026 00:45:14 +0000 Fri, 15 Jan 2010 10:13:47 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=10171 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[Ukončení lisp programu : Dobehnuti lispu a ukonceni funkce...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=10171&PID=50283&title=ukonceni-lisp-programu#50283 Autor: alfred
Předmět: 10171
Zasláno: 15.led.2010 v 10:13

Dobehnuti lispu a ukonceni funkce i v pripade chyby (napriklad navrat zmenenych hodnot systemovych promennych apod.) se resi pomoci funkce
*error*. V zakladnim zneni v napovede je:

(defun *error* (msg)
 (princ "error: ")
 (princ msg)
 (princ)
)

Doporucuji si napovedu prostudovat a nebo cerpat z rucnych jinych utilit.



Upravil alfred - 15.led.2010 v 10:14]]> Fri, 15 Jan 2010 10:13:47 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=10171&PID=50283&title=ukonceni-lisp-programu#50283 <![CDATA[Ukončení lisp programu : Jednodušší bude: (tblsearch...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=10171&PID=50275&title=ukonceni-lisp-programu#50275 Autor: Vladimír Michl
Předmět: 10171
Zasláno: 15.led.2010 v 09:32

Jednodušší bude:
(tblsearch "LAYER" "hladina2")
]]> Fri, 15 Jan 2010 09:32:02 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=10171&PID=50275&title=ukonceni-lisp-programu#50275 <![CDATA[Ukončení lisp programu : Dobrý den, mám tento problém,...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=10171&PID=50266&title=ukonceni-lisp-programu#50266 Autor: zchmela
Předmět: 10171
Zasláno: 15.led.2010 v 09:06

Dobrý den, mám tento problém, potřebuji testovat, zda-li je ve výkresu přítomna jistá hladina, napsal jsem si jednoduchý lisp program, pokud ve výkresu není daná hladina, tak se lisp program náhle ukončí, aniž by doběhl dokonce.

(defun C:LAQ()
( command "clayer" "hladina" "")
(if (= (getvar "clayer") "hladina")
( command "_-layer" "D" "hladina2" "" ""))

.......
)

Nelze nějak ošetřit, aby program doběhl za každé situace. 

]]> Fri, 15 Jan 2010 09:06:18 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=10171&PID=50266&title=ukonceni-lisp-programu#50266