LCD library for Akizuki AQM1248A graphic LCD module

Dependents:   FRDM_MAG3110 Nucleo_AQM1248A Nucleo_AQM1248A_GT20L16J1Y

Fork of C12832_lcd by Peter Drescher

see http://mbed.org/users/masato/code/Nucleo_AQM1248A/

Revision:
11:0145579c487f
Child:
12:cecd70424890
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/aqm1248a_lcd.cpp	Wed Apr 23 14:43:48 2014 +0000
@@ -0,0 +1,605 @@
+/*
+ * mbed library for the Akizuki AQM1248A 128*48 pixel LCD
+ * derived from C12832_lcd
+ * Copyright (c) 2014 Masato YAMANISHI
+ * Released under the MIT License: http://mbed.org/license/mit
+ */
+
+/* mbed library for the mbed Lab Board  128*32 pixel LCD
+ * use C12832 controller
+ * Copyright (c) 2012 Peter Drescher - DC2PD
+ * Released under the MIT License: http://mbed.org/license/mit
+ *
+ * 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.
+ */
+
+// 13.10.12    initial design
+// 25.10.12    add autorefresh of screen
+// 25.10.12    add standart font
+// 20.12.12    add bitmap graphics
+
+// optional defines :
+// #define debug_lcd  1
+
+#include "aqm1248a_lcd.h"
+#include "mbed.h"
+#include "stdio.h"
+#include "Small_7.h"
+
+aqm1248a_lcd::aqm1248a_lcd(const char* name)
+#if defined(TARGET_NUCLEO_L152RE)
+     : _spi(D11,NC,D13),_reset(D9),_A0(D8),_CS(D10),GraphicsDisplay(name) // for nucleo L152RE or other
+#else
+     : _spi(p5,NC,p7),_reset(p6),_A0(p8),_CS(p11),GraphicsDisplay(name) // for mbed LPC1768
+#endif
+{
+    orientation = 1;
+    draw_mode = NORMAL;
+    char_x = 0;
+    lcd_reset();
+}
+
+int aqm1248a_lcd::width()
+{
+    if (orientation == 0 || orientation == 2) return HEIGHT; // 32;
+    else return WIDTH;
+}
+
+int aqm1248a_lcd::height()
+{
+    if (orientation == 0 || orientation == 2) return WIDTH;
+    else return HEIGHT; // 32;
+}
+
+/*void aqm1248a_lcd::set_orientation(unsigned int o)
+{
+    orientation = o;
+    switch (o) {
+        case (0):
+            wr_cmd(0xA0);
+            wr_cmd(0xC0);
+            break;
+        case (1):
+            wr_cmd(0xA0);
+            wr_cmd(0xC8);
+            break;
+        case (2):
+            wr_cmd(0xA1);
+            wr_cmd(0xC8);
+            break;
+        case (3):
+            wr_cmd(0xA1);
+            wr_cmd(0xC0);
+            break;
+    }
+}
+*/
+
+void aqm1248a_lcd::invert(unsigned int o)
+{
+    if(o == 0) wr_cmd(0xA6);
+    else wr_cmd(0xA7);
+}
+
+
+void aqm1248a_lcd::set_contrast(unsigned int o)
+{
+    contrast = o;
+    wr_cmd(0x81);      //  set volume
+    wr_cmd(o & 0x3F);
+}
+
+unsigned int aqm1248a_lcd::get_contrast(void)
+{
+    return(contrast);
+}
+
+// write command to lcd controller
+
+void aqm1248a_lcd::wr_cmd(unsigned char cmd)
+{
+    _A0 = 0;
+    _CS = 0;
+#if defined TARGET_LPC1768     // fast without mbed lib
+    LPC_SSP1->DR = cmd;
+    do {
+    } while ((LPC_SSP1->SR & 0x10) == 0x10); // wait for SPI1 idle
+#else
+    _spi.write(cmd);
+#endif
+    _CS = 1;
+}
+
+// write data to lcd controller
+
+void aqm1248a_lcd::wr_dat(unsigned char dat)
+{
+    _A0 = 1;
+    _CS = 0;
+#if defined TARGET_LPC1768     // fast without mbed lib
+    LPC_SSP1->DR = dat;
+    do {
+    } while ((LPC_SSP1->SR & 0x10) == 0x10); // wait for SPI1 idle
+#else
+    _spi.write(dat);
+#endif
+    _CS = 1;
+}
+
+// reset and init the lcd controller
+
+void aqm1248a_lcd::lcd_reset()
+{
+    _spi.format(8,3);                 // 8 bit spi mode 3
+    _spi.frequency(20000000);          // 19,2 Mhz SPI clock
+#if 0
+#if defined TARGET_LPC1768 
+    DigitalOut _reset(p6);
+#else
+    DigitalOut _reset(D9);
+#endif
+#endif
+    _A0 = 0;
+    _CS = 1;
+    _reset = 0;                        // display reset
+    wait_us(50);
+    _reset = 1;                       // end reset
+    wait_ms(5);
+
+    /* Start Initial Sequence ----------------------------------------------------*/
+
+    wr_cmd(0xAE);   //  display off
+    wr_cmd(0xA0);
+    wr_cmd(0xC8);   //  colum normal
+    wr_cmd(0xA3);   //  bias voltage
+    wr_cmd(0x2c); wait_ms(2);
+    wr_cmd(0x2e); wait_ms(2);
+    wr_cmd(0x2F);   //  power on
+    wr_cmd(0x23);
+    wr_cmd(0x81);
+    wr_cmd(0x1c);
+    wr_cmd(0xA4);   //  LCD display ram
+    wr_cmd(0x40);   // start line = 0
+    wr_cmd(0xa6);
+    wr_cmd(0xAF);     // display ON
+
+#if defined TARGET_LPC1768          //setup DMA channel 0       
+    LPC_SC->PCONP |= (1UL << 29);   // Power up the GPDMA
+    LPC_GPDMA->DMACConfig = 1;      // enable DMA controller
+    LPC_GPDMA->DMACIntTCClear = 0x1;
+    LPC_GPDMA->DMACIntErrClr = 0x1;
+    LPC_GPDMACH0->DMACCLLI = 0;
+#endif
+    // clear and update LCD
+    memset(buffer,0x00,BUFFER_SIZE);  // clear display buffer
+    copy_to_lcd();
+    auto_up = 1;              // switch on auto update
+    // dont do this by default. Make the user call
+    //claim(stdout);           // redirekt printf to lcd
+    locate(0,0);
+    set_font((unsigned char*)Small_7);  // standart font
+}
+
+// set one pixel in buffer
+
+void aqm1248a_lcd::pixel(int x, int y, int color)
+{
+    // first check parameter
+    if(x > WIDTH || y > HEIGHT || x < 0 || y < 0) return;
+
+    if(draw_mode == NORMAL) {
+        if(color == 0)
+            buffer[x + ((y/8) * WIDTH)] &= ~(1 << (y%8));  // erase pixel
+        else
+            buffer[x + ((y/8) * WIDTH)] |= (1 << (y%8));   // set pixel
+    } else { // XOR mode
+        if(color == 1)
+            buffer[x + ((y/8) * WIDTH)] ^= (1 << (y%8));   // xor pixel
+    }
+}
+
+// update lcd
+
+void aqm1248a_lcd::copy_to_lcd(void)
+{
+#ifndef TARGET_LPC1768
+    int i;
+#endif
+
+    for (int page = 0; page < PAGES; page++) {
+      //page 0
+      wr_cmd(0x00);      // set column low nibble 0
+      wr_cmd(0x10);      // set column hi  nibble 0
+      wr_cmd(0xB0 + page); // set page address 0 to PAGES-1
+      _A0 = 1;
+#if defined TARGET_LPC1768
+      _CS = 0;
+      if (page == 0) {
+        // start 128 byte DMA transfer to SPI1
+        LPC_GPDMACH0->DMACCDestAddr = (uint32_t)&LPC_SSP1->DR; // we send to SSP1
+        LPC_SSP1->DMACR = 0x2;  // Enable SSP1 for DMA.
+      }
+      LPC_GPDMA->DMACIntTCClear = 0x1;
+      LPC_GPDMA->DMACIntErrClr = 0x1;
+      LPC_GPDMACH0->DMACCSrcAddr = (uint32_t) (buffer + 128*page);
+      LPC_GPDMACH0->DMACCControl = 128 | (1UL << 31) |  DMA_CHANNEL_SRC_INC ; // 8 bit transfer , address increment, interrupt
+      LPC_GPDMACH0->DMACCConfig  = DMA_CHANNEL_ENABLE | DMA_TRANSFER_TYPE_M2P | DMA_DEST_SSP1_TX;
+      LPC_GPDMA->DMACSoftSReq = 0x1;
+      do {
+      } while ((LPC_GPDMA->DMACRawIntTCStat & 0x01) == 0); // DMA is running
+      do {
+      } while ((LPC_SSP1->SR & 0x10) == 0x10); // SPI1 not idle
+      _CS = 1;
+#else  // no DMA
+      for(i=WIDTH*page; i<WIDTH*(page+1); i++) {
+        wr_dat(buffer[i]);
+      }
+#endif
+    }
+}
+
+void aqm1248a_lcd::cls(void)
+{
+    memset(buffer,0x00,BUFFER_SIZE);  // clear display buffer
+    copy_to_lcd();
+}
+
+
+void aqm1248a_lcd::line(int x0, int y0, int x1, int y1, int color)
+{
+    int   dx = 0, dy = 0;
+    int   dx_sym = 0, dy_sym = 0;
+    int   dx_x2 = 0, dy_x2 = 0;
+    int   di = 0;
+
+    dx = x1-x0;
+    dy = y1-y0;
+
+    //  if (dx == 0) {        /* vertical line */
+    //      if (y1 > y0) vline(x0,y0,y1,color);
+    //      else vline(x0,y1,y0,color);
+    //      return;
+    //  }
+
+    if (dx > 0) {
+        dx_sym = 1;
+    } else {
+        dx_sym = -1;
+    }
+    //  if (dy == 0) {        /* horizontal line */
+    //      if (x1 > x0) hline(x0,x1,y0,color);
+    //      else  hline(x1,x0,y0,color);
+    //      return;
+    //  }
+
+    if (dy > 0) {
+        dy_sym = 1;
+    } else {
+        dy_sym = -1;
+    }
+
+    dx = dx_sym*dx;
+    dy = dy_sym*dy;
+
+    dx_x2 = dx*2;
+    dy_x2 = dy*2;
+
+    if (dx >= dy) {
+        di = dy_x2 - dx;
+        while (x0 != x1) {
+
+            pixel(x0, y0, color);
+            x0 += dx_sym;
+            if (di<0) {
+                di += dy_x2;
+            } else {
+                di += dy_x2 - dx_x2;
+                y0 += dy_sym;
+            }
+        }
+        pixel(x0, y0, color);
+    } else {
+        di = dx_x2 - dy;
+        while (y0 != y1) {
+            pixel(x0, y0, color);
+            y0 += dy_sym;
+            if (di < 0) {
+                di += dx_x2;
+            } else {
+                di += dx_x2 - dy_x2;
+                x0 += dx_sym;
+            }
+        }
+        pixel(x0, y0, color);
+    }
+    if(auto_up) copy_to_lcd();
+}
+
+void aqm1248a_lcd::rect(int x0, int y0, int x1, int y1, int color)
+{
+
+    if (x1 > x0) line(x0,y0,x1,y0,color);
+    else  line(x1,y0,x0,y0,color);
+
+    if (y1 > y0) line(x0,y0,x0,y1,color);
+    else line(x0,y1,x0,y0,color);
+
+    if (x1 > x0) line(x0,y1,x1,y1,color);
+    else  line(x1,y1,x0,y1,color);
+
+    if (y1 > y0) line(x1,y0,x1,y1,color);
+    else line(x1,y1,x1,y0,color);
+
+    if(auto_up) copy_to_lcd();
+}
+
+void aqm1248a_lcd::fillrect(int x0, int y0, int x1, int y1, int color)
+{
+    int l,c,i;
+    if(x0 > x1) {
+        i = x0;
+        x0 = x1;
+        x1 = i;
+    }
+
+    if(y0 > y1) {
+        i = y0;
+        y0 = y1;
+        y1 = i;
+    }
+
+    for(l = x0; l<= x1; l ++) {
+        for(c = y0; c<= y1; c++) {
+            pixel(l,c,color);
+        }
+    }
+    if(auto_up) copy_to_lcd();
+}
+
+
+
+void aqm1248a_lcd::circle(int x0, int y0, int r, int color)
+{
+
+    int draw_x0, draw_y0;
+    int draw_x1, draw_y1;
+    int draw_x2, draw_y2;
+    int draw_x3, draw_y3;
+    int draw_x4, draw_y4;
+    int draw_x5, draw_y5;
+    int draw_x6, draw_y6;
+    int draw_x7, draw_y7;
+    int xx, yy;
+    int di;
+    //WindowMax();
+    if (r == 0) {       /* no radius */
+        return;
+    }
+
+    draw_x0 = draw_x1 = x0;
+    draw_y0 = draw_y1 = y0 + r;
+    if (draw_y0 < height()) {
+        pixel(draw_x0, draw_y0, color);     /* 90 degree */
+    }
+
+    draw_x2 = draw_x3 = x0;
+    draw_y2 = draw_y3 = y0 - r;
+    if (draw_y2 >= 0) {
+        pixel(draw_x2, draw_y2, color);    /* 270 degree */
+    }
+
+    draw_x4 = draw_x6 = x0 + r;
+    draw_y4 = draw_y6 = y0;
+    if (draw_x4 < width()) {
+        pixel(draw_x4, draw_y4, color);     /* 0 degree */
+    }
+
+    draw_x5 = draw_x7 = x0 - r;
+    draw_y5 = draw_y7 = y0;
+    if (draw_x5>=0) {
+        pixel(draw_x5, draw_y5, color);     /* 180 degree */
+    }
+
+    if (r == 1) {
+        return;
+    }
+
+    di = 3 - 2*r;
+    xx = 0;
+    yy = r;
+    while (xx < yy) {
+
+        if (di < 0) {
+            di += 4*xx + 6;
+        } else {
+            di += 4*(xx - yy) + 10;
+            yy--;
+            draw_y0--;
+            draw_y1--;
+            draw_y2++;
+            draw_y3++;
+            draw_x4--;
+            draw_x5++;
+            draw_x6--;
+            draw_x7++;
+        }
+        xx++;
+        draw_x0++;
+        draw_x1--;
+        draw_x2++;
+        draw_x3--;
+        draw_y4++;
+        draw_y5++;
+        draw_y6--;
+        draw_y7--;
+
+        if ( (draw_x0 <= width()) && (draw_y0>=0) ) {
+            pixel(draw_x0, draw_y0, color);
+        }
+
+        if ( (draw_x1 >= 0) && (draw_y1 >= 0) ) {
+            pixel(draw_x1, draw_y1, color);
+        }
+
+        if ( (draw_x2 <= width()) && (draw_y2 <= height()) ) {
+            pixel(draw_x2, draw_y2, color);
+        }
+
+        if ( (draw_x3 >=0 ) && (draw_y3 <= height()) ) {
+            pixel(draw_x3, draw_y3, color);
+        }
+
+        if ( (draw_x4 <= width()) && (draw_y4 >= 0) ) {
+            pixel(draw_x4, draw_y4, color);
+        }
+
+        if ( (draw_x5 >= 0) && (draw_y5 >= 0) ) {
+            pixel(draw_x5, draw_y5, color);
+        }
+        if ( (draw_x6 <=width()) && (draw_y6 <= height()) ) {
+            pixel(draw_x6, draw_y6, color);
+        }
+        if ( (draw_x7 >= 0) && (draw_y7 <= height()) ) {
+            pixel(draw_x7, draw_y7, color);
+        }
+    }
+    if(auto_up) copy_to_lcd();
+}
+
+void aqm1248a_lcd::fillcircle(int x, int y, int r, int color)
+{
+    int i,up;
+    up = auto_up;
+    auto_up = 0;   // off
+    for (i = 0; i <= r; i++)
+        circle(x,y,i,color);
+    auto_up = up;
+    if(auto_up) copy_to_lcd();
+}
+
+void aqm1248a_lcd::setmode(int mode)
+{
+    draw_mode = mode;
+}
+
+void aqm1248a_lcd::locate(int x, int y)
+{
+    char_x = x;
+    char_y = y;
+}
+
+
+
+int aqm1248a_lcd::columns()
+{
+    return width() / font[1];
+}
+
+
+
+int aqm1248a_lcd::rows()
+{
+    return height() / font[2];
+}
+
+
+
+int aqm1248a_lcd::_putc(int value)
+{
+    if (value == '\n') {    // new line
+        char_x = 0;
+        char_y = char_y + font[2];
+        if (char_y >= height() - font[2]) {
+            char_y = 0;
+        }
+    } else {
+        character(char_x, char_y, value);
+        if(auto_up) copy_to_lcd();
+    }
+    return value;
+}
+
+void aqm1248a_lcd::character(int x, int y, int c)
+{
+    unsigned int hor,vert,offset,bpl,j,i,b;
+    unsigned char* zeichen;
+    unsigned char z,w;
+
+    if ((c < 31) || (c > 127)) return;   // test char range
+
+    // read font parameter from start of array
+    offset = font[0];                    // bytes / char
+    hor = font[1];                       // get hor size of font
+    vert = font[2];                      // get vert size of font
+    bpl = font[3];                       // bytes per line
+
+    if (char_x + hor > width()) {
+        char_x = 0;
+        char_y = char_y + vert;
+        if (char_y >= height() - font[2]) {
+            char_y = 0;
+        }
+    }
+
+    zeichen = &font[((c -32) * offset) + 4]; // start of char bitmap
+    w = zeichen[0];                          // width of actual char
+    // construct the char into the buffer
+    for (j=0; j<vert; j++) {  //  vert line
+        for (i=0; i<hor; i++) {   //  horz line
+            z =  zeichen[bpl * i + ((j & 0xF8) >> 3)+1];
+            b = 1 << (j & 0x07);
+            if (( z & b ) == 0x00) {
+                pixel(x+i,y+j,0);
+            } else {
+                pixel(x+i,y+j,1);
+            }
+
+        }
+    }
+
+    char_x += w;
+}
+
+void aqm1248a_lcd::set_font(unsigned char* f)
+{
+    font = f;
+}
+
+void aqm1248a_lcd::set_auto_up(unsigned int up)
+{
+    if(up ) auto_up = 1;
+    else auto_up = 0;
+}
+
+unsigned int aqm1248a_lcd::get_auto_up(void)
+{
+    return (auto_up);
+}
+
+void aqm1248a_lcd::print_bm(Bitmap bm, int x, int y)
+{
+    int h,v,b;
+    char d;
+
+    for(v=0; v < bm.ySize; v++) {   // lines
+        for(h=0; h < bm.xSize; h++) { // pixel
+            if(h + x > WIDTH-1) break;
+            if(v + y > HEIGHT-1) break;
+            d = bm.data[bm.Byte_in_Line * v + ((h & 0xF8) >> 3)];
+            b = 0x80 >> (h & 0x07);
+            if((d & b) == 0) {
+                pixel(x+h,y+v,0);
+            } else {
+                pixel(x+h,y+v,1);
+            }
+        }
+    }
+
+}
+    
\ No newline at end of file