给我一个在清翔89c51的代码，要求数码管显示22621653，一秒后显示36345689，一直循环

在清翔89C51单片机上实现数码管动态显示数字序列，并通过定时器实现一秒切换，你需要编写汇编语言程序。下面是一个基本的示例，假设使用了共阴极数码管并已配置好了相应的IO口控制。请注意，实际电路连接和细节可能会有所不同，这里简化了说明。

; 首先定义全局变量存储当前显示的数
NUM1 DB 0x22, 0x62, 0x16, 0x53 ; 数字串1
NUM2 DB 0x36, 0x34, 0x56, 0x89 ; 数字串2

; 定义定时器初始化
TIMER_INIT PROC
    MOV TMOD, #0x01 ; 设置定时器工作模式1，16位计数
    SETB TR0       ; 启动定时器T0
    MOV TH0, #0xFD ; 计数值设为15.9375ms（即1s / 64）
    MOV TL0, #0xFD
TIMER_INIT ENDP

; 数码管显示函数
DISPLAY PROC
    MOV P1, #0x00   ; 清屏
    MOV A, NUM1     ; 取当前数字串的第一个数字
    MOV DPTR, #0x20 ; 数码管地址区开始位置
display_loop:
    MOVX @DPTR, A   ; 写入A到P0~P3
    INC DPTR        ; 下一位
    DJNZ A, display_loop ; 如果A非零，继续下一个数字

    MOV A, #0x01    ; 显示延时
delay_loop:
    DJNZ A, delay_loop
    RET            ; 返回
DISPLAY ENDP

main LOOP:
    CALL TIMER_INIT  ; 初始化定时器
    CALL DISPLAY     ; 显示第一个数字串
    MOV A, #0x00    ; 等待一秒钟
    delay_loop2:
        DJNZ A, delay_loop2
    JMP LOOP         ; 到下一次显示
LOOP ENDP
END main