AutoHotkey Community

Code: Select all

;- reads textfiles and add  "_ADD" at end of line
setworkingdir,%a_scriptdir%
Extensions:= "txt,bas,bat"      ;- some extensions
PRESELECT  =%a_desktop%         ;- search from here

FileSelectFolder,MF,%PRESELECT%
if MF=
  return
setworkingdir,%MF%
Loop, %mf%\*.*, 0, 1
  {
  If A_LoopFileExt in %Extensions%
   {
   e=
   y:=A_LoopFileFullPath
    FileRead,aa,%y%
	  Loop, parse,aa, `n, `r
      {
	  x := a_loopfield
      if (x="")
	    continue
	  e .= x . "_ADD`r`n"
      }
   ;Filedelete,%y%	     ;- instead delete can also write to a new file
   ;Fileappend,%e%,%y%
   new=%dir%\%name_no_ext%_NEW.%ext%
   ;msgbox,%new%
   Fileappend,%e%,%new%
   e=   
   }
 }
run,%mf% 
return