Kamil Ondrousek / Mbed 2 deprecated Aizawa

Aizawa chaotic system

TFT_4DGL_Text.cpp@0:18b2474ec07b, 2011-03-09 (annotated)

Committer:
JLS
Date:
Wed Mar 09 21:31:16 2011 +0000
Revision:
0:18b2474ec07b

        

        
Who changed what in which revision?

        

            
                
UserRevisionLine numberNew contents of line

            
            


JLS

0:18b2474ec07b


     1

//





JLS

0:18b2474ec07b


     2

// TFT_4DGL is a class to drive 4D Systems TFT touch screens





JLS

0:18b2474ec07b


     3

//





JLS

0:18b2474ec07b


     4

// Copyright (C) <2010> Stephane ROCHON <stephane.rochon at free.fr>





JLS

0:18b2474ec07b


     5

//





JLS

0:18b2474ec07b


     6

// TFT_4DGL is free software: you can redistribute it and/or modify





JLS

0:18b2474ec07b


     7

// it under the terms of the GNU General Public License as published by





JLS

0:18b2474ec07b


     8

// the Free Software Foundation, either version 3 of the License, or





JLS

0:18b2474ec07b


     9

// (at your option) any later version.





JLS

0:18b2474ec07b


    10

//





JLS

0:18b2474ec07b


    11

// TFT_4DGL is distributed in the hope that it will be useful,





JLS

0:18b2474ec07b


    12

// but WITHOUT ANY WARRANTY; without even the implied warranty of





JLS

0:18b2474ec07b


    13

// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the





JLS

0:18b2474ec07b


    14

// GNU General Public License for more details.





JLS

0:18b2474ec07b


    15

//





JLS

0:18b2474ec07b


    16

// You should have received a copy of the GNU General Public License





JLS

0:18b2474ec07b


    17

// along with TFT_4DGL.  If not, see <http://www.gnu.org/licenses/>.





JLS

0:18b2474ec07b


    18







JLS

0:18b2474ec07b


    19

#include "mbed.h"





JLS

0:18b2474ec07b


    20

#include "TFT_4DGL.h"





JLS

0:18b2474ec07b


    21







JLS

0:18b2474ec07b


    22

//****************************************************************************************************





JLS

0:18b2474ec07b


    23

void TFT_4DGL :: set_font(char mode) {   // set font size





JLS

0:18b2474ec07b


    24

    char command[2]= "";





JLS

0:18b2474ec07b


    25







JLS

0:18b2474ec07b


    26

    int w, h, fx = 8, fy = 8;





JLS

0:18b2474ec07b


    27







JLS

0:18b2474ec07b


    28

    command[0] = SETFONT;





JLS

0:18b2474ec07b


    29

    command[1] = mode;





JLS

0:18b2474ec07b


    30







JLS

0:18b2474ec07b


    31

    current_font = mode;





JLS

0:18b2474ec07b


    32







JLS

0:18b2474ec07b


    33

    if (current_orientation == IS_PORTRAIT) {





JLS

0:18b2474ec07b


    34

        w = SIZE_X;





JLS

0:18b2474ec07b


    35

        h = SIZE_Y;





JLS

0:18b2474ec07b


    36

    } else {





JLS

0:18b2474ec07b


    37

        w = SIZE_Y;





JLS

0:18b2474ec07b


    38

        h = SIZE_X;





JLS

0:18b2474ec07b


    39

    }





JLS

0:18b2474ec07b


    40







JLS

0:18b2474ec07b


    41

    switch (mode) {





JLS

0:18b2474ec07b


    42

        case FONT_5X7 :





JLS

0:18b2474ec07b


    43

            fx = 6;





JLS

0:18b2474ec07b


    44

            fy = 8;





JLS

0:18b2474ec07b


    45

            break;





JLS

0:18b2474ec07b


    46

        case FONT_8X8 :





JLS

0:18b2474ec07b


    47

            fx = 8;





JLS

0:18b2474ec07b


    48

            fy = 8;





JLS

0:18b2474ec07b


    49

            break;





JLS

0:18b2474ec07b


    50

        case FONT_8X12 :





JLS

0:18b2474ec07b


    51

            fx = 8;





JLS

0:18b2474ec07b


    52

            fy = 12;





JLS

0:18b2474ec07b


    53

            break;





JLS

0:18b2474ec07b


    54

        case FONT_12X16 :





JLS

0:18b2474ec07b


    55

            fx = 12;





JLS

0:18b2474ec07b


    56

            fy = 16;





JLS

0:18b2474ec07b


    57

            break;





JLS

0:18b2474ec07b


    58

    }





JLS

0:18b2474ec07b


    59







JLS

0:18b2474ec07b


    60

    max_col = w / fx;





JLS

0:18b2474ec07b


    61

    max_row = h / fy;





JLS

0:18b2474ec07b


    62







JLS

0:18b2474ec07b


    63

    writeCOMMAND(command, 2);





JLS

0:18b2474ec07b


    64

}





JLS

0:18b2474ec07b


    65







JLS

0:18b2474ec07b


    66

//****************************************************************************************************





JLS

0:18b2474ec07b


    67

void TFT_4DGL :: text_mode(char mode) {   // set text mode





JLS

0:18b2474ec07b


    68

    char command[2]= "";





JLS

0:18b2474ec07b


    69







JLS

0:18b2474ec07b


    70

    command[0] = TEXTMODE;





JLS

0:18b2474ec07b


    71

    command[1] = mode;





JLS

0:18b2474ec07b


    72







JLS

0:18b2474ec07b


    73

    writeCOMMAND(command, 2);





JLS

0:18b2474ec07b


    74

}





JLS

0:18b2474ec07b


    75







JLS

0:18b2474ec07b


    76

//****************************************************************************************************





JLS

0:18b2474ec07b


    77

void TFT_4DGL :: text_char(char c, char col, char row, int color) {   // draw a text char





JLS

0:18b2474ec07b


    78

    char command[6]= "";





JLS

0:18b2474ec07b


    79







JLS

0:18b2474ec07b


    80

    command[0] = TEXTCHAR;





JLS

0:18b2474ec07b


    81







JLS

0:18b2474ec07b


    82

    command[1] = c;





JLS

0:18b2474ec07b


    83

    command[2] = col;





JLS

0:18b2474ec07b


    84

    command[3] = row;





JLS

0:18b2474ec07b


    85







JLS

0:18b2474ec07b


    86

    int red5   = (color >> (16 + 3)) & 0x1F;              // get red on 5 bits





JLS

0:18b2474ec07b


    87

    int green6 = (color >> (8 + 2))  & 0x3F;              // get green on 6 bits





JLS

0:18b2474ec07b


    88

    int blue5  = (color >> (0 + 3))  & 0x1F;              // get blue on 5 bits





JLS

0:18b2474ec07b


    89







JLS

0:18b2474ec07b


    90

    command[4] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color





JLS

0:18b2474ec07b


    91

    command[5] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color





JLS

0:18b2474ec07b


    92







JLS

0:18b2474ec07b


    93

    writeCOMMAND(command, 8);





JLS

0:18b2474ec07b


    94

}





JLS

0:18b2474ec07b


    95







JLS

0:18b2474ec07b


    96

//****************************************************************************************************





JLS

0:18b2474ec07b


    97

void TFT_4DGL :: graphic_char(char c, int x, int y, int color, char width, char height) {   // draw a graphic char





JLS

0:18b2474ec07b


    98

    char command[10]= "";





JLS

0:18b2474ec07b


    99







JLS

0:18b2474ec07b


   100

    command[0] = GRAPHCHAR;





JLS

0:18b2474ec07b


   101







JLS

0:18b2474ec07b


   102

    command[1] = c;





JLS

0:18b2474ec07b


   103







JLS

0:18b2474ec07b


   104

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





JLS

0:18b2474ec07b


   105

    command[3] = x & 0xFF;





JLS

0:18b2474ec07b


   106







JLS

0:18b2474ec07b


   107

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





JLS

0:18b2474ec07b


   108

    command[5] = y & 0xFF;





JLS

0:18b2474ec07b


   109







JLS

0:18b2474ec07b


   110

    int red5   = (color >> (16 + 3)) & 0x1F;              // get red on 5 bits





JLS

0:18b2474ec07b


   111

    int green6 = (color >> (8 + 2))  & 0x3F;              // get green on 6 bits





JLS

0:18b2474ec07b


   112

    int blue5  = (color >> (0 + 3))  & 0x1F;              // get blue on 5 bits





JLS

0:18b2474ec07b


   113







JLS

0:18b2474ec07b


   114

    command[6] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color





JLS

0:18b2474ec07b


   115

    command[7] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color





JLS

0:18b2474ec07b


   116







JLS

0:18b2474ec07b


   117

    command[8] = width;





JLS

0:18b2474ec07b


   118







JLS

0:18b2474ec07b


   119

    command[9] = height;





JLS

0:18b2474ec07b


   120







JLS

0:18b2474ec07b


   121

    writeCOMMAND(command, 10);





JLS

0:18b2474ec07b


   122

}





JLS

0:18b2474ec07b


   123







JLS

0:18b2474ec07b


   124

//****************************************************************************************************





JLS

0:18b2474ec07b


   125

void TFT_4DGL :: text_string(char *s, char col, char row, char font, int color) {   // draw a text string





JLS

0:18b2474ec07b


   126







JLS

0:18b2474ec07b


   127

    char command[1000]= "";





JLS

0:18b2474ec07b


   128

    int size = strlen(s);





JLS

0:18b2474ec07b


   129

    int i = 0;





JLS

0:18b2474ec07b


   130







JLS

0:18b2474ec07b


   131

    command[0] = TEXTSTRING;





JLS

0:18b2474ec07b


   132







JLS

0:18b2474ec07b


   133

    command[1] = col;





JLS

0:18b2474ec07b


   134

    command[2] = row;





JLS

0:18b2474ec07b


   135







JLS

0:18b2474ec07b


   136

    command[3] = font;





JLS

0:18b2474ec07b


   137







JLS

0:18b2474ec07b


   138

    int red5   = (color >> (16 + 3)) & 0x1F;              // get red on 5 bits





JLS

0:18b2474ec07b


   139

    int green6 = (color >> (8 + 2))  & 0x3F;              // get green on 6 bits





JLS

0:18b2474ec07b


   140

    int blue5  = (color >> (0 + 3))  & 0x1F;              // get blue on 5 bits





JLS

0:18b2474ec07b


   141







JLS

0:18b2474ec07b


   142

    command[4] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color





JLS

0:18b2474ec07b


   143

    command[5] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color





JLS

0:18b2474ec07b


   144







JLS

0:18b2474ec07b


   145

    for (i=0; i<size; i++) command[6+i] = s[i];





JLS

0:18b2474ec07b


   146







JLS

0:18b2474ec07b


   147

    command[6+size] = 0;





JLS

0:18b2474ec07b


   148







JLS

0:18b2474ec07b


   149

    writeCOMMAND(command, 7 + size);





JLS

0:18b2474ec07b


   150

}





JLS

0:18b2474ec07b


   151







JLS

0:18b2474ec07b


   152

//****************************************************************************************************





JLS

0:18b2474ec07b


   153

void TFT_4DGL :: graphic_string(char *s, int x, int y, char font, int color, char width, char height) {   // draw a text string





JLS

0:18b2474ec07b


   154







JLS

0:18b2474ec07b


   155

    char command[1000]= "";





JLS

0:18b2474ec07b


   156

    int size = strlen(s);





JLS

0:18b2474ec07b


   157

    int i = 0;





JLS

0:18b2474ec07b


   158







JLS

0:18b2474ec07b


   159

    command[0] = GRAPHSTRING;





JLS

0:18b2474ec07b


   160







JLS

0:18b2474ec07b


   161

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





JLS

0:18b2474ec07b


   162

    command[2] = x & 0xFF;





JLS

0:18b2474ec07b


   163







JLS

0:18b2474ec07b


   164

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





JLS

0:18b2474ec07b


   165

    command[4] = y & 0xFF;





JLS

0:18b2474ec07b


   166







JLS

0:18b2474ec07b


   167

    command[5] = font;





JLS

0:18b2474ec07b


   168







JLS

0:18b2474ec07b


   169

    int red5   = (color >> (16 + 3)) & 0x1F;              // get red on 5 bits





JLS

0:18b2474ec07b


   170

    int green6 = (color >> (8 + 2))  & 0x3F;              // get green on 6 bits





JLS

0:18b2474ec07b


   171

    int blue5  = (color >> (0 + 3))  & 0x1F;              // get blue on 5 bits





JLS

0:18b2474ec07b


   172







JLS

0:18b2474ec07b


   173

    command[6] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;  // first part of 16 bits color





JLS

0:18b2474ec07b


   174

    command[7] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;  // second part of 16 bits color





JLS

0:18b2474ec07b


   175







JLS

0:18b2474ec07b


   176

    command[8] = width;





JLS

0:18b2474ec07b


   177







JLS

0:18b2474ec07b


   178

    command[9] = height;





JLS

0:18b2474ec07b


   179







JLS

0:18b2474ec07b


   180

    for (i=0; i<size; i++) command[10+i] = s[i];





JLS

0:18b2474ec07b


   181







JLS

0:18b2474ec07b


   182

    command[10+size] = 0;





JLS

0:18b2474ec07b


   183







JLS

0:18b2474ec07b


   184

    writeCOMMAND(command, 11 + size);





JLS

0:18b2474ec07b


   185

}





JLS

0:18b2474ec07b


   186







JLS

0:18b2474ec07b


   187

//****************************************************************************************************





JLS

0:18b2474ec07b


   188

void TFT_4DGL :: text_button(char *s, char mode, int x, int y, int button_color, char font, int text_color, char width, char height) {   // draw a text string





JLS

0:18b2474ec07b


   189







JLS

0:18b2474ec07b


   190

    char command[1000]= "";





JLS

0:18b2474ec07b


   191

    int size = strlen(s);





JLS

0:18b2474ec07b


   192

    int i = 0, red5, green6, blue5;





JLS

0:18b2474ec07b


   193







JLS

0:18b2474ec07b


   194

    command[0] = TEXTBUTTON;





JLS

0:18b2474ec07b


   195







JLS

0:18b2474ec07b


   196

    command[1] = mode;





JLS

0:18b2474ec07b


   197







JLS

0:18b2474ec07b


   198

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





JLS

0:18b2474ec07b


   199

    command[3] = x & 0xFF;





JLS

0:18b2474ec07b


   200







JLS

0:18b2474ec07b


   201

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





JLS

0:18b2474ec07b


   202

    command[5] = y & 0xFF;





JLS

0:18b2474ec07b


   203







JLS

0:18b2474ec07b


   204

    red5   = (button_color >> (16 + 3)) & 0x1F;             // get red on 5 bits





JLS

0:18b2474ec07b


   205

    green6 = (button_color >> (8 + 2))  & 0x3F;             // get green on 6 bits





JLS

0:18b2474ec07b


   206

    blue5  = (button_color >> (0 + 3))  & 0x1F;             // get blue on 5 bits





JLS

0:18b2474ec07b


   207







JLS

0:18b2474ec07b


   208

    command[6] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;    // first part of 16 bits color





JLS

0:18b2474ec07b


   209

    command[7] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;    // second part of 16 bits color





JLS

0:18b2474ec07b


   210







JLS

0:18b2474ec07b


   211

    command[8] = font;





JLS

0:18b2474ec07b


   212







JLS

0:18b2474ec07b


   213

    red5   = (text_color >> (16 + 3)) & 0x1F;               // get red on 5 bits





JLS

0:18b2474ec07b


   214

    green6 = (text_color >> (8 + 2))  & 0x3F;               // get green on 6 bits





JLS

0:18b2474ec07b


   215

    blue5  = (text_color >> (0 + 3))  & 0x1F;               // get blue on 5 bits





JLS

0:18b2474ec07b


   216







JLS

0:18b2474ec07b


   217

    command[9] = ((red5 << 3)   + (green6 >> 3)) & 0xFF;    // first part of 16 bits color





JLS

0:18b2474ec07b


   218

    command[10] = ((green6 << 5) + (blue5 >>  0)) & 0xFF;   // second part of 16 bits color





JLS

0:18b2474ec07b


   219







JLS

0:18b2474ec07b


   220

    command[11] = width;





JLS

0:18b2474ec07b


   221







JLS

0:18b2474ec07b


   222

    command[12] = height;





JLS

0:18b2474ec07b


   223







JLS

0:18b2474ec07b


   224

    for (i=0; i<size; i++) command[13+i] = s[i];





JLS

0:18b2474ec07b


   225







JLS

0:18b2474ec07b


   226

    command[13+size] = 0;





JLS

0:18b2474ec07b


   227







JLS

0:18b2474ec07b


   228

    writeCOMMAND(command, 14 + size);





JLS

0:18b2474ec07b


   229

}





JLS

0:18b2474ec07b


   230







JLS

0:18b2474ec07b


   231

//****************************************************************************************************





JLS

0:18b2474ec07b


   232

void TFT_4DGL :: locate(char col, char row) {   // place text curssor at col, row





JLS

0:18b2474ec07b


   233

    current_col = col;





JLS

0:18b2474ec07b


   234

    current_row = row;





JLS

0:18b2474ec07b


   235

}





JLS

0:18b2474ec07b


   236







JLS

0:18b2474ec07b


   237

//****************************************************************************************************





JLS

0:18b2474ec07b


   238

void TFT_4DGL :: color(int color) {   // set text color





JLS

0:18b2474ec07b


   239

    current_color = color;





JLS

0:18b2474ec07b


   240

}





JLS

0:18b2474ec07b


   241







JLS

0:18b2474ec07b


   242

//****************************************************************************************************





JLS

0:18b2474ec07b


   243

void TFT_4DGL :: putc(char c) {   // place char at current cursor position





JLS

0:18b2474ec07b


   244







JLS

0:18b2474ec07b


   245

    text_char(c, current_col++, current_row, current_color);





JLS

0:18b2474ec07b


   246







JLS

0:18b2474ec07b


   247

    if (current_col == max_col) {





JLS

0:18b2474ec07b


   248

        current_col = 0;





JLS

0:18b2474ec07b


   249

        current_row++;





JLS

0:18b2474ec07b


   250

    }





JLS

0:18b2474ec07b


   251

    if (current_row == max_row) {





JLS

0:18b2474ec07b


   252

        current_row = 0;





JLS

0:18b2474ec07b


   253

    }





JLS

0:18b2474ec07b


   254

}





JLS

0:18b2474ec07b


   255







JLS

0:18b2474ec07b


   256

//****************************************************************************************************





JLS

0:18b2474ec07b


   257

void TFT_4DGL :: puts(char *s) {   // place string at current cursor position





JLS

0:18b2474ec07b


   258







JLS

0:18b2474ec07b


   259

    text_string(s, current_col, current_row, current_font, current_color);





JLS

0:18b2474ec07b


   260







JLS

0:18b2474ec07b


   261

    current_col += strlen(s);





JLS

0:18b2474ec07b


   262







JLS

0:18b2474ec07b


   263

    if (current_col >= max_col) {





JLS

0:18b2474ec07b


   264

        current_row += current_col / max_col;





JLS

0:18b2474ec07b


   265

        current_col %= max_col;





JLS

0:18b2474ec07b


   266

    }





JLS

0:18b2474ec07b


   267

    if (current_row >= max_row) {





JLS

0:18b2474ec07b


   268

        current_row %= max_row;





JLS

0:18b2474ec07b


   269

    }





JLS

0:18b2474ec07b


   270

}