Souběžné funkce
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=3261
Datum vytištění: 13.kvě.2026 v 09:14
Téma: Souběžné funkce
Odeslal: BenaCZ
Předmět: Souběžné funkce
Datum odeslání: 17.říj.2006 v 08:24
Mohli byste mi prosím poradit, jak udělat lisp, který může běžet souběžně s jinou funkcí? Myslel jsem nějak takto, ale to nefunguje:
;;; Posun jako kolečkem myši, ale pouze 1x
(defun C:'_posunPAN (/
ORM
SNM
)
;;;nastaví orto, krok na 0
(setq ORM (getvar "orthomode"))
(setq SNM (getvar "snapmode"))
(setvar "orthomode" 0)
(setvar "snapmode" 0)
;;;vlastní funkce
(command "'_pan" pause pause)
;;; obnovuje původní orto, krok a USS a uss pak smaže
(setvar "orthomode" ORM)
(setvar "snapmode" SNM)
(princ)
)
Jedná se mi o to, abych mohl posouvat výkresem jako zmáčknutím kolečka na myši, ale na klávesovou zkratku. A aby se ta funkce posunu pak ukončila.
Udělal jsem si na to pouze makro : '_pan ; ale to je blbý v tom, že když mám puštené ORTHO, tak se to posouvá jen kolmo... Díky
-------------
Bena
|
Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 17.říj.2006 v 08:57
Takhle to asi nepůjde - spíš se podívejte na "dočasně přednostní klávesy" v CUI rozhraní.
-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
|
|