.text
.globl _start
_start:
        mov r1, $101
        lsr r1, $2
        movcc r0, $0            // if carry is clear (even) - return 0
        movcs r0, $1            // else (odd) - return 1

        mov r7, $1
        swi $0