Приложение "АВТОГРАФ" для автоматизации процесса формирования графического раздела архитектурно-строительной части проекта, страница 13

[pkolkr(pkb14_7)]^C^C(load (findfile "pbalka.lsp"));ПБАЛКА ПО 1.4 \

[ ВЫХОД]^C^C(setq C:ПБАЛКА nil);

**pkolp

[КОЛОННЫ ПРОМЗДАНИЙ БЕСКРАНОВЫЕ]

[PKOL(c72_12kp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП Б К \7.2 12 \

[PKOL(c72_12cp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП Б С 7.2 12 \

[PKOL(c72_6kp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП Б К \7.2 6 \

[PKOL(c72_6cp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП Б С 7.2 6 \

[ Следующий]$I=pkolp1 $I=*

[ ВЫХОД]^C^C(setq C:ПКОЛП nil);

**pkolp1

[КОЛОННЫ ПРОМЗДАНИЙ КРАНОВЫЕ]

[pkolkr(k84_6kp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП К К \8.4 6 \

[pkolkr(k84_6cp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП К С 8.4 6 \

[pkolkr(k96_6kp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП К К \9.6 6 \

[pkolkr(k96_6cp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП К С 9.6 6 \

[pkolkr(k96_12kp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП К К \9.6 12 \

[pkolkr(k96_12cp)]^C^C(load (findfile "pkolp.lsp"));ПКОЛП К С 9.6 12 \

[ Предыдущий]$I=pkolp $I=*

[ ВЫХОД]^C^C(setq C:ПКОЛП nil);

**pkolr

[КОЛОННЫ ПРОМЗДАНИЙ БЕСКРАНОВЫЕ]

[PKOL(c72_12k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б К \9.6 12 \

[PKOL(c72_12c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б С 9.6 12 \

[PKOL(c72_6k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б К \9.6 12 \

[PKOL(c72_6c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б С 9.6 12 \

[PKOL(c84_12k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б К \9.6 12 \

[PKOL(c84_12c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б С 9.6 12 \

[PKOL(c96_12k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б К \9.6 12 \

[PKOL(c96_12c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР Б С 9.6 12 \

[ Следующий]$I=pkolr1 $I=*

[ ВЫХОД]^C^C(setq C:ПКОЛР nil);

**pkolr1

[КОЛОННЫ ПРОМЗДАНИЙ КРАНОВЫЕ]

[pkolkr(k84_6k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К К \8.4 6 \

[pkolkr(k84_6c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К С 8.4 6 \

[pkolkr(k96_6k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К К \9.6 6 \

[pkolkr(k96_6c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К С 9.6 6 \

[pkolkr(k96_12k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К К \9.6 12 \

[pkolkr(k96_12c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К С 9.6 12 \

[ Следующий]$I=pkolr2 $I=*

[ Предыдущий]$I=pkolr1 $I=*

[ ВЫХОД]^C^C(setq C:ПКОЛР nil);

**pkolr2

[КОЛОННЫ ПРОМЗДАНИЙ КРАНОВЫЕ]

[pkolkr(k108_6k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К К \10.8 6 \

[pkolkr(k108_6c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К С 10.8 6 \

[pkolkr(k10812k)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К К \10.8 12 \

[pkolkr(k10812c)]^C^C(load (findfile "pkolr.lsp"));ПКОЛР К С 10.8 12 \

[ Предыдущий]$I=pkolr1 $I=*

[ ВЫХОД]^C^C(setq C:ПКОЛР nil);

**PROST

[стеновое ограждение]

[ARMEN(OK409)]^C^C(load (findfile "prost.lsp"));ПРОСТ 4 0.9 \

[ARMEN(OK312)]^C^C(load (findfile "prost.lsp"));ПРОСТ 3 1.2 \

[ARMEN(OK315)]^C^C(load (findfile "prost.lsp")));ПРОСТ 3 1.5 \

[ARMEN(OK209)]^C^C(load (findfile "prost.lsp"));ПРОСТ 2 0.9 \

[ARMEN(OK212)]^C^C(load (findfile "prost.lsp"));ПРОСТ 2 1.2 \

[ARMEN(OK215)]^C^C(load (findfile "prost.lsp"));ПРОСТ 2 1.5 \

[ARMEN(OK218)]^C^C(load (findfile "prost.lsp"));ПРОСТ 2 1.8 \

[ ДАЛЬШЕ]^C$I=PROSTA $I=*

[ ВЫХОД]^C^C(setq C:ПРОСТ nil);

**PROSTA

[стеновое ограждение]

[ARMEN(OK221)]^C^C(load (findfile "prost.lsp"));ПРОСТ 2 2.1 \

[ARMEN(UGOL3)]^C^C(load (findfile "ugol.lsp"));СОЕД 300 \

[ARMEN(UGOL4)]^C^C(load (findfile "ugol.lsp"));СОЕД 400 \

[ ПРЕДЫДУЩИЙ]$I=PROST $I=*

[ ВЫХОД]^C^C(setq C:ПРОСТ nil C:СОЕД nil);

**DIAG

[диафрагмы жесткости 6м]

[ARMEN(DJ603)]^C^C(load (findfile "diag.lsp"));ДЖ 6 300 0 \

[ARMEN(DJ613)]^C^C(load (findfile "diag.lsp"));ДЖ 6 300 1 \