SixtyPical/eg/compare.60pical

reserve byte m_high
reserve byte m_low
reserve byte n_high
reserve byte n_low

routine compare_16_bit {
    lda m_high
    cmp n_high
    if beq {
        lda m_low
        cmp n_low
    } else {
    }
}

routine compare_16_bit {
    lda >m
    cmp >n
    if beq {
        lda <m
        cmp <n
    } else {
    }
}