用类似以下方法可以分选出近炮点排列：

在HeadMath模块中，设置修改iuse1的道头 ：iuse1=abs(int(gp_y_r-sp_y_r)/接收线距的一半)+1，

这样可将一炮中的不同排列，根据离炮点的远近编排序号，存放在iuse1道头字中

再选择iuse1道头字1～3即可得到近炮点的排列。