| Kerpower |
0:772a63029ab0
|
1
|
//
|
| Kerpower |
0:772a63029ab0
|
2
|
// TFT_4DGL is a class to drive 4D Systems TFT touch screens
|
| Kerpower |
0:772a63029ab0
|
3
|
//
|
| Kerpower |
0:772a63029ab0
|
4
|
// Copyright (C) <2010> Stephane ROCHON <stephane.rochon at free.fr>
|
| Kerpower |
0:772a63029ab0
|
5
|
//
|
| Kerpower |
0:772a63029ab0
|
6
|
// TFT_4DGL is free software: you can redistribute it and/or modify
|
| Kerpower |
0:772a63029ab0
|
7
|
// it under the terms of the GNU General Public License as published by
|
| Kerpower |
0:772a63029ab0
|
8
|
// the Free Software Foundation, either version 3 of the License, or
|
| Kerpower |
0:772a63029ab0
|
9
|
// (at your option) any later version.
|
| Kerpower |
0:772a63029ab0
|
10
|
//
|
| Kerpower |
0:772a63029ab0
|
11
|
// TFT_4DGL is distributed in the hope that it will be useful,
|
| Kerpower |
0:772a63029ab0
|
12
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
| Kerpower |
0:772a63029ab0
|
13
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
| Kerpower |
0:772a63029ab0
|
14
|
// GNU General Public License for more details.
|
| Kerpower |
0:772a63029ab0
|
15
|
//
|
| Kerpower |
0:772a63029ab0
|
16
|
// You should have received a copy of the GNU General Public License
|
| Kerpower |
0:772a63029ab0
|
17
|
// along with TFT_4DGL. If not, see <http://www.gnu.org/licenses/>.
|
| Kerpower |
0:772a63029ab0
|
18
|
|
| Kerpower |
0:772a63029ab0
|
19
|
#include "mbed.h"
|
| Kerpower |
0:772a63029ab0
|
20
|
|
| Kerpower |
0:772a63029ab0
|
21
|
#ifndef DEBUGMODE
|
| Kerpower |
0:772a63029ab0
|
22
|
#define DEBUGMODE 1
|
| Kerpower |
0:772a63029ab0
|
23
|
#endif
|
| Kerpower |
0:772a63029ab0
|
24
|
|
| Kerpower |
0:772a63029ab0
|
25
|
// Common WAIT value in millisecond
|
| Kerpower |
0:772a63029ab0
|
26
|
#define TEMPO 5
|
| Kerpower |
0:772a63029ab0
|
27
|
|
| Kerpower |
0:772a63029ab0
|
28
|
// 4DGL Functions values
|
| Kerpower |
0:772a63029ab0
|
29
|
#define AUTOBAUD '\x55'
|
| Kerpower |
0:772a63029ab0
|
30
|
#define CLS '\x45'
|
| Kerpower |
0:772a63029ab0
|
31
|
#define BAUDRATE '\x51'
|
| Kerpower |
0:772a63029ab0
|
32
|
#define VERSION '\x56'
|
| Kerpower |
0:772a63029ab0
|
33
|
#define BCKGDCOLOR '\x42'
|
| Kerpower |
0:772a63029ab0
|
34
|
#define DISPCONTROL '\x59'
|
| Kerpower |
0:772a63029ab0
|
35
|
#define SETVOLUME '\x76'
|
| Kerpower |
0:772a63029ab0
|
36
|
#define CIRCLE '\x43'
|
| Kerpower |
0:772a63029ab0
|
37
|
#define TRIANGLE '\x47'
|
| Kerpower |
0:772a63029ab0
|
38
|
#define LINE '\x4C'
|
| Kerpower |
0:772a63029ab0
|
39
|
#define RECTANGLE '\x72'
|
| Kerpower |
0:772a63029ab0
|
40
|
#define ELLIPSE '\x65'
|
| Kerpower |
0:772a63029ab0
|
41
|
#define PIXEL '\x50'
|
| Kerpower |
0:772a63029ab0
|
42
|
#define READPIXEL '\x52'
|
| Kerpower |
0:772a63029ab0
|
43
|
#define SCREENCOPY '\x63'
|
| Kerpower |
0:772a63029ab0
|
44
|
#define PENSIZE '\x70'
|
| Kerpower |
0:772a63029ab0
|
45
|
#define SETFONT '\x46'
|
| Kerpower |
0:772a63029ab0
|
46
|
#define TEXTMODE '\x4F'
|
| Kerpower |
0:772a63029ab0
|
47
|
#define TEXTCHAR '\x54'
|
| Kerpower |
0:772a63029ab0
|
48
|
#define GRAPHCHAR '\x74'
|
| Kerpower |
0:772a63029ab0
|
49
|
#define TEXTSTRING '\x73'
|
| Kerpower |
0:772a63029ab0
|
50
|
#define GRAPHSTRING '\x53'
|
| Kerpower |
0:772a63029ab0
|
51
|
#define TEXTBUTTON '\x62'
|
| Kerpower |
0:772a63029ab0
|
52
|
#define GETTOUCH '\x6F'
|
| Kerpower |
0:772a63029ab0
|
53
|
#define WAITTOUCH '\x77'
|
| Kerpower |
0:772a63029ab0
|
54
|
#define SETTOUCH '\x75'
|
| Kerpower |
0:772a63029ab0
|
55
|
|
| Kerpower |
0:772a63029ab0
|
56
|
|
| Kerpower |
0:772a63029ab0
|
57
|
// Screen answers
|
| Kerpower |
0:772a63029ab0
|
58
|
#define ACK '\x06'
|
| Kerpower |
0:772a63029ab0
|
59
|
#define NAK '\x15'
|
| Kerpower |
0:772a63029ab0
|
60
|
|
| Kerpower |
0:772a63029ab0
|
61
|
// Screen states
|
| Kerpower |
0:772a63029ab0
|
62
|
#define OFF '\x00'
|
| Kerpower |
0:772a63029ab0
|
63
|
#define ON '\x01'
|
| Kerpower |
0:772a63029ab0
|
64
|
|
| Kerpower |
0:772a63029ab0
|
65
|
// Graphics modes
|
| Kerpower |
0:772a63029ab0
|
66
|
#define SOLID '\x00'
|
| Kerpower |
0:772a63029ab0
|
67
|
#define WIREFRAME '\x01'
|
| Kerpower |
0:772a63029ab0
|
68
|
|
| Kerpower |
0:772a63029ab0
|
69
|
// Text modes
|
| Kerpower |
0:772a63029ab0
|
70
|
#define TRANSPARENT '\x00'
|
| Kerpower |
0:772a63029ab0
|
71
|
#define OPAQUE '\x01'
|
| Kerpower |
0:772a63029ab0
|
72
|
|
| Kerpower |
0:772a63029ab0
|
73
|
// Fonts Sizes
|
| Kerpower |
0:772a63029ab0
|
74
|
#define FONT_5X7 '\x00'
|
| Kerpower |
0:772a63029ab0
|
75
|
#define FONT_8X8 '\x01'
|
| Kerpower |
0:772a63029ab0
|
76
|
#define FONT_8X12 '\x02'
|
| Kerpower |
0:772a63029ab0
|
77
|
#define FONT_12X16 '\x03'
|
| Kerpower |
0:772a63029ab0
|
78
|
|
| Kerpower |
0:772a63029ab0
|
79
|
// Touch Values
|
| Kerpower |
0:772a63029ab0
|
80
|
#define WAIT '\x00'
|
| Kerpower |
0:772a63029ab0
|
81
|
#define PRESS '\x01'
|
| Kerpower |
0:772a63029ab0
|
82
|
#define RELEASE '\x02'
|
| Kerpower |
0:772a63029ab0
|
83
|
#define MOVE '\x03'
|
| Kerpower |
0:772a63029ab0
|
84
|
#define STATUS '\x04'
|
| Kerpower |
0:772a63029ab0
|
85
|
#define GETPOSITION '\x05'
|
| Kerpower |
0:772a63029ab0
|
86
|
|
| Kerpower |
0:772a63029ab0
|
87
|
// Data speed
|
| Kerpower |
0:772a63029ab0
|
88
|
#define BAUD_110 '\x00'
|
| Kerpower |
0:772a63029ab0
|
89
|
#define BAUD_300 '\x01'
|
| Kerpower |
0:772a63029ab0
|
90
|
#define BAUD_600 '\x02'
|
| Kerpower |
0:772a63029ab0
|
91
|
#define BAUD_1200 '\x03'
|
| Kerpower |
0:772a63029ab0
|
92
|
#define BAUD_2400 '\x04'
|
| Kerpower |
0:772a63029ab0
|
93
|
#define BAUD_4800 '\x05'
|
| Kerpower |
0:772a63029ab0
|
94
|
#define BAUD_9600 '\x06'
|
| Kerpower |
0:772a63029ab0
|
95
|
#define BAUD_14400 '\x07'
|
| Kerpower |
0:772a63029ab0
|
96
|
#define BAUD_19200 '\x09'
|
| Kerpower |
0:772a63029ab0
|
97
|
#define BAUD_31250 '\x09'
|
| Kerpower |
0:772a63029ab0
|
98
|
#define BAUD_38400 '\x0A'
|
| Kerpower |
0:772a63029ab0
|
99
|
#define BAUD_56000 '\x0B'
|
| Kerpower |
0:772a63029ab0
|
100
|
#define BAUD_57600 '\x0C'
|
| Kerpower |
0:772a63029ab0
|
101
|
#define BAUD_115200 '\x0D'
|
| Kerpower |
0:772a63029ab0
|
102
|
#define BAUD_128000 '\x0E'
|
| Kerpower |
0:772a63029ab0
|
103
|
#define BAUD_256000 '\x0F'
|
| Kerpower |
0:772a63029ab0
|
104
|
|
| Kerpower |
0:772a63029ab0
|
105
|
// Defined Colors
|
| Kerpower |
0:772a63029ab0
|
106
|
#define WHITE 0xFFFFFF
|
| Kerpower |
0:772a63029ab0
|
107
|
#define BLACK 0x000000
|
| Kerpower |
0:772a63029ab0
|
108
|
#define RED 0xFF0000
|
| Kerpower |
0:772a63029ab0
|
109
|
#define GREEN 0x00FF00
|
| Kerpower |
0:772a63029ab0
|
110
|
#define BLUE 0x0000FF
|
| Kerpower |
0:772a63029ab0
|
111
|
#define LGREY 0xBFBFBF
|
| Kerpower |
0:772a63029ab0
|
112
|
#define DGREY 0x5F5F5F
|
| Kerpower |
0:772a63029ab0
|
113
|
|
| Kerpower |
0:772a63029ab0
|
114
|
// Mode data
|
| Kerpower |
0:772a63029ab0
|
115
|
#define BACKLIGHT '\x00'
|
| Kerpower |
0:772a63029ab0
|
116
|
#define DISPLAY '\x01'
|
| Kerpower |
0:772a63029ab0
|
117
|
#define CONTRAST '\x02'
|
| Kerpower |
0:772a63029ab0
|
118
|
#define POWER '\x03'
|
| Kerpower |
0:772a63029ab0
|
119
|
#define ORIENTATION '\x04'
|
| Kerpower |
0:772a63029ab0
|
120
|
#define TOUCH_CTRL '\x05'
|
| Kerpower |
0:772a63029ab0
|
121
|
#define IMAGE_FORMAT '\x06'
|
| Kerpower |
0:772a63029ab0
|
122
|
#define PROTECT_FAT '\x08'
|
| Kerpower |
0:772a63029ab0
|
123
|
|
| Kerpower |
0:772a63029ab0
|
124
|
// change this to your specific screen (newer versions) if needed
|
| Kerpower |
0:772a63029ab0
|
125
|
// Startup orientation is PORTRAIT so SIZE_X must be lesser than SIZE_Y
|
| Kerpower |
0:772a63029ab0
|
126
|
#define SIZE_X 240
|
| Kerpower |
0:772a63029ab0
|
127
|
#define SIZE_Y 320
|
| Kerpower |
0:772a63029ab0
|
128
|
|
| Kerpower |
0:772a63029ab0
|
129
|
#define IS_LANDSCAPE 0
|
| Kerpower |
0:772a63029ab0
|
130
|
#define IS_PORTRAIT 1
|
| Kerpower |
0:772a63029ab0
|
131
|
|
| Kerpower |
0:772a63029ab0
|
132
|
// Screen orientation
|
| Kerpower |
0:772a63029ab0
|
133
|
#define LANDSCAPE '\x01'
|
| Kerpower |
0:772a63029ab0
|
134
|
#define LANDSCAPE_R '\x02'
|
| Kerpower |
0:772a63029ab0
|
135
|
#define PORTRAIT '\x03'
|
| Kerpower |
0:772a63029ab0
|
136
|
#define PORTRAIT_R '\x04'
|
| Kerpower |
0:772a63029ab0
|
137
|
|
| Kerpower |
0:772a63029ab0
|
138
|
// Parameters
|
| Kerpower |
0:772a63029ab0
|
139
|
#define ENABLE '\x00'
|
| Kerpower |
0:772a63029ab0
|
140
|
#define DISABLE '\x01'
|
| Kerpower |
0:772a63029ab0
|
141
|
#define RESET '\x02'
|
| Kerpower |
0:772a63029ab0
|
142
|
|
| Kerpower |
0:772a63029ab0
|
143
|
#define NEW '\x00'
|
| Kerpower |
0:772a63029ab0
|
144
|
#define OLD '\x01'
|
| Kerpower |
0:772a63029ab0
|
145
|
|
| Kerpower |
0:772a63029ab0
|
146
|
#define DOWN '\x00'
|
| Kerpower |
0:772a63029ab0
|
147
|
#define UP '\x01'
|
| Kerpower |
0:772a63029ab0
|
148
|
|
| Kerpower |
0:772a63029ab0
|
149
|
#define PROTECT '\x00'
|
| Kerpower |
0:772a63029ab0
|
150
|
#define UNPROTECT '\x02'
|
| Kerpower |
0:772a63029ab0
|
151
|
|
| Kerpower |
0:772a63029ab0
|
152
|
//**************************************************************************
|
| Kerpower |
0:772a63029ab0
|
153
|
class TFT_4DGL {
|
| Kerpower |
0:772a63029ab0
|
154
|
|
| Kerpower |
0:772a63029ab0
|
155
|
public :
|
| Kerpower |
0:772a63029ab0
|
156
|
|
| Kerpower |
0:772a63029ab0
|
157
|
TFT_4DGL(PinName tx, PinName rx, PinName rst);
|
| Kerpower |
0:772a63029ab0
|
158
|
|
| Kerpower |
0:772a63029ab0
|
159
|
// General Commands
|
| Kerpower |
0:772a63029ab0
|
160
|
void cls();
|
| Kerpower |
0:772a63029ab0
|
161
|
void reset();
|
| Kerpower |
0:772a63029ab0
|
162
|
void autobaud();
|
| Kerpower |
0:772a63029ab0
|
163
|
void baudrate(int);
|
| Kerpower |
0:772a63029ab0
|
164
|
void background_color(int);
|
| Kerpower |
0:772a63029ab0
|
165
|
void display_control(char, char);
|
| Kerpower |
0:772a63029ab0
|
166
|
void set_volume(char);
|
| Kerpower |
0:772a63029ab0
|
167
|
|
| Kerpower |
0:772a63029ab0
|
168
|
// Graphics Commands
|
| Kerpower |
0:772a63029ab0
|
169
|
void circle(int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
170
|
void triangle(int, int, int, int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
171
|
void line(int, int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
172
|
void rectangle(int, int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
173
|
void ellipse(int, int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
174
|
void pixel(int, int, int);
|
| Kerpower |
0:772a63029ab0
|
175
|
int read_pixel(int, int);
|
| Kerpower |
0:772a63029ab0
|
176
|
void screen_copy(int, int, int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
177
|
void pen_size(char);
|
| Kerpower |
0:772a63029ab0
|
178
|
|
| Kerpower |
0:772a63029ab0
|
179
|
// Texts Commands
|
| Kerpower |
0:772a63029ab0
|
180
|
void set_font(char);
|
| Kerpower |
0:772a63029ab0
|
181
|
void text_mode(char);
|
| Kerpower |
0:772a63029ab0
|
182
|
void text_char(char, char, char, int);
|
| Kerpower |
0:772a63029ab0
|
183
|
void graphic_char(char, int, int, int, char, char);
|
| Kerpower |
0:772a63029ab0
|
184
|
void text_string(char *, char, char, char, int);
|
| Kerpower |
0:772a63029ab0
|
185
|
void graphic_string(char *, int, int, char, int, char, char);
|
| Kerpower |
0:772a63029ab0
|
186
|
void text_button(char *, char, int, int, int, char, int, char, char);
|
| Kerpower |
0:772a63029ab0
|
187
|
|
| Kerpower |
0:772a63029ab0
|
188
|
void locate(char, char);
|
| Kerpower |
0:772a63029ab0
|
189
|
void color(int);
|
| Kerpower |
0:772a63029ab0
|
190
|
void putc(char);
|
| Kerpower |
0:772a63029ab0
|
191
|
void puts(char *);
|
| Kerpower |
0:772a63029ab0
|
192
|
|
| Kerpower |
0:772a63029ab0
|
193
|
// Touch Command
|
| Kerpower |
0:772a63029ab0
|
194
|
void touch_mode(char);
|
| Kerpower |
0:772a63029ab0
|
195
|
void get_touch(int *, int *);
|
| Kerpower |
0:772a63029ab0
|
196
|
void wait_touch(int);
|
| Kerpower |
0:772a63029ab0
|
197
|
void set_touch(int, int, int, int);
|
| Kerpower |
0:772a63029ab0
|
198
|
int touch_status(void);
|
| Kerpower |
0:772a63029ab0
|
199
|
|
| Kerpower |
0:772a63029ab0
|
200
|
// Screen Data
|
| Kerpower |
0:772a63029ab0
|
201
|
int type;
|
| Kerpower |
0:772a63029ab0
|
202
|
int revision;
|
| Kerpower |
0:772a63029ab0
|
203
|
int firmware;
|
| Kerpower |
0:772a63029ab0
|
204
|
int reserved1;
|
| Kerpower |
0:772a63029ab0
|
205
|
int reserved2;
|
| Kerpower |
0:772a63029ab0
|
206
|
|
| Kerpower |
0:772a63029ab0
|
207
|
// Text data
|
| Kerpower |
0:772a63029ab0
|
208
|
char current_col;
|
| Kerpower |
0:772a63029ab0
|
209
|
char current_row;
|
| Kerpower |
0:772a63029ab0
|
210
|
int current_color;
|
| Kerpower |
0:772a63029ab0
|
211
|
char current_font;
|
| Kerpower |
0:772a63029ab0
|
212
|
char current_orientation;
|
| Kerpower |
0:772a63029ab0
|
213
|
char max_col;
|
| Kerpower |
0:772a63029ab0
|
214
|
char max_row;
|
| Kerpower |
0:772a63029ab0
|
215
|
|
| Kerpower |
0:772a63029ab0
|
216
|
protected :
|
| Kerpower |
0:772a63029ab0
|
217
|
|
| Kerpower |
0:772a63029ab0
|
218
|
Serial _cmd;
|
| Kerpower |
0:772a63029ab0
|
219
|
DigitalOut _rst;
|
| Kerpower |
0:772a63029ab0
|
220
|
|
| Kerpower |
0:772a63029ab0
|
221
|
void freeBUFFER (void);
|
| Kerpower |
0:772a63029ab0
|
222
|
void writeBYTE (char);
|
| Kerpower |
0:772a63029ab0
|
223
|
int writeCOMMAND(char *, int);
|
| Kerpower |
0:772a63029ab0
|
224
|
int readVERSION (char *, int);
|
| Kerpower |
0:772a63029ab0
|
225
|
void getTOUCH (char *, int, int *,int *);
|
| Kerpower |
0:772a63029ab0
|
226
|
int getSTATUS (char *, int);
|
| Kerpower |
0:772a63029ab0
|
227
|
void version (void);
|
| Kerpower |
0:772a63029ab0
|
228
|
};
|
| Kerpower |
0:772a63029ab0
|
229
|
|
| Kerpower |
0:772a63029ab0
|
230
|
typedef unsigned char BYTE; |
Stephane ROCHON
4D SGC TFT Screen