C12832_lcd.cpp

00001 /* mbed library for the mbed Lab Board  128*32 pixel LCD
00002  * use C12832 controller
00003  * Copyright (c) 2012 Peter Drescher - DC2PD
00004  * Released under the MIT License: http://mbed.org/license/mit
00005  *
00006  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
00007  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
00008  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
00009  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
00010  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
00011  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
00012  * THE SOFTWARE.
00013  */
00014 
00015 // 13.10.12    initial design
00016 // 25.10.12    add autorefresh of screen
00017 // 25.10.12    add standart font
00018 // 20.12.12    add bitmap graphics
00019 
00020 // optional defines :
00021 // #define debug_lcd  1
00022 
00023 #include "C12832_lcd.h"
00024 #include "mbed.h"
00025 #include "stdio.h"
00026 #include "Small_7.h"
00027 
00028 #define BPP    1       // Bits per pixel
00029 
00030 C12832_LCD::C12832_LCD(const char* name)
00031     : _spi(D11,NC,D13),_reset(D12),_A0(D7),_CS(D10),GraphicsDisplay(name)
00032 {
00033     orientation = 1;
00034     draw_mode = NORMAL;
00035     char_x = 0;
00036     lcd_reset();
00037 }
00038 
00039 int C12832_LCD::width()
00040 {
00041     if (orientation == 0 || orientation == 2) return 32;
00042     else return 128;
00043 }
00044 
00045 int C12832_LCD::height()
00046 {
00047     if (orientation == 0 || orientation == 2) return 128;
00048     else return 32;
00049 }
00050 
00051 
00052 /*void C12832_LCD::set_orientation(unsigned int o)
00053 {
00054     orientation = o;
00055     switch (o) {
00056         case (0):
00057             wr_cmd(0xA0);
00058             wr_cmd(0xC0);
00059             break;
00060         case (1):
00061             wr_cmd(0xA0);
00062             wr_cmd(0xC8);
00063             break;
00064         case (2):
00065             wr_cmd(0xA1);
00066             wr_cmd(0xC8);
00067             break;
00068         case (3):
00069             wr_cmd(0xA1);
00070             wr_cmd(0xC0);
00071             break;
00072     }
00073 }
00074 
00075 */
00076 
00077 void C12832_LCD::invert(unsigned int o)
00078 {
00079     if(o == 0) wr_cmd(0xA6);
00080     else wr_cmd(0xA7);
00081 }
00082 
00083 
00084 void C12832_LCD::set_contrast(unsigned int o)
00085 {
00086     contrast = o;
00087     wr_cmd(0x81);      //  set volume
00088     wr_cmd(o & 0x3F);
00089 }
00090 
00091 unsigned int C12832_LCD::get_contrast(void)
00092 {
00093     return(contrast);
00094 }
00095 
00096 
00097 // write command to lcd controller
00098 
00099 void C12832_LCD::wr_cmd(unsigned char cmd)
00100 {
00101     _A0 = 0;
00102     _CS = 0;
00103 #if defined TARGET_LPC1768     // fast without mbed lib
00104     LPC_SSP1->DR = cmd;
00105     do {
00106     } while ((LPC_SSP1->SR & 0x10) == 0x10); // wait for SPI1 idle
00107 #else
00108     _spi.write(cmd);
00109 #endif
00110     _CS = 1;
00111 }
00112 
00113 // write data to lcd controller
00114 
00115 void C12832_LCD::wr_dat(unsigned char dat)
00116 {
00117     _A0 = 1;
00118     _CS = 0;
00119 #if defined TARGET_LPC1768     // fast without mbed lib
00120     LPC_SSP1->DR = dat;
00121     do {
00122     } while ((LPC_SSP1->SR & 0x10) == 0x10); // wait for SPI1 idle
00123 #else
00124     _spi.write(dat);
00125 #endif
00126     _CS = 1;
00127 }
00128 
00129 // reset and init the lcd controller
00130 
00131 void C12832_LCD::lcd_reset()
00132 {
00133 
00134     _spi.format(8,3);                 // 8 bit spi mode 3
00135     _spi.frequency(20000000);          // 19,2 Mhz SPI clock
00136     DigitalOut _reset(D12);
00137     _A0 = 0;
00138     _CS = 1;
00139     _reset = 0;                        // display reset
00140     wait_us(50);
00141     _reset = 1;                       // end reset
00142     wait_ms(5);
00143 
00144     /* Start Initial Sequence ----------------------------------------------------*/
00145 
00146     wr_cmd(0xAE);   //  display off
00147     wr_cmd(0xA2);   //  bias voltage
00148 
00149     wr_cmd(0xA0);
00150     wr_cmd(0xC8);   //  colum normal
00151 
00152     wr_cmd(0x22);   //  voltage resistor ratio
00153     wr_cmd(0x2F);   //  power on
00154     //wr_cmd(0xA4);   //  LCD display ram
00155     wr_cmd(0x40);   // start line = 0
00156     wr_cmd(0xAF);     // display ON
00157 
00158     wr_cmd(0x81);   //  set contrast
00159     wr_cmd(0x17);   //  set contrast
00160 
00161     wr_cmd(0xA6);     // display normal
00162 
00163 
00164 #if defined TARGET_LPC1768          //setup DMA channel 0       
00165     LPC_SC->PCONP |= (1UL << 29);   // Power up the GPDMA
00166     LPC_GPDMA->DMACConfig = 1;      // enable DMA controller
00167     LPC_GPDMA->DMACIntTCClear = 0x1;
00168     LPC_GPDMA->DMACIntErrClr = 0x1;
00169     LPC_GPDMACH0->DMACCLLI = 0;
00170 #endif
00171     // clear and update LCD
00172     memset(buffer,0x00,512);  // clear display buffer
00173     copy_to_lcd();
00174     auto_up = 1;              // switch on auto update
00175     claim(stdout);           // redirekt printf to lcd
00176     locate(0,0);
00177     set_font((unsigned char*)Small_7);  // standart font
00178 }
00179 
00180 // set one pixel in buffer
00181 
00182 void C12832_LCD::pixel(int x, int y, int color)
00183 {
00184     // first check parameter
00185     if(x > 128 || y > 32 || x < 0 || y < 0) return;
00186 
00187     if(draw_mode == NORMAL) {
00188         if(color == 0)
00189             buffer[x + ((y/8) * 128)] &= ~(1 << (y%8));  // erase pixel
00190         else
00191             buffer[x + ((y/8) * 128)] |= (1 << (y%8));   // set pixel
00192     } else { // XOR mode
00193         if(color == 1)
00194             buffer[x + ((y/8) * 128)] ^= (1 << (y%8));   // xor pixel
00195     }
00196 }
00197 
00198 // update lcd
00199 
00200 void C12832_LCD::copy_to_lcd(void)
00201 {
00202 #ifndef TARGET_LPC1768
00203     int i;
00204 #endif
00205     //page 0
00206     wr_cmd(0x00);      // set column low nibble 0
00207     wr_cmd(0x10);      // set column hi  nibble 0
00208     wr_cmd(0xB0);      // set page address  0
00209     _A0 = 1;
00210 #if defined TARGET_LPC1768
00211     _CS = 0;
00212     // start 128 byte DMA transfer to SPI1
00213     LPC_GPDMACH0->DMACCDestAddr = (uint32_t)&LPC_SSP1->DR; // we send to SSP1
00214     LPC_SSP1->DMACR = 0x2;  // Enable SSP1 for DMA.
00215     LPC_GPDMA->DMACIntTCClear = 0x1;
00216     LPC_GPDMA->DMACIntErrClr = 0x1;
00217     LPC_GPDMACH0->DMACCSrcAddr = (uint32_t) (buffer);
00218     LPC_GPDMACH0->DMACCControl = 128 | (1UL << 31) |  DMA_CHANNEL_SRC_INC ; // 8 bit transfer , address increment, interrupt
00219     LPC_GPDMACH0->DMACCConfig  = DMA_CHANNEL_ENABLE | DMA_TRANSFER_TYPE_M2P | DMA_DEST_SSP1_TX;
00220     LPC_GPDMA->DMACSoftSReq = 0x1;
00221     do {
00222     } while ((LPC_GPDMA->DMACRawIntTCStat & 0x01) == 0); // DMA is running
00223     do {
00224     } while ((LPC_SSP1->SR & 0x10) == 0x10); // SPI1 not idle
00225     _CS = 1;
00226 #else  // no DMA
00227     for(i=0; i<128; i++) {
00228         wr_dat(buffer[i]);
00229     }
00230 #endif
00231 
00232     // page 1
00233     wr_cmd(0x00);      // set column low nibble 0
00234     wr_cmd(0x10);      // set column hi  nibble 0
00235     wr_cmd(0xB1);      // set page address  1
00236     _A0 = 1;
00237 #if defined TARGET_LPC1768
00238     _CS = 0;
00239     // start 128 byte DMA transfer to SPI1
00240     LPC_GPDMA->DMACIntTCClear = 0x1;
00241     LPC_GPDMA->DMACIntErrClr = 0x1;
00242     LPC_GPDMACH0->DMACCSrcAddr = (uint32_t) (buffer + 128);
00243     LPC_GPDMACH0->DMACCControl = 128 | (1UL << 31) |  DMA_CHANNEL_SRC_INC ; // 8 bit transfer , address increment, interrupt
00244     LPC_GPDMACH0->DMACCConfig  = DMA_CHANNEL_ENABLE | DMA_TRANSFER_TYPE_M2P | DMA_DEST_SSP1_TX;
00245     LPC_GPDMA->DMACSoftSReq = 0x1;
00246     do {
00247     } while ((LPC_GPDMA->DMACRawIntTCStat & 0x01) == 0); // DMA is running
00248     do {
00249     } while ((LPC_SSP1->SR & 0x10) == 0x10); // SPI1 not idle
00250     _CS = 1;
00251 #else // no DMA
00252     for(i=128; i<256; i++) {
00253         wr_dat(buffer[i]);
00254     }
00255 #endif
00256 
00257     //page 2
00258     wr_cmd(0x00);      // set column low nibble 0
00259     wr_cmd(0x10);      // set column hi  nibble 0
00260     wr_cmd(0xB2);      // set page address  2
00261     _A0 = 1;
00262 #if defined TARGET_LPC1768
00263     _CS = 0;
00264     // start 128 byte DMA transfer to SPI1
00265     LPC_GPDMA->DMACIntTCClear = 0x1;
00266     LPC_GPDMA->DMACIntErrClr = 0x1;
00267     LPC_GPDMACH0->DMACCSrcAddr = (uint32_t) (buffer + 256);
00268     LPC_GPDMACH0->DMACCControl = 128 | (1UL << 31) |  DMA_CHANNEL_SRC_INC ; // 8 bit transfer , address increment, interrupt
00269     LPC_GPDMACH0->DMACCConfig  = DMA_CHANNEL_ENABLE | DMA_TRANSFER_TYPE_M2P | DMA_DEST_SSP1_TX ;
00270     LPC_GPDMA->DMACSoftSReq = 0x1;
00271     do {
00272     } while ((LPC_GPDMA->DMACRawIntTCStat & 0x01) == 0); // DMA is running
00273     do {
00274     } while ((LPC_SSP1->SR & 0x10) == 0x10); // SPI1 not idle
00275     _CS = 1;
00276 #else // no DMA
00277     for(i=256; i<384; i++) {
00278         wr_dat(buffer[i]);
00279     }
00280 #endif
00281 
00282     //page 3
00283     wr_cmd(0x00);      // set column low nibble 0
00284     wr_cmd(0x10);      // set column hi  nibble 0
00285     wr_cmd(0xB3);      // set page address  3
00286     _A0 = 1;
00287 
00288     _CS = 0;
00289 #if defined TARGET_LPC1768
00290     // start 128 byte DMA transfer to SPI1
00291     LPC_GPDMA->DMACIntTCClear = 0x1;
00292     LPC_GPDMA->DMACIntErrClr = 0x1;
00293     LPC_GPDMACH0->DMACCSrcAddr = (uint32_t) (buffer + 384);
00294     LPC_GPDMACH0->DMACCControl = 128  | (1UL << 31) |  DMA_CHANNEL_SRC_INC ; // 8 bit transfer , address increment, interrupt
00295     LPC_GPDMACH0->DMACCConfig  = DMA_CHANNEL_ENABLE | DMA_TRANSFER_TYPE_M2P | DMA_DEST_SSP1_TX;
00296     LPC_GPDMA->DMACSoftSReq = 0x1;
00297     do {
00298     } while ((LPC_GPDMA->DMACRawIntTCStat & 0x01) == 0); // DMA is running
00299     do {
00300     } while ((LPC_SSP1->SR & 0x10) == 0x10); // SPI1 not idle
00301     _CS = 1;
00302 #else // no DMA
00303     for(i=384; i<512; i++) {
00304         wr_dat(buffer[i]);
00305     }
00306 #endif
00307 }
00308 
00309 void C12832_LCD::cls(void)
00310 {
00311     memset(buffer,0x00,512);  // clear display buffer
00312     copy_to_lcd();
00313 }
00314 
00315 
00316 void C12832_LCD::line(int x0, int y0, int x1, int y1, int color)
00317 {
00318     int   dx = 0, dy = 0;
00319     int   dx_sym = 0, dy_sym = 0;
00320     int   dx_x2 = 0, dy_x2 = 0;
00321     int   di = 0;
00322 
00323     dx = x1-x0;
00324     dy = y1-y0;
00325 
00326     //  if (dx == 0) {        /* vertical line */
00327     //      if (y1 > y0) vline(x0,y0,y1,color);
00328     //      else vline(x0,y1,y0,color);
00329     //      return;
00330     //  }
00331 
00332     if (dx > 0) {
00333         dx_sym = 1;
00334     } else {
00335         dx_sym = -1;
00336     }
00337     //  if (dy == 0) {        /* horizontal line */
00338     //      if (x1 > x0) hline(x0,x1,y0,color);
00339     //      else  hline(x1,x0,y0,color);
00340     //      return;
00341     //  }
00342 
00343     if (dy > 0) {
00344         dy_sym = 1;
00345     } else {
00346         dy_sym = -1;
00347     }
00348 
00349     dx = dx_sym*dx;
00350     dy = dy_sym*dy;
00351 
00352     dx_x2 = dx*2;
00353     dy_x2 = dy*2;
00354 
00355     if (dx >= dy) {
00356         di = dy_x2 - dx;
00357         while (x0 != x1) {
00358 
00359             pixel(x0, y0, color);
00360             x0 += dx_sym;
00361             if (di<0) {
00362                 di += dy_x2;
00363             } else {
00364                 di += dy_x2 - dx_x2;
00365                 y0 += dy_sym;
00366             }
00367         }
00368         pixel(x0, y0, color);
00369     } else {
00370         di = dx_x2 - dy;
00371         while (y0 != y1) {
00372             pixel(x0, y0, color);
00373             y0 += dy_sym;
00374             if (di < 0) {
00375                 di += dx_x2;
00376             } else {
00377                 di += dx_x2 - dy_x2;
00378                 x0 += dx_sym;
00379             }
00380         }
00381         pixel(x0, y0, color);
00382     }
00383     if(auto_up) copy_to_lcd();
00384 }
00385 
00386 void C12832_LCD::rect(int x0, int y0, int x1, int y1, int color)
00387 {
00388 
00389     if (x1 > x0) line(x0,y0,x1,y0,color);
00390     else  line(x1,y0,x0,y0,color);
00391 
00392     if (y1 > y0) line(x0,y0,x0,y1,color);
00393     else line(x0,y1,x0,y0,color);
00394 
00395     if (x1 > x0) line(x0,y1,x1,y1,color);
00396     else  line(x1,y1,x0,y1,color);
00397 
00398     if (y1 > y0) line(x1,y0,x1,y1,color);
00399     else line(x1,y1,x1,y0,color);
00400 
00401     if(auto_up) copy_to_lcd();
00402 }
00403 
00404 void C12832_LCD::fillrect(int x0, int y0, int x1, int y1, int color)
00405 {
00406     int l,c,i;
00407     if(x0 > x1) {
00408         i = x0;
00409         x0 = x1;
00410         x1 = i;
00411     }
00412 
00413     if(y0 > y1) {
00414         i = y0;
00415         y0 = y1;
00416         y1 = i;
00417     }
00418 
00419     for(l = x0; l<= x1; l ++) {
00420         for(c = y0; c<= y1; c++) {
00421             pixel(l,c,color);
00422         }
00423     }
00424     if(auto_up) copy_to_lcd();
00425 }
00426 
00427 
00428 
00429 void C12832_LCD::circle(int x0, int y0, int r, int color)
00430 {
00431 
00432     int draw_x0, draw_y0;
00433     int draw_x1, draw_y1;
00434     int draw_x2, draw_y2;
00435     int draw_x3, draw_y3;
00436     int draw_x4, draw_y4;
00437     int draw_x5, draw_y5;
00438     int draw_x6, draw_y6;
00439     int draw_x7, draw_y7;
00440     int xx, yy;
00441     int di;
00442     //WindowMax();
00443     if (r == 0) {       /* no radius */
00444         return;
00445     }
00446 
00447     draw_x0 = draw_x1 = x0;
00448     draw_y0 = draw_y1 = y0 + r;
00449     if (draw_y0 < height()) {
00450         pixel(draw_x0, draw_y0, color);     /* 90 degree */
00451     }
00452 
00453     draw_x2 = draw_x3 = x0;
00454     draw_y2 = draw_y3 = y0 - r;
00455     if (draw_y2 >= 0) {
00456         pixel(draw_x2, draw_y2, color);    /* 270 degree */
00457     }
00458 
00459     draw_x4 = draw_x6 = x0 + r;
00460     draw_y4 = draw_y6 = y0;
00461     if (draw_x4 < width()) {
00462         pixel(draw_x4, draw_y4, color);     /* 0 degree */
00463     }
00464 
00465     draw_x5 = draw_x7 = x0 - r;
00466     draw_y5 = draw_y7 = y0;
00467     if (draw_x5>=0) {
00468         pixel(draw_x5, draw_y5, color);     /* 180 degree */
00469     }
00470 
00471     if (r == 1) {
00472         return;
00473     }
00474 
00475     di = 3 - 2*r;
00476     xx = 0;
00477     yy = r;
00478     while (xx < yy) {
00479 
00480         if (di < 0) {
00481             di += 4*xx + 6;
00482         } else {
00483             di += 4*(xx - yy) + 10;
00484             yy--;
00485             draw_y0--;
00486             draw_y1--;
00487             draw_y2++;
00488             draw_y3++;
00489             draw_x4--;
00490             draw_x5++;
00491             draw_x6--;
00492             draw_x7++;
00493         }
00494         xx++;
00495         draw_x0++;
00496         draw_x1--;
00497         draw_x2++;
00498         draw_x3--;
00499         draw_y4++;
00500         draw_y5++;
00501         draw_y6--;
00502         draw_y7--;
00503 
00504         if ( (draw_x0 <= width()) && (draw_y0>=0) ) {
00505             pixel(draw_x0, draw_y0, color);
00506         }
00507 
00508         if ( (draw_x1 >= 0) && (draw_y1 >= 0) ) {
00509             pixel(draw_x1, draw_y1, color);
00510         }
00511 
00512         if ( (draw_x2 <= width()) && (draw_y2 <= height()) ) {
00513             pixel(draw_x2, draw_y2, color);
00514         }
00515 
00516         if ( (draw_x3 >=0 ) && (draw_y3 <= height()) ) {
00517             pixel(draw_x3, draw_y3, color);
00518         }
00519 
00520         if ( (draw_x4 <= width()) && (draw_y4 >= 0) ) {
00521             pixel(draw_x4, draw_y4, color);
00522         }
00523 
00524         if ( (draw_x5 >= 0) && (draw_y5 >= 0) ) {
00525             pixel(draw_x5, draw_y5, color);
00526         }
00527         if ( (draw_x6 <=width()) && (draw_y6 <= height()) ) {
00528             pixel(draw_x6, draw_y6, color);
00529         }
00530         if ( (draw_x7 >= 0) && (draw_y7 <= height()) ) {
00531             pixel(draw_x7, draw_y7, color);
00532         }
00533     }
00534     if(auto_up) copy_to_lcd();
00535 }
00536 
00537 void C12832_LCD::fillcircle(int x, int y, int r, int color)
00538 {
00539     int i,up;
00540     up = auto_up;
00541     auto_up = 0;   // off
00542     for (i = 0; i <= r; i++)
00543         circle(x,y,i,color);
00544     auto_up = up;
00545     if(auto_up) copy_to_lcd();
00546 }
00547 
00548 void C12832_LCD::setmode(int mode)
00549 {
00550     draw_mode = mode;
00551 }
00552 
00553 void C12832_LCD::locate(int x, int y)
00554 {
00555     char_x = x;
00556     char_y = y;
00557 }
00558 
00559 
00560 
00561 int C12832_LCD::columns()
00562 {
00563     return width() / font[1];
00564 }
00565 
00566 
00567 
00568 int C12832_LCD::rows()
00569 {
00570     return height() / font[2];
00571 }
00572 
00573 
00574 
00575 int C12832_LCD::_putc(int value)
00576 {
00577     if (value == '\n') {    // new line
00578         char_x = 0;
00579         char_y = char_y + font[2];
00580         if (char_y >= height() - font[2]) {
00581             char_y = 0;
00582         }
00583     } else {
00584         character(char_x, char_y, value);
00585         if(auto_up) copy_to_lcd();
00586     }
00587     return value;
00588 }
00589 
00590 void C12832_LCD::character(int x, int y, int c)
00591 {
00592     unsigned int hor,vert,offset,bpl,j,i,b;
00593     unsigned char* zeichen;
00594     unsigned char z,w;
00595 
00596     if ((c < 31) || (c > 127)) return;   // test char range
00597 
00598     // read font parameter from start of array
00599     offset = font[0];                    // bytes / char
00600     hor = font[1];                       // get hor size of font
00601     vert = font[2];                      // get vert size of font
00602     bpl = font[3];                       // bytes per line
00603 
00604     if (char_x + hor > width()) {
00605         char_x = 0;
00606         char_y = char_y + vert;
00607         if (char_y >= height() - font[2]) {
00608             char_y = 0;
00609         }
00610     }
00611 
00612     zeichen = &font[((c -32) * offset) + 4]; // start of char bitmap
00613     w = zeichen[0];                          // width of actual char
00614     // construct the char into the buffer
00615     for (j=0; j<vert; j++) {  //  vert line
00616         for (i=0; i<hor; i++) {   //  horz line
00617             z =  zeichen[bpl * i + ((j & 0xF8) >> 3)+1];
00618             b = 1 << (j & 0x07);
00619             if (( z & b ) == 0x00) {
00620                 pixel(x+i,y+j,0);
00621             } else {
00622                 pixel(x+i,y+j,1);
00623             }
00624 
00625         }
00626     }
00627 
00628     char_x += w;
00629 }
00630 
00631 
00632 void C12832_LCD::set_font(unsigned char* f)
00633 {
00634     font = f;
00635 }
00636 
00637 void C12832_LCD::set_auto_up(unsigned int up)
00638 {
00639     if(up ) auto_up = 1;
00640     else auto_up = 0;
00641 }
00642 
00643 unsigned int C12832_LCD::get_auto_up(void)
00644 {
00645     return (auto_up);
00646 }
00647 
00648 void C12832_LCD::print_bm(Bitmap bm, int x, int y)
00649 {
00650     int h,v,b;
00651     char d;
00652 
00653     for(v=0; v < bm.ySize; v++) {   // lines
00654         for(h=0; h < bm.xSize; h++) { // pixel
00655             if(h + x > 127) break;
00656             if(v + y > 31) break;
00657             d = bm.data[bm.Byte_in_Line * v + ((h & 0xF8) >> 3)];
00658             b = 0x80 >> (h & 0x07);
00659             if((d & b) == 0) {
00660                 pixel(x+h,y+v,0);
00661             } else {
00662                 pixel(x+h,y+v,1);
00663             }
00664         }
00665     }
00666 
00667 }
00668 
00669