[spedico]

Код:

stock explode(aExplode[][], const sSource[], const sDelimiter[] = " ", iVertices = sizeof aExplode, iLength = sizeof aExplode[]) 
{ 
   new 
      iNode, 
      iPointer, 
      iPrevious = -1, 
      iDelimiter = strlen(sDelimiter); 

   while(iNode < iVertices) 
   { 
      iPointer = strfind(sSource, sDelimiter, false, iPointer); 

      if(iPointer == -1) 
      { 
         strmid(aExplode[iNode], sSource, iPrevious, strlen(sSource), iLength); 
         break; 
      } 
      else 
      { 
         strmid(aExplode[iNode], sSource, iPrevious, iPointer, iLength); 
      } 

      iPrevious = (iPointer += iDelimiter); 
      ++iNode; 
   } 

   return iPrevious; 
}

By westie