- Diablo IV
- World of Tanks - MMO
- Genshin Impact (PC, PS4, Android, iOS)
- Előzetes élménybeszámolókon a Black Myth: Wukong
- Xbox Series X|S
- PlayStation 5
- Forza sorozat (Horizon/Motorsport)
- EA Sports WRC '23
- The Division 2 (PC, XO, PS4)
- Fortnite - Battle Royale & Save the World (PC, XO, PS4, Switch, Mobil)
Új hozzászólás Aktív témák
-
lúzer
veterán
válasz
stupid user #1200 üzenetére
hát ha lesz időm átgondolom
nem olyan egyszerűMO. RIP. - az utolsó kapcsolja le a villanyt.
-
lúzer
veterán
válasz
stupid user #1200 üzenetére
kell egy olyan blokk amiben van egy sorszam nevű attribútum
parancs neve: BLC
kiválasztod a blokkot, aztán a koordinátát, majd beilleszted ahova kell
ahány azonos nevű blokk van, azt a sorszámot kapja
hibakezelés nincs, blokkot kell kiválasztani, 1 db-ot, sorszam attribútummal
vágólapot használja
kilépés ESCezt egy *.lsp fájlba és _appload-al betölteni
(defun C:BLC()
(setq rajzelem(CAR (ENTSEL)))
(command "_copybase" pause rajzelem "")
(while T (command "_pasteclip")(command pause)
(setq BL (entget (entlast) ))
(setq blokknevem (cdr(assoc 2 (entget rajzelem) ) ))
(setq sorsz (itoa (sslength (ssget "_X" (list (cons 0 "INSERT")(cons 2 blokknevem))))))
(setq BL (entget(entlast)))
(setq BN (entnext (cdr (car BL))))
(if BN (progn (setq ATT (entget BN))
(while (= "ATTRIB" (cdr (assoc 0 ATT)))
(setq ATTNÉV (cdr (assoc 2 ATT)))
(setq lista (entget (CDR(assoc -1 ATT))))
(setq regiattassoc (assoc 1 ATT))
(setq attszoveg (CDR(assoc 1 ATT)))
(setq ujattassoc (cons 1 sorsz))
(setq lista (subst ujattassoc regiattassoc lista))
(entmod lista) (entupd(CDR(assoc -1 ATT)))
(setq BN (entnext BN))(setq ATT (entget BN))
))))(princ))[ Szerkesztve ]
MO. RIP. - az utolsó kapcsolja le a villanyt.
Új hozzászólás Aktív témák
- A fociról könnyedén, egy baráti társaságban
- Vezetékes FEJhallgatók
- Skoda, VW, Audi, Seat topik
- CURVE - "All your cards in one." Minden bankkártyád egyben.
- Kerékpárosok, bringások ide!
- Csúcskategóriás PCIe 5-ös SSD-k a Gigabyte-tól
- Hobby elektronika
- Sony Xperia 1 V - kizárólag igényeseknek
- Politika
- Tőzsde és gazdaság
- További aktív témák...