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