Backup Complete [USA]

#==============================================================================
# • Backup Complete : Created by Dax Aquatic X
#==============================================================================

module API
  def self.copyFile(*args)
    Win32API.new('kernel32', 'CopyFile', 'ppl', 'l').call(*args)
  end
end

module Backup
  extend self
  # Make the pastes
  def make_paste
    Dir.mkdir("Backup") unless File.directory?("Backup")
    ["Data", "System", "Movies", "Graphics", "Audio", "Audio/BGM", "Audio/BGS", "Audio/ME", "Audio/SE"].each { |i|
      Dir.mkdir("Backup/#{i}") unless File.directory?("Backup/#{i}")
    }
  end
  # Copy of paste of System.
  def system
    list = Dir.glob('System/*')
    list.size.times { |i|API.copyFile(list[i], "Backup/" + list[i], 1)}
  end
  # Copy of paste of Movies.
  def movies
    movies = Dir.glob("Movies/*")
    movies.size.times { |i| API.copyFile(movies[i], "Backup/" + movies[i], 1)}
  end
  # Copy of paste of Audio.
  def audio
    bgm = Dir.glob('Audio/BGM/*')
    bgs = Dir.glob('Audio/BGS/*')
    me = Dir.glob('Audio/ME/*')
    se = Dir.glob('Audio/SE/*')
    bgm.size.times { |i| API.copyFile(bgm[i], "Backup/" + bgm[i], 1)}
    bgs.size.times { |i| API.copyFile(bgs[i], "Backup/" + bgs[i], 1) }
    me.size.times { |i| API.copyFile(me[i], "Backup/" + me[i], 1) }
    se.size.times { |i| API.copyFile(se[i], "Backup/" + se[i], 1) }
  end
  # Copy of paste of Data
  def data
    data = Dir.glob('Data/*')
    data.size.times { |i| API.copyFile(data[i], "Backup/" + data[i], 1) }
  end
  # Copy of paste of Graphics.
  def graphics
    ["Animations", "Battlebacks1", "Battlebacks2", "Battlers", "Characters",
     "Faces", "Parallaxes", "Pictures", "System", "Titles1", "Titles2",
     "Tilesets"].each { |dirs|
       Dir.mkdir("Backup/Graphics/#{dirs}") unless File.directory?("Backup/Graphics/#{dirs}")
       d = Dir.glob("Graphics/#{dirs}/*")
       d.size.times { |v| API.copyFile(d[v], "Backup/" + d[v], 1) }
     }
  end
  # Run
  def run(audios=false, graphic=false)
    return unless $TEST
    make_past
    movies
    data
    system
    audio if audios
    graphics if graphic
  end
end