https://www.cadforum.cz/forum/ Wed, 13 May 2026 13:55:30 +0000 Thu, 18 Oct 2012 21:25:19 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=15885 https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73230&title=zacatecnicky-problem-s-lispem#73230 Autor: stejsi
Předmět: 15885
Zasláno: 18.říj.2012 v 21:25

Ano bylo to tím,
mockrát děkuji, to by mě nenapadlo. Také děkuji za ostatní rady, už je píši do kódu.
]]> Thu, 18 Oct 2012 21:25:19 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73230&title=zacatecnicky-problem-s-lispem#73230 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73207&title=zacatecnicky-problem-s-lispem#73207 Autor: alfred
Předmět: 15885
Zasláno: 18.říj.2012 v 06:36

Kouknul jsem na kod LSP a je to tak jak píšu v předchozím příspěvku.
Doplňte si do funkce toto:

;těsně před kreslící fukce:

(setq old-osmode (getvar "osmode"))
(setvar "osmode" 0)

;tady budou řádky s kreslením

;těsně za kreslící funkce:
(setvar "osmode" old-osmode)


Jen připomínám, že je potřeba nezapomínat na funkci *error*.
Zejména pokud přenastavujete nějaké systémové proměnné. Jinak pokud funkce spadne tak Vám zůstane vypntý OSNAP.

Pokud používáte jednoduché názvy pro proměnné, které se mohou opakovat, je dobré je nenechávat jako globální. Může to způsobit neočekávané chování zcela jiných funkcí.
Stačí to vyřešit doplněním proměnných, které namají být do prvního řídku funkce za lomítko:

(defun C:1 ( / X1 X2 X3 X4 K1 K2)




Upravil alfred - 18.říj.2012 v 06:38]]> Thu, 18 Oct 2012 06:36:45 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73207&title=zacatecnicky-problem-s-lispem#73207 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73206&title=zacatecnicky-problem-s-lispem#73206 Autor: alfred
Předmět: 15885
Zasláno: 17.říj.2012 v 22:28

Aniž bych studoval podrobnosti - tipuji na zapnutý režim uchopování.
Zkuste vypnout chytací režim, odzoomovat a spustit...

Pokud to tím bude, tak před "kreslením" v LISPU vypněte [VAR]OSMODE[/VAR].
Pro práci s proměnými jsou příkazy:
(getvar)
(setvar)
]]> Wed, 17 Oct 2012 22:28:09 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73206&title=zacatecnicky-problem-s-lispem#73206 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73205&title=zacatecnicky-problem-s-lispem#73205 Autor: stejsi
Předmět: 15885
Zasláno: 17.říj.2012 v 22:01

Ano má to takto fungovat. To je zajímavé, opravdu mi to kreslí v závislosti na zoomu pouze horizontální úsečky (+ kružnice a šrafy). Respektive to vykreslí i vertikální úsečku, ale pouze jeko bod,tzn parametr u funkce polar pro vzdálenost je roven nule. Nevím čím to bude. A takto to funguje i u dalších úseček tabulky které se tam snažím dokreslit. Když jsem dostatečně blízko tak je to OK.Odzoomuji-li stane se to stejné.]]> Wed, 17 Oct 2012 22:01:46 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73205&title=zacatecnicky-problem-s-lispem#73205 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73204&title=zacatecnicky-problem-s-lispem#73204 Autor: Mantlík
Předmět: 15885
Zasláno: 17.říj.2012 v 21:51

Pokud to má zobrazit 4 rohy, 2 kružnice v LH rohu a v mezikruží šrafa,

pak mně to funguje bez problémů, ať zoomuji, jak chci ...]]> Wed, 17 Oct 2012 21:51:25 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73204&title=zacatecnicky-problem-s-lispem#73204 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73203&title=zacatecnicky-problem-s-lispem#73203 Autor: stejsi
Předmět: 15885
Zasláno: 17.říj.2012 v 21:14

Dobrý den,
začínám s Lispem a vyskytl se mi problém který mne zlobí. Když spustím LISP poprvé (příkazem "1") nakreslí rohové části tabulky bez problému. Když ale odzoomuji a spustím ho znovu vykreslí pouze horizontální úsečky. Neví prosím někdo čím je to způsobeno?
http://uloz.to/xyvYRWt/pokus-1-lsp

]]> Wed, 17 Oct 2012 21:14:01 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=15885&PID=73203&title=zacatecnicky-problem-s-lispem#73203