mise à jour firwmare cube 4x4x4

J'ai mis à jour le firwmare du PIC24F16KA101 qui contrôle le cube 4x4x4.
version 0.3

• Les routines UART ne fonctionnaient pas bien il y avait des erreurs overrun à la réception.
• Ajout de 3 animations supplémentaires.
• À partir du PC l'interface UART permet de ralentir (s) et accélérer (f) les animations.
• Les touches 1-4 permettent de passer d'une animation à l'autre.
  1. plane_sweep
  2. random_led
  3. drop
  4. running_led

code source

/* * File: cube-4-4-4.c * Author: jacques Deschênes * Description : Cube de LED 4x4x4 * cablé pour le Charlieplexing. * Created on 6 décembre 2013, 11:49 * Version: 0.3 * correction bogue dans routines UART * ajouts d'animations supplémentaires * */ #include <stdio.h> #include <stdlib.h> #include <p24F16KA101.h> // PIC24F16KA101 Configuration Bit Settings #include <xc.h> // FBS #pragma config BWRP = OFF // Table Write Protect Boot (Boot segment may be written) #pragma config BSS = OFF // Boot segment Protect (No boot program Flash segment) // FGS #pragma config GWRP = OFF // General Segment Code Flash Write Protection bit (General segment may be written) #pragma config GCP = OFF // General Segment Code Flash Code Protection bit (No protection) // FOSCSEL #pragma config FNOSC = PRIPLL // Oscillator Select (Primary oscillator (XT, HS, EC)) #pragma config IESO = OFF // Internal External Switch Over bit (Internal External Switchover mode disabled (Two-Speed Start-up disabled)) // FOSC #pragma config POSCMOD = XT // Primary Oscillator Configuration bits (XT oscillator mode selected) #pragma config OSCIOFNC = ON // CLKO Enable Configuration bit (CLKO output disabled; pin functions as port I/O) #pragma config POSCFREQ = MS // Primary Oscillator Frequency Range Configuration bits (Primary oscillator/external clock input frequency between 100 kHz and 8 MHz) #pragma config SOSCSEL = SOSCLP // SOSC Power Selection Configuration bits (Secondary oscillator configured for low-power operation) #pragma config FCKSM = CSDCMD // Clock Switching and Monitor Selection (Both Clock Switching and Fail-safe Clock Monitor are disabled) // FWDT #pragma config WDTPS = PS32768 // Watchdog Timer Postscale Select bits (1:32,768) #pragma config FWPSA = PR128 // WDT Prescaler (WDT prescaler ratio of 1:128) #pragma config WINDIS = ON // Windowed Watchdog Timer Disable bit (Standard WDT selected; windowed WDT disabled) #pragma config FWDTEN = OFF // Watchdog Timer Enable bit (WDT disabled (control is placed on the SWDTEN bit)) // FPOR #pragma config BOREN = BOR3 // Brown-out Reset Enable bits (Brown-out Reset disabled in hardware; SBOREN bit disabled) #pragma config PWRTEN = ON // Power-up Timer Enable bit (PWRT disabled) #pragma config I2C1SEL = PRI // Alternate I2C1 Pin Mapping bit (Default location for SCL1/SDA1 pins) #pragma config BORV = V18 // Brown-out Reset Voltage bits (Brown-out Reset set to lowest voltage (1.8V)) #pragma config MCLRE = ON // MCLR Pin Enable bit (MCLR pin enabled; RA5 input pin disabled) // FICD #pragma config ICS = PGx2 // ICD Pin Placement Select bits (PGC2/PGD2 are used for programming and debugging the device) // FDS #pragma config DSWDTPS = DSWDTPSF // Deep Sleep Watchdog Timer Postscale Select bits (1:2,147,483,648 (25.7 Days)) #pragma config DSWDTOSC = LPRC // DSWDT Reference Clock Select bit (DSWDT uses LPRC as reference clock) #pragma config RTCOSC = LPRC // RTCC Reference Clock Select bit (RTCC uses LPRC as reference clock) #pragma config DSBOREN = ON // Deep Sleep Zero-Power BOR Enable bit (Deep Sleep BOR enabled in Deep Sleep) #pragma config DSWDTEN = OFF // Deep Sleep Watchdog Timer Enable bit (DSWDT disabled) #define Fosc 16384000 // fréquence sortie du PLL, 4*Fxtal #define Fcy Fosc/2 // fréquence cycle MCU // cathodes #define P1C1 (1<<0) #define P1C2 (1<<1) #define P2C1 (1<<4) #define P2C2 (1<<8) #define P3C1 (1<<9) #define P3C2 (1<<12) #define P4C1 (1<<13) #define P4C2 (1<<14) // anodes plan 1 #define P1A1 (1<<1) #define P1A2 (1<<4) #define P1A3 (1<<8) #define P1A4 (1<<9) #define P1A5 (1<<12) #define P1A6 (1<<13) #define P1A7 (1<<14) #define P1A8 (1<<15) #define P1A9 (1<<0) #define P1A10 (1<<4) #define P1A11 (1<<8) #define P1A12 (1<<9) #define P1A13 (1<<12) #define P1A14 (1<<13) #define P1A15 (1<<14) #define P1A16 (1<<15) // anodes plan 2 #define P2A1 (1<<0) #define P2A2 (1<<1) #define P2A3 (1<<8) #define P2A4 (1<<9) #define P2A5 (1<<12) #define P2A6 (1<<13) #define P2A7 (1<<14) #define P2A8 (1<<15) #define P2A9 (1<<0) #define P2A10 (1<<1) #define P2A11 (1<<4) #define P2A12 (1<<9) #define P2A13 (1<<12) #define P2A14 (1<<13) #define P2A15 (1<<14) #define P2A16 (1<<15) // anodes plan 3 #define P3A1 (1<<0) #define P3A2 (1<<1) #define P3A3 (1<<4) #define P3A4 (1<<8) #define P3A5 (1<<12) #define P3A6 (1<<13) #define P3A7 (1<<14) #define P3A8 (1<<15) #define P3A9 (1<<0) #define P3A10 (1<<1) #define P3A11 (1<<4) #define P3A12 (1<<8) #define P3A13 (1<<9) #define P3A14 (1<<13) #define P3A15 (1<<14) #define P3A16 (1<<15) // anodes plan 4 #define P4A1 (1<<0) #define P4A2 (1<<1) #define P4A3 (1<<4) #define P4A4 (1<<8) #define P4A5 (1<<9) #define P4A6 (1<<12) #define P4A7 (1<<14) #define P4A8 (1<<15) #define P4A9 (1<<0) #define P4A10 (1<<1) #define P4A11 (1<<4) #define P4A12 (1<<8) #define P4A13 (1<<9) #define P4A14 (1<<12) #define P4A15 (1<<13) #define P4A16 (1<<15) // masque TRISB pour les E/S utilisées par le cube, RB0,RB1,RB4,RB8,RB9,RB12..RB15 #define CUBE_TRISB_MASK (P1C1|P1C2|P2C1|P2C2|P3C1|P3C2|P4C1|P4C2|P4A16) const int cathode[4][2]={// il n'y a que 2 cathodes par plan {P1C1,P1C2}, {P2C1,P2C2}, {P3C1,P3C2}, {P4C1,P4C2} }; const int anode[4][4][4]={ {{P1A1,P1A2,P1A3,P1A4},{P1A5,P1A6,P1A7,P1A8},{P1A9,P1A10,P1A11,P1A12},{P1A13,P1A14,P1A15,P1A16}}, {{P2A1,P2A2,P2A3,P2A4},{P2A5,P2A6,P2A7,P2A8},{P2A9,P2A10,P2A11,P2A12},{P2A13,P2A14,P2A15,P2A16}}, {{P3A1,P3A2,P3A3,P3A4},{P3A5,P3A6,P3A7,P3A8},{P3A9,P3A10,P3A11,P3A12},{P3A13,P3A14,P3A15,P3A16}}, {{P4A1,P4A2,P4A3,P4A4},{P4A5,P4A6,P4A7,P4A8},{P4A9,P4A10,P4A11,P4A12},{P4A13,P4A14,P4A15,P4A16}}, }; char cube[4][4][4]; void cube_reset(){ int x,y,z; for (z=0;z<4;z++){ for (y=0;y<4;y++){ for (x=0;x<4;x++){ cube[z][y][x]=0; } } } }// cube_init() static volatile unsigned int led_counter=0; static volatile unsigned int anim_delay=0; static volatile unsigned int delay; void __attribute__((interrupt,no_auto_psv,shadow)) _T1Interrupt(void){ unsigned int c,x,y,z; x= led_counter % 4; y = (led_counter>>2) % 4; z = (led_counter>>4) % 4; TRISB |=CUBE_TRISB_MASK; LATB &= ~CUBE_TRISB_MASK; if (cube[z][y][x]){ c=y<2?0:1; TRISB &=~(cathode[z][c]|anode[z][y][x]); LATB |= anode[z][y][x]; } led_counter++; led_counter %= 64; anim_delay++; anim_delay %=delay; IFS0bits.T1IF=0; }// _T1Interrupt() #define BUFF_SIZE 80 static volatile unsigned int rxhead,rxtail; static volatile char rxbuff[BUFF_SIZE]; void __attribute__((interrupt,no_auto_psv)) _U1RXInterrupt(void){ while(U1STAbits.URXDA){ rxbuff[rxtail++]=U1RXREG; rxtail %=BUFF_SIZE; } U1STAbits.OERR=0; U1STAbits.FERR=0; IFS0bits.U1RXIF=0; }//_U1RXInterrupt() static volatile unsigned int txhead,txtail; static volatile char txbuff[BUFF_SIZE]; void __attribute__((interrupt,no_auto_psv)) _U1TXInterrupt(void){ if (txtail!=txhead){ U1TXREG=txbuff[txhead++]; txhead %= BUFF_SIZE; } IFS0bits.U1TXIF=0; }// _U1TXInterrupt() void timer1_init(){ // contrôle délais de la LED T1CONbits.TON=0; // désactivation minuterie PR1=1638; // valeur du délais Tdly=PS*PR1/Fcy, PS=1 // délais 200µsec TMR1=0; // initialise le compteur à 0 IPC0bits.T1IP=7; IFS0bits.T1IF=0; // met à zéro l'indicateur d'interruption IEC0bits.T1IE = 1; // active l'interruption T1CON=(unsigned int)(1<<15); // active la minuterie sans diviseur }//timer1_init() void uart1_init(){// initialisation UART1, TX sur RB7, RX sur RB2 rxtail=0; rxhead=0; txtail=0; txhead=0; U1BRG= Fcy/16/38400-1; // UxBRG= Fcy/(16*BaudRate) - 1 U1MODE=0; U1MODEbits.UARTEN=1; // activation du UART U1STA=0; U1STAbits.UTXEN=1; // activation transmission IFS0bits.U1RXIF=0; IEC0bits.U1RXIE=1; // activation interruption UART1_RX IFS0bits.U1TXIF=0; IEC0bits.U1TXIE=1; // activation ietteruption UART1_TX } char UartGetch(){ // réception d'un caractère via UART1 char ch; IEC0bits.U1RXIE=0; if (rxhead!=rxtail){ ch=rxbuff[rxhead++]; rxhead %= BUFF_SIZE; return ch; } IEC0bits.U1RXIE=1; return -1; }// UartGetch() void UartPutch(char c){ //envoie d'un caractère via UART1 // IEC0bits.U1TXIE=0; txbuff[txtail++]=c; txtail %= BUFF_SIZE; if (!U1STAbits.UTXBF){ U1TXREG=txbuff[txhead++]; txhead %= BUFF_SIZE; } // IEC0bits.U1TXIE=1; }// UartPutch() void UartPrint(char *str){ while(*str){ UartPutch(*str++); } }//UartPrint(); void prompt(){ UartPrint(" OK\n\r"); }//prompt() void running_led(void){// animation: un LED se déplace au hazard static int x,y,z; int d; cube[z][y][x]=0; d=rand()%6; switch (d){ case 0: x++; if (x>3) x=0; break; case 1: x--; if (x<0) x=3; break; case 2: y++; if (y>3)y=0; break; case 3: y--; if (y<0)y=3; break; case 4: z++; if (z>3)z=0; break; case 5: z--; if (z<0)z=3; break; } cube[z][y][x]=1; }// running_led() void drop(void){// animation: une LED descend une colonne au hazard static int x=0,y=0,z=0; cube[z][y][x]=0; z++; if (z>3){ x=rand()%4; y=rand()%4; z=0; } cube[z][y][x]=1; }//drop() void random_led(void){// animation: allume/éteint un LED au hazard int n,x,y,z; n=rand() % 128; x= (n>>1)&3; y= (n>>3)&3; z= (n>>5)&3; if (n&1){ cube[z][y][x]=1; }else{ cube[z][y][x]=0; } }//random_led() void planes_sweep(void){ // animation: balayage des 3 plans en séquence. static char anim=0,p=0,d=1; int x,y,z; // z vertical, y profondeur, x largeur switch(anim){ case 0: for (z=0;z<4;z++){ for(x=0;x<4;x++){ for(y=0;y<4;y++){ if (z==p) cube[z][y][x]=1; else cube[z][y][x]=0; } } } p += d; if (p>3){ p=2; d=-1; }else if (p<0){ p=0; d=1; anim=1; } break; case 1: for (z=0;z<4;z++){ for(x=0;x<4;x++){ for(y=0;y<4;y++){ if (y==p) cube[z][y][x]=1; else cube[z][y][x]=0; } } } p += d; if (p>3){ p=2; d=-1; }else if (p<0){ p=0; d=1; anim=2; } break; case 2: for (z=0;z<4;z++){ for(x=0;x<4;x++){ for(y=0;y<4;y++){ if (x==p) cube[z][y][x]=1; else cube[z][y][x]=0; } } } p += d; if (p>3){ p=2; d=-1; }else if (p<0){ p=0; d=1; anim=0; } break; }//switch }//planes_sweep() /* * */ int main(void) { char run,ch,select,ok; run=1; select=1; delay=1000; cube_reset(); timer1_init(); uart1_init(); while (1){ if (run && !anim_delay){ switch(select){ case 1: planes_sweep(); break; case 2: random_led(); break; case 3: drop(); break; case 4: running_led(); break; } while (!anim_delay); }else{ ch=UartGetch(); if (ch>-1){ UartPutch(ch); switch (ch){ case 's': case 'S': if (delay<2000) delay <<=1; ok=1; break; case 'f': case 'F': if (delay>2) delay>>=1; ok=1; break; case '1': cube_reset(); select=1; delay=1000; ok=1; break; case '2': cube_reset(); select=2; delay=4; ok=1; break; case '3': cube_reset(); select=3; delay=400; ok=1; break; case '4': cube_reset(); select=4; delay=400; ok=1; break; default: ok=0; UartPutch('?'); } if (ok) prompt(); } } }//while return (EXIT_SUCCESS); }