Sierpin-Tri - Sierpinski triangle fractal - only modified algo …

Users » JLS » Code » Sierpin-Tri

Kamil Ondrousek / Mbed 2 deprecated Sierpin-Tri

Sierpinski triangle fractal - only modified algo for 4DGL - original code Eric Wieser - THANKS

TFT_4DGL_Text.cpp@0:66e8e6fa8997, 2011-01-23 (annotated)

Committer:: JLS
Date:: Sun Jan 23 17:32:41 2011 +0000
Revision:: 0:66e8e6fa8997

Who changed what in which revision?

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

Repository toolbox

Export to desktop IDE

Build repository

Repository details

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

TFT_4DGL_Text.cpp@0:66e8e6fa8997, 2011-01-23 (annotated)

Who changed what in which revision?

Repository toolbox

Repository details

Important Information for this Arm website

Access Warning