Added timer interrupts and 7seg multiplexer

This commit is contained in:
Fernando 2025-05-05 02:31:38 -06:00
parent 055c39faf9
commit fa063aa081
11 changed files with 1100 additions and 456 deletions

1
.gitignore vendored
View File

@ -1,2 +1,3 @@
*.lst *.lst
*.cod *.cod
*.o

BIN
c/interrupt/test/a.out Executable file

Binary file not shown.

29
c/interrupt/test/main.c Executable file
View File

@ -0,0 +1,29 @@
#include <stdio.h>
#include <stdint.h>
uint8_t digit[4] = { 0 };
void splitdigit(uint16_t);
void splitdigit(uint16_t num) {
uint8_t i = 0;
while (num) {
digit[i] = num%10;
num = num/10;
i++;
}
}
int main(void) {
uint8_t i;
uint8_t y = 2;
uint8_t x = 3;
splitdigit(24);
for (i = 0; i < 4; i++) {
printf("%d\n", digit[i]);
}
y = x = 2;
printf("x = %d\n", x);
printf("y = %d\n", y);
return 0;
}

791
c/timer_interrupt/main.asm Executable file
View File

@ -0,0 +1,791 @@
;--------------------------------------------------------
; File Created by SDCC : free open source ISO C Compiler
; Version 4.5.0 #15242 (Linux)
;--------------------------------------------------------
; PIC16 port for the Microchip 16-bit core micros
;--------------------------------------------------------
list p=18f4550
radix dec
CONFIG XINST=OFF
CONFIG FOSC=HS
CONFIG WDT=OFF
CONFIG LVP=OFF
CONFIG MCLRE=OFF
;--------------------------------------------------------
; public variables in this module
;--------------------------------------------------------
global _setup
global _isr
global _tmr_isr
global _number_to_7seg
global _display
global _main
global _sram_end
global _digit
global _dsp_en
;--------------------------------------------------------
; extern variables in this module
;--------------------------------------------------------
extern _SPPCFGbits
extern _SPPEPSbits
extern _SPPCONbits
extern _UFRMLbits
extern _UFRMHbits
extern _UIRbits
extern _UIEbits
extern _UEIRbits
extern _UEIEbits
extern _USTATbits
extern _UCONbits
extern _UADDRbits
extern _UCFGbits
extern _UEP0bits
extern _UEP1bits
extern _UEP2bits
extern _UEP3bits
extern _UEP4bits
extern _UEP5bits
extern _UEP6bits
extern _UEP7bits
extern _UEP8bits
extern _UEP9bits
extern _UEP10bits
extern _UEP11bits
extern _UEP12bits
extern _UEP13bits
extern _UEP14bits
extern _UEP15bits
extern _PORTAbits
extern _PORTBbits
extern _PORTCbits
extern _PORTDbits
extern _PORTEbits
extern _LATAbits
extern _LATBbits
extern _LATCbits
extern _LATDbits
extern _LATEbits
extern _DDRAbits
extern _TRISAbits
extern _DDRBbits
extern _TRISBbits
extern _DDRCbits
extern _TRISCbits
extern _DDRDbits
extern _TRISDbits
extern _DDREbits
extern _TRISEbits
extern _OSCTUNEbits
extern _PIE1bits
extern _PIR1bits
extern _IPR1bits
extern _PIE2bits
extern _PIR2bits
extern _IPR2bits
extern _EECON1bits
extern _RCSTAbits
extern _TXSTAbits
extern _T3CONbits
extern _CMCONbits
extern _CVRCONbits
extern _CCP1ASbits
extern _ECCP1ASbits
extern _CCP1DELbits
extern _ECCP1DELbits
extern _BAUDCONbits
extern _BAUDCTLbits
extern _CCP2CONbits
extern _CCP1CONbits
extern _ECCP1CONbits
extern _ADCON2bits
extern _ADCON1bits
extern _ADCON0bits
extern _SSPCON2bits
extern _SSPCON1bits
extern _SSPSTATbits
extern _T2CONbits
extern _T1CONbits
extern _RCONbits
extern _WDTCONbits
extern _HLVDCONbits
extern _LVDCONbits
extern _OSCCONbits
extern _T0CONbits
extern _STATUSbits
extern _INTCON3bits
extern _INTCON2bits
extern _INTCONbits
extern _STKPTRbits
extern _SPPDATA
extern _SPPCFG
extern _SPPEPS
extern _SPPCON
extern _UFRM
extern _UFRML
extern _UFRMH
extern _UIR
extern _UIE
extern _UEIR
extern _UEIE
extern _USTAT
extern _UCON
extern _UADDR
extern _UCFG
extern _UEP0
extern _UEP1
extern _UEP2
extern _UEP3
extern _UEP4
extern _UEP5
extern _UEP6
extern _UEP7
extern _UEP8
extern _UEP9
extern _UEP10
extern _UEP11
extern _UEP12
extern _UEP13
extern _UEP14
extern _UEP15
extern _PORTA
extern _PORTB
extern _PORTC
extern _PORTD
extern _PORTE
extern _LATA
extern _LATB
extern _LATC
extern _LATD
extern _LATE
extern _DDRA
extern _TRISA
extern _DDRB
extern _TRISB
extern _DDRC
extern _TRISC
extern _DDRD
extern _TRISD
extern _DDRE
extern _TRISE
extern _OSCTUNE
extern _PIE1
extern _PIR1
extern _IPR1
extern _PIE2
extern _PIR2
extern _IPR2
extern _EECON1
extern _EECON2
extern _EEDATA
extern _EEADR
extern _RCSTA
extern _TXSTA
extern _TXREG
extern _RCREG
extern _SPBRG
extern _SPBRGH
extern _T3CON
extern _TMR3
extern _TMR3L
extern _TMR3H
extern _CMCON
extern _CVRCON
extern _CCP1AS
extern _ECCP1AS
extern _CCP1DEL
extern _ECCP1DEL
extern _BAUDCON
extern _BAUDCTL
extern _CCP2CON
extern _CCPR2
extern _CCPR2L
extern _CCPR2H
extern _CCP1CON
extern _ECCP1CON
extern _CCPR1
extern _CCPR1L
extern _CCPR1H
extern _ADCON2
extern _ADCON1
extern _ADCON0
extern _ADRES
extern _ADRESL
extern _ADRESH
extern _SSPCON2
extern _SSPCON1
extern _SSPSTAT
extern _SSPADD
extern _SSPBUF
extern _T2CON
extern _PR2
extern _TMR2
extern _T1CON
extern _TMR1
extern _TMR1L
extern _TMR1H
extern _RCON
extern _WDTCON
extern _HLVDCON
extern _LVDCON
extern _OSCCON
extern _T0CON
extern _TMR0
extern _TMR0L
extern _TMR0H
extern _STATUS
extern _FSR2L
extern _FSR2H
extern _PLUSW2
extern _PREINC2
extern _POSTDEC2
extern _POSTINC2
extern _INDF2
extern _BSR
extern _FSR1L
extern _FSR1H
extern _PLUSW1
extern _PREINC1
extern _POSTDEC1
extern _POSTINC1
extern _INDF1
extern _WREG
extern _FSR0L
extern _FSR0H
extern _PLUSW0
extern _PREINC0
extern _POSTDEC0
extern _POSTINC0
extern _INDF0
extern _INTCON3
extern _INTCON2
extern _INTCON
extern _PROD
extern _PRODL
extern _PRODH
extern _TABLAT
extern _TBLPTR
extern _TBLPTRL
extern _TBLPTRH
extern _TBLPTRU
extern _PC
extern _PCL
extern _PCLATH
extern _PCLATU
extern _STKPTR
extern _TOS
extern _TOSL
extern _TOSH
extern _TOSU
extern _delay1ktcy
extern __moduint
extern __divuint
;--------------------------------------------------------
; Equates to used internal registers
;--------------------------------------------------------
STATUS equ 0xfd8
PCL equ 0xff9
PCLATH equ 0xffa
PCLATU equ 0xffb
WREG equ 0xfe8
BSR equ 0xfe0
FSR0L equ 0xfe9
FSR0H equ 0xfea
FSR1L equ 0xfe1
FSR2L equ 0xfd9
INDF0 equ 0xfef
POSTINC1 equ 0xfe6
POSTDEC1 equ 0xfe5
PREINC1 equ 0xfe4
PLUSW2 equ 0xfdb
PRODL equ 0xff3
PRODH equ 0xff4
idata
_digit db 0x00, 0x00, 0x00, 0x00
_dsp_en db 0x00
; Internal registers
.registers udata_ovr 0x0000
r0x00 res 1
r0x01 res 1
r0x02 res 1
r0x03 res 1
r0x04 res 1
r0x05 res 1
r0x06 res 1
r0x07 res 1
r0x08 res 1
ustat_main_00 udata 0X07FF
_sram_end res 0
;--------------------------------------------------------
; interrupt vector
;--------------------------------------------------------
;--------------------------------------------------------
; global & static initialisations
;--------------------------------------------------------
; ; Starting pCode block for absolute section
; ;-----------------------------------------
S_main_ivec_0x1_isr code 0X000008
ivec_0x1_isr:
GOTO _isr
; I code from now on!
; ; Starting pCode block
S_main__main code
_main:
; .line 144; main.c setup();
CALL _setup
CLRF r0x00
CLRF r0x01
_00209_DS_:
; .line 146; main.c display(cuenta);
MOVF r0x01, W
MOVWF POSTDEC1
MOVF r0x00, W
MOVWF POSTDEC1
CALL _display
MOVF POSTINC1, F
MOVF POSTINC1, F
; .line 147; main.c delay1ktcy(500);
MOVLW 0xf4
CALL _delay1ktcy
; .line 148; main.c cuenta++;
INFSNZ r0x00, F
INCF r0x01, F
BRA _00209_DS_
; .line 151; main.c }
RETURN
; ; Starting pCode block
S_main__display code
_display:
; .line 132; main.c void display(uint16_t num){
MOVFF FSR2L, POSTDEC1
MOVFF FSR1L, FSR2L
MOVFF r0x00, POSTDEC1
MOVFF r0x01, POSTDEC1
MOVFF r0x02, POSTDEC1
MOVFF r0x03, POSTDEC1
MOVFF r0x04, POSTDEC1
MOVFF r0x05, POSTDEC1
MOVFF r0x06, POSTDEC1
MOVFF r0x07, POSTDEC1
MOVFF r0x08, POSTDEC1
MOVLW 0x02
MOVFF PLUSW2, r0x00
MOVLW 0x03
MOVFF PLUSW2, r0x01
; .line 134; main.c if (num > 9999) return;
MOVF r0x00, W
MOVWF r0x02
MOVF r0x01, W
MOVWF r0x03
MOVLW 0x27
SUBWF r0x03, W
BNZ _00203_DS_
MOVLW 0x10
SUBWF r0x02, W
_00203_DS_:
BC _00182_DS_
; .line 135; main.c while(num) {
CLRF r0x02
_00179_DS_:
MOVF r0x01, W
IORWF r0x00, W
BZ _00182_DS_
; .line 136; main.c digit[i] = num%10;
MOVLW LOW(_digit)
ADDWF r0x02, W
MOVWF r0x03
CLRF r0x04
MOVLW HIGH(_digit)
ADDWFC r0x04, F
MOVF r0x00, W
MOVWF r0x05
MOVF r0x01, W
MOVWF r0x06
MOVLW 0x00
MOVWF POSTDEC1
MOVLW 0x0a
MOVWF POSTDEC1
MOVF r0x06, W
MOVWF POSTDEC1
MOVF r0x05, W
MOVWF POSTDEC1
CALL __moduint
MOVWF r0x07
MOVFF PRODL, r0x08
MOVLW 0x04
ADDWF FSR1L, F
MOVFF r0x03, FSR0L
MOVFF r0x04, FSR0H
MOVFF r0x07, INDF0
; .line 137; main.c num = num/10;
MOVLW 0x00
MOVWF POSTDEC1
MOVLW 0x0a
MOVWF POSTDEC1
MOVF r0x06, W
MOVWF POSTDEC1
MOVF r0x05, W
MOVWF POSTDEC1
CALL __divuint
MOVWF r0x03
MOVFF PRODL, r0x04
MOVLW 0x04
ADDWF FSR1L, F
MOVF r0x03, W
MOVWF r0x00
MOVF r0x04, W
MOVWF r0x01
; .line 138; main.c i++;
INCF r0x02, F
BRA _00179_DS_
_00182_DS_:
; .line 140; main.c }
MOVFF PREINC1, r0x08
MOVFF PREINC1, r0x07
MOVFF PREINC1, r0x06
MOVFF PREINC1, r0x05
MOVFF PREINC1, r0x04
MOVFF PREINC1, r0x03
MOVFF PREINC1, r0x02
MOVFF PREINC1, r0x01
MOVFF PREINC1, r0x00
MOVFF PREINC1, FSR2L
RETURN
; ; Starting pCode block
S_main__number_to_7seg code
_number_to_7seg:
; .line 94; main.c uint8_t number_to_7seg(uint8_t number) {
MOVFF FSR2L, POSTDEC1
MOVFF FSR1L, FSR2L
MOVFF r0x00, POSTDEC1
MOVLW 0x02
MOVFF PLUSW2, r0x00
; .line 95; main.c switch (number) {
MOVLW 0x10
SUBWF r0x00, W
BTFSC STATUS, 0
BRA _00161_DS_
CLRF PCLATH
CLRF PCLATU
RLCF r0x00, W
RLCF PCLATH, F
RLCF WREG, W
RLCF PCLATH, F
ANDLW 0xfc
ADDLW LOW(_00172_DS_)
MOVWF POSTDEC1
MOVLW HIGH(_00172_DS_)
ADDWFC PCLATH, F
MOVLW UPPER(_00172_DS_)
ADDWFC PCLATU, F
MOVF PREINC1, W
MOVWF PCL
_00172_DS_:
GOTO _00145_DS_
GOTO _00146_DS_
GOTO _00147_DS_
GOTO _00148_DS_
GOTO _00149_DS_
GOTO _00150_DS_
GOTO _00151_DS_
GOTO _00152_DS_
GOTO _00153_DS_
GOTO _00154_DS_
GOTO _00155_DS_
GOTO _00156_DS_
GOTO _00157_DS_
GOTO _00158_DS_
GOTO _00159_DS_
GOTO _00160_DS_
_00145_DS_:
; .line 97; main.c return 0x3F;
MOVLW 0x3f
BRA _00163_DS_
_00146_DS_:
; .line 99; main.c return 0x06;
MOVLW 0x06
BRA _00163_DS_
_00147_DS_:
; .line 101; main.c return 0x5B;
MOVLW 0x5b
BRA _00163_DS_
_00148_DS_:
; .line 103; main.c return 0x4F;
MOVLW 0x4f
BRA _00163_DS_
_00149_DS_:
; .line 105; main.c return 0x66;
MOVLW 0x66
BRA _00163_DS_
_00150_DS_:
; .line 107; main.c return 0x6D;
MOVLW 0x6d
BRA _00163_DS_
_00151_DS_:
; .line 109; main.c return 0x7D;
MOVLW 0x7d
BRA _00163_DS_
_00152_DS_:
; .line 111; main.c return 0x07;
MOVLW 0x07
BRA _00163_DS_
_00153_DS_:
; .line 113; main.c return 0x7F;
MOVLW 0x7f
BRA _00163_DS_
_00154_DS_:
; .line 115; main.c return 0x6F;
MOVLW 0x6f
BRA _00163_DS_
_00155_DS_:
; .line 117; main.c return 0x77;
MOVLW 0x77
BRA _00163_DS_
_00156_DS_:
; .line 119; main.c return 0x7c;
MOVLW 0x7c
BRA _00163_DS_
_00157_DS_:
; .line 121; main.c return 0x39;
MOVLW 0x39
BRA _00163_DS_
_00158_DS_:
; .line 123; main.c return 0x5e;
MOVLW 0x5e
BRA _00163_DS_
_00159_DS_:
; .line 125; main.c return 0x79;
MOVLW 0x79
BRA _00163_DS_
_00160_DS_:
; .line 127; main.c return 0x71;
MOVLW 0x71
BRA _00163_DS_
_00161_DS_:
; .line 129; main.c return 0;
CLRF WREG
_00163_DS_:
; .line 131; main.c }
MOVFF PREINC1, r0x00
MOVFF PREINC1, FSR2L
RETURN
; ; Starting pCode block
S_main__tmr_isr code
_tmr_isr:
; .line 71; main.c void tmr_isr(void){
MOVFF FSR2L, POSTDEC1
MOVFF FSR1L, FSR2L
MOVFF r0x00, POSTDEC1
MOVFF r0x01, POSTDEC1
; .line 72; main.c LATA = LATE = 0;
CLRF _LATE
CLRF _LATA
; .line 73; main.c LATD = number_to_7seg(digit[dsp_en]);
MOVLW LOW(_digit)
BANKSEL _dsp_en
ADDWF _dsp_en, W, B
MOVWF r0x00
CLRF r0x01
MOVLW HIGH(_digit)
ADDWFC r0x01, F
MOVFF r0x00, FSR0L
MOVFF r0x01, FSR0H
MOVFF INDF0, r0x00
MOVF r0x00, W
MOVWF POSTDEC1
CALL _number_to_7seg
MOVWF _LATD
MOVF POSTINC1, F
; .line 74; main.c switch (dsp_en) {
MOVLW 0x04
BANKSEL _dsp_en
SUBWF _dsp_en, W, B
BC _00121_DS_
CLRF PCLATH
CLRF PCLATU
BANKSEL _dsp_en
RLCF _dsp_en, W, B
RLCF PCLATH, F
RLCF WREG, W
RLCF PCLATH, F
ANDLW 0xfc
ADDLW LOW(_00139_DS_)
MOVWF POSTDEC1
MOVLW HIGH(_00139_DS_)
ADDWFC PCLATH, F
MOVLW UPPER(_00139_DS_)
ADDWFC PCLATU, F
MOVF PREINC1, W
MOVWF PCL
_00139_DS_:
GOTO _00117_DS_
GOTO _00118_DS_
GOTO _00119_DS_
GOTO _00120_DS_
_00117_DS_:
; .line 76; main.c LATA = 0;
CLRF _LATA
; .line 77; main.c LATE = 0x4;
MOVLW 0x04
MOVWF _LATE
; .line 78; main.c break;
BRA _00121_DS_
_00118_DS_:
; .line 80; main.c LATE = 0x2;
MOVLW 0x02
MOVWF _LATE
; .line 81; main.c break;
BRA _00121_DS_
_00119_DS_:
; .line 83; main.c LATE = 0x1;
MOVLW 0x01
MOVWF _LATE
; .line 84; main.c break;
BRA _00121_DS_
_00120_DS_:
; .line 86; main.c LATE = 0;
CLRF _LATE
; .line 87; main.c LATA = 0x10;
MOVLW 0x10
MOVWF _LATA
_00121_DS_:
BANKSEL _dsp_en
; .line 90; main.c dsp_en++;
INCF _dsp_en, F, B
; .line 91; main.c if (dsp_en > 3) dsp_en = 0;
MOVLW 0x04
BANKSEL _dsp_en
SUBWF _dsp_en, W, B
BNC _00124_DS_
BANKSEL _dsp_en
CLRF _dsp_en, B
_00124_DS_:
; .line 92; main.c }
MOVFF PREINC1, r0x01
MOVFF PREINC1, r0x00
MOVFF PREINC1, FSR2L
RETURN
; ; Starting pCode block
S_main__isr code
_isr:
; .line 63; main.c void isr(void) __interrupt (1) {
MOVFF STATUS, POSTDEC1
MOVFF BSR, POSTDEC1
MOVWF POSTDEC1
MOVFF PRODL, POSTDEC1
MOVFF PRODH, POSTDEC1
MOVFF FSR0L, POSTDEC1
MOVFF FSR0H, POSTDEC1
MOVFF PCLATH, POSTDEC1
MOVFF PCLATU, POSTDEC1
MOVFF FSR2L, POSTDEC1
MOVFF FSR1L, FSR2L
; .line 64; main.c if (INTCONbits.TMR0IF){
BTFSS _INTCONbits, 2
BRA _00111_DS_
; .line 65; main.c tmr_isr();
CALL _tmr_isr
; .line 66; main.c TMR0 = RATE;
MOVLW 0xfa
MOVWF _TMR0
_00111_DS_:
; .line 68; main.c INTCONbits.TMR0IF = 0;
BCF _INTCONbits, 2
; .line 69; main.c }
MOVFF PREINC1, FSR2L
MOVFF PREINC1, PCLATU
MOVFF PREINC1, PCLATH
MOVFF PREINC1, FSR0H
MOVFF PREINC1, FSR0L
MOVFF PREINC1, PRODH
MOVFF PREINC1, PRODL
MOVF PREINC1, W
MOVFF PREINC1, BSR
MOVFF PREINC1, STATUS
RETFIE
; ; Starting pCode block
S_main__setup code
_setup:
; .line 26; main.c void setup(void){
MOVFF FSR2L, POSTDEC1
MOVFF FSR1L, FSR2L
; .line 28; main.c LATD = 0;
CLRF _LATD
; .line 29; main.c TRISD = 0;
CLRF _TRISD
; .line 31; main.c TRISB = 0xff;
MOVLW 0xff
MOVWF _TRISB
; .line 32; main.c LATB = 0x00;
CLRF _LATB
; .line 33; main.c ADCON1 = 0xf;
MOVLW 0x0f
MOVWF _ADCON1
; .line 35; main.c TRISE = 0;
CLRF _TRISE
; .line 36; main.c LATE = 0;
CLRF _LATE
; .line 38; main.c TRISA = 0;
CLRF _TRISA
; .line 39; main.c LATA = 0;
CLRF _LATA
; .line 42; main.c INTCONbits.GIE = 1;
BSF _INTCONbits, 7
; .line 43; main.c INTCONbits.PEIE = 1;
BSF _INTCONbits, 6
; .line 44; main.c INTCONbits.RBIE = 0;
BCF _INTCONbits, 3
; .line 45; main.c INTCON2bits.RBPU = 0;
BCF _INTCON2bits, 7
; .line 46; main.c INTCON2bits.RBIP = 1;
BSF _INTCON2bits, 0
; .line 47; main.c RCONbits.IPEN = 1;
BSF _RCONbits, 7
; .line 50; main.c INTCONbits.TMR0IE = 1;
BSF _INTCONbits, 5
; .line 51; main.c INTCON2bits.TMR0IP = 1;
BSF _INTCON2bits, 2
; .line 53; main.c T0CONbits.T08BIT = 1;
BSF _T0CONbits, 6
; .line 54; main.c T0CONbits.T0CS = 0; // Source internal oscilator
BCF _T0CONbits, 5
; .line 55; main.c T0CONbits.PSA = 0;
BCF _T0CONbits, 3
; .line 59; main.c T0CONbits.T0PS = 0x7;
MOVF _T0CONbits, W
ANDLW 0xf8
IORLW 0x07
MOVWF _T0CONbits
; .line 60; main.c T0CONbits.TMR0ON = 1;
BSF _T0CONbits, 7
; .line 61; main.c }
MOVFF PREINC1, FSR2L
RETURN
; Statistics:
; code size: 800 (0x0320) bytes ( 0.61%)
; 400 (0x0190) words
; udata size: 0 (0x0000) bytes ( 0.00%)
; access size: 9 (0x0009) bytes
end

151
c/timer_interrupt/main.c Executable file
View File

@ -0,0 +1,151 @@
#include <delay.h>
#include <pic18fregs.h>
#include <stdint.h>
// FUSES START
#pragma config XINST = OFF
#pragma config FOSC = HS
#pragma config WDT = OFF
#pragma config LVP = OFF
#pragma config MCLRE = OFF
#define NDIGITS 4
#define RATE 250
uint8_t digit[NDIGITS] = { 0 };
uint8_t dsp_en = 0;
void setup(void);
void isr(void) __interrupt (1);
void tmr_isr(void);
uint8_t number_to_7seg(uint8_t);
void display(uint16_t);
int main(void);
void setup(void){
/* Port setup */
LATD = 0;
TRISD = 0;
TRISB = 0xff;
LATB = 0x00;
ADCON1 = 0xf;
TRISE = 0;
LATE = 0;
TRISA = 0;
LATA = 0;
/* Interrupt setup */
INTCONbits.GIE = 1;
INTCONbits.PEIE = 1;
INTCONbits.RBIE = 0;
INTCON2bits.RBPU = 0;
INTCON2bits.RBIP = 1;
RCONbits.IPEN = 1;
/* timer interrupt setup */
INTCONbits.TMR0IE = 1;
INTCON2bits.TMR0IP = 1;
T0CONbits.T08BIT = 1;
T0CONbits.T0CS = 0; // Source internal oscilator
T0CONbits.PSA = 0;
//T0CONbits.T0PS0 = 1;
//T0CONbits.T0PS1 = 1;
//T0CONbits.T0PS2 = 1;
T0CONbits.T0PS = 0x7;
T0CONbits.TMR0ON = 1;
}
void isr(void) __interrupt (1) {
if (INTCONbits.TMR0IF){
tmr_isr();
TMR0 = RATE;
}
INTCONbits.TMR0IF = 0;
}
void tmr_isr(void){
LATA = LATE = 0;
LATD = number_to_7seg(digit[dsp_en]);
switch (dsp_en) {
case 0:
LATA = 0;
LATE = 0x4;
break;
case 1:
LATE = 0x2;
break;
case 2:
LATE = 0x1;
break;
case 3:
LATE = 0;
LATA = 0x10;
break;
}
dsp_en++;
if (dsp_en > 3) dsp_en = 0;
}
uint8_t number_to_7seg(uint8_t number) {
switch (number) {
case 0:
return 0x3F;
case 1:
return 0x06;
case 2:
return 0x5B;
case 3:
return 0x4F;
case 4:
return 0x66;
case 5:
return 0x6D;
case 6:
return 0x7D;
case 7:
return 0x07;
case 8:
return 0x7F;
case 9:
return 0x6F;
case 0xa:
return 0x77;
case 0xb:
return 0x7c;
case 0xC:
return 0x39;
case 0xd:
return 0x5e;
case 0xe:
return 0x79;
case 0xf:
return 0x71;
default:
return 0;
}
}
void display(uint16_t num){
uint8_t i = 0;
if (num > 9999) return;
while(num) {
digit[i] = num%10;
num = num/10;
i++;
}
}
int main(void) {
uint16_t cuenta = 0;
setup();
for (;;) {
display(cuenta);
delay1ktcy(500);
cuenta++;
}
return 0;
}

96
c/timer_interrupt/main.hex Executable file
View File

@ -0,0 +1,96 @@
:020000040000FA
:040000008DEF01F08F
:0800080037EF02F0D9CFE5FF4C
:10001000E1CFD9FF00C0E5FF01C0E5FF02C0E5FF69
:1000200003C0E5FF04C0E5FF05C0E5FF06C0E5FF2E
:1000300007C0E5FF08C0E5FF020EDBCF00F0030EAE
:10004000DBCF01F00050026E0150036E270E035CFF
:1000500002E1100E025C38E2026A0150001034E046
:10006000600E0224036E046A000E04220050056E26
:100070000150066E000EE56E0A0EE56E0650E56E46
:100080000550E56EDBEC00F0076EF3CF08F0040ED0
:10009000E12603C0E9FF04C0EAFF07C0EFFF000E3E
:1000A000E56E0A0EE56E0650E56E0550E56EE2EC73
:1000B00001F0036EF3CF04F0040EE1260350006E4E
:1000C0000450016E022AC9D7E4CF08F0E4CF07F04C
:1000D000E4CF06F0E4CF05F0E4CF04F0E4CF03F082
:1000E000E4CF02F0E4CF01F0E4CF00F0E4CFD9FF99
:1000F0001200D9CFE5FFE1CFD9FF00C0E5FF020E26
:10010000DBCF00F0100E005CD8B04FD0FA6AFB6A6B
:100110000034FA36E834FA36FC0B2A0FE56E010E8D
:10012000FA22000EFB22E450F96EB5EF00F0B7EFB3
:1001300000F0B9EF00F0BBEF00F0BDEF00F0BFEF53
:1001400000F0C1EF00F0C3EF00F0C5EF00F0C7EF23
:1001500000F0C9EF00F0CBEF00F0CDEF00F0CFEFF3
:1001600000F0D1EF00F0D3EF00F03F0E1FD0060EED
:100170001DD05B0E1BD04F0E19D0660E17D06D0E22
:1001800015D07D0E13D0070E11D07F0E0FD06F0E3D
:100190000DD0770E0BD07C0E09D0390E07D05E0E35
:1001A00005D0790E03D0710E01D0E86AE4CF00F0DB
:1001B000E4CFD9FF1200D9CFE5FFE1CFD9FF00C0CE
:1001C000E5FF01C0E5FF02C0E5FF03C0E5FF04C095
:1001D000E5FF05C0E5FF06C0E5FF020EDBCF00F03E
:1001E000030EDBCF01F0040EDBCF02F0050EDBCFF8
:1001F00003F0046A056A0350800BE844066E06505B
:1002000011E10250022603360350015C02E1025064
:10021000005C04E2D8900332023204D0052A05C003
:1002200004F0E9D70350015C02E10250005C04E3F2
:100230000250005E0350015AD8900332023204C0CB
:1002400005F004060550EEE101C0F3FF0050E4CFD5
:1002500006F0E4CF05F0E4CF04F0E4CF03F0E4CF00
:1002600002F0E4CF01F0E4CF00F0E4CFD9FF1200B8
:10027000D9CFE5FFE1CFD9FF00C0E5FF01C0E5FF21
:100280008D6A896A600E00016425006E016A000EA5
:10029000012200C0E9FF01C0EAFFEFCF00F00050EB
:1002A000E56E79EC00F08C6EE652040E0001645DA0
:1002B00025E2FA6AFB6A00016435FA36E834FA3658
:1002C000FC0BD20FE56E020EFA22000EFB22E45068
:1002D000F96E71EF01F075EF01F078EF01F07BEF4F
:1002E00001F0896A040E8D6E09D0020E8D6E06D063
:1002F000010E8D6E03D08D6A100E896E0001642B85
:10030000040E0001645D02E30001646BE4CF01F0C0
:10031000E4CF00F0E4CFD9FF120011EEFFF021EEA0
:10032000FFF0F86AA68EA69C07EEFFF00068ED6A63
:100330000050FDE1760EF66E050EF76E000EF86EBB
:100340000900F5CF05F00900F5CF06F034D009001B
:10035000F5CF00F00900F5CF01F00900F5CF02F06C
:1003600009000900F5CFE9FF0900F5CFEAFF090010
:1003700009000900F5CF03F00900F5CF04F00900EA
:100380000900F6CF07F0F7CF08F0F8CF09F000C06A
:10039000F6FF01C0F7FF02C0F8FF03D00900F5CF58
:1003A000EEFF0306FBE20406F9E207C0F6FF08C011
:1003B000F7FF09C0F8FF0506CAE20606C8E2A8EC86
:1003C00002F0FFD7D9CFE5FFE1CFD9FF00C0E5FFAD
:1003D00001C0E5FF02C0E5FF03C0E5FF04C0E5FF83
:1003E00005C0E5FF06C0E5FF07C0E5FF020EDBCF55
:1003F00000F0030EDBCF01F0040EDBCF02F0050EA0
:10040000DBCF03F0046A056A100E066E0150800B04
:10041000E844076E005000260136045004260536D5
:100420000750D8A404800350055C02E10250045C2C
:1004300005E30250045E0350055A0080060606508C
:10044000E5E101C0F3FF0050E4CF07F0E4CF06F090
:10045000E4CF05F0E4CF04F0E4CF03F0E4CF02F002
:10046000E4CF01F0E4CF00F0E4CFD9FF1200D8CF01
:10047000E5FFE0CFE5FFE56EF3CFE5FFF4CFE5FF65
:10048000E9CFE5FFEACFE5FFFACFE5FFFBCFE5FFD8
:10049000D9CFE5FFE1CFD9FFF2A404D038EC01F0C9
:1004A000FA0ED66EF294E4CFD9FFE4CFFBFFE4CF8F
:1004B000FAFFE4CFEAFFE4CFE9FFE4CFF4FFE4CFB3
:1004C000F3FFE450E4CFE0FFE4CFD8FF1000D9CF32
:1004D000E5FFE1CFD9FF8C6A956AFF0E936E8A6AB9
:1004E0000F0EC16E966A8D6A926A896AF28EF28CDC
:1004F000F296F19EF180D08EF28AF184D58CD59A55
:10050000D596D550F80B0709D56ED58EE4CFD9FF17
:100510001200E806E56E630E9CEC02F0E4500BE07E
:1005200000D0E56E630E9CEC02F000D000D000001D
:10053000E450E82EF6D71200E8060000E85007E085
:1005400000D000D000D000D00000E82EFAD7120072
:1005500067EC02F0006A016A0150E56E0050E56E3A
:1005600006EC00F0E652E652F40E89EC02F0004A86
:10057000012AF2D71200010084050000600000008B
:0A058000060000000000000000006B
:020000040030CA
:010001000CF2
:010003001EDE
:02000500038175
:00000001FF

32
c/timer_interrupt/makefile Executable file
View File

@ -0,0 +1,32 @@
# My pic workflow makefile by Fernando R Jacobo
# Dependencies
# SDCC Small Device C Compiler
# pk2cmd for pickit pic programmers
# C compiler variables
SRC=*.c
CC=sdcc
FAMILY=pic16
PROC=18f4550
# ASM and program variables
PPROC=PIC18F4550
ASMPROC=18F4550
all: $(SRC:.c=.hex)
comp: $(SRC)
$(CC) --use-non-free -m$(FAMILY) -p$(PROC) $^
clean:
rm -f $(SRC:.c=.asm) $(SRC:.c=.cod) $(SRC:.c=.hex) $(SRC:.c=.lst) $(SRC:.c=.o)
program:
pk2cmd -M -P${PPROC} -Fmain.hex
asm: *.asm
gpasm -p ${ASMPROC} -o main.hex $^
asmp: asm program
.PHONY: all clean

View File

@ -1,200 +0,0 @@
LIST P=18F4550
#include <p18f4550.inc>
CONFIG FOSC = HS ; Use internal oscillator, RA6 as clock output
CONFIG WDT = OFF ; Watchdog Timer off
CONFIG LVP = OFF ; Low-Voltage Programming off
CONFIG MCLRE = OFF ; MCLR pin disabled, RE3 input enabled
; Definitions
R3 EQU 0x024
R4 EQU 0x025
R5 EQU 0x026
TEMP EQU 0x038
COL EQU 0x039
READ EQU 0x03A
SHIFT EQU 0x03B
ORG 0x00
GOTO INIT
ORG 0x08
GOTO ISR
INIT:
CLRF LATB
movlw 0xf0 ; PORTB setup
MOVWF TRISB
movlw 0x0f
movwf ADCON1
clrf TRISD ; Set port D as output
clrf LATD
CLRF TRISE
CLRF LATE
BSF PORTE, 2
CLRF TEMP
CLRF COL
CLRF SHIFT
CLRF READ
; Configure interrupts
BSF RCON, IPEN
BSF INTCON, GIE ; Enable Global Interrupts
BSF INTCON, PEIE ; Enable Peripheral Interrupts
BSF INTCON, RBIE ; Enable RB Port Change Interrupt
BCF INTCON2, RBPU ; Enable PORTB pull-ups
BSF INTCON2, RBIP ; Set interrupt on high priority RBIP
LOOP:
MOVLW 0x0E
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
MOVLW 0x0D
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
MOVLW 0x0B
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
MOVLW 0x07
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
GOTO LOOP
ISR:
BTFSS INTCON, RBIF
RETFIE
MOVF PORTB, W
NOP
ANDLW 0xf0
MOVWF COL
SWAPF COL
CPFSEQ READ
CALL decode
MOVWF TEMP
CALL sevensw
MOVWF PORTD
CALL SDelay
CALL SDelay
CALL SDelay
CALL SDelay
CALL SDelay
BCF INTCON, RBIF
RETFIE
display:
decode:
BTFSC SHIFT, 0 ; Check if row 1 is active
GOTO col1
BTFSS COL, 0 ; Check every column
RETLW 0x01
BTFSS COL, 1
RETLW 0x02
BTFSS COL, 2
RETLW 0x03
BTFSS COL, 3
RETLW 0x0A
col1:
BTFSC SHIFT, 1
GOTO col2
BTFSS COL, 0 ; Check every column
RETLW 0x04
BTFSS COL, 1
RETLW 0x05
BTFSS COL, 2
RETLW 0x06
BTFSS COL, 3
RETLW 0x0B
col2:
BTFSC SHIFT, 2
GOTO col3
BTFSS COL, 0 ; Check every column
RETLW 0x07
BTFSS COL, 1
RETLW 0x08
BTFSS COL, 2
RETLW 0x09
BTFSS COL, 3
RETLW 0x0C
col3
BTFSC SHIFT, 3
RETLW 0x00
BTFSS COL, 0 ; Check every column
RETLW 0x00
BTFSS COL, 1
RETLW 0x00
BTFSS COL, 2
RETLW 0x00
BTFSS COL, 3
RETLW 0x0D
RETLW 0x00
SDelay:
MOVLW D'250'
MOVWF R4
SDelay_Outer:
MOVLW D'250'
MOVWF R5
SDelay_Inner:
NOP
NOP
DECFSZ R5, F ; Decrement inner loop counter
GOTO SDelay_Inner ; Repeat inner loop
DECFSZ R4, F ; Decrement outer loop counter
GOTO SDelay_Outer ; Repeat outer loop
RETURN ; Return from delay
disp_delay:
movlw D'250'
movwf R3
disp_delay_inner:
NOP
NOP
NOP
NOP
decfsz R3, F
goto disp_delay_inner
return
sevensw:
movlw high(sevenjmp)
movwf PCLATH
movf TEMP, W
addwf TEMP, W
addlw low(sevenjmp)
btfsc STATUS, 0
incf PCLATH, 1
movwf PCL
sevenjmp:
retlw 3Fh
retlw 06h
retlw 5Bh
retlw 4Fh
retlw 66h
retlw 6Dh
retlw 7Dh
retlw 07h ; siete
retlw 7Fh ; ocho
retlw 6Fh ; nueve
retlw 77h ; A
retlw 7Ch ; B
retlw 39h ; C
retlw 5Eh ; D
retlw 79h ; E
retlw 71h ; F
END

View File

@ -1,28 +0,0 @@
:020000040000FA
:0400000006EF00F017
:0800080030EF00F08A6AF00EEF
:10001000936E0F0EC16E956A8C6A966A8D6A84849F
:10002000386A396A3B6A3A6AD08EF28EF28CF2866E
:10003000F19EF1800E0E3B6E816E83EC00F00D0E92
:100040003B6E816E83EC00F00B0E3B6E816E83EC99
:1000500000F0070E3B6E816E83EC00F01AEF00F0AB
:10006000F2A0100081500000F00B396E393A3A626C
:100070004AEC00F0386E8DEC00F0836E76EC00F008
:1000800076EC00F076EC00F076EC00F076EC00F028
:10009000F29010003BB055EF00F039A0010C39A2EE
:1000A000020C39A4030C39A60A0C3BB260EF00F035
:1000B00039A0040C39A2050C39A4060C39A60B0C86
:1000C0003BB46BEF00F039A0070C39A2080C39A43F
:1000D000090C39A60C0C3BB6000C39A0000C39A257
:1000E000000C39A4000C39A60D0C000CFA0E256E7C
:1000F000FA0E266E00000000262E7AEF00F0252E64
:1001000078EF00F01200FA0E246E000000000000EC
:100110000000242E85EF00F01200010EFA6E385018
:1001200038242A0FD8B0FA2AF96E3F0C060C5B0C63
:100130004F0C660C6D0C7D0C070C7F0C6F0C770C54
:0A0140007C0C390C5E0C790C710C7C
:020000040030CA
:04000000000C1F1EB3
:02000500038175
:060008000FC00FE00F40E5
:00000001FF

View File

@ -1,200 +0,0 @@
LIST P=18F4550
#include <p18f4550.inc>
CONFIG FOSC = HS ; Use internal oscillator, RA6 as clock output
CONFIG WDT = OFF ; Watchdog Timer off
CONFIG LVP = OFF ; Low-Voltage Programming off
CONFIG MCLRE = OFF ; MCLR pin disabled, RE3 input enabled
; Definitions
R3 EQU 0x024
R4 EQU 0x025
R5 EQU 0x026
TEMP EQU 0x038
COL EQU 0x039
READ EQU 0x03A
SHIFT EQU 0x03B
ORG 0x00
GOTO INIT
ORG 0x08
GOTO ISR
INIT:
CLRF LATB
movlw 0xf0 ; PORTB setup
MOVWF TRISB
movlw 0x0f
movwf ADCON1
clrf TRISD ; Set port D as output
clrf LATD
CLRF TRISE
CLRF LATE
BSF PORTE, 2
CLRF TEMP
CLRF COL
CLRF SHIFT
CLRF READ
; Configure interrupts
BSF RCON, IPEN
BSF INTCON, GIE ; Enable Global Interrupts
BSF INTCON, PEIE ; Enable Peripheral Interrupts
BSF INTCON, RBIE ; Enable RB Port Change Interrupt
BCF INTCON2, RBPU ; Enable PORTB pull-ups
BSF INTCON2, RBIP ; Set interrupt on high priority RBIP
LOOP:
MOVLW 0x0E
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
MOVLW 0x0D
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
MOVLW 0x0B
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
MOVLW 0x07
MOVWF SHIFT
MOVWF PORTB
CALL disp_delay
GOTO LOOP
ISR:
BTFSS INTCON, RBIF
RETFIE
MOVF PORTB, W
NOP
ANDLW 0xf0
MOVWF COL
SWAPF COL
CPFSEQ READ
CALL decode
MOVWF TEMP
CALL sevensw
MOVWF PORTD
CALL SDelay
CALL SDelay
CALL SDelay
CALL SDelay
CALL SDelay
BCF INTCON, RBIF
RETFIE
display:
decode:
BTFSC SHIFT, 0 ; Check if row 1 is active
GOTO col1
BTFSS COL, 0 ; Check every column
RETLW 0x01
BTFSS COL, 1
RETLW 0x02
BTFSS COL, 2
RETLW 0x03
BTFSS COL, 3
RETLW 0x0A
col1:
BTFSC SHIFT, 1
GOTO col2
BTFSS COL, 0 ; Check every column
RETLW 0x04
BTFSS COL, 1
RETLW 0x05
BTFSS COL, 2
RETLW 0x06
BTFSS COL, 3
RETLW 0x0B
col2:
BTFSC SHIFT, 2
GOTO col3
BTFSS COL, 0 ; Check every column
RETLW 0x07
BTFSS COL, 1
RETLW 0x08
BTFSS COL, 2
RETLW 0x09
BTFSS COL, 3
RETLW 0x0C
col3
BTFSC SHIFT, 3
RETLW 0x00
BTFSS COL, 0 ; Check every column
RETLW 0x00
BTFSS COL, 1
RETLW 0x00
BTFSS COL, 2
RETLW 0x00
BTFSS COL, 3
RETLW 0x0D
RETLW 0x00
SDelay:
MOVLW D'250'
MOVWF R4
SDelay_Outer:
MOVLW D'250'
MOVWF R5
SDelay_Inner:
NOP
NOP
DECFSZ R5, F ; Decrement inner loop counter
GOTO SDelay_Inner ; Repeat inner loop
DECFSZ R4, F ; Decrement outer loop counter
GOTO SDelay_Outer ; Repeat outer loop
RETURN ; Return from delay
disp_delay:
movlw D'250'
movwf R3
disp_delay_inner:
NOP
NOP
NOP
NOP
decfsz R3, F
goto disp_delay_inner
return
sevensw:
movlw high(sevenjmp)
movwf PCLATH
movf TEMP, W
addwf TEMP, W
addlw low(sevenjmp)
btfsc STATUS, 0
incf PCLATH, 1
movwf PCL
sevenjmp:
retlw 3Fh
retlw 06h
retlw 5Bh
retlw 4Fh
retlw 66h
retlw 6Dh
retlw 7Dh
retlw 07h ; siete
retlw 7Fh ; ocho
retlw 6Fh ; nueve
retlw 77h ; A
retlw 7Ch ; B
retlw 39h ; C
retlw 5Eh ; D
retlw 79h ; E
retlw 71h ; F
END

View File

@ -1,28 +0,0 @@
:020000040000FA
:0400000006EF00F017
:0800080030EF00F08A6AF00EEF
:10001000936E0F0EC16E956A8C6A966A8D6A84849F
:10002000386A396A3B6A3A6AD08EF28EF28CF2866E
:10003000F19EF1800E0E3B6E816E83EC00F00D0E92
:100040003B6E816E83EC00F00B0E3B6E816E83EC99
:1000500000F0070E3B6E816E83EC00F01AEF00F0AB
:10006000F2A0100081500000F00B396E393A3A626C
:100070004AEC00F0386E8DEC00F0836E76EC00F008
:1000800076EC00F076EC00F076EC00F076EC00F028
:10009000F29010003BB055EF00F039A0010C39A2EE
:1000A000020C39A4030C39A60A0C3BB260EF00F035
:1000B00039A0040C39A2050C39A4060C39A60B0C86
:1000C0003BB46BEF00F039A0070C39A2080C39A43F
:1000D000090C39A60C0C3BB6000C39A0000C39A257
:1000E000000C39A4000C39A60D0C000CFA0E256E7C
:1000F000FA0E266E00000000262E7AEF00F0252E64
:1001000078EF00F01200FA0E246E000000000000EC
:100110000000242E85EF00F01200010EFA6E385018
:1001200038242A0FD8B0FA2AF96E3F0C060C5B0C63
:100130004F0C660C6D0C7D0C070C7F0C6F0C770C54
:0A0140007C0C390C5E0C790C710C7C
:020000040030CA
:04000000000C1F1EB3
:02000500038175
:060008000FC00FE00F40E5
:00000001FF