NAME    GETSIZE
        ENTRY   GETSIZE
GETSIZE PUSH    IX
        POP     H
        EXX
        PUSH    H
        EXX
        POP     D
        ORA     A
        DSBC    D
        XCHG
        RET
        END