发送短信 : Fortran IV programming /