设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › PIC单片机 › PIC单片机车载仪表带CAN总线通讯源代码
返回列表 发新帖
查看: 4029|回复: 0
收起左侧

PIC单片机车载仪表带CAN总线通讯源代码

[复制链接]
ID:387723 发表于 2018-8-19 01:12 | 显示全部楼层 |阅读模式
PIC系列单片机源代码
0.png

单片机源程序如下:
  1. ;******************************************************************************
  2. ;                                                                             *
  3. ;    Filename:        FB_ZHU_JI_PIC16LF1947.ASM                               *
  4. ;    Date:            2012.01.6                                               *
  5. ;    File Version:    1.0                                                     *
  6. ;                                                                             *
  7. ;    Author:                                                           *
  8. ;                                                                             *
  9. ;                                                                             *
  10. ;******************************************************************************
  11. ;                                                                             *
  12. ;    Files Required: P16F1947.INC                                             *
  13. ;                                                                             *
  14. ;******************************************************************************
  15. ;                                                                             *
  16. ;    Notes:                                                                   *
  17. ;                                                                             *
  18. ;******************************************************************************
  19. ;                                                                             *
  20. ;    Revision History:                                                        *
  21. ;                                                                             *
  22. ;******************************************************************************


  25.         list        p=16f1947      ; list directive to define processor
  26.         #include        <P16F1947.INC> ; processor specific variable definitions
  27.         #include    <MyDefine.inc>
  28.         #include    <reg2510.inc>
  29.         #include    <MY_STD.MAC>
  30.         ERRORLEVEL 0,-305,-306,-302           ; Messages, Warnings and Errors Printed
  31.                                                   ; Ignore [305] => Using default dest of
  32.                                                   ; 1 file
  33.                                                   ; Ignore [306] => Crossing Page Boundary
  34. ;******************************************************************************
  35. ;
  36. ; CONFIGURATION WORD SETUP
  37. ;
  38. ; The 'CONFIG' directive is used to embed the configuration word within the
  39. ; .asm file. The lables following the directive are located in the respective
  40. ; .inc file.  See the data sheet for additional information on configuration
  41. ; word settings.
  42. ;
  43. ;******************************************************************************   
  44. ;    __CONFIG _CONFIG1, _FOSC_INTOSC & _WDTE_OFF & _PWRTE_OFF & _MCLRE_ON & _CP_OFF & _CPD_OFF & _BOREN_OFF & _CLKOUTEN_ON & _IESO_OFF & _FCMEN_OFF
  45. ;    __CONFIG _CONFIG2, _WRT_OFF & _VCAPEN_OFF & _PLLEN_OFF & _STVREN_OFF & _BORV_19 & _LVP_OFF
  46. ;******************************************************************************
  47. ; RESET VECTOR
  48. ;******************************************************************************

  50.        ORG         0x0000            ; processor reset vector
  51.                                                                                                                                                                                                                                                                                          PAGESEL     START
  52.        GOTO        START             ; When using debug header, first inst.
  53.                                      ; may be passed over by ICD2.  
  54.        ORG         0x0004
  55. ;******************************************************************************
  56. ; INTERRUPT SERVICE ROUTINE
  57. ;******************************************************************************
  58.        #include   <Interrupt.asm>
  59. ;******************************************************************************
  60. ; USER INTERRUPT SERVICE ROUTINE GOES HERE
  61. ;******************************************************************************
  62. ; Note the 16F1936 family automatically handles context restoration for
  63. ; W, STATUS, BSR, FSR, and PCLATH where previous templates for 16F families
  64. ; required manual restoration
  65. ;******************************************************************************
  66. ; MAIN PROGRAM
  67. ;******************************************************************************
  68. START  
  69.         PAGESEL     Init_System_Clock      
  70.         CALL        Init_System_Clock
  71.         PAGESEL     $
  72.       
  73.         PAGESEL     Init_Watch_Dog
  74.         CALL        Init_Watch_Dog
  75.         PAGESEL     $
  76.         
  77. ;        BANKSEL     Zhuan_Su_H_1
  78. ;        MOVLW       0XFF
  79. ;        MOVWF       Zhuan_Su_H_1
  80. ;        MOVLW       0X01
  81. ;        MOVWF       Zhuan_Su_L_1
  82. ;        MOVLW       0X00
  83. ;        MOVWF       Zhuan_Su_H_2
  84. ;        MOVLW       0XFF
  85. ;        MOVWF       Zhuan_Su_L_2
  86. ;        MOVLW       0XEE
  87. ;        MOVWF       Zhuan_Su_H_3
  88. ;        MOVLW       0X03
  89. ;        MOVWF       Zhuan_Su_L_3
  90. ;
  91. ;        MOVLW       LOW  Zhuan_Su_H_1
  92. ;        MOVWF       FSR0L
  93. ;        MOVLW       HIGH  Zhuan_Su_H_1
  94. ;        MOVWF       FSR0H
  95. ;        PAGESEL     D_Pai_Xu_3Byte
  96. ;        CALL        D_Pai_Xu_3Byte
  97. ;        PAGESEL     $
  98.         
  99.         
  100. ;        BANKSEL     Biao_Wen_1
  101. ;        MOVLW       0X01
  102. ;        MOVWF       Biao_Wen_1
  103. ;        MOVLW       0X00
  104. ;        MOVWF       Biao_Wen_2
  105. ;        MOVLW       0X00
  106. ;        MOVWF       Biao_Wen_3
  107. ;        
  108. ;        MOVLW       LOW  Biao_Wen_1
  109. ;        MOVWF       FSR0L
  110. ;        MOVLW       HIGH  Biao_Wen_1
  111. ;        MOVWF       FSR0H
  112. ;        PAGESEL     Pai_Xu_3Byte
  113. ;        CALL        Pai_Xu_3Byte
  114. ;        PAGESEL     $
  115.         
  116.         
  117.    
  118.         PAGESEL     Init_IO
  119.         CALL        Init_IO
  120.         PAGESEL     $
  121.         
  122.         PAGESEL     Clear_All_GPRAM
  123.         CALL        Clear_All_GPRAM
  124.         PAGESEL     $
  125.         
  126. ;        PAGESEL     Wa_Si_ChaZhi
  127. ;        CALL        Wa_Si_ChaZhi
  128. ;        PAGESEL     $
  129.         
  130.         MOVLW       0X03
  131.         BANKSEL     B_W_LB_Count       ;采用中值滤波 将N=3
  132.         MOVWF       B_W_LB_Count
  133.         
  134. ;        MOVLW       0X01
  135. ;        BANKSEL     Alarm_Wa_Si_H
  136. ;        MOVWF       Alarm_Wa_Si_H
  137. ;        MOVLW       0X90
  138. ;        MOVWF       Alarm_Wa_Si_L
  139.         
  140.         PAGESEL     Init_SSP
  141.         CALL        Init_SSP
  142.         PAGESEL     $

  144.         PAGESEL     Init_Mcp2515
  145.         CALL        Init_Mcp2515
  146.         PAGESEL     $
  147.         
  148.         PAGESEL     Init_Timer0_1S
  149.         CALL        Init_Timer0_1S
  150.         PAGESEL     $
  151.         
  152.         PAGESEL     Init_Timer2_10MS
  153.         CALL        Init_Timer2_10MS
  154.         PAGESEL     $
  155.         
  156.         PAGESEL     Init_Timer4_100MS
  157.         CALL        Init_Timer4_100MS
  158.         PAGESEL     $
  159.         
  160.         PAGESEL     Read_Mile_From_EEPROM
  161.         CALL        Read_Mile_From_EEPROM
  162.         PAGESEL     $
  163.       
  164.         PAGESEL     Read_Data_From_EEPROM
  165.         CALL        Read_Data_From_EEPROM
  166.         PAGESEL     $
  167.          
  168.         PAGESEL     Read_W_L_From_EEPROM
  169.         CALL        Read_W_L_From_EEPROM
  170.         PAGESEL     $
  171.         
  172.         PAGESEL     Read_BD_From_EEPROM
  173.         CALL        Read_BD_From_EEPROM
  174.         PAGESEL     $
  175.       
  176.         PAGESEL     Alarm_Data_Handle
  177.         CALL        Alarm_Data_Handle
  178.         PAGESEL     $
  179.         
  180.         BANKSEL     Speed_Count
  181.         CLRF        Speed_Count
  182.         BANKSEL     ZhuanSu_Count
  183.         CLRF        ZhuanSu_Count
  184.         BANKSEL     Wa_Si_Count
  185.         CLRF        Wa_Si_Count
  186.         BANKSEL     TMR1L
  187.         CLRF        TMR1L
  188.         CLRF        TMR1H
  189.         MOVLW       B'00110100'
  190.         MOVWF       T1CON
  191.         
  192.         BANKSEL     Flag
  193.         CLRF        Flag
  194.         BANKSEL     CCP1CON
  195.         CLRF        CCP1CON
  196.         CLRF        CCP2CON
  197.         
  198.         CLRF        CCPR1L
  199.         CLRF        CCPR1H
  200.         CLRF        CCPR2L
  201.         CLRF        CCPR2H
  202.         
  203.         MOVLW       B'00000101'
  204.         MOVWF       CCP1CON
  205.         MOVLW       B'00000101'
  206.         MOVWF       CCP2CON
  207.         
  208.         BANKSEL     CCP3CON
  209.         CLRF        CCP3CON
  210.         MOVLW       B'00000111'
  211.         MOVWF       CCP3CON
  212.         CLRF        CCPR3L
  213.         CLRF        CCPR3H
  214.         
  215.         BANKSEL     PIR1
  216.         BCF         PIR1,TMR2IF
  217.         BCF         PIR3,TMR4IF
  218.         BCF         PIR1,CCP1IF
  219.         BCF         PIR2,CCP2IF
  220.         BANKSEL     PIR3
  221.         BCF         PIR3,CCP3IF
  222.         BANKSEL     PIE1
  223.         BSF         PIE1,TMR2IE
  224.         BSF         PIE3,TMR4IE
  225.         BSF         PIE1,CCP1IE
  226.         BSF         PIE2,CCP2IE
  227.         BANKSEL     PIE3
  228.         BSF         PIE3,CCP3IE
  229.         BANKSEL     T4CON
  230.         BSF         T4CON,TMR4ON
  231.         BANKSEL     T1CON
  232.         BSF         T1CON,TMR1ON
  233.         BSF         T2CON,TMR2ON
  234.         BCF         INTCON,TMR0IF
  235.         ;BSF         INTCON,TMR0IE
  236.         BSF         INTCON,PEIE
  237.         BSF         INTCON,GIE
  238. MAIN        
  239. ;        PAGESEL     CAN_BUS_TRANSMIT
  240. ;        CALL        CAN_BUS_TRANSMIT
  241. ;        PAGESEL     $
  242.         
  243.         PAGESEL     AD_Sample
  244.         CALL        AD_Sample
  245.         PAGESEL     $
  246.         
  247.         PAGESEL     Voltage_Calculate
  248.         CALL        Voltage_Calculate
  249.         PAGESEL     $
  250.         
  251.            
  252. ;**************************************
  253. ;           ;瓦斯处理
  254. ;           MOVLW       0X00
  255. ;           BANKSEL     AN0_RESH
  256. ;           SUBWF       AN0_RESH,W
  257. ;           BTFSS       STATUS,C
  258. ;           GOTO        Wa_Si_Next_1
  259. ;           GOTO        Wa_Si_Next_2
  260. ;Wa_Si_Next_1
  261. ;           BANKSEL     Wa_Si_N_D           ;<80
  262. ;           MOVLW       0X55                ;断线
  263. ;           MOVWF       Wa_Si_N_D
  264. ;           GOTO        Wa_Si_Clear
  265. ;Wa_Si_Next_2
  266. ;           BTFSS       STATUS,Z
  267. ;           GOTO        Wa_Si_Next_3
  268. ;           GOTO        Wa_Si_Next_4
  269. ;Wa_Si_Next_3
  270. ;                                            ;>=80 根据电压计算浓度
  271. ;           BANKSEL     AN0_RESH
  272. ;           MOVF        AN0_RESH,W
  273. ;           BANKSEL     SOUH
  274. ;           MOVWF       SOUH
  275. ;           BANKSEL     AN0_RESL
  276. ;           MOVF        AN0_RESL,W
  277. ;           BANKSEL     SOU
  278. ;           MOVWF       SOU
  279. ;           MOVLW       0X00
  280. ;           BANKSEL     RLTH
  281. ;           MOVWF       RLTH
  282. ;           MOVLW       0X50
  283. ;           MOVWF       RLT
  284. ;           
  285. ;           PAGESEL     DUSUB
  286. ;           CALL        DUSUB
  287. ;           PAGESEL     $
  288. ;           
  289. ;           MOVLW       0X00
  290. ;           BANKSEL     RLTH
  291. ;           MOVWF       RLTH
  292. ;           MOVLW       0X08
  293. ;           MOVWF       RLT
  294. ;           
  295. ;           PAGESEL     DUDIV
  296. ;           CALL        DUDIV
  297. ;           PAGESEL     $
  298. ;           
  299. ;           BANKSEL     SOU
  300. ;           MOVF        SOU,W
  301. ;           BANKSEL     Wa_Si_N_D         
  302. ;           MOVWF       Wa_Si_N_D
  303. ;           GOTO        Wa_Si_Clear
  304. ;Wa_Si_Next_4
  305. ;           MOVLW       0X50
  306. ;           BANKSEL     AN0_RESL
  307. ;           SUBWF       AN0_RESL,W
  308. ;           BTFSS       STATUS,C
  309. ;           GOTO        Wa_Si_Next_1
  310. ;           GOTO        Wa_Si_Next_3
  311. ;Wa_Si_Clear
  312.            ;和瓦斯报警关联的处理      
  313. ;**************************************
  314.       
  315.         PAGESEL     Wen_Du_Cha_Zhi
  316.         CALL        Wen_Du_Cha_Zhi    ;根据标定计算各个温度差值
  317.         PAGESEL     $  
  318.                                       
  319. Biao_Wen_BD                                                           
  320.         BANKSEL     AN5_RESH
  321.         MOVF        AN5_RESH,W
  322. ……………………

  324. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
F_B_Z_J_V2.0.2012.8.29.rar (1.21 MB, 下载次数: 26)
PIC系列单片机源代码
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表