REI53 START
LD GR0,A ; GR0にAの値を入れる
AND GR0,MASK ;マスク処理
JNZ KISUU ;結果が0でないときKISUU
OUT GU,LEN ;`偶数'の表示
JUMP FIN ;終了へ
KISUU OUT KI,LEN ;`奇数'の表示
FIN RET ;プログラム終了
A DC 1452
MASK DC #0001
KI DC 'KISUU '
GU DC 'GUUSUU'
LEN DC 6 ;表示する文字の数
END