Ikeda - Ikeda fractal

Users » JLS » Code » Ikeda

Kamil Ondrousek / Mbed 2 deprecated Ikeda

Ikeda fractal

TFT_4DGL_Text.cpp@0:0375805b4605, 2011-01-16 (annotated)

Committer:: JLS
Date:: Sun Jan 16 20:27:22 2011 +0000
Revision:: 0:0375805b4605

Who changed what in which revision?

User	Revision	Line number	New contents of line
JLS	0:0375805b4605	1	//
JLS	0:0375805b4605	2	// TFT_4DGL is a class to drive 4D Systems TFT touch screens
JLS	0:0375805b4605	3	//
JLS	0:0375805b4605	4	// Copyright (C) <2010> Stephane ROCHON <stephane.rochon at free.fr>
JLS	0:0375805b4605	5	//
JLS	0:0375805b4605	6	// TFT_4DGL is free software: you can redistribute it and/or modify
JLS	0:0375805b4605	7	// it under the terms of the GNU General Public License as published by
JLS	0:0375805b4605	8	// the Free Software Foundation, either version 3 of the License, or
JLS	0:0375805b4605	9	// (at your option) any later version.
JLS	0:0375805b4605	10	//
JLS	0:0375805b4605	11	// TFT_4DGL is distributed in the hope that it will be useful,
JLS	0:0375805b4605	12	// but WITHOUT ANY WARRANTY; without even the implied warranty of
JLS	0:0375805b4605	13	// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
JLS	0:0375805b4605	14	// GNU General Public License for more details.
JLS	0:0375805b4605	15	//
JLS	0:0375805b4605	16	// You should have received a copy of the GNU General Public License
JLS	0:0375805b4605	17	// along with TFT_4DGL. If not, see <http://www.gnu.org/licenses/>.
JLS	0:0375805b4605	18
JLS	0:0375805b4605	19	#include "mbed.h"
JLS	0:0375805b4605	20	#include "TFT_4DGL.h"
JLS	0:0375805b4605	21
JLS	0:0375805b4605	22	//****************************************************************************************************
JLS	0:0375805b4605	23	void TFT_4DGL :: set_font(char mode) { // set font size
JLS	0:0375805b4605	24	char command[2]= "";
JLS	0:0375805b4605	25
JLS	0:0375805b4605	26	int w, h, fx = 8, fy = 8;
JLS	0:0375805b4605	27
JLS	0:0375805b4605	28	command[0] = SETFONT;
JLS	0:0375805b4605	29	command[1] = mode;
JLS	0:0375805b4605	30
JLS	0:0375805b4605	31	current_font = mode;
JLS	0:0375805b4605	32
JLS	0:0375805b4605	33	if (current_orientation == IS_PORTRAIT) {
JLS	0:0375805b4605	34	w = SIZE_X;
JLS	0:0375805b4605	35	h = SIZE_Y;
JLS	0:0375805b4605	36	} else {
JLS	0:0375805b4605	37	w = SIZE_Y;
JLS	0:0375805b4605	38	h = SIZE_X;
JLS	0:0375805b4605	39	}
JLS	0:0375805b4605	40
JLS	0:0375805b4605	41	switch (mode) {
JLS	0:0375805b4605	42	case FONT_5X7 :
JLS	0:0375805b4605	43	fx = 6;
JLS	0:0375805b4605	44	fy = 8;
JLS	0:0375805b4605	45	break;
JLS	0:0375805b4605	46	case FONT_8X8 :
JLS	0:0375805b4605	47	fx = 8;
JLS	0:0375805b4605	48	fy = 8;
JLS	0:0375805b4605	49	break;
JLS	0:0375805b4605	50	case FONT_8X12 :
JLS	0:0375805b4605	51	fx = 8;
JLS	0:0375805b4605	52	fy = 12;
JLS	0:0375805b4605	53	break;
JLS	0:0375805b4605	54	case FONT_12X16 :
JLS	0:0375805b4605	55	fx = 12;
JLS	0:0375805b4605	56	fy = 16;
JLS	0:0375805b4605	57	break;
JLS	0:0375805b4605	58	}
JLS	0:0375805b4605	59
JLS	0:0375805b4605	60	max_col = w / fx;
JLS	0:0375805b4605	61	max_row = h / fy;
JLS	0:0375805b4605	62
JLS	0:0375805b4605	63	writeCOMMAND(command, 2);
JLS	0:0375805b4605	64	}
JLS	0:0375805b4605	65
JLS	0:0375805b4605	66	//****************************************************************************************************
JLS	0:0375805b4605	67	void TFT_4DGL :: text_mode(char mode) { // set text mode
JLS	0:0375805b4605	68	char command[2]= "";
JLS	0:0375805b4605	69
JLS	0:0375805b4605	70	command[0] = TEXTMODE;
JLS	0:0375805b4605	71	command[1] = mode;
JLS	0:0375805b4605	72
JLS	0:0375805b4605	73	writeCOMMAND(command, 2);
JLS	0:0375805b4605	74	}
JLS	0:0375805b4605	75
JLS	0:0375805b4605	76	//****************************************************************************************************
JLS	0:0375805b4605	77	void TFT_4DGL :: text_char(char c, char col, char row, int color) { // draw a text char
JLS	0:0375805b4605	78	char command[6]= "";
JLS	0:0375805b4605	79
JLS	0:0375805b4605	80	command[0] = TEXTCHAR;
JLS	0:0375805b4605	81
JLS	0:0375805b4605	82	command[1] = c;
JLS	0:0375805b4605	83	command[2] = col;
JLS	0:0375805b4605	84	command[3] = row;
JLS	0:0375805b4605	85
JLS	0:0375805b4605	86	int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS	0:0375805b4605	87	int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS	0:0375805b4605	88	int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS	0:0375805b4605	89
JLS	0:0375805b4605	90	command[4] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS	0:0375805b4605	91	command[5] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS	0:0375805b4605	92
JLS	0:0375805b4605	93	writeCOMMAND(command, 8);
JLS	0:0375805b4605	94	}
JLS	0:0375805b4605	95
JLS	0:0375805b4605	96	//****************************************************************************************************
JLS	0:0375805b4605	97	void TFT_4DGL :: graphic_char(char c, int x, int y, int color, char width, char height) { // draw a graphic char
JLS	0:0375805b4605	98	char command[10]= "";
JLS	0:0375805b4605	99
JLS	0:0375805b4605	100	command[0] = GRAPHCHAR;
JLS	0:0375805b4605	101
JLS	0:0375805b4605	102	command[1] = c;
JLS	0:0375805b4605	103
JLS	0:0375805b4605	104	command[2] = (x >> 8) & 0xFF;
JLS	0:0375805b4605	105	command[3] = x & 0xFF;
JLS	0:0375805b4605	106
JLS	0:0375805b4605	107	command[4] = (y >> 8) & 0xFF;
JLS	0:0375805b4605	108	command[5] = y & 0xFF;
JLS	0:0375805b4605	109
JLS	0:0375805b4605	110	int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS	0:0375805b4605	111	int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS	0:0375805b4605	112	int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS	0:0375805b4605	113
JLS	0:0375805b4605	114	command[6] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS	0:0375805b4605	115	command[7] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS	0:0375805b4605	116
JLS	0:0375805b4605	117	command[8] = width;
JLS	0:0375805b4605	118
JLS	0:0375805b4605	119	command[9] = height;
JLS	0:0375805b4605	120
JLS	0:0375805b4605	121	writeCOMMAND(command, 10);
JLS	0:0375805b4605	122	}
JLS	0:0375805b4605	123
JLS	0:0375805b4605	124	//****************************************************************************************************
JLS	0:0375805b4605	125	void TFT_4DGL :: text_string(char *s, char col, char row, char font, int color) { // draw a text string
JLS	0:0375805b4605	126
JLS	0:0375805b4605	127	char command[1000]= "";
JLS	0:0375805b4605	128	int size = strlen(s);
JLS	0:0375805b4605	129	int i = 0;
JLS	0:0375805b4605	130
JLS	0:0375805b4605	131	command[0] = TEXTSTRING;
JLS	0:0375805b4605	132
JLS	0:0375805b4605	133	command[1] = col;
JLS	0:0375805b4605	134	command[2] = row;
JLS	0:0375805b4605	135
JLS	0:0375805b4605	136	command[3] = font;
JLS	0:0375805b4605	137
JLS	0:0375805b4605	138	int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS	0:0375805b4605	139	int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS	0:0375805b4605	140	int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS	0:0375805b4605	141
JLS	0:0375805b4605	142	command[4] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS	0:0375805b4605	143	command[5] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS	0:0375805b4605	144
JLS	0:0375805b4605	145	for (i=0; i<size; i++) command[6+i] = s[i];
JLS	0:0375805b4605	146
JLS	0:0375805b4605	147	command[6+size] = 0;
JLS	0:0375805b4605	148
JLS	0:0375805b4605	149	writeCOMMAND(command, 7 + size);
JLS	0:0375805b4605	150	}
JLS	0:0375805b4605	151
JLS	0:0375805b4605	152	//****************************************************************************************************
JLS	0:0375805b4605	153	void TFT_4DGL :: graphic_string(char *s, int x, int y, char font, int color, char width, char height) { // draw a text string
JLS	0:0375805b4605	154
JLS	0:0375805b4605	155	char command[1000]= "";
JLS	0:0375805b4605	156	int size = strlen(s);
JLS	0:0375805b4605	157	int i = 0;
JLS	0:0375805b4605	158
JLS	0:0375805b4605	159	command[0] = GRAPHSTRING;
JLS	0:0375805b4605	160
JLS	0:0375805b4605	161	command[1] = (x >> 8) & 0xFF;
JLS	0:0375805b4605	162	command[2] = x & 0xFF;
JLS	0:0375805b4605	163
JLS	0:0375805b4605	164	command[3] = (y >> 8) & 0xFF;
JLS	0:0375805b4605	165	command[4] = y & 0xFF;
JLS	0:0375805b4605	166
JLS	0:0375805b4605	167	command[5] = font;
JLS	0:0375805b4605	168
JLS	0:0375805b4605	169	int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS	0:0375805b4605	170	int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS	0:0375805b4605	171	int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS	0:0375805b4605	172
JLS	0:0375805b4605	173	command[6] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS	0:0375805b4605	174	command[7] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS	0:0375805b4605	175
JLS	0:0375805b4605	176	command[8] = width;
JLS	0:0375805b4605	177
JLS	0:0375805b4605	178	command[9] = height;
JLS	0:0375805b4605	179
JLS	0:0375805b4605	180	for (i=0; i<size; i++) command[10+i] = s[i];
JLS	0:0375805b4605	181
JLS	0:0375805b4605	182	command[10+size] = 0;
JLS	0:0375805b4605	183
JLS	0:0375805b4605	184	writeCOMMAND(command, 11 + size);
JLS	0:0375805b4605	185	}
JLS	0:0375805b4605	186
JLS	0:0375805b4605	187	//****************************************************************************************************
JLS	0:0375805b4605	188	void TFT_4DGL :: text_button(char *s, char mode, int x, int y, int button_color, char font, int text_color, char width, char height) { // draw a text string
JLS	0:0375805b4605	189
JLS	0:0375805b4605	190	char command[1000]= "";
JLS	0:0375805b4605	191	int size = strlen(s);
JLS	0:0375805b4605	192	int i = 0, red5, green6, blue5;
JLS	0:0375805b4605	193
JLS	0:0375805b4605	194	command[0] = TEXTBUTTON;
JLS	0:0375805b4605	195
JLS	0:0375805b4605	196	command[1] = mode;
JLS	0:0375805b4605	197
JLS	0:0375805b4605	198	command[2] = (x >> 8) & 0xFF;
JLS	0:0375805b4605	199	command[3] = x & 0xFF;
JLS	0:0375805b4605	200
JLS	0:0375805b4605	201	command[4] = (y >> 8) & 0xFF;
JLS	0:0375805b4605	202	command[5] = y & 0xFF;
JLS	0:0375805b4605	203
JLS	0:0375805b4605	204	red5 = (button_color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS	0:0375805b4605	205	green6 = (button_color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS	0:0375805b4605	206	blue5 = (button_color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS	0:0375805b4605	207
JLS	0:0375805b4605	208	command[6] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS	0:0375805b4605	209	command[7] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS	0:0375805b4605	210
JLS	0:0375805b4605	211	command[8] = font;
JLS	0:0375805b4605	212
JLS	0:0375805b4605	213	red5 = (text_color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS	0:0375805b4605	214	green6 = (text_color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS	0:0375805b4605	215	blue5 = (text_color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS	0:0375805b4605	216
JLS	0:0375805b4605	217	command[9] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS	0:0375805b4605	218	command[10] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS	0:0375805b4605	219
JLS	0:0375805b4605	220	command[11] = width;
JLS	0:0375805b4605	221
JLS	0:0375805b4605	222	command[12] = height;
JLS	0:0375805b4605	223
JLS	0:0375805b4605	224	for (i=0; i<size; i++) command[13+i] = s[i];
JLS	0:0375805b4605	225
JLS	0:0375805b4605	226	command[13+size] = 0;
JLS	0:0375805b4605	227
JLS	0:0375805b4605	228	writeCOMMAND(command, 14 + size);
JLS	0:0375805b4605	229	}
JLS	0:0375805b4605	230
JLS	0:0375805b4605	231	//****************************************************************************************************
JLS	0:0375805b4605	232	void TFT_4DGL :: locate(char col, char row) { // place text curssor at col, row
JLS	0:0375805b4605	233	current_col = col;
JLS	0:0375805b4605	234	current_row = row;
JLS	0:0375805b4605	235	}
JLS	0:0375805b4605	236
JLS	0:0375805b4605	237	//****************************************************************************************************
JLS	0:0375805b4605	238	void TFT_4DGL :: color(int color) { // set text color
JLS	0:0375805b4605	239	current_color = color;
JLS	0:0375805b4605	240	}
JLS	0:0375805b4605	241
JLS	0:0375805b4605	242	//****************************************************************************************************
JLS	0:0375805b4605	243	void TFT_4DGL :: putc(char c) { // place char at current cursor position
JLS	0:0375805b4605	244
JLS	0:0375805b4605	245	text_char(c, current_col++, current_row, current_color);
JLS	0:0375805b4605	246
JLS	0:0375805b4605	247	if (current_col == max_col) {
JLS	0:0375805b4605	248	current_col = 0;
JLS	0:0375805b4605	249	current_row++;
JLS	0:0375805b4605	250	}
JLS	0:0375805b4605	251	if (current_row == max_row) {
JLS	0:0375805b4605	252	current_row = 0;
JLS	0:0375805b4605	253	}
JLS	0:0375805b4605	254	}
JLS	0:0375805b4605	255
JLS	0:0375805b4605	256	//****************************************************************************************************
JLS	0:0375805b4605	257	void TFT_4DGL :: puts(char *s) { // place string at current cursor position
JLS	0:0375805b4605	258
JLS	0:0375805b4605	259	text_string(s, current_col, current_row, current_font, current_color);
JLS	0:0375805b4605	260
JLS	0:0375805b4605	261	current_col += strlen(s);
JLS	0:0375805b4605	262
JLS	0:0375805b4605	263	if (current_col >= max_col) {
JLS	0:0375805b4605	264	current_row += current_col / max_col;
JLS	0:0375805b4605	265	current_col %= max_col;
JLS	0:0375805b4605	266	}
JLS	0:0375805b4605	267	if (current_row >= max_row) {
JLS	0:0375805b4605	268	current_row %= max_row;
JLS	0:0375805b4605	269	}
JLS	0:0375805b4605	270	}

Repository toolbox

Export to desktop IDE

Build repository

Repository details

Type:	Program
Mbed OS support:	Mbed 2 deprecated
Created:	16 Jan 2011
Imports:	3
Forks:	0
Commits:	1
Dependents:	0
Dependencies:	1
Followers:	1

TFT_4DGL_Text.cpp@0:0375805b4605, 2011-01-16 (annotated)

Who changed what in which revision?

Repository toolbox

Repository details

Important Information for this Arm website

Access Warning