主线坐标计算程序“ ZXZBJS ” 33→DimZ “ZS=0 FS=1”?N If N=0：Then N→Z[20]: Goto 0： IfEnd If N=1：Then N→Z[20]: Got