21 lines
279 B
Text
21 lines
279 B
Text
.ORIG 0x3000
|
|
|
|
LD R0,NUM
|
|
AND R1,R0,1
|
|
BRZ EVEN
|
|
|
|
LEA R0,ODD
|
|
BRNZP DISP
|
|
|
|
EVEN LEA R0,EVN
|
|
|
|
DISP PUTS
|
|
|
|
HALT
|
|
|
|
NUM .FILL 0x1C
|
|
|
|
EVN .STRINGZ "EVEN\n"
|
|
ODD .STRINGZ "ODD\n"
|
|
|
|
.END
|