📄 hardware.lst
字号:
0000926C 09 23 40 00 r1 -= 0x40;
0000926E 19 D3 17 70 [P_DAC1] = r1;
00009270 4A 4E jnz L_RD_Loop;
L_RD_End:
00009271 90 90 pop r1,r2 from [sp];
00009272 90 9A retf;
.ENDP
///////////////////////////////////////
_SP_RampUpDAC2: .PROC
F_SP_RampUpDAC2:
00009273 90 D4 push r1,r2 to [sp];
00009274 11 93 16 70 r1=[P_DAC2];
00009276 09 B3 C0 FF r1 &= ~0x003f;
00009278 09 43 00 80 cmp r1,0x8000
0000927A 0E 0E jb L_RU_NormalUp_;
0000927B 5D 5E je L_RU_End;
L_RU_DownLoop_:
0000927C 40 F0 A9 92 call F_Delay;
0000927E 41 94 r2 = 0x0001;
0000927F 1A D5 12 70 [P_Watchdog_Clear] = r2;
00009281 09 23 40 00 r1 -= 0x40;
00009283 19 D3 16 70 [P_DAC2] = r1;
00009285 09 43 00 80 cmp r1,0x8000;
00009287 4C 4E jne L_RU_DownLoop_;
L_RD_DownEnd_:
00009288 0C EE jmp L_RU_End_;
L_RU_NormalUp_:
L_RU_Loop_:
00009289 40 F0 A9 92 call F_Delay;
0000928B 41 94 r2 = 0x0001;
0000928C 1A D5 12 70 [P_Watchdog_Clear] = r2;
0000928E 09 03 40 00 r1 += 0x40;
00009290 19 D3 16 70 [P_DAC2] = r1;
00009292 09 43 00 80 cmp r1, 0x8000;
00009294 4C 4E jne L_RU_Loop_;
L_RU_End_:
00009295 90 90 pop r1,r2 from [sp];
00009296 90 9A retf;
.ENDP
///////////////////////////////////////
_SP_RampDnDAC2: .PROC
F_SP_RampDnDAC2:
//int off;
00009297 90 D4 push r1,r2 to [sp];
00009298 11 93 16 70 r1 = [P_DAC2];
0000929A 09 B3 C0 FF r1 &= ~0x003F;
0000929C 0A 5E jz L_RD_End_;
L_RD_Loop_:
0000929D 40 F0 A9 92 call F_Delay;
0000929F 41 94 r2 = 0x0001;
000092A0 1A D5 12 70 [P_Watchdog_Clear] = r2;
000092A2 09 23 40 00 r1 -= 0x40;
000092A4 19 D3 16 70 [P_DAC2] = r1;
000092A6 4A 4E jnz L_RD_Loop_;
L_RD_End_:
000092A7 90 90 pop r1,r2 from [sp];
000092A8 90 9A retf;
.ENDP
////////////////////////////////////////
F_Delay:
000092A9 88 D2 push r1 to [sp];
000092AA 48 92 r1 = 8;
L_D_Loop:
000092AB 41 22 r1 -= 1;
000092AC 42 4E jnz L_D_Loop;
000092AD 88 90 pop r1 from [sp];
000092AE 90 9A retf;
///////////////////////////////////////////
// Function: Initial Queue
// Destory: R1,R2
///////////////////////////////////////////
F_SP_InitQueue:
000092AF 09 93 A6 01 R1 = R_Queue;
000092B1 40 94 R2 = 0;
L_ClearQueueLoop:
000092B2 D1 D4 [R1++] = R2;
000092B3 09 43 D8 01 cmp R1, R_Queue+C_QueueSize;
000092B5 44 4E jne L_ClearQueueLoop;
000092B6 40 92 R1 = 0;
000092B7 19 D3 D8 01 [R_ReadIndex] = R1;
000092B9 19 D3 D9 01 [R_WriteIndex] = R1;
000092BB 90 9A retf;
///////////////////////////////////////////
// Function: Get a data form Queue
// Output: R1: Data
// R2: return value
// Destory: R1,R2
///////////////////////////////////////////
F_SP_ReadQueue:
000092BC 12 95 D8 01 R2 = [R_ReadIndex];
000092BE 12 45 D9 01 cmp R2,[R_WriteIndex];
000092C0 0C 5E je L_RQ_QueueEmpty;
000092C1 0A 05 A6 01 R2 += R_Queue; // get queue data address
000092C3 C2 92 R1 = [R2];
000092C4 12 95 D8 01 R2 = [R_ReadIndex];
000092C6 41 04 R2 += 1;
000092C7 72 44 cmp R2, C_QueueSize;
000092C8 01 4E jne L_RQ_NotQueueBottom;
000092C9 40 94 R2 = 0;
L_RQ_NotQueueBottom:
000092CA 1A D5 D8 01 [R_ReadIndex] = R2;
//r2 = 0x0000; // get queue data
000092CC 90 9A retf;
L_RQ_QueueEmpty:
//r2 = 0x8000; // queue empty
000092CD 90 9A retf;
///////////////////////////////////////////
// Function: Put a data to Queue
// R1: Input
// Destory: R1,R2,R3
///////////////////////////////////////////
F_SP_WriteQueue:
000092CE 12 95 D9 01 R2 = [R_WriteIndex]; // put data to queue
000092D0 0A 05 A6 01 R2 += R_Queue;
000092D2 C2 D2 [R2] = R1;
000092D3 12 95 D9 01 R2 = [R_WriteIndex];
000092D5 41 04 R2 += 1;
000092D6 72 44 cmp R2, C_QueueSize;
000092D7 01 4E jne L_WQ_NotQueueBottom;
000092D8 40 94 R2 = 0;
L_WQ_NotQueueBottom:
000092D9 1A D5 D9 01 [R_WriteIndex] = R2;
000092DB 90 9A retf;
//..........................................
F_SP_TestQueue:
//... Test Queue Empty ...
000092DC 11 93 D8 01 R1 = [R_ReadIndex];
000092DE 11 43 D9 01 cmp R1,[R_WriteIndex];
000092E0 11 5E je L_TQ_QueueEmpty;
//... Test Queue Full ...
000092E1 11 93 D8 01 R1 = [R_ReadIndex]; // For N Queue Full: 1. W=R-1 2.R=0/W=N-1
000092E3 04 4E jnz L_TQ_JudgeCond2;
000092E4 11 93 D9 01 R1 = [R_WriteIndex];
000092E6 71 42 cmp R1, C_QueueSize-1; // Cond1
000092E7 08 5E je L_TQ_QueueFull;
L_TQ_JudgeCond2:
000092E8 11 93 D8 01 R1 = [R_ReadIndex];
000092EA 41 22 R1 -=1;
000092EB 11 43 D9 01 cmp R1,[R_WriteIndex];
000092ED 02 5E je L_TQ_QueueFull;
000092EE 40 92 r1 = 0; // not Full, not empty
000092EF 90 9A retf;
L_TQ_QueueFull:
000092F0 41 92 r1 = 1; // full
000092F1 90 9A retf;
L_TQ_QueueEmpty:
000092F2 42 92 r1 = 2; // empty
000092F3 90 9A retf;
//.........................................
//////////////////////////////////////////////////////
// SACM_GetResource(Address,Page,offset);
//////////////////////////////////////////////////////
_SP_GetResource: .PROC
000092F4 88 DA push bp to [sp];
000092F5 08 0B 01 00 bp = sp + 1;
//push r2 to [sp];
000092F7 03 92 r1 = [bp+3]; // address
000092F8 04 94 r2 = [bp+4]; // bank
000092F9 5A 95 r2 = r2 lsl 4;
000092FA 5A 95 r2 = r2 lsl 4;
000092FB 4A 95 r2 = r2 lsl 2;
000092FC 7F BC sr &= 0x03f;
000092FD 06 A5 r2 |=sr;
000092FE 02 9D sr = r2;
000092FF E1 92 r1 = D:[r1];
//pop r2 from [sp];
00009300 88 98 pop bp from [sp];
00009301 90 9A retf;
.ENDP
_SP_Delay: .PROC
F_SP_Delay:
00009302 90 9A retf;
.ENDP
//========================================================================================
// End of hardware.asm
//========================================================================================
0 error(s), 0 warning(s).
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -