delay.s

来自「为苏州一家公司所做的的恒温恒湿车间控制 系统」· S 代码 · 共 15 行

//*------程序延时子程序(Delay)----------－－-----------*
//*功能：用程序方法延时，延时长度为4*5=20个时钟周期  *
//*入口：无                                            *
//*出口: 无                                            *
//*----------------------------------------------------*
_Delay::                              
       PSHA              //A进栈（保护寄存器A）
       //延时4*5=20个时钟周期             
       LDA #4           //循环次数
Delay_1: 
       NOP               //1个时钟周期
       NOP               //1个时钟周期
       DBNZA Delay_1     //3个时钟周期
       PULA              //A出栈(恢复A寄存器)          
     RTS