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