00001 /* 00002 Copyright Remco Bras 2008 00003 This file is part of RPGE. 00004 00005 RPGE is free software; you can redistribute it and/or modify 00006 it under the terms of the GNU General Public License as published by 00007 the Free Software Foundation; either version 3 of the License, or 00008 (at your option) any later version. 00009 00010 RPGE is distributed in the hope that it will be useful, 00011 but WITHOUT ANY WARRANTY; without even the implied warranty of 00012 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00013 GNU General Public License for more details. 00014 00015 You should have received a copy of the GNU General Public License 00016 along with this program. If not, see <http://www.gnu.org/licenses/> 00017 */ 00018 00019 #ifndef GUILE_TEXT_H 00020 #define GUILE_TEXT_H 00021 00022 #include <libguile.h> 00023 #include "text.h" 00024 00025 SCM guile_open_font(SCM filename, SCM size); 00026 SCM guile_close_font(SCM index); 00027 SCM guile_make_text(SCM x, SCM y, SCM string, SCM font, SCM red, SCM green, SCM blue); 00028 SCM guile_destroy_text(SCM textindex); 00029 SCM guile_move_text(SCM index, SCM point); 00030 SCM guile_get_text_coordinates(SCM index); 00031 SCM guile_get_text_line_list(SCM index); 00032 SCM guile_get_text_font(SCM index); 00033 SCM guile_set_text_font(SCM index, SCM font); 00034 SCM guile_get_text_color(SCM index); 00035 SCM guile_set_text_color(SCM index, SCM val); 00036 00037 #endif /*GUILE_TEXT_H*/