ascii_draw_text_helper Subroutine

public subroutine ascii_draw_text_helper(text_elements, num_text_elements, legend_lines, num_legend_lines, capturing_legend, pie_legend_labels, pie_legend_values, pie_legend_count, pie_autopct_queue, pie_autopct_count, legend_entry_indices, legend_entry_has_autopct, legend_entry_labels, legend_entry_count, legend_autopct_cursor, x, y, text, x_min, x_max, y_min, y_max, plot_width, plot_height, current_r, current_g, current_b)

ASCII text drawing with legend processing (moved from main module)

Arguments

Type	Intent	Optional	Attributes		Name
type(text_element_t),	intent(inout)			::	text_elements(:)
integer,	intent(inout)			::	num_text_elements
character(len=96),	intent(inout),		allocatable	::	legend_lines(:)
integer,	intent(inout)			::	num_legend_lines
logical,	intent(inout)			::	capturing_legend
character(len=64),	intent(inout),		allocatable	::	pie_legend_labels(:)
character(len=32),	intent(inout),		allocatable	::	pie_legend_values(:)
integer,	intent(inout)			::	pie_legend_count
character(len=32),	intent(inout),		allocatable	::	pie_autopct_queue(:)
integer,	intent(inout)			::	pie_autopct_count
integer,	intent(inout),		allocatable	::	legend_entry_indices(:)
logical,	intent(inout),		allocatable	::	legend_entry_has_autopct(:)
character(len=64),	intent(inout),		allocatable	::	legend_entry_labels(:)
integer,	intent(inout)			::	legend_entry_count
integer,	intent(inout)			::	legend_autopct_cursor
real(kind=wp),	intent(in)			::	x
real(kind=wp),	intent(in)			::	y
character(len=*),	intent(in)			::	text
real(kind=wp),	intent(in)			::	x_min
real(kind=wp),	intent(in)			::	x_max
real(kind=wp),	intent(in)			::	y_min
real(kind=wp),	intent(in)			::	y_max
integer,	intent(in)			::	plot_width
integer,	intent(in)			::	plot_height
real(kind=wp),	intent(in)			::	current_r
real(kind=wp),	intent(in)			::	current_g
real(kind=wp),	intent(in)			::	current_b