*cfopen，file，txt，path！！！这里是你要输出的参数，用“*vwrite”*cfclos 如*CFOPEN,RES,DAT,,*VWRITE('ZJP_U')*VWRITE,ZJP(1,1)(F10.4)*CFcLOS
