4DGL library with slight changes. Did not want to commit to original library.

Committer:
reinaldo422
Date:
Wed Oct 22 05:25:01 2014 +0000
Revision:
0:9cbbed69bc5b
4DGL library with slight changes made. Did not want to commit directly to library.

Who changed what in which revision?

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