;BodySnatcher
;By jgpaiva
;date: June 2007
;Function: Replace the OldFile by the NewFile

Gui,1:show, x100 y100 w200 h50, Old File
Gui,2:show, x400 y100 w200 h50, New File
Gui,1:add,text,Vtext1, -No File-
Gui,2:add,text,Vtext2, -No File-
Gui,1:+resize
Gui,2:+resize
file1 := 
file2 := 
return

f2::
  reload
  return

guidropfiles:
  if A_EventInfo != 1
    return
  
  file1 := A_GuiEvent
  GuiControl,1:text, text1, %file1%
  GuiControl,1:move, text1, W300
  if file2 =
    return
  
  msgbox,Now moving
  
  filerecycle,%file1%
  filemove,%file2%,%file1%,0
  file1 :=
  file2 := 
  GuiControl,1:text, text1, -No File-
  GuiControl,2:text, text2, -No File-
  msgbox,done
return

GuiClose:
2GuiClose:
 exitapp

2guidropfiles:
 if A_EventInfo <> 1
   return
 
 file2 := A_GuiEvent
 GuiControl,2:text, text2, %file2%
 GuiControl,2:move, text2, W300
 if file1 =
   return
 
 msgbox,Now moving
 
 filerecycle,%file1%
 filemove,%file2%,%file1%,0
 file1 :=
 file2 := 
 GuiControl,1:text, text1, -No File-
 GuiControl,2:text, text2, -No File-
 msgbox,Done
 return