[分享]通话详单原代码

ZiHwA

;如果使用系统函数，可以有效减小本程序大小
;由于没有时间，只进行了简单注释
;For M55C v11

$Segmented
$Mod167

MAIN_Address            EQU 0x551A00
CreateFile                EQU 0xB05BAE

rom                section        code word at MAIN_Address
procrom        proc
                sub        r0, #30h ; '0'
                mov        r15, r0
                mov        [-r0], r14
                mov        [-r0], r13
                mov        [-r0], r12
                extp    #8, #1
                mov     r1, 0B08h
                jmpr        cc_NZ, loc_cont0
                extp        #7, #2
                mov        3c02h, r1  ; 1FC02h
                mov        3c04h, r1  ; 1FC04h
loc_cont0:
                extp        #0Dh, #4
                movb        rl4, 25c8h ;min
                movb        rh4, 25cah ;hour
                movb        rl5, 25cch ;day
                movb        rh5, 25ceh ;month
                extp        #7, #2
                mov        r14, 3c02h        ; 1F3C2h, 状态字  
                mov        r1, 33deh         ; 1F3DEh, 状态字     
                jmpr        cc_Z, loc_DM  ;1F3DE=0 jmpr M, if 1F3C2h> jmpr D
                cmp        r14, #6
                jmpr        cc_NC, loc_O ;1F3DE>6 jmpr O
loc_I:
                movb        rl1, #49h ; 'I'已接
                jmpr        cc_UC, loc_cont1
loc_DM:       
                cmp        r14,#6
                jmpr        cc_C, loc_M ;1F3C2h