Rihards Balass / 4DGL-mbed-32PTU

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Picaso_4DGL-32PTU_main.cpp@17:5bf7947c3c19, 2016-09-15 (annotated)

Committer:
CaptainR
Date:
Thu Sep 15 12:28:47 2016 +0000
Revision:
17:5bf7947c3c19
Parent:
16:cb072eea16e9
Child:
20:88e137b9ea46
Added new file Response to store all response functions

Who changed what in which revision?

UserRevisionLine numberNew contents of line
CaptainR 0:a5ef6bc3c2e8 1 //
CaptainR 2:81eaaa491a02 2 // Picaso_4DGL-32PTU is a class to drive 4D Systems TFT touch screens with PICASO processor
CaptainR 2:81eaaa491a02 3 // Tested with NUCLEO L152RE development board
CaptainR 2:81eaaa491a02 4 // Copyright (C) <2016> Rihards Balass <rihards.balass@gmail.com>
CaptainR 0:a5ef6bc3c2e8 5 //
CaptainR 2:81eaaa491a02 6 // Picaso_4DGL-32PTU is free software: you can redistribute it and/or modify
CaptainR 2:81eaaa491a02 7 // it under the terms of the GNU General Public License as published by
CaptainR 2:81eaaa491a02 8 // the Free Software Foundation, either version 3 of the License, or
CaptainR 2:81eaaa491a02 9 // (at your option) any later version.
CaptainR 2:81eaaa491a02 10 //
CaptainR 2:81eaaa491a02 11 // Picaso_4DGL-32PTU is distributed in the hope that it will be useful,
CaptainR 2:81eaaa491a02 12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
CaptainR 2:81eaaa491a02 13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
CaptainR 2:81eaaa491a02 14 // GNU General Public License for more details.
CaptainR 2:81eaaa491a02 15 //
CaptainR 2:81eaaa491a02 16 // You can see GNU General Public License at <http://www.gnu.org/licenses/>.
CaptainR 0:a5ef6bc3c2e8 17 //
CaptainR 0:a5ef6bc3c2e8 18
CaptainR 0:a5ef6bc3c2e8 19 #include "mbed.h"
CaptainR 0:a5ef6bc3c2e8 20 #include "Picaso_4DGL-32PTU.h"
CaptainR 0:a5ef6bc3c2e8 21
CaptainR 4:50511ed54ab4 22 DigitalOut led1(LED1);
CaptainR 0:a5ef6bc3c2e8 23
CaptainR 0:a5ef6bc3c2e8 24 //******************************************************************************************************
CaptainR 3:dcfbceb81fef 25 PICASO_4DGL :: PICASO_4DGL(PinName tx, PinName rx, PinName rst) : pc(USBTX, USBRX), _cmd(tx, rx), _rst(rst) { // Constructor
CaptainR 4:50511ed54ab4 26
CaptainR 13:1a0800957412 27 //rxBuf[RXBUFLEN] = 0; // create buffer
CaptainR 13:1a0800957412 28 //buffer[BUFFER_SIZE] = 0;
CaptainR 5:890ddd974624 29 index = 0;
CaptainR 12:29f5ad896382 30 _cmd.attach(this, &PICASO_4DGL::rxCallback, Serial::RxIrq);
CaptainR 4:50511ed54ab4 31
CaptainR 11:3ebd2263f3e9 32 pc.baud(115200);
CaptainR 0:a5ef6bc3c2e8 33 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 34 pc.printf("\n\n\n");
CaptainR 0:a5ef6bc3c2e8 35 pc.printf("********************\n\r");
CaptainR 3:dcfbceb81fef 36 pc.printf("PICASO_4DGL CONSTRUCTOR\n\r");
CaptainR 0:a5ef6bc3c2e8 37 pc.printf("********************\n\r");
CaptainR 0:a5ef6bc3c2e8 38 #endif
CaptainR 0:a5ef6bc3c2e8 39 _rst = 1; // put RESET pin to high to start TFT screen
CaptainR 12:29f5ad896382 40
CaptainR 0:a5ef6bc3c2e8 41 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 42 pc.printf("Wait 3 seconds for startup...\n\r");
CaptainR 3:dcfbceb81fef 43 #endif
CaptainR 0:a5ef6bc3c2e8 44 wait_ms(3000);
CaptainR 3:dcfbceb81fef 45
CaptainR 0:a5ef6bc3c2e8 46 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 47 pc.printf("set baudrate to 9600...\n\r");
CaptainR 0:a5ef6bc3c2e8 48 #endif
CaptainR 4:50511ed54ab4 49 baudrate(9600);
CaptainR 3:dcfbceb81fef 50
CaptainR 0:a5ef6bc3c2e8 51 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 52 pc.printf("clear screen...\n\r");
CaptainR 0:a5ef6bc3c2e8 53 #endif
CaptainR 3:dcfbceb81fef 54 wait_ms(1000);
CaptainR 12:29f5ad896382 55 screenMode(landscape);
CaptainR 12:29f5ad896382 56 setFont(font3);
CaptainR 12:29f5ad896382 57 cls();
CaptainR 0:a5ef6bc3c2e8 58
CaptainR 12:29f5ad896382 59 #if DEMO
CaptainR 3:dcfbceb81fef 60 //mainDemo();
CaptainR 0:a5ef6bc3c2e8 61 //textDemo();
CaptainR 12:29f5ad896382 62 //graphicsDemo();
CaptainR 12:29f5ad896382 63 mediaDemo();
CaptainR 0:a5ef6bc3c2e8 64 #endif
CaptainR 0:a5ef6bc3c2e8 65 }
CaptainR 0:a5ef6bc3c2e8 66
CaptainR 0:a5ef6bc3c2e8 67 //******************************************************************************************************
CaptainR 5:890ddd974624 68 void PICASO_4DGL :: rxCallback() {
CaptainR 0:a5ef6bc3c2e8 69
CaptainR 13:1a0800957412 70 if(_cmd.readable()) rxBuf[index++] = _cmd.getc();
CaptainR 0:a5ef6bc3c2e8 71 }
CaptainR 0:a5ef6bc3c2e8 72
CaptainR 0:a5ef6bc3c2e8 73 //******************************************************************************************************
CaptainR 3:dcfbceb81fef 74 void PICASO_4DGL :: writeBYTE(char c) { // send a BYTE command to screen
CaptainR 0:a5ef6bc3c2e8 75
CaptainR 0:a5ef6bc3c2e8 76 _cmd.putc(c);
CaptainR 0:a5ef6bc3c2e8 77
CaptainR 0:a5ef6bc3c2e8 78 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 79 pc.printf(" Char sent : 0x%02X ",c);
CaptainR 0:a5ef6bc3c2e8 80 pc.putc(c);
CaptainR 0:a5ef6bc3c2e8 81 pc.printf(" \n\r");
CaptainR 0:a5ef6bc3c2e8 82 #endif
CaptainR 0:a5ef6bc3c2e8 83
CaptainR 0:a5ef6bc3c2e8 84 }
CaptainR 0:a5ef6bc3c2e8 85
CaptainR 0:a5ef6bc3c2e8 86 //******************************************************************************************************
CaptainR 3:dcfbceb81fef 87 void PICASO_4DGL :: freeBUFFER(void) { // Clear serial buffer before writing command
CaptainR 0:a5ef6bc3c2e8 88
CaptainR 0:a5ef6bc3c2e8 89 while (_cmd.readable()) _cmd.getc(); // clear buffer garbage
CaptainR 0:a5ef6bc3c2e8 90 }
CaptainR 0:a5ef6bc3c2e8 91
CaptainR 0:a5ef6bc3c2e8 92 //******************************************************************************************************
CaptainR 3:dcfbceb81fef 93 void PICASO_4DGL :: writeCOMMAND(char *command, int number) { // send several BYTES making a command and return an answer
CaptainR 0:a5ef6bc3c2e8 94
CaptainR 0:a5ef6bc3c2e8 95 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 96 pc.printf("\n\r");
CaptainR 0:a5ef6bc3c2e8 97 pc.printf("New COMMAND : 0x%02X%02X\n\r", command[0], command[1]);
CaptainR 0:a5ef6bc3c2e8 98 #endif
CaptainR 0:a5ef6bc3c2e8 99 int i;
CaptainR 0:a5ef6bc3c2e8 100 freeBUFFER();
CaptainR 13:1a0800957412 101 //index = 0;
CaptainR 13:1a0800957412 102
CaptainR 0:a5ef6bc3c2e8 103 for (i = 0; i < number; i++) writeBYTE(command[i]); // send command to serial port
CaptainR 0:a5ef6bc3c2e8 104 }
CaptainR 0:a5ef6bc3c2e8 105
CaptainR 15:86bdf382e6f7 106 //******************************************************************************************************
CaptainR 15:86bdf382e6f7 107 void PICASO_4DGL :: writeCOMMAND_2(char *command, int number) { // send several BYTES making a command and return an answer
CaptainR 15:86bdf382e6f7 108
CaptainR 15:86bdf382e6f7 109 #if DEBUGMODE
CaptainR 15:86bdf382e6f7 110 pc.printf("\n\r");
CaptainR 15:86bdf382e6f7 111 pc.printf("New COMMAND : 0x%02X%02X\n\r", command[0], command[1]);
CaptainR 15:86bdf382e6f7 112 #endif
CaptainR 15:86bdf382e6f7 113 int i;
CaptainR 15:86bdf382e6f7 114 freeBUFFER();
CaptainR 15:86bdf382e6f7 115 //index = 0;
CaptainR 15:86bdf382e6f7 116
CaptainR 15:86bdf382e6f7 117 for (i = 0; i < number; i++) _cmd.putc(command[i]); // send command to serial port
CaptainR 15:86bdf382e6f7 118 }
CaptainR 15:86bdf382e6f7 119
CaptainR 0:a5ef6bc3c2e8 120 //**************************************************************************
CaptainR 3:dcfbceb81fef 121 void PICASO_4DGL :: reset() { // Reset Screen
CaptainR 0:a5ef6bc3c2e8 122
CaptainR 0:a5ef6bc3c2e8 123 _rst = 0; // put RESET pin to low
CaptainR 0:a5ef6bc3c2e8 124 wait_ms(TEMPO); // wait a few milliseconds for command reception
CaptainR 0:a5ef6bc3c2e8 125 _rst = 1; // put RESET back to high
CaptainR 0:a5ef6bc3c2e8 126 wait(3); // wait 3s for screen to restart
CaptainR 0:a5ef6bc3c2e8 127
CaptainR 0:a5ef6bc3c2e8 128 freeBUFFER(); // clean buffer from possible garbage
CaptainR 0:a5ef6bc3c2e8 129 }
CaptainR 0:a5ef6bc3c2e8 130
CaptainR 0:a5ef6bc3c2e8 131 //**************************************************************************
CaptainR 3:dcfbceb81fef 132 void PICASO_4DGL :: baudrate(long speed) { // set screen baud rate
CaptainR 0:a5ef6bc3c2e8 133
CaptainR 0:a5ef6bc3c2e8 134 char command[4]= "";
CaptainR 2:81eaaa491a02 135 command[0] = (BAUDRATE >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 136 command[1] = (BAUDRATE >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 137 switch (speed) {
CaptainR 0:a5ef6bc3c2e8 138 case 300 :
CaptainR 2:81eaaa491a02 139 command[2] = (BAUD_300 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 140 command[3] = (BAUD_300 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 141 break;
CaptainR 0:a5ef6bc3c2e8 142 case 600 :
CaptainR 2:81eaaa491a02 143 command[2] = (BAUD_600 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 144 command[3] = (BAUD_600 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 145 break;
CaptainR 0:a5ef6bc3c2e8 146 case 1200 :
CaptainR 2:81eaaa491a02 147 command[2] = (BAUD_1200 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 148 command[3] = (BAUD_1200 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 149 break;
CaptainR 0:a5ef6bc3c2e8 150 case 2400 :
CaptainR 2:81eaaa491a02 151 command[2] = (BAUD_2400 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 152 command[3] = (BAUD_2400 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 153 break;
CaptainR 0:a5ef6bc3c2e8 154 case 4800 :
CaptainR 2:81eaaa491a02 155 command[2] = (BAUD_4800 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 156 command[3] = (BAUD_4800 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 157 break;
CaptainR 0:a5ef6bc3c2e8 158 case 9600 :
CaptainR 2:81eaaa491a02 159 command[2] = (BAUD_9600 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 160 command[3] = (BAUD_9600 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 161 break;
CaptainR 0:a5ef6bc3c2e8 162 case 14400 :
CaptainR 2:81eaaa491a02 163 command[2] = (BAUD_14400 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 164 command[3] = (BAUD_14400 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 165 break;
CaptainR 0:a5ef6bc3c2e8 166 case 19200 :
CaptainR 2:81eaaa491a02 167 command[2] = (BAUD_19200 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 168 command[3] = (BAUD_19200 >> (8*0)) & 0xff;
CaptainR 2:81eaaa491a02 169 break;
CaptainR 2:81eaaa491a02 170 case 31250 :
CaptainR 2:81eaaa491a02 171 command[2] = (BAUD_31250 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 172 command[3] = (BAUD_31250 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 173 break;
CaptainR 0:a5ef6bc3c2e8 174 case 38400 :
CaptainR 2:81eaaa491a02 175 command[2] = (BAUD_38400 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 176 command[3] = (BAUD_38400 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 177 break;
CaptainR 0:a5ef6bc3c2e8 178 case 56000 :
CaptainR 2:81eaaa491a02 179 command[2] = (BAUD_56000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 180 command[3] = (BAUD_56000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 181 break;
CaptainR 0:a5ef6bc3c2e8 182 case 57600 :
CaptainR 2:81eaaa491a02 183 command[2] = (BAUD_57600 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 184 command[3] = (BAUD_57600 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 185 break;
CaptainR 0:a5ef6bc3c2e8 186 case 115200 :
CaptainR 2:81eaaa491a02 187 command[2] = (BAUD_115200 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 188 command[3] = (BAUD_115200 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 189 break;
CaptainR 0:a5ef6bc3c2e8 190 case 128000 :
CaptainR 2:81eaaa491a02 191 command[2] = (BAUD_128000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 192 command[3] = (BAUD_128000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 193 break;
CaptainR 0:a5ef6bc3c2e8 194 case 256000 :
CaptainR 2:81eaaa491a02 195 command[2] = (BAUD_256000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 196 command[3] = (BAUD_256000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 197 break;
CaptainR 0:a5ef6bc3c2e8 198 case 300000 :
CaptainR 2:81eaaa491a02 199 command[2] = (BAUD_300000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 200 command[3] = (BAUD_300000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 201 break;
CaptainR 0:a5ef6bc3c2e8 202 case 375000 :
CaptainR 2:81eaaa491a02 203 command[2] = (BAUD_375000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 204 command[3] = (BAUD_375000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 205 break;
CaptainR 0:a5ef6bc3c2e8 206 case 500000 :
CaptainR 2:81eaaa491a02 207 command[2] = (BAUD_500000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 208 command[3] = (BAUD_500000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 209 break;
CaptainR 0:a5ef6bc3c2e8 210 case 600000 :
CaptainR 2:81eaaa491a02 211 command[2] = (BAUD_600000 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 212 command[3] = (BAUD_600000 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 213 break;
CaptainR 0:a5ef6bc3c2e8 214 default :
CaptainR 2:81eaaa491a02 215 command[2] = (BAUD_9600 >> (8*1)) & 0xff;
CaptainR 2:81eaaa491a02 216 command[3] = (BAUD_9600 >> (8*0)) & 0xff;
CaptainR 0:a5ef6bc3c2e8 217 speed = 9600;
CaptainR 0:a5ef6bc3c2e8 218 break;
CaptainR 0:a5ef6bc3c2e8 219 }
CaptainR 0:a5ef6bc3c2e8 220
CaptainR 0:a5ef6bc3c2e8 221 #if DEBUGMODE
CaptainR 0:a5ef6bc3c2e8 222 pc.printf("\n\r");
CaptainR 13:1a0800957412 223 pc.printf("New BAUDRATE : 0x%02X%02X\n\r", command[0], command[1]);
CaptainR 0:a5ef6bc3c2e8 224 #endif
CaptainR 0:a5ef6bc3c2e8 225
CaptainR 0:a5ef6bc3c2e8 226 int i;
CaptainR 0:a5ef6bc3c2e8 227 freeBUFFER();
CaptainR 0:a5ef6bc3c2e8 228
CaptainR 0:a5ef6bc3c2e8 229 //Change baudrates - as instructed by 4DGL
CaptainR 12:29f5ad896382 230 if (speed == 128000) speed = 133929;
CaptainR 12:29f5ad896382 231 if (speed == 256000) speed = 281250;
CaptainR 0:a5ef6bc3c2e8 232 if (speed == 300000) speed = 312500;
CaptainR 12:29f5ad896382 233 if (speed == 375000) speed = 401786;
CaptainR 0:a5ef6bc3c2e8 234 if (speed == 500000) speed = 562500;
CaptainR 0:a5ef6bc3c2e8 235 if (speed == 600000) speed = 703125;
CaptainR 0:a5ef6bc3c2e8 236
CaptainR 0:a5ef6bc3c2e8 237 for (i = 0; i <4; i++) writeBYTE(command[i]); // send command to serial port
CaptainR 12:29f5ad896382 238 _cmd.baud(speed);
CaptainR 5:890ddd974624 239 getResponse(1);
CaptainR 0:a5ef6bc3c2e8 240 }