Ну и нахрена вам это надо?
Прога грузится в каждый запускаемый файл. Замедляет загрузку (если не только она пришита, а скажем куча всяких нужных лиспов - то тормозит загрузку капитально).
Проще всего:
Добавь в файл acad.lin восемь типов линий:
*SVARCAZ,ЗАВОДСКАЯ СВАРКА IIIIII
A,.005,[ZSVARCA,my_shape.shx,S=.6],-1.2,[ZSVARCA,my_shape.shx,S=.6],-1.2
*SVARCAM,МОНТАЖНАЯ СВАРКА ХХХХХХ
A,.005,[MSVARCA,my_shape.shx,S=.6],-3,[MSVARCA,my_shape.shx,S=.6],-3
*SVARCAZ2,ЗАВОДСКАЯ СВАРКА -IIIIIII-
A,.005,[ZSVARCA,my_shape.shx,Y=-1.0],-1.2,[ZSVARCA,my_shape.shx,Y=-1.0],-1.2
*SVARCAM2,МОНТАЖНАЯ СВАРКА -ХХХХХ-
A,.005,[MSVARCA,my_shape.shx,Y=-1.0],-3,[MSVARCA,my_shape.shx,Y=-1.0],-3
*SVARCAZ3,ЗАВОДСКАЯ СВАРКА _I_I_ _I_I_
A,1.2,[ZSVARCA,my_shape.shx,S=.6],1.2,[ZSVARCA,my_shape.shx,S=.6],1.2,[ZSVARCA,my_shape.shx,S=.6],1.2,-3
*SVARCAM3,МОНТАЖНАЯ СВАРКА _Х_Х_ _Х_Х_
A,.7,[MSVARCA,my_shape.shx,S=.6],2.5,[MSVARCA,my_shape.shx,S=.6],1.8,-3
*SVARCAZ4,ЗАВОДСКАЯ СВАРКА -I-I- -I-I-
A,1.2,[ZSVARCA,my_shape.shx,Y=-1.0],1.2,[ZSVARCA,my_shape.shx,Y=-1.0],1.2,[ZSVARCA,my_shape.shx,Y=-1.0],1.2,-3
*SVARCAM4,МОНТАЖНАЯ СВАРКА -Х-Х- -Х-Х-
A,.25,[MSVARCA,my_shape.shx,Y=-1.0],2.5,[MSVARCA,my_shape.shx,Y=-1.0],2.25,-3
Создай в твоём текущем шаблоне все 8 типов линий из этой проги, там же создай слой в который они закидываются.
Кинь в папку суппорт файлик my_shape.shx из твоей капризной проги.
Создай первую кнопку и в нижнем поле где надпись "макрос" натыкай пальцами следующее:
"^C^C_-layer _m Сварка celweight -1 cecolor 7 -linetype s svarcaz _line "
(копируй включая последний пробел (енто эквивалент тыкания на энтер) всё что заключено в кавычки) получишь то шо получишь, "а саме", "Сварка - заводская внахлёст видимая". Можешь так обозвать команду.
Будет рисовать сварочный шов в режиме линия.
Хошь шоб была полилиния, так замени в макросе line на pline.
Остальные семь по аналогу, меняя только название типа линии с "svarcaz" на соответственно:
svarcaz2
svarcaz3
svarcaz4
svarcam
svarcam2
svarcam3
svarcam4
Получится, мыль спасибо на garagelegoand@ukr.net
ps: И шоб оно жило придётся тебе с этого шаблончика начинать любую работу где будет сварка.