SPHIDE と WAIT を4回ずつ繰り返すのを FOR ～ NEXT で簡略化できるという内容ですが、比較しやすいように SPSHOW に変えています。 なので、SPSHOW を SPHIDE に変えて、上の4行を消すこともできます。