![](/media/cache/profiles/03492e99e42e7ea8480cdfb4899604f5.50x50_q85.jpg)
Lorenz limit cycle - 2D nonlinear attractor
Diff: TFT_4DGL_main.cpp
- Revision:
- 0:337717573fe7
diff -r 000000000000 -r 337717573fe7 TFT_4DGL_main.cpp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/TFT_4DGL_main.cpp Tue Feb 08 21:43:36 2011 +0000 @@ -0,0 +1,394 @@ +// +// TFT_4DGL is a class to drive 4D Systems TFT touch screens +// +// Copyright (C) <2010> Stephane ROCHON <stephane.rochon at free.fr> +// +// TFT_4DGL is free software: you can redistribute it and/or modify +// it under the terms of the GNU General Public License as published by +// the Free Software Foundation, either version 3 of the License, or +// (at your option) any later version. +// +// TFT_4DGL is distributed in the hope that it will be useful, +// but WITHOUT ANY WARRANTY; without even the implied warranty of +// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +// GNU General Public License for more details. +// +// You should have received a copy of the GNU General Public License +// along with TFT_4DGL. If not, see <http://www.gnu.org/licenses/>. + +#include "mbed.h" +#include "TFT_4DGL.h" + +Serial pc(USBTX,USBRX); +//DigitalOut led1(LED1), led2(LED2); + +//****************************************************************************************************** +TFT_4DGL :: TFT_4DGL(PinName tx, PinName rx, PinName rst) : _cmd(tx, rx), _rst(rst) { // Constructor + +#if DEBUGMODE + pc.baud(115200); + + pc.printf("\n\n\n"); + pc.printf("********************\n\r"); + pc.printf("TFT_4DGL CONSTRUCTOR\n\r"); + pc.printf("********************\n\r"); +#endif + + _rst = 1; // put RESET pin to high to start TFT screen + + reset(); + autobaud(); // send autobaud command + baudrate(256000); // set the initial baudrate to 256kbps - fastest supported by uLCD-32PT + cls(); // clear screen + + current_col = 0; // initial cursor col + current_row = 0; // initial cursor row + current_color = WHITE; // initial text color + current_orientation = IS_PORTRAIT; // initial screen orientation + + set_font(FONT_5X7); // initial font + text_mode(TRANSPARENT); // initial text mode + display_control(0x06,0x00); // initial Image control new format +} + +//****************************************************************************************************** +void TFT_4DGL :: writeBYTE(char c) { // send a BYTE command to screen + + _cmd.putc(c); + +#if DEBUGMODE + pc.printf(" Char sent : 0x%02X ",c); + pc.putc(c); + pc.printf(" \n\r"); +#endif + +} + +//****************************************************************************************************** +void TFT_4DGL :: freeBUFFER(void) { // Clear serial buffer before writing command + + while (_cmd.readable()) _cmd.getc(); // clear buffer garbage +} + +//****************************************************************************************************** +int TFT_4DGL :: writeCOMMAND(char *command, int number) { // send several BYTES making a command and return an answer + +#if DEBUGMODE + pc.printf("\n\r"); + pc.printf("New COMMAND : 0x%02X\n\r", command[0]); +#endif + int i, resp = 0; + freeBUFFER(); + + for (i = 0; i < number; i++) writeBYTE(command[i]); // send command to serial port + + while (!_cmd.readable()) wait_ms(TEMPO); // wait for screen answer + if (_cmd.readable()) resp = _cmd.getc(); // read response if any + switch (resp) { + case ACK : // if OK return 1 + resp = 1; + break; + case NAK : // if NOK return -1 + resp = -1; + break; + default : + resp = 0; // else return 0 + break; + } +#if DEBUGMODE + pc.printf(" Answer received : %d\n\r",resp); +#endif + + return resp; +} + +//************************************************************************** +void TFT_4DGL :: reset() { // Reset Screen + + _rst = 0; // put RESET pin to low + wait_ms(TEMPO); // wait a few milliseconds for command reception + _rst = 1; // put RESET back to high + wait(3); // wait 3s for screen to restart + + freeBUFFER(); // clean buffer from possible garbage +} + +//************************************************************************** +void TFT_4DGL :: autobaud() { // send AutoBaud command (9600) + char command[1] = ""; + command[0] = AUTOBAUD; + writeCOMMAND(command, 1); +} + +//************************************************************************** +void TFT_4DGL :: cls() { // clear screen + char command[1] = ""; + command[0] = CLS; + writeCOMMAND(command, 1); +} + +//************************************************************************** +void TFT_4DGL :: version() { // get API version + char command[2] = ""; + command[0] = VERSION; + command[1] = OFF; + readVERSION(command, 2); +} + +//************************************************************************** +void TFT_4DGL :: baudrate(long speed) { // set screen baud rate + char command[2]= ""; + command[0] = BAUDRATE; + switch (speed) { + case 110 : + command[1] = BAUD_110; + break; + case 300 : + command[1] = BAUD_300; + break; + case 600 : + command[1] = BAUD_600; + break; + case 1200 : + command[1] = BAUD_1200; + break; + case 2400 : + command[1] = BAUD_2400; + break; + case 4800 : + command[1] = BAUD_4800; + break; + case 9600 : + command[1] = BAUD_9600; + break; + case 14400 : + command[1] = BAUD_14400; + break; + case 19200 : + command[1] = BAUD_19200; + break; + case 31250 : + command[1] = BAUD_31250; + break; + case 38400 : + command[1] = BAUD_38400; + break; + case 56000 : + command[1] = BAUD_56000; + break; + case 57600 : + command[1] = BAUD_57600; + break; + case 115200 : + command[1] = BAUD_115200; + break; + case 128000 : + command[1] = BAUD_128000; + break; + case 256000 : + command[1] = BAUD_256000; + break; + default : + command[1] = BAUD_9600; + speed = 9600; + break; + } + +#if DEBUGMODE + pc.printf("\n\r"); + pc.printf("New COMMAND : 0x%02X\n\r", command[0]); +#endif + + int i, resp = 0; + freeBUFFER(); + + if(speed==256000) + speed=281000; //If baud rate is 256K comm at 281k - as instructed by 4DGL + + for (i = 0; i <2; i++) writeBYTE(command[i]); // send command to serial port + _cmd.baud(speed); // set mbed to same speed + + while (!_cmd.readable()) wait_ms(TEMPO); // wait for screen answer + + if (_cmd.readable()) resp = _cmd.getc(); // read response if any + switch (resp) { + case ACK : // if OK return 1 + resp = 1; + break; + case NAK : // if NOK return -1 + resp = -1; + break; + default : + resp = 0; // else return 0 + break; + } +#if DEBUGMODE + pc.printf(" Baudrate reply received : %d\n\r",resp); +#endif +} + +//****************************************************************************************************** +int TFT_4DGL :: readVERSION(char *command, int number) { // read screen info and populate data + + int i, temp = 0, resp = 0; + char response[5] = ""; + + freeBUFFER(); + + for (i = 0; i < number; i++) writeBYTE(command[i]); // send all chars to serial port + + while (!_cmd.readable()) wait_ms(TEMPO); // wait for screen answer + + while (_cmd.readable()) { + temp = _cmd.getc(); + response[resp++] = (char)temp; + } + switch (resp) { + case 5 : // if OK populate data and return 1 + type = response[0]; + revision = response[1]; + firmware = response[2]; + reserved1 = response[3]; + reserved2 = response[4]; + resp = 1; + break; + default : + resp = 0; // else return 0 + break; + } + return resp; +} + +//**************************************************************************************************** +void TFT_4DGL :: background_color(int color) { // set screen background color + char command[3]= ""; // input color is in 24bits like 0xRRGGBB + + command[0] = BCKGDCOLOR; + + int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits + int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits + int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits + + command[1] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color + command[2] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color + + writeCOMMAND(command, 3); +} + +//**************************************************************************************************** +void TFT_4DGL :: display_control(char mode, char value) { // set screen mode to value + char command[3]= ""; + + command[0] = DISPCONTROL; + command[1] = mode; + command[2] = value; + + if (mode == ORIENTATION) { + switch (value) { + case LANDSCAPE : + current_orientation = IS_LANDSCAPE; + break; + case LANDSCAPE_R : + current_orientation = IS_LANDSCAPE; + break; + case PORTRAIT : + current_orientation = IS_PORTRAIT; + break; + case PORTRAIT_R : + current_orientation = IS_PORTRAIT; + break; + } + set_font(current_font); + } + writeCOMMAND(command, 3); + +} + +//**************************************************************************************************** +void TFT_4DGL :: set_volume(char value) { // set sound volume to value + char command[2]= ""; + + command[0] = SETVOLUME; + command[1] = value; + + writeCOMMAND(command, 2); +} + + +//****************************************************************************************************** +void TFT_4DGL :: getTOUCH(char *command, int number, int *x, int *y) { // read screen info and populate data + +#if DEBUGMODE + pc.printf("\n\r"); + pc.printf("New COMMAND : 0x%02X\n\r", command[0]); +#endif + int i, temp = 0, resp = 0; + char response[5] = ""; + + freeBUFFER(); + + for (i = 0; i < number; i++) writeBYTE(command[i]); // send all chars to serial port + + while (!_cmd.readable()) wait_ms(TEMPO); // wait for screen answer + + while (_cmd.readable()) { + temp = _cmd.getc(); + response[resp++] = (char)temp; + } + +#if DEBUGMODE + pc.printf(" Answer received %d : 0x%02X 0x%02X 0x%02X 0x%02X\n\r", resp, response[0], response[1], response[2], response[3]); +#endif + + switch (resp) { + case 4 : // if OK populate data + *x = ((response[0]<<8)+ response[1]) * (response[0] != 0xFF); + *y = ((response[2]<<8)+ response[3]) * (response[2] != 0xFF); + break; + default : + *x = -1; + *y = -1; + break; + } + +#if DEBUGMODE + pc.printf(" X,Y : %03d,%03d\n\r", *x, *y); +#endif +} + +//****************************************************************************************************** +int TFT_4DGL :: getSTATUS(char *command, int number) { // read screen info and populate data + +#if DEBUGMODE + pc.printf("\n\r"); + pc.printf("New COMMAND : 0x%02X\n\r", command[0]); +#endif + + int i, temp = 0, resp = 0; + char response[5] = ""; + + freeBUFFER(); + + for (i = 0; i < number; i++) writeBYTE(command[i]); // send all chars to serial port + + while (!_cmd.readable()) wait_ms(TEMPO); // wait for screen answer + + while (_cmd.readable()) { + temp = _cmd.getc(); + response[resp++] = (char)temp; + } + switch (resp) { + case 4 : + resp = (int)response[1]; // if OK populate data + break; + default : + resp = -1; // else return 0 + break; + } + +#if DEBUGMODE + pc.printf(" Answer received : %d\n\r", resp); +#endif + + return resp; +} \ No newline at end of file