LISP二次开发

霍霍夫儿

有个lisp代码，是关于对于线段长度的二次计算的，但是我这个函数中因变量不止线段长度，还需要输入别的因变量，但是我每次选择的线段不止一条，可能会30条，40条，就需要输入30次或者40次其他因变量，这样很麻烦，有没有什么批量赋值的方法啊？？可以同类函数只输入一次因变量，简化这个源代码，有偿求教，也有相应源代码，只是需要新增一个批量赋值的功能，或者其他类型函数也可以，只要最终结果达到就可以了。

QQ号2025312244，有意者请联系我，或者对这方面有意向的也可以一起学习。

njcknfy

可以先建立文本文件，每行一条线，有多少条线就多少行，格式如下
线实体句柄1，参数1，参数2，参数3....参数N
线实体句柄2，参数1，参数2，参数3....参数N
。。。
线实体句柄m，参数1，参数2，参数3....参数N
LISP程序思路如下
1 读取文件，建立列表
2 按列表循环，每个实体句柄都知道后，(handent  “句柄”)可以获取到需要执行程序的对象
3 把处理单个对象的程序做成子程序，依次执行每个线实体就OK