Kamil Ondrousek / Mbed 2 deprecated 2D-VanDerPol

Van der Pol limit cycle - 2D nonlinear attractor

Dependencies:   mbed

TFT_4DGL_Text.cpp@0:964911ed238a, 2011-02-09 (annotated)

Committer:
JLS
Date:
Wed Feb 09 22:35:32 2011 +0000
Revision:
0:964911ed238a

        

        
Who changed what in which revision?

        

            
                
UserRevisionLine numberNew contents of line

            
            


JLS

0:964911ed238a


     1

//





JLS

0:964911ed238a


     2

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





JLS

0:964911ed238a


     3

//





JLS

0:964911ed238a


     4

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





JLS

0:964911ed238a


     5

//





JLS

0:964911ed238a


     6

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





JLS

0:964911ed238a


     7

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





JLS

0:964911ed238a


     8

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





JLS

0:964911ed238a


     9

// (at your option) any later version.





JLS

0:964911ed238a


    10

//





JLS

0:964911ed238a


    11

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





JLS

0:964911ed238a


    12

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





JLS

0:964911ed238a


    13

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





JLS

0:964911ed238a


    14

// GNU General Public License for more details.





JLS

0:964911ed238a


    15

//





JLS

0:964911ed238a


    16

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





JLS

0:964911ed238a


    17

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





JLS

0:964911ed238a


    18







JLS

0:964911ed238a


    19

#include "mbed.h"





JLS

0:964911ed238a


    20

#include "TFT_4DGL.h"





JLS

0:964911ed238a


    21







JLS

0:964911ed238a


    22

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





JLS

0:964911ed238a


    23

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





JLS

0:964911ed238a


    24

    char command[2]= "";





JLS

0:964911ed238a


    25







JLS

0:964911ed238a


    26

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





JLS

0:964911ed238a


    27







JLS

0:964911ed238a


    28

    command[0] = SETFONT;





JLS

0:964911ed238a


    29

    command[1] = mode;





JLS

0:964911ed238a


    30







JLS

0:964911ed238a


    31

    current_font = mode;





JLS

0:964911ed238a


    32







JLS

0:964911ed238a


    33

    if (current_orientation == IS_PORTRAIT) {





JLS

0:964911ed238a


    34

        w = SIZE_X;





JLS

0:964911ed238a


    35

        h = SIZE_Y;





JLS

0:964911ed238a


    36

    } else {





JLS

0:964911ed238a


    37

        w = SIZE_Y;





JLS

0:964911ed238a


    38

        h = SIZE_X;





JLS

0:964911ed238a


    39

    }





JLS

0:964911ed238a


    40







JLS

0:964911ed238a


    41

    switch (mode) {





JLS

0:964911ed238a


    42

        case FONT_5X7 :





JLS

0:964911ed238a


    43

            fx = 6;





JLS

0:964911ed238a


    44

            fy = 8;





JLS

0:964911ed238a


    45

            break;





JLS

0:964911ed238a


    46

        case FONT_8X8 :





JLS

0:964911ed238a


    47

            fx = 8;





JLS

0:964911ed238a


    48

            fy = 8;





JLS

0:964911ed238a


    49

            break;





JLS

0:964911ed238a


    50

        case FONT_8X12 :





JLS

0:964911ed238a


    51

            fx = 8;





JLS

0:964911ed238a


    52

            fy = 12;





JLS

0:964911ed238a


    53

            break;





JLS

0:964911ed238a


    54

        case FONT_12X16 :





JLS

0:964911ed238a


    55

            fx = 12;





JLS

0:964911ed238a


    56

            fy = 16;





JLS

0:964911ed238a


    57

            break;





JLS

0:964911ed238a


    58

    }





JLS

0:964911ed238a


    59







JLS

0:964911ed238a


    60

    max_col = w / fx;





JLS

0:964911ed238a


    61

    max_row = h / fy;





JLS

0:964911ed238a


    62







JLS

0:964911ed238a


    63

    writeCOMMAND(command, 2);





JLS

0:964911ed238a


    64

}





JLS

0:964911ed238a


    65







JLS

0:964911ed238a


    66

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





JLS

0:964911ed238a


    67

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





JLS

0:964911ed238a


    68

    char command[2]= "";





JLS

0:964911ed238a


    69







JLS

0:964911ed238a


    70

    command[0] = TEXTMODE;





JLS

0:964911ed238a


    71

    command[1] = mode;





JLS

0:964911ed238a


    72







JLS

0:964911ed238a


    73

    writeCOMMAND(command, 2);





JLS

0:964911ed238a


    74

}





JLS

0:964911ed238a


    75







JLS

0:964911ed238a


    76

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





JLS

0:964911ed238a


    77

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





JLS

0:964911ed238a


    78

    char command[6]= "";





JLS

0:964911ed238a


    79







JLS

0:964911ed238a


    80

    command[0] = TEXTCHAR;





JLS

0:964911ed238a


    81







JLS

0:964911ed238a


    82

    command[1] = c;





JLS

0:964911ed238a


    83

    command[2] = col;





JLS

0:964911ed238a


    84

    command[3] = row;





JLS

0:964911ed238a


    85







JLS

0:964911ed238a


    86

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





JLS

0:964911ed238a


    87

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





JLS

0:964911ed238a


    88

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





JLS

0:964911ed238a


    89







JLS

0:964911ed238a


    90

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





JLS

0:964911ed238a


    91

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





JLS

0:964911ed238a


    92







JLS

0:964911ed238a


    93

    writeCOMMAND(command, 8);





JLS

0:964911ed238a


    94

}





JLS

0:964911ed238a


    95







JLS

0:964911ed238a


    96

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





JLS

0:964911ed238a


    97

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





JLS

0:964911ed238a


    98

    char command[10]= "";





JLS

0:964911ed238a


    99







JLS

0:964911ed238a


   100

    command[0] = GRAPHCHAR;





JLS

0:964911ed238a


   101







JLS

0:964911ed238a


   102

    command[1] = c;





JLS

0:964911ed238a


   103







JLS

0:964911ed238a


   104

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





JLS

0:964911ed238a


   105

    command[3] = x & 0xFF;





JLS

0:964911ed238a


   106







JLS

0:964911ed238a


   107

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





JLS

0:964911ed238a


   108

    command[5] = y & 0xFF;





JLS

0:964911ed238a


   109







JLS

0:964911ed238a


   110

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





JLS

0:964911ed238a


   111

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





JLS

0:964911ed238a


   112

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





JLS

0:964911ed238a


   113







JLS

0:964911ed238a


   114

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





JLS

0:964911ed238a


   115

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





JLS

0:964911ed238a


   116







JLS

0:964911ed238a


   117

    command[8] = width;





JLS

0:964911ed238a


   118







JLS

0:964911ed238a


   119

    command[9] = height;





JLS

0:964911ed238a


   120







JLS

0:964911ed238a


   121

    writeCOMMAND(command, 10);





JLS

0:964911ed238a


   122

}





JLS

0:964911ed238a


   123







JLS

0:964911ed238a


   124

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





JLS

0:964911ed238a


   125

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





JLS

0:964911ed238a


   126







JLS

0:964911ed238a


   127

    char command[1000]= "";





JLS

0:964911ed238a


   128

    int size = strlen(s);





JLS

0:964911ed238a


   129

    int i = 0;





JLS

0:964911ed238a


   130







JLS

0:964911ed238a


   131

    command[0] = TEXTSTRING;





JLS

0:964911ed238a


   132







JLS

0:964911ed238a


   133

    command[1] = col;





JLS

0:964911ed238a


   134

    command[2] = row;





JLS

0:964911ed238a


   135







JLS

0:964911ed238a


   136

    command[3] = font;





JLS

0:964911ed238a


   137







JLS

0:964911ed238a


   138

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





JLS

0:964911ed238a


   139

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





JLS

0:964911ed238a


   140

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





JLS

0:964911ed238a


   141







JLS

0:964911ed238a


   142

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





JLS

0:964911ed238a


   143

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





JLS

0:964911ed238a


   144







JLS

0:964911ed238a


   145

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





JLS

0:964911ed238a


   146







JLS

0:964911ed238a


   147

    command[6+size] = 0;





JLS

0:964911ed238a


   148







JLS

0:964911ed238a


   149

    writeCOMMAND(command, 7 + size);





JLS

0:964911ed238a


   150

}





JLS

0:964911ed238a


   151







JLS

0:964911ed238a


   152

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





JLS

0:964911ed238a


   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:964911ed238a


   154







JLS

0:964911ed238a


   155

    char command[1000]= "";





JLS

0:964911ed238a


   156

    int size = strlen(s);





JLS

0:964911ed238a


   157

    int i = 0;





JLS

0:964911ed238a


   158







JLS

0:964911ed238a


   159

    command[0] = GRAPHSTRING;





JLS

0:964911ed238a


   160







JLS

0:964911ed238a


   161

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





JLS

0:964911ed238a


   162

    command[2] = x & 0xFF;





JLS

0:964911ed238a


   163







JLS

0:964911ed238a


   164

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





JLS

0:964911ed238a


   165

    command[4] = y & 0xFF;





JLS

0:964911ed238a


   166







JLS

0:964911ed238a


   167

    command[5] = font;





JLS

0:964911ed238a


   168







JLS

0:964911ed238a


   169

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





JLS

0:964911ed238a


   170

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





JLS

0:964911ed238a


   171

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





JLS

0:964911ed238a


   172







JLS

0:964911ed238a


   173

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





JLS

0:964911ed238a


   174

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





JLS

0:964911ed238a


   175







JLS

0:964911ed238a


   176

    command[8] = width;





JLS

0:964911ed238a


   177







JLS

0:964911ed238a


   178

    command[9] = height;





JLS

0:964911ed238a


   179







JLS

0:964911ed238a


   180

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





JLS

0:964911ed238a


   181







JLS

0:964911ed238a


   182

    command[10+size] = 0;





JLS

0:964911ed238a


   183







JLS

0:964911ed238a


   184

    writeCOMMAND(command, 11 + size);





JLS

0:964911ed238a


   185

}





JLS

0:964911ed238a


   186







JLS

0:964911ed238a


   187

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





JLS

0:964911ed238a


   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:964911ed238a


   189







JLS

0:964911ed238a


   190

    char command[1000]= "";





JLS

0:964911ed238a


   191

    int size = strlen(s);





JLS

0:964911ed238a


   192

    int i = 0, red5, green6, blue5;





JLS

0:964911ed238a


   193







JLS

0:964911ed238a


   194

    command[0] = TEXTBUTTON;





JLS

0:964911ed238a


   195







JLS

0:964911ed238a


   196

    command[1] = mode;





JLS

0:964911ed238a


   197







JLS

0:964911ed238a


   198

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





JLS

0:964911ed238a


   199

    command[3] = x & 0xFF;





JLS

0:964911ed238a


   200







JLS

0:964911ed238a


   201

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





JLS

0:964911ed238a


   202

    command[5] = y & 0xFF;





JLS

0:964911ed238a


   203







JLS

0:964911ed238a


   204

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





JLS

0:964911ed238a


   205

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





JLS

0:964911ed238a


   206

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





JLS

0:964911ed238a


   207







JLS

0:964911ed238a


   208

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





JLS

0:964911ed238a


   209

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





JLS

0:964911ed238a


   210







JLS

0:964911ed238a


   211

    command[8] = font;





JLS

0:964911ed238a


   212







JLS

0:964911ed238a


   213

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





JLS

0:964911ed238a


   214

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





JLS

0:964911ed238a


   215

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





JLS

0:964911ed238a


   216







JLS

0:964911ed238a


   217

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





JLS

0:964911ed238a


   218

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





JLS

0:964911ed238a


   219







JLS

0:964911ed238a


   220

    command[11] = width;





JLS

0:964911ed238a


   221







JLS

0:964911ed238a


   222

    command[12] = height;





JLS

0:964911ed238a


   223







JLS

0:964911ed238a


   224

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





JLS

0:964911ed238a


   225







JLS

0:964911ed238a


   226

    command[13+size] = 0;





JLS

0:964911ed238a


   227







JLS

0:964911ed238a


   228

    writeCOMMAND(command, 14 + size);





JLS

0:964911ed238a


   229

}





JLS

0:964911ed238a


   230







JLS

0:964911ed238a


   231

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





JLS

0:964911ed238a


   232

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





JLS

0:964911ed238a


   233

    current_col = col;





JLS

0:964911ed238a


   234

    current_row = row;





JLS

0:964911ed238a


   235

}





JLS

0:964911ed238a


   236







JLS

0:964911ed238a


   237

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





JLS

0:964911ed238a


   238

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





JLS

0:964911ed238a


   239

    current_color = color;





JLS

0:964911ed238a


   240

}





JLS

0:964911ed238a


   241







JLS

0:964911ed238a


   242

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





JLS

0:964911ed238a


   243

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





JLS

0:964911ed238a


   244







JLS

0:964911ed238a


   245

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





JLS

0:964911ed238a


   246







JLS

0:964911ed238a


   247

    if (current_col == max_col) {





JLS

0:964911ed238a


   248

        current_col = 0;





JLS

0:964911ed238a


   249

        current_row++;





JLS

0:964911ed238a


   250

    }





JLS

0:964911ed238a


   251

    if (current_row == max_row) {





JLS

0:964911ed238a


   252

        current_row = 0;





JLS

0:964911ed238a


   253

    }





JLS

0:964911ed238a


   254

}





JLS

0:964911ed238a


   255







JLS

0:964911ed238a


   256

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





JLS

0:964911ed238a


   257

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





JLS

0:964911ed238a


   258







JLS

0:964911ed238a


   259

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





JLS

0:964911ed238a


   260







JLS

0:964911ed238a


   261

    current_col += strlen(s);





JLS

0:964911ed238a


   262







JLS

0:964911ed238a


   263

    if (current_col >= max_col) {





JLS

0:964911ed238a


   264

        current_row += current_col / max_col;





JLS

0:964911ed238a


   265

        current_col %= max_col;





JLS

0:964911ed238a


   266

    }





JLS

0:964911ed238a


   267

    if (current_row >= max_row) {





JLS

0:964911ed238a


   268

        current_row %= max_row;





JLS

0:964911ed238a


   269

    }





JLS

0:964911ed238a


   270

}