Rucklidge chaotic attractor

Committer:
JLS
Date:
Mon Jan 03 13:57:46 2011 +0000
Revision:
0:73bfbf91b6e5

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
JLS 0:73bfbf91b6e5 1 //
JLS 0:73bfbf91b6e5 2 // TFT_4DGL is a class to drive 4D Systems TFT touch screens
JLS 0:73bfbf91b6e5 3 //
JLS 0:73bfbf91b6e5 4 // Copyright (C) <2010> Stephane ROCHON <stephane.rochon at free.fr>
JLS 0:73bfbf91b6e5 5 //
JLS 0:73bfbf91b6e5 6 // TFT_4DGL is free software: you can redistribute it and/or modify
JLS 0:73bfbf91b6e5 7 // it under the terms of the GNU General Public License as published by
JLS 0:73bfbf91b6e5 8 // the Free Software Foundation, either version 3 of the License, or
JLS 0:73bfbf91b6e5 9 // (at your option) any later version.
JLS 0:73bfbf91b6e5 10 //
JLS 0:73bfbf91b6e5 11 // TFT_4DGL is distributed in the hope that it will be useful,
JLS 0:73bfbf91b6e5 12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
JLS 0:73bfbf91b6e5 13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
JLS 0:73bfbf91b6e5 14 // GNU General Public License for more details.
JLS 0:73bfbf91b6e5 15 //
JLS 0:73bfbf91b6e5 16 // You should have received a copy of the GNU General Public License
JLS 0:73bfbf91b6e5 17 // along with TFT_4DGL. If not, see <http://www.gnu.org/licenses/>.
JLS 0:73bfbf91b6e5 18
JLS 0:73bfbf91b6e5 19 #include "mbed.h"
JLS 0:73bfbf91b6e5 20 #include "TFT_4DGL.h"
JLS 0:73bfbf91b6e5 21
JLS 0:73bfbf91b6e5 22 //******************************************************************************************************
JLS 0:73bfbf91b6e5 23 void TFT_4DGL :: touch_mode(char mode) { // Send touch mode (WAIT, PRESS, RELEASE or MOVE)
JLS 0:73bfbf91b6e5 24
JLS 0:73bfbf91b6e5 25 char command[2]= "";
JLS 0:73bfbf91b6e5 26
JLS 0:73bfbf91b6e5 27 command[0] = GETTOUCH;
JLS 0:73bfbf91b6e5 28 command[1] = mode;
JLS 0:73bfbf91b6e5 29
JLS 0:73bfbf91b6e5 30 writeCOMMAND(command, 2);
JLS 0:73bfbf91b6e5 31 }
JLS 0:73bfbf91b6e5 32
JLS 0:73bfbf91b6e5 33 //******************************************************************************************************
JLS 0:73bfbf91b6e5 34 void TFT_4DGL :: get_touch(int *x, int *y) { // Get the touch coordinates
JLS 0:73bfbf91b6e5 35
JLS 0:73bfbf91b6e5 36 char command[2] = "";
JLS 0:73bfbf91b6e5 37
JLS 0:73bfbf91b6e5 38 command[0] = GETTOUCH;
JLS 0:73bfbf91b6e5 39 command[1] = GETPOSITION;
JLS 0:73bfbf91b6e5 40
JLS 0:73bfbf91b6e5 41 getTOUCH(command, 2, x, y);
JLS 0:73bfbf91b6e5 42 }
JLS 0:73bfbf91b6e5 43
JLS 0:73bfbf91b6e5 44 //******************************************************************************************************
JLS 0:73bfbf91b6e5 45 int TFT_4DGL :: touch_status(void) { // Get the touch screen status
JLS 0:73bfbf91b6e5 46
JLS 0:73bfbf91b6e5 47 char command[2] = "";
JLS 0:73bfbf91b6e5 48
JLS 0:73bfbf91b6e5 49 command[0] = GETTOUCH;
JLS 0:73bfbf91b6e5 50 command[1] = STATUS;
JLS 0:73bfbf91b6e5 51
JLS 0:73bfbf91b6e5 52 return getSTATUS(command, 2);
JLS 0:73bfbf91b6e5 53 }
JLS 0:73bfbf91b6e5 54
JLS 0:73bfbf91b6e5 55
JLS 0:73bfbf91b6e5 56 //******************************************************************************************************
JLS 0:73bfbf91b6e5 57 void TFT_4DGL :: wait_touch(int delay) { // wait until touch within a delay in milliseconds
JLS 0:73bfbf91b6e5 58
JLS 0:73bfbf91b6e5 59 char command[3]= "";
JLS 0:73bfbf91b6e5 60
JLS 0:73bfbf91b6e5 61 command[0] = WAITTOUCH;
JLS 0:73bfbf91b6e5 62
JLS 0:73bfbf91b6e5 63 command[1] = (delay >> 8) & 0xFF;
JLS 0:73bfbf91b6e5 64 command[2] = delay & 0xFF;
JLS 0:73bfbf91b6e5 65
JLS 0:73bfbf91b6e5 66 writeCOMMAND(command, 3);
JLS 0:73bfbf91b6e5 67 }
JLS 0:73bfbf91b6e5 68
JLS 0:73bfbf91b6e5 69 //******************************************************************************************************
JLS 0:73bfbf91b6e5 70 void TFT_4DGL :: set_touch(int x1, int y1 , int x2, int y2) { // define touch area
JLS 0:73bfbf91b6e5 71
JLS 0:73bfbf91b6e5 72 char command[9]= "";
JLS 0:73bfbf91b6e5 73
JLS 0:73bfbf91b6e5 74 command[0] = SETTOUCH;
JLS 0:73bfbf91b6e5 75
JLS 0:73bfbf91b6e5 76 command[1] = (x1 >> 8) & 0xFF;
JLS 0:73bfbf91b6e5 77 command[2] = x1 & 0xFF;
JLS 0:73bfbf91b6e5 78
JLS 0:73bfbf91b6e5 79 command[3] = (y1 >> 8) & 0xFF;
JLS 0:73bfbf91b6e5 80 command[4] = y1 & 0xFF;
JLS 0:73bfbf91b6e5 81
JLS 0:73bfbf91b6e5 82 command[5] = (x2 >> 8) & 0xFF;
JLS 0:73bfbf91b6e5 83 command[6] = x2 & 0xFF;
JLS 0:73bfbf91b6e5 84
JLS 0:73bfbf91b6e5 85 command[7] = (y2 >> 8) & 0xFF;
JLS 0:73bfbf91b6e5 86 command[8] = y2 & 0xFF;
JLS 0:73bfbf91b6e5 87
JLS 0:73bfbf91b6e5 88 writeCOMMAND(command, 9);
JLS 0:73bfbf91b6e5 89 }
JLS 0:73bfbf91b6e5 90
JLS 0:73bfbf91b6e5 91 //******************************************************************************************************
JLS 0:73bfbf91b6e5 92 // There is no way to have the uLCD-32PT trigger an interrupt when touched.
JLS 0:73bfbf91b6e5 93 // This function polls the screen and waits for a touch to regiester
JLS 0:73bfbf91b6e5 94 //******************************************************************************************************
JLS 0:73bfbf91b6e5 95 void TFT_4DGL :: Pause_Until_Touch(int *x, int *y) { // Actually waits for a TouchScreen release!
JLS 0:73bfbf91b6e5 96
JLS 0:73bfbf91b6e5 97 char TouchStatus = 0; //Initalise the TouchStatus as 0 = no touch activity
JLS 0:73bfbf91b6e5 98 char command[2] = "";
JLS 0:73bfbf91b6e5 99
JLS 0:73bfbf91b6e5 100 do{
JLS 0:73bfbf91b6e5 101 TouchStatus = touch_status(); //Get the touchscreen status
JLS 0:73bfbf91b6e5 102 wait(0.1);
JLS 0:73bfbf91b6e5 103 }while (TouchStatus != 2);
JLS 0:73bfbf91b6e5 104
JLS 0:73bfbf91b6e5 105 command[0] = GETTOUCH;
JLS 0:73bfbf91b6e5 106 command[1] = GETPOSITION;
JLS 0:73bfbf91b6e5 107
JLS 0:73bfbf91b6e5 108 getTOUCH(command, 2, x, y);
JLS 0:73bfbf91b6e5 109 }