RGSS3 Texts Exporter

# load all maps
load_data("Data/MapInfos.rvdata2").each do |map_id, map|
  map = load_data(sprintf("Data/Map%03d.rvdata2", map_id))
  puts "Loading map ID #{map_id}"
  Graphics.update

  # Load all events
  map.events.each do |evid, event|
    # Load all pages
    event.pages.each_with_index do |page, page_index|
      # Load all event list
      texts = []
      page.list.each_with_index do |list, index|
        if list.code == 401
          texts << "#{index};#{list.parameters[0]}"
        elsif list.code == 102
          texts << "#{index};#{list.parameters}"
        end
      end
      unless texts.empty?
        result = texts.join("\n")
        name = "Texts/#{map_id}-#{evid}-#{page_index}.csv"
        File.open(name, 'w') do |f|
          f.print(result)
        end
        puts "file created : #{name}"
        Graphics.update
      end
    end
  end

end
exit