Aplikace s mikrořadičem Atmel 89C52 a 89C2052

a small program , Interrupt from Timer0

 CAN_CONF.inc
	__CONFIG _CONFIG1H, 0x05	; B7=IESO B6=FCMEN B3:0=FOSC3:0
	__CONFIG _CONFIG2L, 0xFF	; B4:3=BORV1:0 B2:1=BOREN1:0 B0=PWRTEN-L
	__CONFIG _CONFIG2H, 0xFF	; B4:1=WDTPS3:0 B0=WDTEN
	__CONFIG _CONFIG3H, 0x7F	; B7=MCLRE B2=LPT1OSC B1=PBADEN
	__CONFIG _CONFIG4L, 0xFF	; B7=DEBUG-L B6=XINST B5:4=BBSIZ1:2 B2=LVP B0=STVREN
	__CONFIG _CONFIG5L, 0xFF	; B3:0=CP3:0
	__CONFIG _CONFIG5H, 0xFF	; B7=CPD B6=CPB
	__CONFIG _CONFIG6L, 0xFF	; B3:0=WR3:0
	__CONFIG _CONFIG6H, 0xFF	; B7=WRTD B6=WRTB B5=WRTC
	__CONFIG _CONFIG7L, 0xFF	; B3:0=EBTR3:0
	__CONFIG _CONFIG7H, 0xFF	; B6=EBTRB

; Initialization Code for PIC18F2480, Family: GP control, Package: 28-Pin SPDIP 28pins list P=18F2480 #include P18F2480.inc #include CAN_CONF.inc ;************************************************************ Dest equ 0x00 ;Define constant cTMR0H equ 0x12 cTMR0L equ 0x13 ;************************************************************ ;Variables blik equ 0 ;************************************************************ org 0x0000 ;Reset vector goto main ;************************************************************ org 0x0008 ;Interrupt Low goto isr_timer ;************************************************************ org 0x0018 ;Interrupt High goto isr_timer ;************************************************************ org 0x0020 ;Begin program main: nop ANDWF 0 clrf blik call VisualInitialization bsf INTCON, INT0E ; bsf INTCON, GIE ; loop goto loop ; ;************************************************************ isr_timer bcf INTCON, INT0F bcf INTCON, TMR0IF INCF blik,1,blik BTFSC blik,0 ;if bit0=0 goto SetPA0 else goto contin contin bra ResPA0 SetPA0 movlw 0x01 movwf PORTA bra endIsr ResPA0 movlw 0x00 movwf PORTA endIsr movlw cTMR0H ; preset timer values movwf TMR0H movlw cTMR0L movwf TMR0L RETFIE ;************************************************************ VisualInitialization: ; Feature=Interrupts - Disable Interrupts during configuration clrf PIE3 ; B7=IRX B6=WAK B5=ERR B4:2=TXB2:0 B1:0=RXB1:0 clrf PIE2 ; B7=OSCF B6=CM B4=EE B3=BCL B2=LVD B1=TMR3 B0=CCP2 clrf PIE1 ; B7=PSP B6=AD B5=RC1 B4=TX1 B3=SSP B2=CCP1 B1=TMR2 B0=TMR1 ; Feature=Oscillator - Oscillator configuration clrf OSCCON ; B7=IDLEN B6:4=IRCF2:0 B3=OSTS B2=IOFS B1:0=SCS1:0 clrf OSCTUNE; B7=INTSRC B6=PLLEN B4:0=TUN4:0 ; Feature=Reset - Reset configuration clrf LVDCON ; B5=IRVST B4=LVDEN B3:0=LVDL3:0 clrf WDTCON ; B0:SWDTEN clrf RCON ; B7=IPEN B6=SBOREN B4=RI-L B3=TO-L B2=PD-L B1=POR-L B0=BOR-L ; Feature=IOPortA - IO Ports configuration ; set TRIS to all inputs before setting initial value movlw 0xFF movwf TRISA movlw 0x01 movwf PORTA ; set port bit as input (1) or output (0) movlw 0xFE movwf TRISA ; Feature=required - Interrupt flags cleared and interrupt configuration ; interrupt priorities movlw 0xFF ; B7=IRX B6=WAK B5=ERR B4:2=TXB2:0 B1:0=RXB1:0 movwf IPR3 movlw 0xFF ; B7=OSCF B6=CM B4=EE B3=BCL B2=LVD B1=TMR3 B0=CCP2 movwf IPR2 movlw 0xFF ; B7=PSP B6=AD B5=RC1 B4=TX1 B3=SSP B2=CCP1 B1=TMR2 B0=TMR1 movwf IPR1 ; clear int flags clrf PIR3 ; B7=IRX B6=WAK B5=ERR B4:2=TXB2:0 B1:0=RXB1: clrf PIR2 ; B7=OSCF B6=CM B4=EE B3=BCL B2=LVD B1=TMR3 B0=CCP2 clrf PIR1 ; B7=PSP B6=AD B5=RC1 B4=TX1 B3=SSP B2=CCP1 B1=TMR2 B0=TMR1 ; global and external interrupt enables movlw 0x20 ; B7=GIE B6=PEIE B5=TMR0IE B4=INT0IE B3=RBIE B2=TMR0IF B1=INT0IF B0=RBIF movwf INTCON movlw 0xFF ; B7=RBPU-L B6:4=INTEDG0:2 B2=TMR0IP B0=RBIP movwf INTCON2 movlw 0xC0 ; B7:6=INT2:1IP B4:3=INT2:1IE B1:0=INT2:1IF movwf INTCON3 ; Feature=Timer0 - Timers configuration ; (TMRH)B7:0=Timer register High byte ; (TMRL)B7:0=Timer register Low byte bcf T0CON,TMR0ON ; (CON)B7=TMRON B6=T8BIT B5=TCS B4=TSE B3=PSA B2:0=TPS2:0 movlw 0x92 ; 0x97set options with timer on/off (bit7) movwf T0CON ; ***note: must reload 0x100-TMR in application code*** movlw cTMR0H ; preset timer values movwf TMR0H movlw cTMR0L movwf TMR0L ; Feature=CPU - CPU register configuration ; Feature=Interrupts - enable interrupts ; feature interrupt enables clrf PIE3 ; B7=IRX B6=WAK B5=ERR B4:2=TXB2:0 B1:0=RXB1:0 clrf PIE2 ; B7=OSCF B6=CM B4=EE B3=BCL B2=LVD B1=TMR3 B0=CCP2 clrf PIE1 ; B7=PSP B6=AD B5=RC1 B4=TX1 B3=SSP B2=CCP1 B1=TMR2 B0=TMR1 return END

PICOLLO Grande for prog.chip	http://www.asix.cz/a6piccolog.htm
PIC18F2480	http://www.microchip.com/stellent/idcplg?IdcService=SS_GET_PAGE&nodeId=1335&dDocName=en020612
82C250 CAN Transceiver 1Mb	http://www.semiconductors.philips.com/acrobat_download/datasheets/PCA82C250_5.pdf

Délka vedení (Length of wire)	Resistance Ohm / 1m	Max. Baud rate
< 40m	<70mO/m	1Mbits/sec
< 300m	<60 mO/m	500kbits/sec
< 600m	<40 mO/m	100kbits/sec
< 1000m	<26 mO/m	50kbits/sec

Home www.visualprog.cz

Microcontroler PIC18F2480 CAN bus project

Hardware for CAN bus