对地震数据的S波相位进行拾取，可用于地震预警技术中心识别S波和P波信号相位，基于Fortran语言汇编(The S phase of seismic data is picked up and can be used for seismic warning technology center to identify the phase of S wave and P wave signal, which is based on Fortran language)