我也找到了，實現了蔡勒公式，喜悅油然而生
;====單字節BCD碼轉16進制========
;--入口A,---出口A---
BCD_16H:
        MOV B,#10H ;分離十位和個位
        DIV AB
        MOV R1,B
        MOV B,#10
        MUL AB
        ADD A,R1
        RET

// BCD 碼 轉 十進制
#define BCD_TO_DECIMAL(x) ((((x) & 0xf0) >> 4) * 10 + ((x) & 0x0f))
// 十進制 轉 BCD 碼
#define DECIMAL_TO_BCD(x) ((((x) / 10) << 4) + ((x) % 10))

蔡勒公式計算方便，但是讀出的年月日都是BCD碼，還要轉換成16進制才能帶入公式計算吧，誰會BCDM碼轉16進制的方法思路

謝謝樓主，先收藏下。