def memorize_and_create_list_events
order_list = 0
reset_font_settings
colun = 0
for i in 1..$game_map.events.length
event_name_r = $game_map.events[i].name_rose
if event_name_r.include? Caracter
order_list += 1
colun += self.width/2-4 if order_list > 9
order_list = 1 if order_list > 9
for i2 in 0..Titles.length - 1
if event_name_r.include? Titles[i2][0]
event_name_r = $game_map.events[i].name_rose.delete(Titles[i2][0])
contents.font.size = 14
contents.font.bold = true
contents.font.color.set(Titles[i2][2]) if Titles[i2][2] != nil
draw_text(Rect.new(32+colun,(order_list-1)*42+39,width,20), Titles[i2][1], 0)
end
end
reset_font_settings
contents.font.size = 22
draw_character($game_map.events[i].character_name, $game_map.events[i].character_index, 14+colun, (order_list-1)*42+54)
draw_text_ex(32+colun,(order_list-1)*42+20, event_name_r.delete(Caracter))
end
end
end