坐标换带电算程序及应用