📄 hardware.lst
字号:
// User's interrupt setting have to combine with this register
// while co-work with SACM library.
//
// See. following function for example:
// F_SP_SACM_A2000_Init_:
// F_SP_SACM_S480_Init_:
// F_SP_SACM_S240_Init_:
// F_SP_SACM_MS01_Init_:
// F_SP_SACM_DVR_Init_:
//////////////////////////////////////////////////
000002F5 .IRAM
.PUBLIC R_InterruptStatus
000002F5 00 00 .VAR R_InterruptStatus = 0 //
//////////////////////////////////////////////////
.DEFINE C_RampDelayTime 32
.DEFINE C_QueueSize 144
000002F6 00 00 .VAR R_Queue
000002F7 00 00 00 00 .DW C_QueueSize-1 DUP(0)
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00 00 00
00 00
00000386 00 00 .VAR R_ReadIndex
00000387 00 00 .VAR R_WriteIndex
00009062 .CODE
///////////////////////////////////////////
// Function: Initial Queue
// Destory: R1,r2
///////////////////////////////////////////
_SP_InitQueue: .PROC
_SP_InitQueue_A2000:
_SP_InitQueue_S480:
_SP_InitQueue_S240:
_SP_InitQueue_MS01:
_SP_InitQueue_DVR:
F_SP_InitQueue_A2000:
F_SP_InitQueue_S480:
F_SP_InitQueue_S240:
F_SP_InitQueue_MS01:
F_SP_InitQueue_DVR:
F_SP_InitQueue:
00009062 09 93 F6 02 r1 = R_Queue
00009064 40 94 r2 = 0
L_ClearQueueLoop?:
00009065 D1 D4 [r1++] = r2
00009066 09 43 86 03 cmp r1, R_Queue+C_QueueSize
00009068 44 4E jne L_ClearQueueLoop?
00009069 40 92 r1 = 0
0000906A 19 D3 86 03 [R_ReadIndex] = r1
0000906C 19 D3 87 03 [R_WriteIndex] = r1
0000906E 90 9A RETF
.ENDP
///////////////////////////////////////////
// Function: Get a data form Queue
// Output: R1: Data
// R2: return value
// Destory: R1,R2
///////////////////////////////////////////
F_SP_ReadQueue_A2000:
F_SP_ReadQueue_S480:
F_SP_ReadQueue_S240:
F_SP_ReadQueue_MS01:
F_SP_ReadQueue_DVR:
F_SP_ReadQueue:
0000906F 12 95 86 03 r2 = [R_ReadIndex]
00009071 12 45 87 03 cmp r2,[R_WriteIndex]
00009073 0D 5E je L_RQ_QueueEmpty
00009074 0A 05 F6 02 r2 += R_Queue // get queue data address
00009076 C2 92 r1 = [r2]
00009077 12 95 86 03 r2 = [R_ReadIndex]
00009079 41 04 r2 += 1
0000907A 0A 45 90 00 cmp r2, C_QueueSize
0000907C 01 4E jne L_RQ_NotQueueBottom
0000907D 40 94 r2 = 0
L_RQ_NotQueueBottom:
0000907E 1A D5 86 03 [R_ReadIndex] = r2
//r2 = 0x0000 // get queue data
00009080 90 9A retf
L_RQ_QueueEmpty:
//r2 = 0x8000 // queue empty
00009081 90 9A retf
///////////////////////////////////////////
// Function: Get a data from Queue but do
// not change queue index
// R1: output
// Destory: R1,R2
///////////////////////////////////////////
F_SP_ReadQueue_NIC:
F_SP_ReadQueue_NIC_A2000:
F_SP_ReadQueue_NIC_S480:
F_SP_ReadQueue_NIC_S240:
F_SP_ReadQueue_NIC_MS01:
F_SP_ReadQueue_NIC_DVR:
00009082 12 95 86 03 r2 = [R_ReadIndex]
00009084 12 45 87 03 cmp r2,[R_WriteIndex]
00009086 03 5E je L_RQ_QueueEmpty?
00009087 0A 05 F6 02 r2 += R_Queue // get queue data index
00009089 C2 92 r1 = [r2]
L_RQ_QueueEmpty?:
0000908A 90 9A RETF
///////////////////////////////////////////
// Function: Put a data to Queue
// R1: Input
// Destory: R1,R2
///////////////////////////////////////////
F_SP_WriteQueue_A2000:
F_SP_WriteQueue_S480:
F_SP_WriteQueue_S240:
F_SP_WriteQueue_MS01:
F_SP_WriteQueue_DVR:
F_SP_WriteQueue:
0000908B 12 95 87 03 r2 = [R_WriteIndex] // put data to queue
0000908D 0A 05 F6 02 r2 += R_Queue
0000908F C2 D2 [r2] = r1
00009090 12 95 87 03 r2 = [R_WriteIndex]
00009092 41 04 r2 += 1
00009093 0A 45 90 00 cmp r2, C_QueueSize
00009095 01 4E jne L_WQ_NotQueueBottom
00009096 40 94 r2 = 0
L_WQ_NotQueueBottom:
00009097 1A D5 87 03 [R_WriteIndex] = r2
00009099 90 9A RETF
///////////////////////////////////////////
// Function: Test Queue Status
// o/p: R1
// Destory: R1
///////////////////////////////////////////
F_SP_TestQueue_A2000:
F_SP_TestQueue_S480:
F_SP_TestQueue_S240:
F_SP_TestQueue_MS01:
F_SP_TestQueue_DVR:
F_SP_TestQueue:
//... Test Queue Empty ...
0000909A 11 93 86 03 r1 = [R_ReadIndex]
0000909C 11 43 87 03 cmp r1,[R_WriteIndex]
0000909E 12 5E je L_TQ_QueueEmpty
//... Test Queue Full ...
0000909F 11 93 86 03 r1 = [R_ReadIndex] // For N Queue Full: 1.R=0 and W=N-1 2. R<>0 and W=R-1
000090A1 05 4E jnz L_TQ_JudgeCond2
000090A2 11 93 87 03 r1 = [R_WriteIndex]
000090A4 09 43 8F 00 cmp r1, C_QueueSize-1 // Cond1
000090A6 08 5E je L_TQ_QueueFull
L_TQ_JudgeCond2:
000090A7 11 93 86 03 r1 = [R_ReadIndex]
000090A9 41 22 r1 -=1
000090AA 11 43 87 03 cmp r1,[R_WriteIndex]
000090AC 02 5E je L_TQ_QueueFull
000090AD 40 92 r1 = 0 // not Full, not empty
000090AE 90 9A retf
L_TQ_QueueFull:
000090AF 41 92 r1 = 1 // full
000090B0 90 9A retf
L_TQ_QueueEmpty:
000090B1 42 92 r1 = 2 // empty
000090B2 90 9A retf
///////////////////////////////////////////////////////////////////////////////
// Function: The partial code of hardware setting of SACM_A2000_Initial()
// or F_SACM_A2000_Initial:
// Note: The following functions are the partial code of original
// initial subroutine. (H/W setting part)
//
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -