Vytisknout stránku | Zavřít okno

Skript SCR

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: AutoCAD
Popis fóra: Otázky kolem aplikací AutoCAD a AutoCAD LT, AutoCAD web, prohlížečů, DWG a DXF, Design Review, Navisworks, nadstavby, Drive a cloud Autodesk
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=1086
Datum vytištění: 30.čvc.2026 v 00:17


Téma: Skript SCR
Odeslal: PepaR
Předmět: Skript SCR
Datum odeslání: 11.čvc.2005 v 12:52
Dobrý den, možná primitvní dotaz, zkouším skripty poprvé a tak ybch potřeboval radu. Potřebuji pomocí skriptu vybrat všechny entity, změnit hladinu na 0 a barvu na DleBlok. Dále bych potřeboval aby byla aplikováno čištění filtrů hladin příkazem deletefilters (nástroj od CAD Studia), nicméně nevím jak to do skriptu zakomponovat, konkrí¨átně u vymazání filtru haldin je nutné az příkazem deletefilters umístit mezerník. V manuálu se píše, že mezerník se nahrazuje mezerou nebo novým řádkem, ale to v praxi nefunguje.
 
Skript (který nefunguije tak jak má :): http://www.cadforum.cz/forum/uploads/PepaR/2005-07-11_125239_skript.zip - 2005-07-11_125239_skript.zip


Odpovědi:
Odeslal: Pajas
Datum odeslání: 11.čvc.2005 v 16:34

Zkuste tohle:

^C^C_ai_selall;_CHANGE;_P;_COLOR;_BYLAYER;_LW;_BYLAYER;;_-LA YER;_S;0;;_-PURGE;_A;*;_N;

Odeslal: PepaR
Datum odeslání: 13.čvc.2005 v 07:00
No jo, ale tohle nelze aplikovat na více výkresových souborů najednou...

Odeslal: Seiner
Datum odeslání: 13.čvc.2005 v 07:24

IMHO by mohlo stačit za tím DELETEFILTERS dát enter 2x ("vynechaná řádka"). S jistou nepravidelností v chování mezera/enter(přechod_na_novou_radku) jsem se ve scriptech take potýkal. Některe příkazy stráví mezeru, ale některé musí mít "návrat vozíku". V generátoru scriptů to řeším tak, že zadávám místo všech enterů středník a ten v programu změním na VBNewLine.

Pozn. Nepravidelnost je jen zdánlivá. Tam, kde má příkaz vstup nějakého textu, musí být enter, jinde stačí mezera. Ladění scriptů je někdy poněkud pracné - proto si odladěné skripty schovávám a v generátoru je uživatelé vybírají podle popisu.Např:

(command "_SAVEAS" "R12" (strcat (getvar "DWGPREFIX")(SUBSTR (GETVAR "dwgname") 1(-(strlen(getvar "dwgname"))4))"_12.dwg"))#Uložení ve verzi A12

-PLOT A MODEL PDFCREATOR;A3;m K N Z M;C;A OCE.ctb;N;N;N;N;A;(DELAY 60)#Tisk: A3,PDF


Vytisknout stránku | Zavřít okno