File content as of revision 5:455a2110179d:

/* mbed TextLCD_595 Library, for a 4-bit LCD based on HD44780
 * Copyright (c) 2007-2010, sford, http://mbed.org
 * Changes by Erik Kerger
 *
 *
 * Changes by Bogomazyuk Vasiliy (Богомазюк Василий) 
 * Модуль испытан на жидкокристаллическом модуле MT–16S2D
 *
 *
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */

#include "TextLCD_595.h"
#include "mbed.h"

#include <string>

#define __nop1 wait_us(1)

const unsigned char utf_recode[] =
{
  0x41,0xa0,0x42,0xa1,0xe0,0x45,0xa3,0xa4,
  0xa5,0xa6,0x4b,0xa7,0x4d,0x48,0x4f,0xa8,
  0x50,0x43,0x54,0xa9,0xaa,0x58,0xe1,0xab,
  0xac,0xe2,0xad,0xae,0x62,0xaf,0xb0,0xb1,
  0x61,0xb2,0xb3,0xb4,0xe3,0x65,0xb6,0xb7,
  0xb8,0xb9,0xba,0xbb,0xbc,0xbd,0x6f,0xbe,
  0x70,0x63,0xbf,0x79,0xe4,0x78,0xe5,0xc0,
  0xc1,0xe6,0xc2,0xc3,0xc4,0xc5,0xc6,0xc7
};

int ConvertChar(int c)
{
    int i=c;
    if ((c>=0xD090)and(c<=0xD0BF))i=utf_recode[c-0xD090];
    if ((c>=0xD180)and(c<=0xD18F))i=utf_recode[c-0xD150];
    if (c==0xD081) i=0xA2;
    if (c==0xD191) i=0xB5;
    return i;
}

#define _BL 0x40
#define _RS 0x10
#define _E  0x20
#define _D4 0x01
#define _D5 0x02
#define _D6 0x04
#define _D7 0x08

TextLCD_595::TextLCD_595(SPI *spi, PinName CS, LCDType type) : 
                        _spi(spi), 
                        _cs(CS), 
                        _type(type) {
        _spi->format(8,0);
        _spi->frequency(1000000);

        _cs = 0;
        _spi->write(0x0);
        _cs = 1;
    if (_type != LCDuser)
        setLCDparam(_type); // otherwise rows, colums, comdelay, adresses must be set before

    wait(0.050f);       // Wait 50ms to ensure powered up

    // send "Display Settings" 3 times (Only top nibble of 0x30 as we've got 4-bit bus)
    // this sets controler into 8 bit mode, so we have a defined state
    for (int i=0; i<3; i++) {
        _cs = 0;
        _spi->write(_E);
        _cs = 1;
        __nop1;
        _cs = 0;
        _spi->write(_E|_D4|_D5);
        _cs = 1;
        __nop1;
        _cs = 0;
        _spi->write(_D4|_D5);
        _cs = 1;
        wait_us(LCDparam.delay);
       }
    _cs = 0;
    _spi->write(_E|_D4|_D5);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_E|_D5);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_D5);
    _cs = 1;
    wait_us(LCDparam.delay);
    _comm = _D5;
    
    writeCommand(0x28); // Function set 4 Bit, 2Line, 5*7
    writeCommand(0x08); // Display off
    cls();              // clear display, reset _column and _row
    writeCommand(0x04); // cursor right, Display is not shifted
    _bl=_BL;            // Backlight on
    writeCommand(0x0C); // Display on , Cursor off     
    _setCursor=0x0;     //Курсор выключен и не мигает
}

void TextLCD_595::character(int column, int row, int c) {
    int a = 0x80 | (LCDparam.adresses[row & 3] + column);
    writeCommand(a);    // set cursor address
    writeData(c);       // write char
}

void TextLCD_595::cls() {
    writeCommand(0x01); // cls, and set cursor to 0
    locate(0, 0);       // set internal position
    wait_us(45 * LCDparam.delay);   // CLS need much time
}

void TextLCD_595::locate(int column, int row) {
    _column = column;   // set position for next char
    _row = row;         // note: cursor is not set yet
}



int TextLCD_595::_putc(int value) {
    if (value == '\n') {
        _column = 0;
        _row++;
        if (_row >= LCDparam.rows) {
            _row = 0;
        }
    } else {
        character(_column, _row, value);
        _column++;
        if (_column >= LCDparam.columns) {
            _column = 0;
            _row++;
            if (_row >= LCDparam.rows) {
                _row = 0;
            }
        }
    }
    return value;
}

// Dummy function - read not supported
int TextLCD_595::_getc() {
    return -1;
}

void TextLCD_595::writeByte(int value) {
    _cs = 0;
    _spi->write(_E|_bl|_comm);
    _cs = 1;
    __nop1;
    _comm = value >> 4;        // higher nibble first
    _cs = 0;
    _spi->write(_E|_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_E|_bl|_comm);
    _cs = 1;
    __nop1;
    _comm = value & 0x0F;        // then lower
    _cs = 0;
    _spi->write(_E|_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_bl|_comm);
    _cs = 1;
    __nop1;
}

void TextLCD_595::writeByteData(int value) {
    _cs = 0;
    _spi->write(_RS|_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_E|_RS|_bl|_comm);
    _cs = 1;
    __nop1;
    _comm = value >> 4;        // higher nibble first
    _cs = 0;
    _spi->write(_E|_RS|_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_RS|_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_E|_RS|_bl|_comm);
    _cs = 1;
    __nop1;
    _comm = value & 0x0F;        // then lower
    _cs = 0;
    _spi->write(_E|_RS|_bl|_comm);
    _cs = 1;
    __nop1;
    _cs = 0;
    _spi->write(_RS|_bl|_comm);
    _cs = 1;
    wait_us(LCDparam.delay);
    _cs = 0;
    _spi->write(_bl|_comm);
    _cs = 1;
    __nop1;
}


void TextLCD_595::writeCommand(int command) {
    writeByte(command);
    wait_us(LCDparam.delay);
}


void TextLCD_595::writeData(int data) {
    writeByteData(data);
    wait_us(LCDparam.delay);
}


// set user defined char 
void  TextLCD_595::writeCGRAM(int address, int pattern[8]){
    int i;
    address = address & 7;  //max 8 char
    for(i=0;i<8;i++){
        writeCommand(0x40 | (address * 8) + i);
        writeData(pattern[i]);
        }
}   

void TextLCD_595::setLCDparam(LCDType _type){
    switch (_type) {
    
        case LCD16x2:
        case LCD16x2B:
            LCDparam.columns = 16;
            break;
        case LCD20x2:
        case LCD20x4:
            LCDparam.columns = 20;
            break;
        case LCD24x2:
            LCDparam.columns = 24;
            break;
    }
    if (_type == LCD20x4) 
        LCDparam.rows = 4;
    else 
        LCDparam.rows = 2;
        
    LCDparam.adresses[0] = 0;
    
    if (_type == LCD16x2B)
        LCDparam.adresses[1] = 40;
    else
        LCDparam.adresses[1] = 0x40;
        
    if (_type == LCD20x4) {
        LCDparam.adresses[2] = 0x14;
        LCDparam.adresses[3] = 0x54;}
    else {
        LCDparam.adresses[2] = 0;
        LCDparam.adresses[3] = 0;}
        
    LCDparam.delay = 50;            // 50 us delays as default              
}

int TextLCD_595::putc_rus(int c) {
    return putc(ConvertChar(c));
}

void TextLCD_595::print_rus(const string rustext){
    int len = rustext.length();
    for (int i=0; i<len; i++) {
        uint16_t temp=uint8_t(rustext[i]);
        i++;
        temp=temp<<8|uint8_t(rustext[i]);
        putc(ConvertChar(temp));  
    };
}


void TextLCD_595::ShiftLCD_Left() {
    writeCommand(0x18);
}

void TextLCD_595::ShiftLCD_Right() {
    writeCommand(0x1C);
}

void TextLCD_595::ShiftCursor_Left() {
    writeCommand(0x10);
}

void TextLCD_595::ShiftCursor_Right() {
    writeCommand(0x14);
}


void TextLCD_595::home() {
    writeCommand(0x2);
}

void TextLCD_595::on() {
    writeCommand(0xC|_setCursor);
}

void TextLCD_595::off() {
    writeCommand(0x8|_setCursor);
}


void TextLCD_595::SetCursor(int modeCursor) {
    _setCursor=modeCursor;
    writeCommand(0xC|_setCursor);
}

void TextLCD_595::CursorPosition(int column, int row) { //Устанавливаем позицию курсора
    writeCommand(0x80 | (LCDparam.adresses[row & 3] + column));
}


void TextLCD_595::BackLightOn(){
    _bl=_BL;
    _cs = 0;
    _spi->write(_bl|_comm);
    _cs = 1;
    __nop1;
}

void TextLCD_595::BackLightOff(){
    _bl=0;
    _cs = 0;
    _spi->write(_bl|_comm);
    _cs = 1;
    __nop1;
}