Mercurial > hg > octave-lyh
view scripts/image/rgbplot.m @ 17280:8ce6cdd272eb
Support TeX elements in FreeType renderer.
* libinterp/corefcn/txt-eng.cc: New file. Contains mapping from symbol
name to character code, in Unicode and MS symbol.
* libinterp/corefcn/modules.mk (COREFCN_SRC): Add txt-eng.cc.
* libinterp/corefcn/oct-tex-lexer.ll: Add "\n" to rules applicable to
".", as
the latter does not include new line characters.
* libinterp/corefcn/oct-tex-parser.yy: Remove debug statements.
* libinterp/corefcn/txt-eng.ft.cc (gripe_missing_glyph,
gripe_glyph_render): Change signature from char to FT_ULong.
(ft_render::ft_render): Adapt to new/removed members.
(ft_render::~ft_render): Remove use of fonts member.
(ft_render::set_font): Likewise. Use font instead.
(ft_render::push_new_line): Likewise. Change meaning of yoffset and
initialize line_yoffset.
(ft_render::update_line_bbox): New method.
(ft_render::set_mode): Change meaning of yoffset and initialize
line_yoffset.
(ft_render::process_character): New method.
(ft_render::visit(text_element_string)): Use it.
(ft_render::visit(text_element_list),
ft_render::visit(text_element_subscript),
ft_render::visit(text_element_superscript),
ft_render::visit(text_element_color),
ft_render::visit(text_element_fontsize),
ft_render::visit(text_element_fontname),
ft_render::visit(text_element_fontstyle),
ft_render::visit(text_element_symbol)): New methods.
(ft_render::set_color): Use color member instead of red/green/blue.
* libinterp/corefcn/txt-eng-ft.h (ft_render::visit(text_element_list),
ft_render::visit(text_element_subscript),
ft_render::visit(text_element_superscript),
ft_render::visit(text_element_color),
ft_render::visit(text_element_fontsize),
ft_render::visit(text_element_fontname),
ft_render::visit(text_element_fontstyle),
ft_render::visit(text_element_symbol)): New methods.
(ft_render::update_line_bbox, ft_render::process_character): New
methods.
(ft_render::current_face): Removed method.i
(ft_render::font): New member, replaces obsolete ft_render::fonts.
(ft_render::line_yoffset): New member.
(ft_render::color): New member, replaces obsolete red, green and blue.
(ft_render::ft_font::ft_font()): Implement default constructor.
(ft_render::ft_font::operator=): Fix incorrect use of FT_Reference_Face
return value.
(ft_render::ft_font::is_valid): New method.
* libinterp/corefcn/txt-eng.h (class text_element_symbol, class
text_element_fontname, class text_element_fontsize, class
text_element_fontname, class text_element_fontstyle, class
text_element_color): Add forward definition.
(text_element_symbol::invalid_code): New enum.
(text_element_symbol::code): New member.
(text_element_symbol::text_element_symbol): Initialize it.
(text_element_symbol::get_symbol_code): New method.
(text_element_fontstyle::get_fontstyle): New method.
(text_element_fontname::get_fontname): Renamed from fontname.
(text_element_fontsize::get_fontsize): Renamed from fontsize.
author | Michael Goffioul <michael.goffioul@gmail.com> |
---|---|
date | Sun, 18 Aug 2013 16:36:46 -0400 |
parents | 7268845c0a1e |
children |
line wrap: on
line source
## Copyright (C) 2012 Rik Wehbring ## Copyright (C) 2012 Carnë Draug ## ## This file is part of Octave. ## ## Octave is free software; you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation; either version 3 of the License, or (at ## your option) any later version. ## ## Octave is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ## General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with Octave; see the file COPYING. If not, see ## <http://www.gnu.org/licenses/>. ## -*- texinfo -*- ## @deftypefn {Function File} {} rgbplot (@var{cmap}) ## @deftypefnx {Function File} {} rgbplot (@var{cmap}, @var{style}) ## @deftypefnx {Function File} {@var{h} =} rgbplot (@dots{}) ## Plot the components of a colormap. ## ## Two different @var{style}s are available for displaying the @var{cmap}: ## ## @table @asis ## @item profile (default) ## Plot the RGB line profile of the colormap for each of the channels (red, ## green and blue) with the plot lines colored appropriately. Each line ## represents the intensity of each RGB components across the colormap. ## ## @item composite ## Draw the colormap across the X-axis so that the actual index colors are ## visible rather than the individual color components. ## ## @end table ## ## The optional return value @var{h} is a graphics handle to the created plot. ## ## Run @code{demo rgbplot} to see an example of @code{rgbplot} and each style ## option. ## @seealso{colormap} ## @end deftypefn function h = rgbplot (cmap, style = "profile") if (nargin < 1 || nargin > 2) print_usage (); endif if (! iscolormap (cmap)) error ("rgbplot: CMAP must be a valid colormap"); elseif (! ischar (style)) error ("rgbplot: STYLE must be a string"); endif switch (tolower (style)) case "profile" htmp = plot (cmap(:,1),"r", cmap(:,2),"g", cmap(:,3),"b"); set (gca, 'ytick', 0:0.1:1); case "composite" htmp = image (1:rows(cmap)); set (gca, 'ytick', []); colormap (cmap); otherwise error ("rgbplot: unknown style '%s'", style); endswitch xlabel ("color index"); if (nargout > 0) h = htmp; endif endfunction %!demo %! clf; %! subplot (1, 2, 1); %! rgbplot (ocean, "profile"); %! subplot (1, 2, 2); %! rgbplot (ocean, "composite"); %% Test input validation %!error rgbplot () %!error rgbplot (1,2) %!error <CMAP must be a valid colormap> rgbplot ({0 1 0}) %!error <STYLE must be a string> rgbplot ([0 1 0], 2) %!error <unknown style 'nostyle'> rgbplot ([0 1 0], "nostyle")