Kamil Ondrousek / Mbed 2 deprecated Strizhak-Kawczynski

Strizhak-Kawczynski model - chemical chaotic system

Dependencies:   mbed

TFT_4DGL_Text.cpp@0:4427cf13018e, 2011-03-15 (annotated)

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

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





JLS

0:4427cf13018e


    24

    char command[2]= "";





JLS

0:4427cf13018e


    25







JLS

0:4427cf13018e


    26

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





JLS

0:4427cf13018e


    27







JLS

0:4427cf13018e


    28

    command[0] = SETFONT;





JLS

0:4427cf13018e


    29

    command[1] = mode;





JLS

0:4427cf13018e


    30







JLS

0:4427cf13018e


    31

    current_font = mode;





JLS

0:4427cf13018e


    32







JLS

0:4427cf13018e


    33

    if (current_orientation == IS_PORTRAIT) {





JLS

0:4427cf13018e


    34

        w = SIZE_X;





JLS

0:4427cf13018e


    35

        h = SIZE_Y;





JLS

0:4427cf13018e


    36

    } else {





JLS

0:4427cf13018e


    37

        w = SIZE_Y;





JLS

0:4427cf13018e


    38

        h = SIZE_X;





JLS

0:4427cf13018e


    39

    }





JLS

0:4427cf13018e


    40







JLS

0:4427cf13018e


    41

    switch (mode) {





JLS

0:4427cf13018e


    42

        case FONT_5X7 :





JLS

0:4427cf13018e


    43

            fx = 6;





JLS

0:4427cf13018e


    44

            fy = 8;





JLS

0:4427cf13018e


    45

            break;





JLS

0:4427cf13018e


    46

        case FONT_8X8 :





JLS

0:4427cf13018e


    47

            fx = 8;





JLS

0:4427cf13018e


    48

            fy = 8;





JLS

0:4427cf13018e


    49

            break;





JLS

0:4427cf13018e


    50

        case FONT_8X12 :





JLS

0:4427cf13018e


    51

            fx = 8;





JLS

0:4427cf13018e


    52

            fy = 12;





JLS

0:4427cf13018e


    53

            break;





JLS

0:4427cf13018e


    54

        case FONT_12X16 :





JLS

0:4427cf13018e


    55

            fx = 12;





JLS

0:4427cf13018e


    56

            fy = 16;





JLS

0:4427cf13018e


    57

            break;





JLS

0:4427cf13018e


    58

    }





JLS

0:4427cf13018e


    59







JLS

0:4427cf13018e


    60

    max_col = w / fx;





JLS

0:4427cf13018e


    61

    max_row = h / fy;





JLS

0:4427cf13018e


    62







JLS

0:4427cf13018e


    63

    writeCOMMAND(command, 2);





JLS

0:4427cf13018e


    64

}





JLS

0:4427cf13018e


    65







JLS

0:4427cf13018e


    66

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





JLS

0:4427cf13018e


    67

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





JLS

0:4427cf13018e


    68

    char command[2]= "";





JLS

0:4427cf13018e


    69







JLS

0:4427cf13018e


    70

    command[0] = TEXTMODE;





JLS

0:4427cf13018e


    71

    command[1] = mode;





JLS

0:4427cf13018e


    72







JLS

0:4427cf13018e


    73

    writeCOMMAND(command, 2);





JLS

0:4427cf13018e


    74

}





JLS

0:4427cf13018e


    75







JLS

0:4427cf13018e


    76

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





JLS

0:4427cf13018e


    77

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





JLS

0:4427cf13018e


    78

    char command[6]= "";





JLS

0:4427cf13018e


    79







JLS

0:4427cf13018e


    80

    command[0] = TEXTCHAR;





JLS

0:4427cf13018e


    81







JLS

0:4427cf13018e


    82

    command[1] = c;





JLS

0:4427cf13018e


    83

    command[2] = col;





JLS

0:4427cf13018e


    84

    command[3] = row;





JLS

0:4427cf13018e


    85







JLS

0:4427cf13018e


    86

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





JLS

0:4427cf13018e


    87

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





JLS

0:4427cf13018e


    88

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





JLS

0:4427cf13018e


    89







JLS

0:4427cf13018e


    90

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





JLS

0:4427cf13018e


    91

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





JLS

0:4427cf13018e


    92







JLS

0:4427cf13018e


    93

    writeCOMMAND(command, 8);





JLS

0:4427cf13018e


    94

}





JLS

0:4427cf13018e


    95







JLS

0:4427cf13018e


    96

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





JLS

0:4427cf13018e


    97

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





JLS

0:4427cf13018e


    98

    char command[10]= "";





JLS

0:4427cf13018e


    99







JLS

0:4427cf13018e


   100

    command[0] = GRAPHCHAR;





JLS

0:4427cf13018e


   101







JLS

0:4427cf13018e


   102

    command[1] = c;





JLS

0:4427cf13018e


   103







JLS

0:4427cf13018e


   104

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





JLS

0:4427cf13018e


   105

    command[3] = x & 0xFF;





JLS

0:4427cf13018e


   106







JLS

0:4427cf13018e


   107

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





JLS

0:4427cf13018e


   108

    command[5] = y & 0xFF;





JLS

0:4427cf13018e


   109







JLS

0:4427cf13018e


   110

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





JLS

0:4427cf13018e


   111

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





JLS

0:4427cf13018e


   112

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





JLS

0:4427cf13018e


   113







JLS

0:4427cf13018e


   114

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





JLS

0:4427cf13018e


   115

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





JLS

0:4427cf13018e


   116







JLS

0:4427cf13018e


   117

    command[8] = width;





JLS

0:4427cf13018e


   118







JLS

0:4427cf13018e


   119

    command[9] = height;





JLS

0:4427cf13018e


   120







JLS

0:4427cf13018e


   121

    writeCOMMAND(command, 10);





JLS

0:4427cf13018e


   122

}





JLS

0:4427cf13018e


   123







JLS

0:4427cf13018e


   124

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





JLS

0:4427cf13018e


   125

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





JLS

0:4427cf13018e


   126







JLS

0:4427cf13018e


   127

    char command[1000]= "";





JLS

0:4427cf13018e


   128

    int size = strlen(s);





JLS

0:4427cf13018e


   129

    int i = 0;





JLS

0:4427cf13018e


   130







JLS

0:4427cf13018e


   131

    command[0] = TEXTSTRING;





JLS

0:4427cf13018e


   132







JLS

0:4427cf13018e


   133

    command[1] = col;





JLS

0:4427cf13018e


   134

    command[2] = row;





JLS

0:4427cf13018e


   135







JLS

0:4427cf13018e


   136

    command[3] = font;





JLS

0:4427cf13018e


   137







JLS

0:4427cf13018e


   138

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





JLS

0:4427cf13018e


   139

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





JLS

0:4427cf13018e


   140

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





JLS

0:4427cf13018e


   141







JLS

0:4427cf13018e


   142

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





JLS

0:4427cf13018e


   143

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





JLS

0:4427cf13018e


   144







JLS

0:4427cf13018e


   145

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





JLS

0:4427cf13018e


   146







JLS

0:4427cf13018e


   147

    command[6+size] = 0;





JLS

0:4427cf13018e


   148







JLS

0:4427cf13018e


   149

    writeCOMMAND(command, 7 + size);





JLS

0:4427cf13018e


   150

}





JLS

0:4427cf13018e


   151







JLS

0:4427cf13018e


   152

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





JLS

0:4427cf13018e


   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:4427cf13018e


   154







JLS

0:4427cf13018e


   155

    char command[1000]= "";





JLS

0:4427cf13018e


   156

    int size = strlen(s);





JLS

0:4427cf13018e


   157

    int i = 0;





JLS

0:4427cf13018e


   158







JLS

0:4427cf13018e


   159

    command[0] = GRAPHSTRING;





JLS

0:4427cf13018e


   160







JLS

0:4427cf13018e


   161

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





JLS

0:4427cf13018e


   162

    command[2] = x & 0xFF;





JLS

0:4427cf13018e


   163







JLS

0:4427cf13018e


   164

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





JLS

0:4427cf13018e


   165

    command[4] = y & 0xFF;





JLS

0:4427cf13018e


   166







JLS

0:4427cf13018e


   167

    command[5] = font;





JLS

0:4427cf13018e


   168







JLS

0:4427cf13018e


   169

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





JLS

0:4427cf13018e


   170

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





JLS

0:4427cf13018e


   171

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





JLS

0:4427cf13018e


   172







JLS

0:4427cf13018e


   173

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





JLS

0:4427cf13018e


   174

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





JLS

0:4427cf13018e


   175







JLS

0:4427cf13018e


   176

    command[8] = width;





JLS

0:4427cf13018e


   177







JLS

0:4427cf13018e


   178

    command[9] = height;





JLS

0:4427cf13018e


   179







JLS

0:4427cf13018e


   180

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





JLS

0:4427cf13018e


   181







JLS

0:4427cf13018e


   182

    command[10+size] = 0;





JLS

0:4427cf13018e


   183







JLS

0:4427cf13018e


   184

    writeCOMMAND(command, 11 + size);





JLS

0:4427cf13018e


   185

}





JLS

0:4427cf13018e


   186







JLS

0:4427cf13018e


   187

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





JLS

0:4427cf13018e


   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:4427cf13018e


   189







JLS

0:4427cf13018e


   190

    char command[1000]= "";





JLS

0:4427cf13018e


   191

    int size = strlen(s);





JLS

0:4427cf13018e


   192

    int i = 0, red5, green6, blue5;





JLS

0:4427cf13018e


   193







JLS

0:4427cf13018e


   194

    command[0] = TEXTBUTTON;





JLS

0:4427cf13018e


   195







JLS

0:4427cf13018e


   196

    command[1] = mode;





JLS

0:4427cf13018e


   197







JLS

0:4427cf13018e


   198

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





JLS

0:4427cf13018e


   199

    command[3] = x & 0xFF;





JLS

0:4427cf13018e


   200







JLS

0:4427cf13018e


   201

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





JLS

0:4427cf13018e


   202

    command[5] = y & 0xFF;





JLS

0:4427cf13018e


   203







JLS

0:4427cf13018e


   204

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





JLS

0:4427cf13018e


   205

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





JLS

0:4427cf13018e


   206

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





JLS

0:4427cf13018e


   207







JLS

0:4427cf13018e


   208

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





JLS

0:4427cf13018e


   209

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





JLS

0:4427cf13018e


   210







JLS

0:4427cf13018e


   211

    command[8] = font;





JLS

0:4427cf13018e


   212







JLS

0:4427cf13018e


   213

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





JLS

0:4427cf13018e


   214

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





JLS

0:4427cf13018e


   215

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





JLS

0:4427cf13018e


   216







JLS

0:4427cf13018e


   217

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





JLS

0:4427cf13018e


   218

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





JLS

0:4427cf13018e


   219







JLS

0:4427cf13018e


   220

    command[11] = width;





JLS

0:4427cf13018e


   221







JLS

0:4427cf13018e


   222

    command[12] = height;





JLS

0:4427cf13018e


   223







JLS

0:4427cf13018e


   224

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





JLS

0:4427cf13018e


   225







JLS

0:4427cf13018e


   226

    command[13+size] = 0;





JLS

0:4427cf13018e


   227







JLS

0:4427cf13018e


   228

    writeCOMMAND(command, 14 + size);





JLS

0:4427cf13018e


   229

}





JLS

0:4427cf13018e


   230







JLS

0:4427cf13018e


   231

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





JLS

0:4427cf13018e


   232

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





JLS

0:4427cf13018e


   233

    current_col = col;





JLS

0:4427cf13018e


   234

    current_row = row;





JLS

0:4427cf13018e


   235

}





JLS

0:4427cf13018e


   236







JLS

0:4427cf13018e


   237

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





JLS

0:4427cf13018e


   238

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





JLS

0:4427cf13018e


   239

    current_color = color;





JLS

0:4427cf13018e


   240

}





JLS

0:4427cf13018e


   241







JLS

0:4427cf13018e


   242

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





JLS

0:4427cf13018e


   243

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





JLS

0:4427cf13018e


   244







JLS

0:4427cf13018e


   245

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





JLS

0:4427cf13018e


   246







JLS

0:4427cf13018e


   247

    if (current_col == max_col) {





JLS

0:4427cf13018e


   248

        current_col = 0;





JLS

0:4427cf13018e


   249

        current_row++;





JLS

0:4427cf13018e


   250

    }





JLS

0:4427cf13018e


   251

    if (current_row == max_row) {





JLS

0:4427cf13018e


   252

        current_row = 0;





JLS

0:4427cf13018e


   253

    }





JLS

0:4427cf13018e


   254

}





JLS

0:4427cf13018e


   255







JLS

0:4427cf13018e


   256

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





JLS

0:4427cf13018e


   257

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





JLS

0:4427cf13018e


   258







JLS

0:4427cf13018e


   259

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





JLS

0:4427cf13018e


   260







JLS

0:4427cf13018e


   261

    current_col += strlen(s);





JLS

0:4427cf13018e


   262







JLS

0:4427cf13018e


   263

    if (current_col >= max_col) {





JLS

0:4427cf13018e


   264

        current_row += current_col / max_col;





JLS

0:4427cf13018e


   265

        current_col %= max_col;





JLS

0:4427cf13018e


   266

    }





JLS

0:4427cf13018e


   267

    if (current_row >= max_row) {





JLS

0:4427cf13018e


   268

        current_row %= max_row;





JLS

0:4427cf13018e


   269

    }





JLS

0:4427cf13018e


   270

}