CAD Fórum : Nahradit (command) za (command-s) https://www.cadforum.cz/forum/ Thu, 14 May 2026 12:10:22 +0000 Wed, 10 Sep 2014 21:15:51 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=19884 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[Nahradit (command) za (command-s) : Vladimír Michl napsal(a):Ale...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88292&title=nahradit-command-za-commands#88292 Autor: zdrk
Předmět: 19884
Zasláno: 10.zář.2014 v 21:15

Původně odeslal(a) Vladimír Michl Vladimír Michl napsal(a):


Ale tenhle LISP můžete používat i nadále. Sám o sobě funguje i ve verzi 2015 (ověřeno). To proč vám hlásí onu chybu, je způsobeno kolizí s nějakou jinou aplikací (resp. jejím "errorhandlerem").


Začarovaný kruh s povým PC opět.
Na určité věci používám raději holý cad než ACA. Snažil jsem se mít vše jako v původním cadu 2009, kde bylo vše OK.
Mam tam přidané GG menu, ST, a par klasických aplikací zde stažených.
Trvale načtené mam Jobtime, ADDV a hodně dávno tady z diskuce stažen lisp pro zobrazení velikosti výkresu ve stavovém řádku. ADDV a velikost je načten přes aktovku. Jobtime přes menu soubor.
Občas se mi zdálo, že když byl v aktovce, tak se po načtení ADDV JobTime nenačetl. Uvedena chyba, ale uz si nepamatuji jaká. Po odendání z aktovky bez problému. Ale v tom asi ta chyba nebude.]]> Wed, 10 Sep 2014 21:15:51 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88292&title=nahradit-command-za-commands#88292 <![CDATA[Nahradit (command) za (command-s) : ;Nemám acad2015, vlastně teď žádný...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88291&title=nahradit-command-za-commands#88291 Autor: johny
Předmět: 19884
Zasláno: 10.zář.2014 v 18:47

;Nemám acad2015, vlastně teď žádný acad k dispozici, tak nevím jestli to pomůže vašemu problému, kód lze zjednodušit s setvar "peditaccept" 1. 

(defun C:Krivspoj ( / ss) ;spoj "krivky" s mezerou do 2
  (setq ss (ssget (list '(0 . "LWPOLYLINE,ARC,LINE"))))  
  (setvar "PEDITACCEPT" 1)
  (command "_pedit" "_m" ss "" "_j" "_j" "_e" "2." "")
  (princ)
)
]]> Wed, 10 Sep 2014 18:47:38 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88291&title=nahradit-command-za-commands#88291 <![CDATA[Nahradit (command) za (command-s) : Ale tenhle LISP můžete používat...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88289&title=nahradit-command-za-commands#88289 Autor: Vladimír Michl
Předmět: 19884
Zasláno: 10.zář.2014 v 18:05

Ale tenhle LISP můžete používat i nadále. Sám o sobě funguje i ve verzi 2015 (ověřeno). To proč vám hlásí onu chybu, je způsobeno kolizí s nějakou jinou aplikací (resp. jejím "errorhandlerem").]]> Wed, 10 Sep 2014 18:05:25 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88289&title=nahradit-command-za-commands#88289 <![CDATA[Nahradit (command) za (command-s) : Klasické zlepšení k horšímu.Když...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88288&title=nahradit-command-za-commands#88288 Autor: zdrk
Předmět: 19884
Zasláno: 10.zář.2014 v 16:26

Klasické zlepšení k horšímu.
Když to v tom lispu zaměním, píše to pořád stejnou chybu.
Tady u toho lispu mi vyhovovalo, že jsem mohl vybrat cokoliv, kdekoliv a on spojil vše co mohl.
U příkazu SPOJ mi to tak úplně nedaří. Snad si časem zvyknu, nebo budu používat jiný list z GG menu.

Upravil zdrk - 10.zář.2014 v 16:29]]> Wed, 10 Sep 2014 16:26:10 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88288&title=nahradit-command-za-commands#88288 <![CDATA[Nahradit (command) za (command-s) : Vladimír Michl napsal(a):Nicméně...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88287&title=nahradit-command-za-commands#88287 Autor: johny
Předmět: 19884
Zasláno: 10.zář.2014 v 16:21

Původně odeslal(a) Vladimír Michl Vladimír Michl napsal(a):

Nicméně nedělá ta aplikace totéž co příkaz SPOJ?

:) 
Taky jsem měl svůj lisp, s přechodem na vyšší verzi přestal trochu fungovat, tak jsem vzal na milost _join, který tehda "signifikantně" vylepšili.. Mno, ten příkaz opravdu vylepšili.. ale pořád bych řekl, že ten lisp býval spolehlivější, ikdyž už né tak výrazně... takže jsem asi trochu rezignovaně zůstal u _join.
]]> Wed, 10 Sep 2014 16:21:34 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88287&title=nahradit-command-za-commands#88287 <![CDATA[Nahradit (command) za (command-s) : Možná dělá, ale ne úplně podle...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88286&title=nahradit-command-za-commands#88286 Autor: zdrk
Předmět: 19884
Zasláno: 10.zář.2014 v 16:14

Možná dělá, ale ne úplně podle představ.
Něco mi na SPOJ vadí, ale teď si nevzpomenu co.]]> Wed, 10 Sep 2014 16:14:56 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88286&title=nahradit-command-za-commands#88286 <![CDATA[Nahradit (command) za (command-s) : Pokud to vadí, tak raději všechny....]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88280&title=nahradit-command-za-commands#88280 Autor: Vladimír Michl
Předmět: 19884
Zasláno: 10.zář.2014 v 13:24

Pokud to vadí, tak raději všechny. Nicméně nedělá ta aplikace totéž co příkaz SPOJ?]]> Wed, 10 Sep 2014 13:24:18 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88280&title=nahradit-command-za-commands#88280 <![CDATA[Nahradit (command) za (command-s) : Používám tento lisp ma spojování...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88276&title=nahradit-command-za-commands#88276 Autor: zdrk
Předmět: 19884
Zasláno: 10.zář.2014 v 11:03

Používám tento lisp ma spojování do křivek

(defun C:Krivspoj( / ss index n Ano tepent) ;spoj "krivky" s mezerou do 2
(command "_select" pause)
(setq ss (ssget "_p"))
    (setq index 0
   n (sslength ss))
    (repeat n
      (setq typent (cdr (assoc 0 (entget (ssname ss index)))))
       (if (or (equal typent "LINE") (equal typent "ARC"))
(setq Ano T))
       (setq index (+ 1 index)))

(command "_pedit" "_m" "_p" "")
(if Ano (command "_y")) ;Kdyz je cara nebo oblouk
(command "_j" "_j" "_e" "2.00" "")
(princ)
)

Vypisuje tuto chybu:
Chyba: Neznámé selhání příkazů (command-s)
Nelze vyvolat (command) z *chyba* bez předchozí volání (*push-error-using-command*).
Doporučuje se převést volání příkazu (command) na (command-s).

Který nahradit nebo všechny. Zkoušek už jsem skoro vše, ale výpis je pořád stejný.]]> Wed, 10 Sep 2014 11:03:29 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=19884&PID=88276&title=nahradit-command-za-commands#88276