Lorenz limit cycle - 2D nonlinear attractor

TFT_4DGL_Graphics.cpp

Committer:
JLS
Date:
2011-02-08
Revision:
0:337717573fe7

File content as of revision 0:337717573fe7:

```//
// 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
// 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"

//****************************************************************************************************
void TFT_4DGL :: circle(int x, int y , int radius, int color) {   // draw a circle in (x,y)
char command[9]= "";

command[0] = CIRCLE;

command[1] = (x >> 8) & 0xFF;
command[2] = x & 0xFF;

command[3] = (y >> 8) & 0xFF;
command[4] = y & 0xFF;

command[5] = (radius >> 8) & 0xFF;

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[7] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color
command[8] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color

writeCOMMAND(command, 9);
}

//****************************************************************************************************
void TFT_4DGL :: triangle(int x1, int y1 , int x2, int y2, int x3, int y3, int color) {   // draw a traingle
char command[15]= "";

command[0] = TRIANGLE;

command[1] = (x1 >> 8) & 0xFF;
command[2] = x1 & 0xFF;

command[3] = (y1 >> 8) & 0xFF;
command[4] = y1 & 0xFF;

command[5] = (x2 >> 8) & 0xFF;
command[6] = x2 & 0xFF;

command[7] = (y2 >> 8) & 0xFF;
command[8] = y2 & 0xFF;

command[9] = (x3 >> 8) & 0xFF;
command[10] = x3 & 0xFF;

command[11] = (y3 >> 8) & 0xFF;
command[12] = y3 & 0xFF;

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[13] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color
command[14] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color

writeCOMMAND(command, 15);
}

//****************************************************************************************************
void TFT_4DGL :: line(int x1, int y1 , int x2, int y2, int color) {   // draw a line
char command[11]= "";

command[0] = LINE;

command[1] = (x1 >> 8) & 0xFF;
command[2] = x1 & 0xFF;

command[3] = (y1 >> 8) & 0xFF;
command[4] = y1 & 0xFF;

command[5] = (x2 >> 8) & 0xFF;
command[6] = x2 & 0xFF;

command[7] = (y2 >> 8) & 0xFF;
command[8] = y2 & 0xFF;

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[9] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;   // first part of 16 bits color
command[10] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color

writeCOMMAND(command, 11);
}

//****************************************************************************************************
void TFT_4DGL :: rectangle(int x1, int y1 , int x2, int y2, int color) {   // draw a rectangle
char command[11]= "";

command[0] = RECTANGLE;

command[1] = (x1 >> 8) & 0xFF;
command[2] = x1 & 0xFF;

command[3] = (y1 >> 8) & 0xFF;
command[4] = y1 & 0xFF;

command[5] = (x2 >> 8) & 0xFF;
command[6] = x2 & 0xFF;

command[7] = (y2 >> 8) & 0xFF;
command[8] = y2 & 0xFF;

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[9] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;   // first part of 16 bits color
command[10] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color

writeCOMMAND(command, 11);
}

//****************************************************************************************************
void TFT_4DGL :: ellipse(int x, int y , int radius_x, int radius_y, int color) {   // draw an ellipse
char command[11]= "";

command[0] = ELLIPSE;

command[1] = (x >> 8) & 0xFF;
command[2] = x & 0xFF;

command[3] = (y >> 8) & 0xFF;
command[4] = y & 0xFF;

command[5] = (radius_x >> 8) & 0xFF;

command[7] = (radius_y >> 8) & 0xFF;

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[9] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;   // first part of 16 bits color
command[10] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color

writeCOMMAND(command, 11);
}

//****************************************************************************************************
void TFT_4DGL :: pixel(int x, int y, int color) {   // draw a pixel
char command[7]= "";

command[0] = PIXEL;

command[1] = (x >> 8) & 0xFF;
command[2] = x & 0xFF;

command[3] = (y >> 8) & 0xFF;
command[4] = y & 0xFF;

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[5] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color
command[6] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color

writeCOMMAND(command, 7);
}

//******************************************************************************************************
int TFT_4DGL :: read_pixel(int x, int y) { // read screen info and populate data

char command[5]= "";

command[1] = (x >> 8) & 0xFF;
command[2] = x & 0xFF;

command[3] = (y >> 8) & 0xFF;
command[4] = y & 0xFF;

int i, temp = 0, color = 0, resp = 0;
char response[2] = "";

freeBUFFER();

for (i = 0; i < 5; i++) {                   // send all chars to serial port
writeBYTE(command[i]);
}

temp = _cmd.getc();
response[resp++] = (char)temp;
}

color = ((response[0] << 8) + response[1]);

return color; // WARNING : this is 16bits color, not 24bits... need to be fixed
}

//******************************************************************************************************
void TFT_4DGL :: screen_copy(int xs, int ys , int xd, int yd , int width, int height) {

char command[13]= "";

command[0] = SCREENCOPY;

command[1] = (xs >> 8) & 0xFF;
command[2] = xs & 0xFF;

command[3] = (ys >> 8) & 0xFF;
command[4] = ys & 0xFF;

command[5] = (xd >> 8) & 0xFF;
command[6] = xd & 0xFF;

command[7] = (yd >> 8) & 0xFF;
command[8] = yd & 0xFF;

command[9] = (width >> 8) & 0xFF;
command[10] = width & 0xFF;

command[11] = (height >> 8) & 0xFF;
command[12] = height & 0xFF;

writeCOMMAND(command, 13);
}

//****************************************************************************************************
void TFT_4DGL :: pen_size(char mode) {   // set pen to SOLID or WIREFRAME
char command[2]= "";

command[0] = PENSIZE;
command[1] = mode;

writeCOMMAND(command, 2);
}

//****************************************************************************************************
// This plays a .wav file from the FAT partition of an uSD Card
// Not really recommended as the speaker on the uLCD-32PT is really bad!
//****************************************************************************************************
void TFT_4DGL :: SD_Card_Wav(char *Filename) {
char command[21]= "";
int Lgt=0;

command[0] = 0x40;      //ext_cmd
command[1] = 0x6C;      //Play Audio
command[2] = 0x01;      //Option 0x00=Return at end, 0x01=Return now, 0x02=Stop, 0x03=Pause, 0x04=Resume, 0x05=Loop.
for(int i=0;Filename[i]!=0x00;i++){
command[i+3] = Filename[i];
Lgt = i;
}
command[Lgt+4] = 0x2E;      //.
command[Lgt+5] = 0x77;      //w
command[Lgt+6] = 0x61;      //a
command[Lgt+7] = 0x76;      //v
command[Lgt+8] = 0x00;      //terminator

writeCOMMAND(command, Lgt+9);
}

//****************************************************************************************************
// This sets the volume for the speaker on the uLCD-32PT
//****************************************************************************************************
void TFT_4DGL :: Set_Volume(char vol) {

char command[2]= "";

command[0] = 0x76;      //cmd
command[1] = vol;       //set volume

writeCOMMAND(command, 2);
}

//****************************************************************************************************
// This displays an image on the screen that is stored on the FAT partition of an uSD Card
// Sent Filename, X-pos, Y-pos, Sector Address - Display from the RAW partition is quicker
//****************************************************************************************************
void TFT_4DGL :: uSD_FAT_Image(char *Filename, int x, int y, long s) {
char X_MSB, X_LSB, Y_MSB, Y_LSB, S0, S1, S2, S3;
char command[25]= "";
int Lgt=0;

X_LSB = x&0x00FF;
X_MSB = (x >> 8);
Y_LSB = y&0x00FF;
Y_MSB = (y >> 8);

S0 = (s >> 20)&0x000000FF;
S1 = (s >> 16)&0x0000FF;
S2 = (s >> 8)&0x0000FF;
S3 = s&0x0000FF;;

command[0] = '@';         //ext_cmd
command[1] = 'm';         //FAT Image
for(int i=0;Filename[i]!=0x00;i++){
command[i+2] = Filename[i];
Lgt = i;
}
command[Lgt+3] = '.';      //.
command[Lgt+4] = 'G';      //G
command[Lgt+5] = 'C';      //C
command[Lgt+6] = 'I';      //I
command[Lgt+7] = 0x00;     //Terminator
command[Lgt+8] = X_MSB;    //X-Position MSB
command[Lgt+9] = X_LSB;    //X-Position LSB
command[Lgt+10] = Y_MSB;   //Y-Position MSB
command[Lgt+11] = Y_LSB;   //Y-Position LSB
command[Lgt+12] = S0;      //Sector Address 4 bytes
command[Lgt+13] = S1;
command[Lgt+14] = S2;
command[Lgt+15] = S3;

writeCOMMAND(command, Lgt+16);
}

//****************************************************************************************************
// This displays an image on the screen in the NEW FORMAT
// Sent X-pos, Y-pos, Sector Address - This is the recommended way to display images
//****************************************************************************************************
void TFT_4DGL :: uSD_Image(int x, int y, long s) {
char S1, S2, S3;
char X_MSB, X_LSB, Y_MSB, Y_LSB;
char command[9]= "";

X_LSB = x&0x00FF;           //Work out the x position
X_MSB = (x >> 8);
Y_LSB = y&0x00FF;           //Work out the y position
Y_MSB = (y >> 8);

S1 = (s >> 16)&0x0000FF;    //Work out the sector address
S2 = (s >> 8)&0x0000FF;
S3 = s&0x0000FF;

command[0] = 0x40;          //ext_cmd
command[1] = 0x49;          //Display image
command[2] = X_MSB;         //X position - 2 bytes
command[3] = X_LSB;
command[4] = Y_MSB;         //Y position - 2 bytes
command[5] = Y_LSB;
command[6] = S1;            //Sector address - 3 bytes
command[7] = S2;
command[8] = S3;

writeCOMMAND(command, 9);
}

//****************************************************************************************************
// This displays an video on the screen in the NEW FORMAT
// Sent X-pos, Y-pos, Sector Address - This is the recommended way to display video
//****************************************************************************************************
void TFT_4DGL :: uSD_Video(int x, int y, long s) {
char S1, S2, S3;
char X_MSB, X_LSB, Y_MSB, Y_LSB;
char command[10]= "";

X_LSB = x&0x00FF;
X_MSB = (x >> 8);
Y_LSB = y&0x00FF;
Y_MSB = (y >> 8);

S1 = (s >> 16)&0x0000FF;
S2 = (s >> 8)&0x0000FF;
S3 = s&0x0000FF;

command[0] = 0x40;      //ext_cmd
command[1] = 0x56;      //Display video
command[2] = X_MSB;     //X position - 2 bytes
command[3] = X_LSB;
command[4] = Y_MSB;     //Y position - 2 bytes
command[5] = Y_LSB;
command[6] = 0x00;      //delay between frames
command[7] = S1;        //Sector address - 3 bytes
command[8] = S2;
command[9] = S3;

writeCOMMAND(command, 10);
}

```