AutoCAD 提取填充图案定义文件的AutoLisp程序

在有些时候，从别人处得到dwg图形，里面有非常漂亮的非标准填充图案方案，要想借用其图案是很困难的！ 里面的非标准的填充图案，我们cad标准填充图案文件acad.pat或acadiso.pat文件有若没有该图案定义，这时想要对图案进行编辑和使用，也非常麻烦和不方便！一个好的办法是将图案定义提取出来，添加到acad.pat或acadiso.pat文件中！这一切烦恼的问题都不存在了！