問題8-5コピー機能実現の文字列の部分を使用して

1  空隙 strmcpy（CHAR * T、INT M、CHAR * S）
 2  {
 3      int型 LEN = 0 ; // 文字列Tの長さを計算する
4。     CHAR * P = T;
 5      int型I;
 6      ながら（* = P！' \ 0 ' ）
 7。     {
 8は、          LEN ++ ;
 9          P ++ ;
 10      }
 11は、 
12である     IF（M <= LEN）
 13である     {
 14         for (i = 0; t[m - 1 + i] != '\0'; i++)
15         {
16             s[i] = t[m - 1 + i];
17         }
18         s[i] = '\0';
19     }
20     else
21     {
22         *s = '\0';
23     }
24 }