内部RAM从20H单元开始存放有压缩BCD码，以函数形式编程，将其转换为真值赋给变量value，压缩BCD码的长度（最大4字节）保存在30H单元中。BCD码的长度存放在20H单元中。

以下是基于8051指令集的汇编代码实现：

MOV A, 30H     ; 将BCD码长度读入寄存器A
MOV R1, #0     ; 将计数器清零
MOV R2, #0     ; 将转换后的真值的高字节清零
MOV R3, #0     ; 将转换后的真值的低字节清零
MOV R4, #0     ; 将转换后的真值清零
MOV R5, #0     ; 将转换后的真值的符号位清零

LOOP:
    MOV A, @R0   ; 从内部RAM读取BCD码
    INC R0       ; 指向下一个BCD码
    ADD A, A     ; 将BCD码乘以2
    ADDC A, R2   ; 加上高字节
    MOV R2, A    ; 保存新的高字节
    MOV A, @R0   ; 读取下一个BCD码
    INC R0       ; 指向下一个BCD码
    ADD A, A     ; 将BCD码乘以2
    ADDC A, R3   ; 加上低字节
    MOV R3, A    ; 保存新的低字节
    INC R1       ; 计数器加1
    CJNE R1, 4, LOOP ; 如果还没读完4个字节，则继续循环

    MOV A, R2    ; 将高字节移到正确位置
    MOV R4, A
    MOV A, R3    ; 将低字节移到正确位置
    MOV R5, A

    JB 20H.7, POSITIVE ; 如果BCD码的符号位为1，则表示是负数
    MOV A, #0        ; 如果BCD码的符号位为0，则表示是正数
    JMP DONE

POSITIVE:
    MOV A, #1        ; 如果BCD码的符号位为1，则表示是负数
    CPL R4           ; 取反高字节
    CPL R5           ; 取反低字节
    ADD A, #1        ; 将符号位设置为1
    MOV R4, A        ; 保存符号位和高字节
    MOV A, R5        ; 保存低字节
    MOV R5, #0       ; 将低字节清零

DONE:
    MOV value, R4    ; 将转换后的真值保存到变量value中
    MOV value+1, R5

上述代码的思路是：先读取BCD码的每个字节，然后将其乘以2，并加上之前转换的高字节或低字节，最后将得到的结果保存到新的高字节或低字节中。循环4次后，将得到完整的转换后的真值。如果符号位为1，则将转换后的真值取反并加上符号位。最后，将转换后的真值保存到变量value中。