Channel: PICatout

↧

mise à jour firwmare cube 4x4x4

December 15, 2013, 12:11 pm

≫ Next: chandelle électronique

≪ Previous: PIC24, les interruptions

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); }  </xc.h></p24f16ka101.h></stdlib.h></stdio.h>

↧

Trending Articles

Celleneuve - Isis Hammam

January 30, 2014, 10:36 am

IPEF (liste d'aptitude)

October 9, 2020, 12:34 am

Libreville : Studio à louer au ront point de nzeng ayong (Libreville)

July 27, 2016, 5:13 am

Dakar : studio a louer a ouest foire au 2eme etage (Dakar) 100 000 FCFA

July 14, 2016, 3:49 am

SUNU YOONOU ZIARRE GENERALE - Comment faire sa Ziarra? Les invocations et la...

March 10, 2019, 1:06 am

Location maison à Hodan 1

March 16, 2019, 5:12 am

[Thermique] Code erreur E60 chaudière Geminox FCX22

November 10, 2012, 5:22 am

enregistrement / erreur F3416-1

December 31, 2018, 2:47 am

PowerShell et Microsoft Graph : comment envoyer des e-mails avec...

August 16, 2023, 11:00 pm

Yvelines. Disparition inquiétante à Vélizy-Villacoublay : avez-vous vu...

December 8, 2019, 4:14 am

Table de mixage ETP MPX 4005 - 20 €

August 7, 2015, 10:42 am

Contribution n° 01/2024 du 13 juin 2024 concernant le projet de délibération...

July 8, 2024, 8:29 pm

Rufisque : Salle de séminaire

September 13, 2017, 5:41 am

douchka dinant

August 5, 2014, 10:09 am

Vincennes - R1C4 - Vendredi 18 Octobre 2024 - Tiercé-Quarté-Quinté

October 17, 2024, 10:10 pm

[QGIS] Re: QGIS 3.0.3: import fichier texte délimité

December 3, 2018, 6:15 am

Recensement au titre du port sec à Tanghin-Dassouri : L'état nominatif des...

May 31, 2020, 7:29 am

AMPLiS ANALOGIQUE STEREO D'EXCEPTION EAA PA 1000. Révisés, avec Factures. -...

October 17, 2014, 7:46 am

Les sims 4 fichier scratch emdomagé

October 20, 2015, 3:37 am

Le Prince d'Egypte [FRENCH DVDRiP] | Multi Liens

December 26, 2012, 6:13 am

© 2025 //www.rssing.com