?? can.src
字號:
; .\can.SRC generated from: can.c
; COMPILER INVOKED BY:
; C:\Keil\C51\BIN\C51.EXE can.c BROWSE DEBUG OBJECTEXTEND SRC(.\can.SRC)
$NOMOD51
NAME CAN
P0 DATA 080H
P1 DATA 090H
P2 DATA 0A0H
P3 DATA 0B0H
T0 BIT 0B0H.4
AC BIT 0D0H.6
T1 BIT 0B0H.5
T2 BIT 090H.0
EA BIT 0A8H.7
IE DATA 0A8H
EXF2 BIT 0C8H.6
RD BIT 0B0H.7
ES BIT 0A8H.4
IP DATA 0B8H
RI BIT 098H.0
INT0 BIT 0B0H.2
CY BIT 0D0H.7
TI BIT 098H.1
INT1 BIT 0B0H.3
RCAP2H DATA 0CBH
PS BIT 0B8H.4
SP DATA 081H
T2EX BIT 090H.1
OV BIT 0D0H.2
RCAP2L DATA 0CAH
C_T2 BIT 0C8H.1
WR BIT 0B0H.6
RCLK BIT 0C8H.5
TCLK BIT 0C8H.4
SBUF DATA 099H
PCON DATA 087H
SCON DATA 098H
TMOD DATA 089H
TCON DATA 088H
IE0 BIT 088H.1
IE1 BIT 088H.3
B DATA 0F0H
CP_RL2 BIT 0C8H.0
ACC DATA 0E0H
ET0 BIT 0A8H.1
ET1 BIT 0A8H.3
TF0 BIT 088H.5
ET2 BIT 0A8H.5
TF1 BIT 088H.7
TF2 BIT 0C8H.7
RB8 BIT 098H.2
TH0 DATA 08CH
EX0 BIT 0A8H.0
IT0 BIT 088H.0
TH1 DATA 08DH
TB8 BIT 098H.3
EX1 BIT 0A8H.2
IT1 BIT 088H.2
TH2 DATA 0CDH
P BIT 0D0H.0
SM0 BIT 098H.7
TL0 DATA 08AH
SM1 BIT 098H.6
TL1 DATA 08BH
SM2 BIT 098H.5
TL2 DATA 0CCH
PT0 BIT 0B8H.1
PT1 BIT 0B8H.3
RS0 BIT 0D0H.3
PT2 BIT 0B8H.5
TR0 BIT 088H.4
RS1 BIT 0D0H.4
TR1 BIT 088H.6
TR2 BIT 0C8H.2
PX0 BIT 0B8H.0
PX1 BIT 0B8H.2
DPH DATA 083H
DPL DATA 082H
EXEN2 BIT 0C8H.3
REN BIT 098H.4
T2CON DATA 0C8H
RXD BIT 0B0H.0
TXD BIT 0B0H.1
F0 BIT 0D0H.5
PSW DATA 0D0H
?PR?_SJAInit?CAN SEGMENT CODE
?PR?_SJASendData?CAN SEGMENT CODE
?DT?_SJASendData?CAN SEGMENT DATA OVERLAYABLE
?PR?_SJARecvData?CAN SEGMENT CODE
?DT?CAN SEGMENT DATA
?DT?_SJARecvData?CAN SEGMENT DATA OVERLAYABLE
?PR?GetOutOfBus?CAN SEGMENT CODE
EXTRN CODE (?C?CLDPTR)
EXTRN CODE (?C?CSTOPTR)
PUBLIC GetOutOfBus
PUBLIC _SJARecvData
PUBLIC ?_SJASendData?BYTE
PUBLIC _SJASendData
PUBLIC _SJAInit
RSEG ?DT?_SJASendData?CAN
?_SJASendData?BYTE:
Tdata?141: DS 3
DatLen?142: DS 1
MyID?143: DS 1
SaID?144: DS 2
TxRx?145: DS 2
RSEG ?DT?_SJARecvData?CAN
?_SJARecvData?BYTE:
Rdata?248: DS 3
RSEG ?DT?CAN
TempData?250: DS 1
RSEG ?DT?CAN
TempValue?251: DS 1
;
;
; #include "can.h"
; #include "reg52.h"
;
; void SJAInit(tByte Reg_acr)
RSEG ?PR?_SJAInit?CAN
_SJAInit:
; SOURCE LINE # 6
;---- Variable 'Reg_acr?040' assigned to Register 'R7' ----
; {
; SOURCE LINE # 7
; MODE = 0x09; //模式寄存器,單驗收濾波器,進入復位模式
; SOURCE LINE # 8
MOV DPTR,#0DF00H
MOV A,#09H
MOVX @DPTR,A
; CDR = 0x88; //時鐘分頻R,選擇增強CAN模式,關閉CLKOUT輸出
; SOURCE LINE # 9
MOV DPTR,#0DF1FH
MOV A,#088H
MOVX @DPTR,A
; IER = 0x0d; //中斷使能寄存器,開溢出、錯誤、接收中斷
; SOURCE LINE # 10
MOV DPTR,#0DF04H
MOV A,#0DH
MOVX @DPTR,A
;
; BTR0 = 0x03; //總線定時寄存器
; SOURCE LINE # 12
MOV DPTR,#0DF06H
MOV A,#03H
MOVX @DPTR,A
; BTR1 = 0xff; //總線定時寄存器二,6MHz晶振,波特率30Kbps
; SOURCE LINE # 13
INC DPTR
MOV A,#0FFH
MOVX @DPTR,A
;
; OCR = 0xaa; //輸出控制寄存器
; SOURCE LINE # 15
INC DPTR
MOV A,#0AAH
MOVX @DPTR,A
;
; ACR0 = Reg_acr; //驗收代碼ACR0
; SOURCE LINE # 17
MOV DPTR,#0DF10H
MOV A,R7
MOVX @DPTR,A
; ACR1 = 0xff; //驗收代碼ACR1,以下無關
; SOURCE LINE # 18
INC DPTR
MOV A,#0FFH
MOVX @DPTR,A
; ACR2 = 0xff; //驗收代碼ACR2
; SOURCE LINE # 19
INC DPTR
MOVX @DPTR,A
; ACR3 = 0xff; //驗收代碼ACR3
; SOURCE LINE # 20
INC DPTR
MOVX @DPTR,A
;
; AMR0 = 0x00; //驗收屏蔽寄存器AMR0=00H
; SOURCE LINE # 22
INC DPTR
CLR A
MOVX @DPTR,A
; AMR1 = 0xff; //驗收屏蔽寄存器AMR1,以下無關
; SOURCE LINE # 23
INC DPTR
MOV A,#0FFH
MOVX @DPTR,A
; AMR2 = 0xff; //驗收屏蔽寄存器AMR2
; SOURCE LINE # 24
INC DPTR
MOVX @DPTR,A
; AMR3 = 0xff; //驗收屏蔽寄存器AMR3
; SOURCE LINE # 25
INC DPTR
MOVX @DPTR,A
;
; RBSA = 0x00; //接收緩沖器FIFO起始地址為0
; SOURCE LINE # 27
MOV DPTR,#0DF1EH
CLR A
MOVX @DPTR,A
; TXER = 0x00; //清除發送錯誤計數器
; SOURCE LINE # 28
MOV DPTR,#0DF0FH
MOVX @DPTR,A
; ECC = 0x00; //清除錯誤代碼捕捉寄存器
; SOURCE LINE # 29
MOV DPTR,#0DF0CH
MOVX @DPTR,A
; MODE = 0x08; //單濾波方式,返回工作方式
; SOURCE LINE # 30
MOV DPTR,#0DF00H
MOV A,#08H
MOVX @DPTR,A
;
;
;
;
; }
; SOURCE LINE # 35
RET
; END OF _SJAInit
;
; tByte SJASendData(tByte *Tdata,tByte DatLen,tByte MyID,SaID,TxRx)
RSEG ?PR?_SJASendData?CAN
_SJASendData:
USING 0
; SOURCE LINE # 37
;---- Variable 'Tdata?141' assigned to Register 'R1/R2/R3' ----
;---- Variable 'DatLen?142' assigned to Register 'R5' ----
; {
; SOURCE LINE # 38
; tByte TempData;
; tByte TempValue;
; TempData = SR; //讀狀態寄存器
; SOURCE LINE # 41
MOV DPTR,#0DF02H
MOVX A,@DPTR
MOV R7,A
;---- Variable 'TempData?146' assigned to Register 'R7' ----
?C0004:
; do //判斷是否正在接收正在接收則等待
; { //TempValue = 1則等待
; SOURCE LINE # 43
; TempValue = TempData&0x10;
; SOURCE LINE # 44
MOV A,R7
ANL A,#010H
MOV R6,A
;---- Variable 'TempValue?147' assigned to Register 'R6' ----
; }while(TempValue);
; SOURCE LINE # 45
JNZ ?C0004
?C0007:
;
; do //判斷上次發送是否完成未完成則等待發送完成
; { //TempValue = 0則等待
; SOURCE LINE # 48
; TempValue = TempData&0x80;
; SOURCE LINE # 49
MOV A,R7
ANL A,#080H
MOV R6,A
; }while(!TempValue);
; SOURCE LINE # 50
JZ ?C0007
?C0010:
;
; do //判斷發送緩沖區是否鎖定鎖定則等待
; { //TempValue = 0則等待
; SOURCE LINE # 53
; TempValue = TempData&0x40;
; SOURCE LINE # 54
MOV A,R7
ANL A,#040H
MOV R6,A
; }while(!TempValue);
; SOURCE LINE # 55
JZ ?C0010
;
; FIN = TxRx;
; SOURCE LINE # 57
MOV DPTR,#0DF10H
MOV A,TxRx?145+01H
MOVX @DPTR,A
; ID1 = MyID;
; SOURCE LINE # 58
INC DPTR
MOV A,MyID?143
MOVX @DPTR,A
; ID2 = SaID;
; SOURCE LINE # 59
INC DPTR
MOV A,SaID?144+01H
MOVX @DPTR,A
; //開始發送數據,一共8個字節,全部為有效數據
; for(TempValue = 0;TempValue<DatLen;TempValue++)
; SOURCE LINE # 61
CLR A
MOV R6,A
?C0011:
MOV A,R6
CLR C
SUBB A,R5
JNC ?C0012
; {
; SOURCE LINE # 62
; DAT1 = *Tdata;
; SOURCE LINE # 63
LCALL ?C?CLDPTR
MOV DPTR,#0DF13H
MOVX @DPTR,A
; DAT1++;
; SOURCE LINE # 64
MOVX A,@DPTR
INC A
MOVX @DPTR,A
; Tdata++;
; SOURCE LINE # 65
MOV A,#01H
ADD A,R1
MOV R1,A
CLR A
ADDC A,R2
MOV R2,A
; }
; SOURCE LINE # 66
INC R6
SJMP ?C0011
?C0012:
;
; CMR = 0x01; //啟動SJA1000 發送
; SOURCE LINE # 68
MOV DPTR,#0DF01H
MOV A,#01H
MOVX @DPTR,A
;
; return 0;
; SOURCE LINE # 70
MOV R7,#00H
; }
; SOURCE LINE # 71
?C0014:
RET
; END OF _SJASendData
;
; tByte SJARecvData(tByte *Rdata,tByte DatLen)
RSEG ?PR?_SJARecvData?CAN
_SJARecvData:
USING 0
; SOURCE LINE # 73
MOV Rdata?248,R3
MOV Rdata?248+01H,R2
MOV Rdata?248+02H,R1
;---- Variable 'DatLen?249' assigned to Register 'R5' ----
; {
; SOURCE LINE # 74
;
; static tByte TempData;
; static tByte TempValue;
; TempData = SR; //讀狀態寄存器
; SOURCE LINE # 78
MOV DPTR,#0DF02H
MOVX A,@DPTR
MOV TempData?250,A
; //P1 = TempData;
;
; TempValue = (TempData & 0xc3);
; SOURCE LINE # 81
ANL A,#0C3H
MOV TempValue?251,A
; if(!TempValue ) //讀取總線脫離、錯誤狀態、接收溢出、有數據等位
; SOURCE LINE # 82
JNZ ?C0015
; {
; SOURCE LINE # 83
; return 1; //總線接收失敗推出
; SOURCE LINE # 84
MOV R7,#01H
RET
;
; }
; SOURCE LINE # 86
?C0015:
;
; if(TempData & 0x80)
; SOURCE LINE # 88
MOV A,TempData?250
JNB ACC.7,?C0017
; {
; SOURCE LINE # 89
; TempData = IR; //IR中斷寄存器,出現總線脫離,讀中斷寄存器,清除中斷位
; SOURCE LINE # 90
MOV DPTR,#0DF03H
MOVX A,@DPTR
MOV TempData?250,A
; MODE = 0x08; //推出復位模式,進入工作模式
; SOURCE LINE # 91
MOV DPTR,#0DF00H
MOV A,#08H
MOVX @DPTR,A
;
; return 2; //總線接收失敗
; SOURCE LINE # 93
MOV R7,#02H
RET
; }
; SOURCE LINE # 94
?C0017:
;
;
;
; TempData = IR;
; SOURCE LINE # 98
MOV DPTR,#0DF03H
MOVX A,@DPTR
MOV TempData?250,A
; if(TempData&0x08)
; SOURCE LINE # 99
JNB ACC.3,?C0019
; {
; SOURCE LINE # 100
; CMR = 0x0c; //數據溢出處理,清除數據溢出位,釋放接收緩沖區
; SOURCE LINE # 101
MOV DPTR,#0DF01H
MOV A,#0CH
MOVX @DPTR,A
;
; return 3; //總線接收失敗
; SOURCE LINE # 103
MOV R7,#03H
RET
; }
; SOURCE LINE # 104
;
; if(TempData&0x01==0x00)
; SOURCE LINE # 106
; {
; SOURCE LINE # 107
; TempValue = ALC; //釋放仲裁丟失捕捉寄存器和錯誤捕捉寄存器
; SOURCE LINE # 108
; TempValue = ECC;
; SOURCE LINE # 109
;
; return 4; //總線接受失敗
; SOURCE LINE # 111
; }
; SOURCE LINE # 112
?C0019:
;
;
; //TempData = FIN; //遠程幀處理
; if(TempData&0x40)
; SOURCE LINE # 116
MOV A,TempData?250
JNB ACC.6,?C0020
; {
; SOURCE LINE # 117
; CMR = 0x04;
; SOURCE LINE # 118
MOV DPTR,#0DF01H
MOV A,#04H
MOVX @DPTR,A
; TempValue = ALC; //釋放仲裁丟失捕捉寄存器和錯誤捕捉寄存器
; SOURCE LINE # 119
MOV DPTR,#0DF0BH
MOVX A,@DPTR
MOV TempValue?251,A
; TempValue = ECC;
; SOURCE LINE # 120
INC DPTR
MOVX A,@DPTR
MOV TempValue?251,A
;
; return 5;
; SOURCE LINE # 122
MOV R7,#05H
RET
; }
; SOURCE LINE # 123
?C0020:
;
; for(TempValue = 0;TempValue<DatLen;TempValue++)
; SOURCE LINE # 125
CLR A
MOV TempValue?251,A
?C0021:
MOV A,TempValue?251
CLR C
SUBB A,R5
JNC ?C0022
; {
; SOURCE LINE # 126
; Rdata[TempValue]= FIN;
; SOURCE LINE # 127
MOV DPTR,#0DF10H
MOVX A,@DPTR
MOV R3,Rdata?248
MOV R2,Rdata?248+01H
MOV R1,Rdata?248+02H
MOV DPL,TempValue?251
MOV DPH,#00H
LCALL ?C?CSTOPTR
; FIN++;
; SOURCE LINE # 128
MOV DPTR,#0DF10H
MOVX A,@DPTR
INC A
MOVX @DPTR,A
; }
; SOURCE LINE # 129
INC TempValue?251
SJMP ?C0021
?C0022:
;
; GetOutOfBus(); //釋放總線
; SOURCE LINE # 131
LCALL GetOutOfBus
;
;
; return 0;
; SOURCE LINE # 134
MOV R7,#00H
;
; }
; SOURCE LINE # 136
?C0016:
RET
; END OF _SJARecvData
;
; /*
; tByte CopyData(tByte *Rdata,tByte DatLen)
; {
; tByte Cnt;
; for(Cnt = 0;Cnt<DatLen;Cnt++)
; {
; *(DAT1+Cnt) = *Rdata;
; Rdata++;
; }
; GetOutOfBus();
; return 0;
; }
; */
; void GetOutOfBus() //釋放總線
RSEG ?PR?GetOutOfBus?CAN
GetOutOfBus:
USING 0
; SOURCE LINE # 151
; {
; SOURCE LINE # 152
; tByte TempValue;
; CMR = 0x04;
; SOURCE LINE # 154
MOV DPTR,#0DF01H
MOV A,#04H
MOVX @DPTR,A
; TempValue = ALC; //釋放仲裁丟失捕捉寄存器和錯誤捕捉寄存器
; SOURCE LINE # 155
MOV DPTR,#0DF0BH
MOVX A,@DPTR
;---- Variable 'TempValue?352' assigned to Register 'R7' ----
; TempValue = ECC;
; SOURCE LINE # 156
INC DPTR
MOVX A,@DPTR
;
; }
; SOURCE LINE # 158
RET
; END OF GetOutOfBus
END
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -