$game_animations = load_data("Data/Animations.rvdata2")
(116..118).each { |i|
  anim = $game_animations[i-1].clone
  anim.frames = $game_animations[i-1].frames.clone
  anim.frames.each_index {|m|
    #anim.frames[i] = anim.frames[i].clone
    f = anim.frames[m]
    f.cell_data = f.cell_data.clone
    (0..7).each {|cell|
      next unless f.cell_data[cell, 0]
      next if f.cell_data[cell, 0] < 0
      x = f.cell_data[cell, 2]
      y = f.cell_data[cell, 1]
      p [[f.cell_data[cell, 1], f.cell_data[cell, 2]], [x, y]]
      if (i % 2 == 0)
        x = -x
      else
        y = -y
      end
      f.cell_data[cell, 1] = x
      f.cell_data[cell, 2] = y
      p [[f.cell_data[cell, 1], f.cell_data[cell, 2]], [x, y]]
      anim.frames[m] = f
    }
    p ["After all cells", [f.cell_data[0, 1], f.cell_data[0, 2]]]
    p ["Block end", anim.frames[0].cell_data[0, 1], anim.frames[0].cell_data[0, 2]]
  }
  p ["After block", anim.frames[0].cell_data[0, 1], anim.frames[0].cell_data[0, 2]]
  anim.name = $game_animations[i].name
  $game_animations[i] = anim.clone
  p [$game_animations[i].frames[0].cell_data[0, 1], $game_animations[i].frames[0].cell_data[0, 2]]
  p [$game_animations[i-1].frames[0].cell_data[0, 1], $game_animations[i-1].frames[0].cell_data[0, 2]]
}
save_data($game_animations, "Data/Animations.rvdata2")