Diskuzní fórum, poradna

archiv

   Dobrý den, jelikož programuji v Lispu jen ojediněle, obracím se na vás s touto prosbou. Dělám prográmek obsahující výběrový filtr a potřeboval bych poradit, jakým způsobem lze provést následující.

(setq a_sez) má hodnotu (8 . "TEXT")

(setq b_sez) má hodnotu (62 . 256)

(setq c_sez) má hodnotu (7 . "Isocp")

(setq d_sez) má hodnotu (40 . 3.5)

dále by mohlo následovat

(ssget (list a_sez b_sez c_sez d_sez)) má hodnotu

(ssget ((8 . "TEXT") (62 . 256) (7 . "Isocp") (40 . 3.5)) a bude fungovat

Já ale potřebuji dosáhnout dotatečného doplnění nebo jiného obsahu v seznamu. Jednotlivé hodnoty proměnných jsou závislé na vybrání v dialogovém panelu. Takže může dojít k následujícímu

(setq a_sez) má hodnotu (8 . "TEXT")

(setq b_sez) má hodnotu (62 . 256)

(setq c_sez) má hodnotu (7 . "Isocp")

(setq d_sez) má hodnotu nil (nebyla vybrána)

a v takovém případě 

(ssget ((8 . "TEXT") (62 . 256) (7 . "Isocp") nil) samozřejmě končí.

Zatím jsem nebyl schopen dosáhnout postupného přidáváni jednotlivých hodnot do seznamu podle pravdivých hodnot proměnných. 

Pokud by měl někdo radu, předem děkuji.

Autor	Zpráva Najít Téma Možnosti tématu Odpovědět Vytvořit nové téma Verze pro tisk Přeložit Téma
I.Kroutil Profil člena Odeslat soukromou zprávu Najít příspěvky člena Přidat do seznamu známých Nováček Přihlášen: 13.říj.2004 Stav: Offline Bodů: 14	Téma: AutoLisp Zasláno: 07.pro.2006 v 11:37
	Dobrý den, jelikož programuji v Lispu jen ojediněle, obracím se na vás s touto prosbou. Dělám prográmek obsahující výběrový filtr a potřeboval bych poradit, jakým způsobem lze provést následující. (setq a_sez) má hodnotu (8 . "TEXT") (setq b_sez) má hodnotu (62 . 256) (setq c_sez) má hodnotu (7 . "Isocp") (setq d_sez) má hodnotu (40 . 3.5) dále by mohlo následovat (ssget (list a_sez b_sez c_sez d_sez)) má hodnotu (ssget ((8 . "TEXT") (62 . 256) (7 . "Isocp") (40 . 3.5)) a bude fungovat Já ale potřebuji dosáhnout dotatečného doplnění nebo jiného obsahu v seznamu. Jednotlivé hodnoty proměnných jsou závislé na vybrání v dialogovém panelu. Takže může dojít k následujícímu (setq a_sez) má hodnotu (8 . "TEXT") (setq b_sez) má hodnotu (62 . 256) (setq c_sez) má hodnotu (7 . "Isocp") (setq d_sez) má hodnotu nil (nebyla vybrána) a v takovém případě (ssget ((8 . "TEXT") (62 . 256) (7 . "Isocp") nil) samozřejmě končí. Zatím jsem nebyl schopen dosáhnout postupného přidáváni jednotlivých hodnot do seznamu podle pravdivých hodnot proměnných. Pokud by měl někdo radu, předem děkuji.

pavelstyl Profil člena Odeslat soukromou zprávu Najít příspěvky člena Přidat do seznamu známých Zasloužilý člen Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2025, SolidEdgeE 2025 Stav: Offline Bodů: 229	Zasláno: 07.pro.2006 v 13:13
	Pisi z hlavy: (setq seznam nil) (if a_sez (setq seznam (append (seznam (list a_sez))))) (if b_sez (setq seznam (append (seznam (list b_sez))))) (if c_sez (setq seznam (append (seznam (list c_sez))))) ... ... (ssget seznam) Pavel Styl

I.Kroutil Profil člena Odeslat soukromou zprávu Najít příspěvky člena Přidat do seznamu známých Nováček Přihlášen: 13.říj.2004 Stav: Offline Bodů: 14	Zasláno: 07.pro.2006 v 14:17
	Ano, to je ono. Po menší úpravě dle vašeho návrhu mohu zvolat heuréka. Děkuji, moc jste mi pomohl. S pozdravem I.Kroutil

Příbuzné CAD tipy:
Tip 7307:		Jak vložit obrázek AutoLISP makrem?
Tip 10455:		Jak v AutoCADu nakreslit obdélník zadaný středem?
Tip 9995:		AutoCAD 2015 vypisuje chybu "VVC: internal error"
Tip 2523:		Jak vyvolat dialogovou verzi příkazu z makra?
Tip 1671:		Nevýznamné desetinné nuly se nezobrazí funkcí (rtos).
Tip 1364:		Jak zakódovat LSP program aby jej nebylo možné editovat?

Diskuzní fórum, poradna

?CAD diskuze, rady, výměna zkušeností

AutoLisp

?
CAD diskuze, rady, výměna zkušeností