📄 hardware.lst
字号:
00000589 00 00 .VAR R_InterruptStatus = 0 //
//////////////////////////////////////////////////
.DEFINE C_RampDelayTime 32
.DEFINE C_QueueSize 144
0000058A 00 00 .VAR R_Queue
0000058B 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
0000061A 00 00 .VAR R_ReadIndex
0000061B 00 00 .VAR R_WriteIndex
000097D2 .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:
000097D2 09 93 8A 05 r1 = R_Queue
000097D4 40 94 r2 = 0
L_ClearQueueLoop?:
000097D5 D1 D4 [r1++] = r2
000097D6 09 43 1A 06 cmp r1, R_Queue+C_QueueSize
000097D8 44 4E jne L_ClearQueueLoop?
000097D9 40 92 r1 = 0
000097DA 19 D3 1A 06 [R_ReadIndex] = r1
000097DC 19 D3 1B 06 [R_WriteIndex] = r1
000097DE 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:
000097DF 12 95 1A 06 r2 = [R_ReadIndex]
000097E1 12 45 1B 06 cmp r2,[R_WriteIndex]
000097E3 0D 5E je L_RQ_QueueEmpty
000097E4 0A 05 8A 05 r2 += R_Queue // get queue data address
000097E6 C2 92 r1 = [r2]
000097E7 12 95 1A 06 r2 = [R_ReadIndex]
000097E9 41 04 r2 += 1
000097EA 0A 45 90 00 cmp r2, C_QueueSize
000097EC 01 4E jne L_RQ_NotQueueBottom
000097ED 40 94 r2 = 0
L_RQ_NotQueueBottom:
000097EE 1A D5 1A 06 [R_ReadIndex] = r2
//r2 = 0x0000 // get queue data
000097F0 90 9A retf
L_RQ_QueueEmpty:
//r2 = 0x8000 // queue empty
000097F1 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:
000097F2 12 95 1A 06 r2 = [R_ReadIndex]
000097F4 12 45 1B 06 cmp r2,[R_WriteIndex]
000097F6 03 5E je L_RQ_QueueEmpty?
000097F7 0A 05 8A 05 r2 += R_Queue // get queue data index
000097F9 C2 92 r1 = [r2]
L_RQ_QueueEmpty?:
000097FA 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:
000097FB 12 95 1B 06 r2 = [R_WriteIndex] // put data to queue
000097FD 0A 05 8A 05 r2 += R_Queue
000097FF C2 D2 [r2] = r1
00009800 12 95 1B 06 r2 = [R_WriteIndex]
00009802 41 04 r2 += 1
00009803 0A 45 90 00 cmp r2, C_QueueSize
00009805 01 4E jne L_WQ_NotQueueBottom
00009806 40 94 r2 = 0
L_WQ_NotQueueBottom:
00009807 1A D5 1B 06 [R_WriteIndex] = r2
00009809 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 ...
0000980A 11 93 1A 06 r1 = [R_ReadIndex]
0000980C 11 43 1B 06 cmp r1,[R_WriteIndex]
0000980E 12 5E je L_TQ_QueueEmpty
//... Test Queue Full ...
0000980F 11 93 1A 06 r1 = [R_ReadIndex] // For N Queue Full: 1.R=0 and W=N-1 2. R<>0 and W=R-1
00009811 05 4E jnz L_TQ_JudgeCond2
00009812 11 93 1B 06 r1 = [R_WriteIndex]
00009814 09 43 8F 00 cmp r1, C_QueueSize-1 // Cond1
00009816 08 5E je L_TQ_QueueFull
L_TQ_JudgeCond2:
00009817 11 93 1A 06 r1 = [R_ReadIndex]
00009819 41 22 r1 -=1
0000981A 11 43 1B 06 cmp r1,[R_WriteIndex]
0000981C 02 5E je L_TQ_QueueFull
0000981D 40 92 r1 = 0 // not Full, not empty
0000981E 90 9A retf
L_TQ_QueueFull:
0000981F 41 92 r1 = 1 // full
00009820 90 9A retf
L_TQ_QueueEmpty:
00009821 42 92 r1 = 2 // empty
00009822 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)
//
// Ex: F_SACM_A2000_Initial:
// ...
// call F_SP_SACM_A2000_Init_ : S480/S240/MS01 is same
// ...
// retf
////////////////////////////////////////////////////////////////////////////////
F_SP_SACM_A2000_Init_:
00009823 40 92 r1=0x0000; // 24MHz, Fcpu=Fosc
00009824 19 D3 13 70 [P_SystemClock]=r1 // Frequency 20MHz
00009826 70 92 r1 = 0x0030 // TimerA CKA=Fosc/2 CKB=1 Tout:off
00009827 19 D3 0B 70 [P_TimerA_Ctrl] = r1 // Initial Timer A
00009829 09 93 00 FD r1 = 0xfd00 // 16K
0000982B 19 D3 0A 70 [P_TimerA_Data] = r1
0000982D 09 93 A8 00 r1 = 0x00A8 // Set the DAC Ctrl
0000982F 19 D3 2A 70 [P_DAC_Ctrl] = r1
00009831 09 93 FF FF r1 = 0xffff
00009833 19 D3 11 70 [P_INT_Clear] = r1 // Clear interrupt occuiped events
00009835 40 92 r1 =0x0000 //
00009836 11 93 89 05 r1 = [R_InterruptStatus] //
00009838 09 A3 00 20 r1 |= C_FIQ_TMA // Enable Timer A FIQ
//R1 |= C_IRQ4_1KHz
0000983A 19 D3 89 05 [R_InterruptStatus] = r1 //
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -