nlines=ALINES(lCodeArray,_CLIPTEXT) _CLIPTEXT="" FOR i = 2 to nLines && start with 2 to avoid trouble with lCodeArray[i-1] IF lCodeArray[i]="DEFINE" AND !lCodeArray[i]="DEFINE CLASS" *!* *take the same number of tabs - chr(9) - of the prev line *!* nTabs=OCCURS(CHR(9),lCodeArray[i-1]) *!* IF nTabs > 0 *!* lCodeArray[i]=REPLICATE(CHR(9),nTabs)+lCodeArray[i] *!* ENDIF *take the same number of spaces of the prev line nSpaces=LEN(lCodeArray[i-1])-LTRIM(LEN(lCodeArray[i-1])) IF nSpaces > 0 lCodeArray[i]=REPLICATE(" ",nSpaces)+lCodeArray[i] ENDIF ENDIF _CLIPTEXT=_CLIPTEXT+lCodeArray[i]+CHR(13) ENDFORAnd you said you are a programmer! <g>