Grupo Fiuba / tlc5940

This library creates the interface to operate the TLC5940. This device manages 16 PWM outputs.

tlc5940.cpp@1:e8c8347fa919, 2010-11-27 (annotated)

Committer:
Fiuba
Date:
Sat Nov 27 00:37:33 2010 +0000
Revision:
1:e8c8347fa919
Parent:
0:64ea4d75027c
Child:
2:500ec33cd4b6
Fixed doxygen documentation (hope so)

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Fiuba 1:e8c8347fa919 1 /*
Fiuba 1:e8c8347fa919 2 * tlc5940 - Interface to operate TI's IC TLC5940
Fiuba 1:e8c8347fa919 3 * Copyright (C) 2010 German Bassi.
Fiuba 1:e8c8347fa919 4 *
Fiuba 1:e8c8347fa919 5 * This program is free software; you can redistribute it and/or modify
Fiuba 1:e8c8347fa919 6 * it under the terms of the GNU General Public License as published by
Fiuba 1:e8c8347fa919 7 * the Free Software Foundation; either version 2 of the License, or
Fiuba 1:e8c8347fa919 8 * (at your option) any later version.
Fiuba 1:e8c8347fa919 9 *
Fiuba 1:e8c8347fa919 10 * This program is distributed in the hope that it will be useful,
Fiuba 1:e8c8347fa919 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Fiuba 1:e8c8347fa919 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
Fiuba 1:e8c8347fa919 13 * GNU General Public License for more details.
Fiuba 1:e8c8347fa919 14 *
Fiuba 1:e8c8347fa919 15 * You should have received a copy of the GNU General Public License
Fiuba 1:e8c8347fa919 16 * along with this program; if not, write to the Free Software
Fiuba 1:e8c8347fa919 17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Fiuba 1:e8c8347fa919 18 */
Fiuba 1:e8c8347fa919 19
Fiuba 0:64ea4d75027c 20 #include "tlc5940.h"
Fiuba 0:64ea4d75027c 21 #include "mbed.h"
Fiuba 0:64ea4d75027c 22
Fiuba 0:64ea4d75027c 23 tlc5940::tlc5940 (int DC_data[]) : VPROG(p21), SIN(p22), SCLK(p23), XLAT(p24), BLANK(p25), DCPROG(p27), GSCLK(p26), SOUT(p28), XERR(p29) {
Fiuba 0:64ea4d75027c 24 first_cycle_flag = false;
Fiuba 0:64ea4d75027c 25
Fiuba 0:64ea4d75027c 26 // Pins in startup state
Fiuba 0:64ea4d75027c 27 GSCLK = 0;
Fiuba 0:64ea4d75027c 28 SCLK = 0;
Fiuba 0:64ea4d75027c 29 VPROG = 1;
Fiuba 0:64ea4d75027c 30 XLAT = 0;
Fiuba 0:64ea4d75027c 31 BLANK = 1;
Fiuba 0:64ea4d75027c 32 DCPROG = 0;
Fiuba 0:64ea4d75027c 33 wait(0.01);
Fiuba 0:64ea4d75027c 34
Fiuba 0:64ea4d75027c 35 // DC input cycle starts
Fiuba 0:64ea4d75027c 36 DCPROG = 1;
Fiuba 0:64ea4d75027c 37 VPROG = 1;
Fiuba 0:64ea4d75027c 38
Fiuba 0:64ea4d75027c 39 for (int counter=0; counter < (2*96); counter++) {
Fiuba 0:64ea4d75027c 40 SIN = DC_data[counter];
Fiuba 0:64ea4d75027c 41 SCLK = 1;
Fiuba 0:64ea4d75027c 42 wait_us(5);
Fiuba 0:64ea4d75027c 43 SCLK = 0;
Fiuba 0:64ea4d75027c 44 wait_us(5);
Fiuba 0:64ea4d75027c 45 }
Fiuba 0:64ea4d75027c 46 XLAT = 1;
Fiuba 0:64ea4d75027c 47 wait_us(5);
Fiuba 0:64ea4d75027c 48 XLAT = 0;
Fiuba 0:64ea4d75027c 49 wait_us(5);
Fiuba 0:64ea4d75027c 50 DCPROG = 0;
Fiuba 0:64ea4d75027c 51 // DC input cycle ends
Fiuba 0:64ea4d75027c 52 }
Fiuba 0:64ea4d75027c 53
Fiuba 0:64ea4d75027c 54 void tlc5940::send_data (int data[]) {
Fiuba 0:64ea4d75027c 55 // Grayscale data input + Grayscale PWM
Fiuba 0:64ea4d75027c 56 data_counter = 0;
Fiuba 0:64ea4d75027c 57 GSCLK_counter = 0;
Fiuba 0:64ea4d75027c 58
Fiuba 0:64ea4d75027c 59 if (VPROG == 1) {
Fiuba 0:64ea4d75027c 60 VPROG = 0;
Fiuba 0:64ea4d75027c 61 first_cycle_flag = true;
Fiuba 0:64ea4d75027c 62 }
Fiuba 0:64ea4d75027c 63
Fiuba 0:64ea4d75027c 64 // Send the new data
Fiuba 0:64ea4d75027c 65 BLANK = 0;
Fiuba 0:64ea4d75027c 66 for (GSCLK_counter = 0; GSCLK_counter <= 4095; GSCLK_counter++) {
Fiuba 0:64ea4d75027c 67 if (data_counter < 2*192) {
Fiuba 0:64ea4d75027c 68 // Every new led consists of 12 bits
Fiuba 0:64ea4d75027c 69 aux_ind = data_counter % 12;
Fiuba 0:64ea4d75027c 70 if ( aux_ind == 0 ) aux_value = data[data_counter/12];
Fiuba 0:64ea4d75027c 71 // Send the last bit
Fiuba 0:64ea4d75027c 72 SIN = (aux_value >> aux_ind) & 0x01;
Fiuba 0:64ea4d75027c 73
Fiuba 0:64ea4d75027c 74 SCLK = 1;
Fiuba 0:64ea4d75027c 75 GSCLK = 1;
Fiuba 0:64ea4d75027c 76 SCLK = 0;
Fiuba 0:64ea4d75027c 77 GSCLK = 0;
Fiuba 0:64ea4d75027c 78
Fiuba 0:64ea4d75027c 79 data_counter++;
Fiuba 0:64ea4d75027c 80 } else {
Fiuba 0:64ea4d75027c 81 GSCLK = 1;
Fiuba 0:64ea4d75027c 82 GSCLK = 0;
Fiuba 0:64ea4d75027c 83 }
Fiuba 0:64ea4d75027c 84 }
Fiuba 0:64ea4d75027c 85 BLANK = 1;
Fiuba 0:64ea4d75027c 86
Fiuba 0:64ea4d75027c 87 XLAT = 1;
Fiuba 0:64ea4d75027c 88 XLAT = 0;
Fiuba 0:64ea4d75027c 89
Fiuba 0:64ea4d75027c 90 if (first_cycle_flag) {
Fiuba 0:64ea4d75027c 91 SCLK = 1;
Fiuba 0:64ea4d75027c 92 SCLK = 0;
Fiuba 0:64ea4d75027c 93 first_cycle_flag = false;
Fiuba 0:64ea4d75027c 94 }
Fiuba 0:64ea4d75027c 95 }