Strizhak-Kawczynski model - chemical chaotic system

Dependencies:   mbed

Committer:
JLS
Date:
Tue Mar 15 22:14:06 2011 +0000
Revision:
0:4427cf13018e

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
JLS 0:4427cf13018e 1 //
JLS 0:4427cf13018e 2 // TFT_4DGL is a class to drive 4D Systems TFT touch screens
JLS 0:4427cf13018e 3 //
JLS 0:4427cf13018e 4 // Copyright (C) <2010> Stephane ROCHON <stephane.rochon at free.fr>
JLS 0:4427cf13018e 5 //
JLS 0:4427cf13018e 6 // TFT_4DGL is free software: you can redistribute it and/or modify
JLS 0:4427cf13018e 7 // it under the terms of the GNU General Public License as published by
JLS 0:4427cf13018e 8 // the Free Software Foundation, either version 3 of the License, or
JLS 0:4427cf13018e 9 // (at your option) any later version.
JLS 0:4427cf13018e 10 //
JLS 0:4427cf13018e 11 // TFT_4DGL is distributed in the hope that it will be useful,
JLS 0:4427cf13018e 12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
JLS 0:4427cf13018e 13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
JLS 0:4427cf13018e 14 // GNU General Public License for more details.
JLS 0:4427cf13018e 15 //
JLS 0:4427cf13018e 16 // You should have received a copy of the GNU General Public License
JLS 0:4427cf13018e 17 // along with TFT_4DGL. If not, see <http://www.gnu.org/licenses/>.
JLS 0:4427cf13018e 18
JLS 0:4427cf13018e 19 #include "mbed.h"
JLS 0:4427cf13018e 20 #include "TFT_4DGL.h"
JLS 0:4427cf13018e 21
JLS 0:4427cf13018e 22
JLS 0:4427cf13018e 23 //****************************************************************************************************
JLS 0:4427cf13018e 24 void TFT_4DGL :: circle(int x, int y , int radius, int color) { // draw a circle in (x,y)
JLS 0:4427cf13018e 25 char command[9]= "";
JLS 0:4427cf13018e 26
JLS 0:4427cf13018e 27 command[0] = CIRCLE;
JLS 0:4427cf13018e 28
JLS 0:4427cf13018e 29 command[1] = (x >> 8) & 0xFF;
JLS 0:4427cf13018e 30 command[2] = x & 0xFF;
JLS 0:4427cf13018e 31
JLS 0:4427cf13018e 32 command[3] = (y >> 8) & 0xFF;
JLS 0:4427cf13018e 33 command[4] = y & 0xFF;
JLS 0:4427cf13018e 34
JLS 0:4427cf13018e 35 command[5] = (radius >> 8) & 0xFF;
JLS 0:4427cf13018e 36 command[6] = radius & 0xFF;
JLS 0:4427cf13018e 37
JLS 0:4427cf13018e 38 int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS 0:4427cf13018e 39 int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS 0:4427cf13018e 40 int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS 0:4427cf13018e 41
JLS 0:4427cf13018e 42 command[7] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS 0:4427cf13018e 43 command[8] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS 0:4427cf13018e 44
JLS 0:4427cf13018e 45 writeCOMMAND(command, 9);
JLS 0:4427cf13018e 46 }
JLS 0:4427cf13018e 47
JLS 0:4427cf13018e 48 //****************************************************************************************************
JLS 0:4427cf13018e 49 void TFT_4DGL :: triangle(int x1, int y1 , int x2, int y2, int x3, int y3, int color) { // draw a traingle
JLS 0:4427cf13018e 50 char command[15]= "";
JLS 0:4427cf13018e 51
JLS 0:4427cf13018e 52 command[0] = TRIANGLE;
JLS 0:4427cf13018e 53
JLS 0:4427cf13018e 54 command[1] = (x1 >> 8) & 0xFF;
JLS 0:4427cf13018e 55 command[2] = x1 & 0xFF;
JLS 0:4427cf13018e 56
JLS 0:4427cf13018e 57 command[3] = (y1 >> 8) & 0xFF;
JLS 0:4427cf13018e 58 command[4] = y1 & 0xFF;
JLS 0:4427cf13018e 59
JLS 0:4427cf13018e 60 command[5] = (x2 >> 8) & 0xFF;
JLS 0:4427cf13018e 61 command[6] = x2 & 0xFF;
JLS 0:4427cf13018e 62
JLS 0:4427cf13018e 63 command[7] = (y2 >> 8) & 0xFF;
JLS 0:4427cf13018e 64 command[8] = y2 & 0xFF;
JLS 0:4427cf13018e 65
JLS 0:4427cf13018e 66 command[9] = (x3 >> 8) & 0xFF;
JLS 0:4427cf13018e 67 command[10] = x3 & 0xFF;
JLS 0:4427cf13018e 68
JLS 0:4427cf13018e 69 command[11] = (y3 >> 8) & 0xFF;
JLS 0:4427cf13018e 70 command[12] = y3 & 0xFF;
JLS 0:4427cf13018e 71
JLS 0:4427cf13018e 72 int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS 0:4427cf13018e 73 int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS 0:4427cf13018e 74 int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS 0:4427cf13018e 75
JLS 0:4427cf13018e 76 command[13] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS 0:4427cf13018e 77 command[14] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS 0:4427cf13018e 78
JLS 0:4427cf13018e 79 writeCOMMAND(command, 15);
JLS 0:4427cf13018e 80 }
JLS 0:4427cf13018e 81
JLS 0:4427cf13018e 82 //****************************************************************************************************
JLS 0:4427cf13018e 83 void TFT_4DGL :: line(int x1, int y1 , int x2, int y2, int color) { // draw a line
JLS 0:4427cf13018e 84 char command[11]= "";
JLS 0:4427cf13018e 85
JLS 0:4427cf13018e 86 command[0] = LINE;
JLS 0:4427cf13018e 87
JLS 0:4427cf13018e 88 command[1] = (x1 >> 8) & 0xFF;
JLS 0:4427cf13018e 89 command[2] = x1 & 0xFF;
JLS 0:4427cf13018e 90
JLS 0:4427cf13018e 91 command[3] = (y1 >> 8) & 0xFF;
JLS 0:4427cf13018e 92 command[4] = y1 & 0xFF;
JLS 0:4427cf13018e 93
JLS 0:4427cf13018e 94 command[5] = (x2 >> 8) & 0xFF;
JLS 0:4427cf13018e 95 command[6] = x2 & 0xFF;
JLS 0:4427cf13018e 96
JLS 0:4427cf13018e 97 command[7] = (y2 >> 8) & 0xFF;
JLS 0:4427cf13018e 98 command[8] = y2 & 0xFF;
JLS 0:4427cf13018e 99
JLS 0:4427cf13018e 100 int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS 0:4427cf13018e 101 int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS 0:4427cf13018e 102 int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS 0:4427cf13018e 103
JLS 0:4427cf13018e 104 command[9] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS 0:4427cf13018e 105 command[10] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS 0:4427cf13018e 106
JLS 0:4427cf13018e 107 writeCOMMAND(command, 11);
JLS 0:4427cf13018e 108 }
JLS 0:4427cf13018e 109
JLS 0:4427cf13018e 110 //****************************************************************************************************
JLS 0:4427cf13018e 111 void TFT_4DGL :: rectangle(int x1, int y1 , int x2, int y2, int color) { // draw a rectangle
JLS 0:4427cf13018e 112 char command[11]= "";
JLS 0:4427cf13018e 113
JLS 0:4427cf13018e 114 command[0] = RECTANGLE;
JLS 0:4427cf13018e 115
JLS 0:4427cf13018e 116 command[1] = (x1 >> 8) & 0xFF;
JLS 0:4427cf13018e 117 command[2] = x1 & 0xFF;
JLS 0:4427cf13018e 118
JLS 0:4427cf13018e 119 command[3] = (y1 >> 8) & 0xFF;
JLS 0:4427cf13018e 120 command[4] = y1 & 0xFF;
JLS 0:4427cf13018e 121
JLS 0:4427cf13018e 122 command[5] = (x2 >> 8) & 0xFF;
JLS 0:4427cf13018e 123 command[6] = x2 & 0xFF;
JLS 0:4427cf13018e 124
JLS 0:4427cf13018e 125 command[7] = (y2 >> 8) & 0xFF;
JLS 0:4427cf13018e 126 command[8] = y2 & 0xFF;
JLS 0:4427cf13018e 127
JLS 0:4427cf13018e 128 int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS 0:4427cf13018e 129 int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS 0:4427cf13018e 130 int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS 0:4427cf13018e 131
JLS 0:4427cf13018e 132 command[9] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS 0:4427cf13018e 133 command[10] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS 0:4427cf13018e 134
JLS 0:4427cf13018e 135 writeCOMMAND(command, 11);
JLS 0:4427cf13018e 136 }
JLS 0:4427cf13018e 137
JLS 0:4427cf13018e 138 //****************************************************************************************************
JLS 0:4427cf13018e 139 void TFT_4DGL :: ellipse(int x, int y , int radius_x, int radius_y, int color) { // draw an ellipse
JLS 0:4427cf13018e 140 char command[11]= "";
JLS 0:4427cf13018e 141
JLS 0:4427cf13018e 142 command[0] = ELLIPSE;
JLS 0:4427cf13018e 143
JLS 0:4427cf13018e 144 command[1] = (x >> 8) & 0xFF;
JLS 0:4427cf13018e 145 command[2] = x & 0xFF;
JLS 0:4427cf13018e 146
JLS 0:4427cf13018e 147 command[3] = (y >> 8) & 0xFF;
JLS 0:4427cf13018e 148 command[4] = y & 0xFF;
JLS 0:4427cf13018e 149
JLS 0:4427cf13018e 150 command[5] = (radius_x >> 8) & 0xFF;
JLS 0:4427cf13018e 151 command[6] = radius_x & 0xFF;
JLS 0:4427cf13018e 152
JLS 0:4427cf13018e 153 command[7] = (radius_y >> 8) & 0xFF;
JLS 0:4427cf13018e 154 command[8] = radius_y & 0xFF;
JLS 0:4427cf13018e 155
JLS 0:4427cf13018e 156 int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS 0:4427cf13018e 157 int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS 0:4427cf13018e 158 int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS 0:4427cf13018e 159
JLS 0:4427cf13018e 160 command[9] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS 0:4427cf13018e 161 command[10] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS 0:4427cf13018e 162
JLS 0:4427cf13018e 163 writeCOMMAND(command, 11);
JLS 0:4427cf13018e 164 }
JLS 0:4427cf13018e 165
JLS 0:4427cf13018e 166 //****************************************************************************************************
JLS 0:4427cf13018e 167 void TFT_4DGL :: pixel(int x, int y, int color) { // draw a pixel
JLS 0:4427cf13018e 168 char command[7]= "";
JLS 0:4427cf13018e 169
JLS 0:4427cf13018e 170 command[0] = PIXEL;
JLS 0:4427cf13018e 171
JLS 0:4427cf13018e 172 command[1] = (x >> 8) & 0xFF;
JLS 0:4427cf13018e 173 command[2] = x & 0xFF;
JLS 0:4427cf13018e 174
JLS 0:4427cf13018e 175 command[3] = (y >> 8) & 0xFF;
JLS 0:4427cf13018e 176 command[4] = y & 0xFF;
JLS 0:4427cf13018e 177
JLS 0:4427cf13018e 178 int red5 = (color >> (16 + 3)) & 0x1F; // get red on 5 bits
JLS 0:4427cf13018e 179 int green6 = (color >> (8 + 2)) & 0x3F; // get green on 6 bits
JLS 0:4427cf13018e 180 int blue5 = (color >> (0 + 3)) & 0x1F; // get blue on 5 bits
JLS 0:4427cf13018e 181
JLS 0:4427cf13018e 182 command[5] = ((red5 << 3) + (green6 >> 3)) & 0xFF; // first part of 16 bits color
JLS 0:4427cf13018e 183 command[6] = ((green6 << 5) + (blue5 >> 0)) & 0xFF; // second part of 16 bits color
JLS 0:4427cf13018e 184
JLS 0:4427cf13018e 185 writeCOMMAND(command, 7);
JLS 0:4427cf13018e 186 }
JLS 0:4427cf13018e 187
JLS 0:4427cf13018e 188 //******************************************************************************************************
JLS 0:4427cf13018e 189 int TFT_4DGL :: read_pixel(int x, int y) { // read screen info and populate data
JLS 0:4427cf13018e 190
JLS 0:4427cf13018e 191 char command[5]= "";
JLS 0:4427cf13018e 192
JLS 0:4427cf13018e 193 command[0] = READPIXEL;
JLS 0:4427cf13018e 194
JLS 0:4427cf13018e 195 command[1] = (x >> 8) & 0xFF;
JLS 0:4427cf13018e 196 command[2] = x & 0xFF;
JLS 0:4427cf13018e 197
JLS 0:4427cf13018e 198 command[3] = (y >> 8) & 0xFF;
JLS 0:4427cf13018e 199 command[4] = y & 0xFF;
JLS 0:4427cf13018e 200
JLS 0:4427cf13018e 201 int i, temp = 0, color = 0, resp = 0;
JLS 0:4427cf13018e 202 char response[2] = "";
JLS 0:4427cf13018e 203
JLS 0:4427cf13018e 204 freeBUFFER();
JLS 0:4427cf13018e 205
JLS 0:4427cf13018e 206 for (i = 0; i < 5; i++) { // send all chars to serial port
JLS 0:4427cf13018e 207 writeBYTE(command[i]);
JLS 0:4427cf13018e 208 }
JLS 0:4427cf13018e 209
JLS 0:4427cf13018e 210 while (!_cmd.readable()) wait_ms(TEMPO); // wait for screen answer
JLS 0:4427cf13018e 211
JLS 0:4427cf13018e 212 while (_cmd.readable()) {
JLS 0:4427cf13018e 213 temp = _cmd.getc();
JLS 0:4427cf13018e 214 response[resp++] = (char)temp;
JLS 0:4427cf13018e 215 }
JLS 0:4427cf13018e 216
JLS 0:4427cf13018e 217 color = ((response[0] << 8) + response[1]);
JLS 0:4427cf13018e 218
JLS 0:4427cf13018e 219 return color; // WARNING : this is 16bits color, not 24bits... need to be fixed
JLS 0:4427cf13018e 220 }
JLS 0:4427cf13018e 221
JLS 0:4427cf13018e 222 //******************************************************************************************************
JLS 0:4427cf13018e 223 void TFT_4DGL :: screen_copy(int xs, int ys , int xd, int yd , int width, int height) {
JLS 0:4427cf13018e 224
JLS 0:4427cf13018e 225 char command[13]= "";
JLS 0:4427cf13018e 226
JLS 0:4427cf13018e 227 command[0] = SCREENCOPY;
JLS 0:4427cf13018e 228
JLS 0:4427cf13018e 229 command[1] = (xs >> 8) & 0xFF;
JLS 0:4427cf13018e 230 command[2] = xs & 0xFF;
JLS 0:4427cf13018e 231
JLS 0:4427cf13018e 232 command[3] = (ys >> 8) & 0xFF;
JLS 0:4427cf13018e 233 command[4] = ys & 0xFF;
JLS 0:4427cf13018e 234
JLS 0:4427cf13018e 235 command[5] = (xd >> 8) & 0xFF;
JLS 0:4427cf13018e 236 command[6] = xd & 0xFF;
JLS 0:4427cf13018e 237
JLS 0:4427cf13018e 238 command[7] = (yd >> 8) & 0xFF;
JLS 0:4427cf13018e 239 command[8] = yd & 0xFF;
JLS 0:4427cf13018e 240
JLS 0:4427cf13018e 241 command[9] = (width >> 8) & 0xFF;
JLS 0:4427cf13018e 242 command[10] = width & 0xFF;
JLS 0:4427cf13018e 243
JLS 0:4427cf13018e 244 command[11] = (height >> 8) & 0xFF;
JLS 0:4427cf13018e 245 command[12] = height & 0xFF;
JLS 0:4427cf13018e 246
JLS 0:4427cf13018e 247 writeCOMMAND(command, 13);
JLS 0:4427cf13018e 248 }
JLS 0:4427cf13018e 249
JLS 0:4427cf13018e 250 //****************************************************************************************************
JLS 0:4427cf13018e 251 void TFT_4DGL :: pen_size(char mode) { // set pen to SOLID or WIREFRAME
JLS 0:4427cf13018e 252 char command[2]= "";
JLS 0:4427cf13018e 253
JLS 0:4427cf13018e 254 command[0] = PENSIZE;
JLS 0:4427cf13018e 255 command[1] = mode;
JLS 0:4427cf13018e 256
JLS 0:4427cf13018e 257 writeCOMMAND(command, 2);
JLS 0:4427cf13018e 258 }
JLS 0:4427cf13018e 259
JLS 0:4427cf13018e 260 //****************************************************************************************************
JLS 0:4427cf13018e 261 // This plays a .wav file from the FAT partition of an uSD Card
JLS 0:4427cf13018e 262 // Not really recommended as the speaker on the uLCD-32PT is really bad!
JLS 0:4427cf13018e 263 //****************************************************************************************************
JLS 0:4427cf13018e 264 void TFT_4DGL :: SD_Card_Wav(char *Filename) {
JLS 0:4427cf13018e 265 char command[21]= "";
JLS 0:4427cf13018e 266 int Lgt=0;
JLS 0:4427cf13018e 267
JLS 0:4427cf13018e 268 command[0] = 0x40; //ext_cmd
JLS 0:4427cf13018e 269 command[1] = 0x6C; //Play Audio
JLS 0:4427cf13018e 270 command[2] = 0x01; //Option 0x00=Return at end, 0x01=Return now, 0x02=Stop, 0x03=Pause, 0x04=Resume, 0x05=Loop.
JLS 0:4427cf13018e 271 for(int i=0;Filename[i]!=0x00;i++){
JLS 0:4427cf13018e 272 command[i+3] = Filename[i];
JLS 0:4427cf13018e 273 Lgt = i;
JLS 0:4427cf13018e 274 }
JLS 0:4427cf13018e 275 command[Lgt+4] = 0x2E; //.
JLS 0:4427cf13018e 276 command[Lgt+5] = 0x77; //w
JLS 0:4427cf13018e 277 command[Lgt+6] = 0x61; //a
JLS 0:4427cf13018e 278 command[Lgt+7] = 0x76; //v
JLS 0:4427cf13018e 279 command[Lgt+8] = 0x00; //terminator
JLS 0:4427cf13018e 280
JLS 0:4427cf13018e 281 writeCOMMAND(command, Lgt+9);
JLS 0:4427cf13018e 282 }
JLS 0:4427cf13018e 283
JLS 0:4427cf13018e 284 //****************************************************************************************************
JLS 0:4427cf13018e 285 // This sets the volume for the speaker on the uLCD-32PT
JLS 0:4427cf13018e 286 //****************************************************************************************************
JLS 0:4427cf13018e 287 void TFT_4DGL :: Set_Volume(char vol) {
JLS 0:4427cf13018e 288
JLS 0:4427cf13018e 289 char command[2]= "";
JLS 0:4427cf13018e 290
JLS 0:4427cf13018e 291 command[0] = 0x76; //cmd
JLS 0:4427cf13018e 292 command[1] = vol; //set volume
JLS 0:4427cf13018e 293
JLS 0:4427cf13018e 294 writeCOMMAND(command, 2);
JLS 0:4427cf13018e 295 }
JLS 0:4427cf13018e 296
JLS 0:4427cf13018e 297 //****************************************************************************************************
JLS 0:4427cf13018e 298 // This displays an image on the screen that is stored on the FAT partition of an uSD Card
JLS 0:4427cf13018e 299 // Sent Filename, X-pos, Y-pos, Sector Address - Display from the RAW partition is quicker
JLS 0:4427cf13018e 300 //****************************************************************************************************
JLS 0:4427cf13018e 301 void TFT_4DGL :: uSD_FAT_Image(char *Filename, int x, int y, long s) {
JLS 0:4427cf13018e 302 char X_MSB, X_LSB, Y_MSB, Y_LSB, S0, S1, S2, S3;
JLS 0:4427cf13018e 303 char command[25]= "";
JLS 0:4427cf13018e 304 int Lgt=0;
JLS 0:4427cf13018e 305
JLS 0:4427cf13018e 306 X_LSB = x&0x00FF;
JLS 0:4427cf13018e 307 X_MSB = (x >> 8);
JLS 0:4427cf13018e 308 Y_LSB = y&0x00FF;
JLS 0:4427cf13018e 309 Y_MSB = (y >> 8);
JLS 0:4427cf13018e 310
JLS 0:4427cf13018e 311 S0 = (s >> 20)&0x000000FF;
JLS 0:4427cf13018e 312 S1 = (s >> 16)&0x0000FF;
JLS 0:4427cf13018e 313 S2 = (s >> 8)&0x0000FF;
JLS 0:4427cf13018e 314 S3 = s&0x0000FF;;
JLS 0:4427cf13018e 315
JLS 0:4427cf13018e 316 command[0] = '@'; //ext_cmd
JLS 0:4427cf13018e 317 command[1] = 'm'; //FAT Image
JLS 0:4427cf13018e 318 for(int i=0;Filename[i]!=0x00;i++){
JLS 0:4427cf13018e 319 command[i+2] = Filename[i];
JLS 0:4427cf13018e 320 Lgt = i;
JLS 0:4427cf13018e 321 }
JLS 0:4427cf13018e 322 command[Lgt+3] = '.'; //.
JLS 0:4427cf13018e 323 command[Lgt+4] = 'G'; //G
JLS 0:4427cf13018e 324 command[Lgt+5] = 'C'; //C
JLS 0:4427cf13018e 325 command[Lgt+6] = 'I'; //I
JLS 0:4427cf13018e 326 command[Lgt+7] = 0x00; //Terminator
JLS 0:4427cf13018e 327 command[Lgt+8] = X_MSB; //X-Position MSB
JLS 0:4427cf13018e 328 command[Lgt+9] = X_LSB; //X-Position LSB
JLS 0:4427cf13018e 329 command[Lgt+10] = Y_MSB; //Y-Position MSB
JLS 0:4427cf13018e 330 command[Lgt+11] = Y_LSB; //Y-Position LSB
JLS 0:4427cf13018e 331 command[Lgt+12] = S0; //Sector Address 4 bytes
JLS 0:4427cf13018e 332 command[Lgt+13] = S1;
JLS 0:4427cf13018e 333 command[Lgt+14] = S2;
JLS 0:4427cf13018e 334 command[Lgt+15] = S3;
JLS 0:4427cf13018e 335
JLS 0:4427cf13018e 336 writeCOMMAND(command, Lgt+16);
JLS 0:4427cf13018e 337 }
JLS 0:4427cf13018e 338
JLS 0:4427cf13018e 339 //****************************************************************************************************
JLS 0:4427cf13018e 340 // This displays an image on the screen in the NEW FORMAT
JLS 0:4427cf13018e 341 // Sent X-pos, Y-pos, Sector Address - This is the recommended way to display images
JLS 0:4427cf13018e 342 //****************************************************************************************************
JLS 0:4427cf13018e 343 void TFT_4DGL :: uSD_Image(int x, int y, long s) {
JLS 0:4427cf13018e 344 char S1, S2, S3;
JLS 0:4427cf13018e 345 char X_MSB, X_LSB, Y_MSB, Y_LSB;
JLS 0:4427cf13018e 346 char command[9]= "";
JLS 0:4427cf13018e 347
JLS 0:4427cf13018e 348 X_LSB = x&0x00FF; //Work out the x position
JLS 0:4427cf13018e 349 X_MSB = (x >> 8);
JLS 0:4427cf13018e 350 Y_LSB = y&0x00FF; //Work out the y position
JLS 0:4427cf13018e 351 Y_MSB = (y >> 8);
JLS 0:4427cf13018e 352
JLS 0:4427cf13018e 353 S1 = (s >> 16)&0x0000FF; //Work out the sector address
JLS 0:4427cf13018e 354 S2 = (s >> 8)&0x0000FF;
JLS 0:4427cf13018e 355 S3 = s&0x0000FF;
JLS 0:4427cf13018e 356
JLS 0:4427cf13018e 357 command[0] = 0x40; //ext_cmd
JLS 0:4427cf13018e 358 command[1] = 0x49; //Display image
JLS 0:4427cf13018e 359 command[2] = X_MSB; //X position - 2 bytes
JLS 0:4427cf13018e 360 command[3] = X_LSB;
JLS 0:4427cf13018e 361 command[4] = Y_MSB; //Y position - 2 bytes
JLS 0:4427cf13018e 362 command[5] = Y_LSB;
JLS 0:4427cf13018e 363 command[6] = S1; //Sector address - 3 bytes
JLS 0:4427cf13018e 364 command[7] = S2;
JLS 0:4427cf13018e 365 command[8] = S3;
JLS 0:4427cf13018e 366
JLS 0:4427cf13018e 367 writeCOMMAND(command, 9);
JLS 0:4427cf13018e 368 }
JLS 0:4427cf13018e 369
JLS 0:4427cf13018e 370 //****************************************************************************************************
JLS 0:4427cf13018e 371 // This displays an video on the screen in the NEW FORMAT
JLS 0:4427cf13018e 372 // Sent X-pos, Y-pos, Sector Address - This is the recommended way to display video
JLS 0:4427cf13018e 373 //****************************************************************************************************
JLS 0:4427cf13018e 374 void TFT_4DGL :: uSD_Video(int x, int y, long s) {
JLS 0:4427cf13018e 375 char S1, S2, S3;
JLS 0:4427cf13018e 376 char X_MSB, X_LSB, Y_MSB, Y_LSB;
JLS 0:4427cf13018e 377 char command[10]= "";
JLS 0:4427cf13018e 378
JLS 0:4427cf13018e 379 X_LSB = x&0x00FF;
JLS 0:4427cf13018e 380 X_MSB = (x >> 8);
JLS 0:4427cf13018e 381 Y_LSB = y&0x00FF;
JLS 0:4427cf13018e 382 Y_MSB = (y >> 8);
JLS 0:4427cf13018e 383
JLS 0:4427cf13018e 384 S1 = (s >> 16)&0x0000FF;
JLS 0:4427cf13018e 385 S2 = (s >> 8)&0x0000FF;
JLS 0:4427cf13018e 386 S3 = s&0x0000FF;
JLS 0:4427cf13018e 387
JLS 0:4427cf13018e 388 command[0] = 0x40; //ext_cmd
JLS 0:4427cf13018e 389 command[1] = 0x56; //Display video
JLS 0:4427cf13018e 390 command[2] = X_MSB; //X position - 2 bytes
JLS 0:4427cf13018e 391 command[3] = X_LSB;
JLS 0:4427cf13018e 392 command[4] = Y_MSB; //Y position - 2 bytes
JLS 0:4427cf13018e 393 command[5] = Y_LSB;
JLS 0:4427cf13018e 394 command[6] = 0x00; //delay between frames
JLS 0:4427cf13018e 395 command[7] = S1; //Sector address - 3 bytes
JLS 0:4427cf13018e 396 command[8] = S2;
JLS 0:4427cf13018e 397 command[9] = S3;
JLS 0:4427cf13018e 398
JLS 0:4427cf13018e 399 writeCOMMAND(command, 10);
JLS 0:4427cf13018e 400 }