O CÓDIGO FONTE:
/* * voltimetro usando RS-232 no MPlab XC8 * * Compilador : MPlabXC8 * Microcontrolador: 16F877A * Autor: aguivone * Versão: 1 * Data : 04 de março de 2013 */ #include <stdio.h> #include <string.h> //para usar funçoes de string deve se adicionar este header #include <stdlib.h> #define _XTAL_FREQ 20000000 // cristal de 20 Mhz #include <xc.h> /////////////////////////////////////////////////////////configuraçôes////////////////////////////////////////////////// #pragma config FOSC = HS // Oscillator Selection bits (HS oscillator) #pragma config WDTE = OFF // Watchdog Timer Enable bit (WDT disabled) #pragma config PWRTE = OFF // Power-up Timer Enable bit (PWRT disabled) #pragma config BOREN = OFF // Brown-out Reset Enable bit (BOR disabled) #pragma config LVP = OFF // Low-Voltage (Single-Supply) In-Circuit Serial Programming Enable bit (RB3 is digital I/O, HV on MCLR must be used for programming) #pragma config CPD = OFF // Data EEPROM Memory Code Protection bit (Data EEPROM code protection off) #pragma config WRT = OFF // Flash Program Memory Write Enable bits (Write protection off; all program memory may be written to by EECON control) #pragma config CP = OFF // Flash Program Memory Code Protection bit (Code protection off) ////////////////////////////////////////////////variaveis globais/////////////////////////////////////////////////////////// char caracter,dados; bit flag_interrupcao = 0; ///////////////////////////////////////////////////interrupção////////////////////////////////////////////////////////////// void interrupt interrupcoes(void)//vetor de interrupção { if(RCIF) {//se interrupção de recepção da serial //aqui não será usado essa funcão caracter = RCREG; flag_interrupcao = 1; RCIF = 0;// limpa flag de interrupção de recepção } } /////////////////////////////////funçoes usadas pela uart ////////////////////////////////////////////////////// void inicializa_RS232(long velocidade,int modo) {////por padrão é usado o modo 8 bits e sem paridade, mas se necessario ajuste aqui a configuração desejada. //verifique datasheet para ver a porcentagem de erro e se a velocidade é possivel para o cristal utilizado. RCSTA = 0X90;//habilita porta serial,recepção de 8 bit em modo continuo,assincrono. int valor; if(modo == 1) {//modo = 1 ,modo alta velocidade TXSTA = 0X24;//modo assincrono,trasmissao 8 bits. valor =(int)(((_XTAL_FREQ/velocidade)-16)/16);//calculo do valor do gerador de baud rate } else {//modo = 0 ,modo baixa velocidade TXSTA = 0X20;//modo assincrono,trasmissao 8 bits. valor =(int)(((_XTAL_FREQ/velocidade)-64)/64);//calculo do valor do gerador de baud rate } SPBRG = valor; RCIE = 1;//habilita interrupção de recepção TXIE = 0;//deixa interrupção de transmissão desligado(pois corre se o risco de ter uma interrupção escrita e leitura ao mesmo tempo) } void escreve_RS232(char valor) { TXIF = 0;//limpa flag que sinaliza envio completo. TXREG = valor; while(TXIF ==0);//espera enviar caracter } void imprime_RS232(const char frase[]) { char indice = 0; char tamanho = strlen(frase); while(indice < tamanho ) ///veja que o programa pode travar se aqui não tiver as duas aspas { escreve_RS232(frase[indice]); indice++; } } //////////////////////////////////////////////////////Rotina principal/////////////////////////////////////////////////////////////// void main(void) { TRISB = 0X02;//configura portB B1 (pino RX) como entrada PORTB = 0; // limpar as portas que estão configuradas como saidas inicializa_RS232(9600,1);//modo de alta velocidade PEIE = 1;//habilita interrupção de perifericos do pic GIE = 1; //GIE: Global Interrupt Enable bit imprime_RS232("acessando a eeprom com LIB XC8 \n\r"); eeprom_write(0X01,'T'); //escreve na eeprom eeprom_write(0X02,'E'); eeprom_write(0X03,'S'); eeprom_write(0X04,'T'); eeprom_write(0X05,'E'); imprime_RS232("Dados da memoria : \n\r"); escreve_RS232(EEPROM_READ(0X01)) ;//lê os dados do endereço escreve_RS232(EEPROM_READ(0X02)) ;//da eeprom escreve_RS232(EEPROM_READ(0X03)) ; escreve_RS232(EEPROM_READ(0X04)) ; escreve_RS232(EEPROM_READ(0X05)) ; for(;;) { }//loop infinito }
A SIMULAÇÃO:
Ola parceiro, voce teria um exemplo para leitura e escrita em 24LC512 com 18F877A e Mplabx, desde de já grato pela atenção, meu email silvoneidal@hotmail.com
ResponderExcluir