(1)　EPAR は，GR1 中の１であるビットの個数が全体として偶数となるように， GR1 のビット番号 15 にパリティビットを設定する。

すなわち，GR1 のビット番号 0 〜 14 の中で１であるビットの個数が 奇数ならば１を，偶数ならば 0 をビット番号 15 に設定する。

(2)　主プログラムは，GR1 のビット番号 0 〜 14 にビットデータ列を， ビット番号 15 に 0 を設定して EPAR を呼ぶ。

(3)　副プログラムから戻るとき，GR2 の内容は元に戻す。

EPAR  START
      PUSH   0,GR2
      ST     GR1,TMP
      LAD    GR2,0　; カウンタの初期化
LP1   PUSH   0,GR1
      AND    GR1,=1
      JZE    NCNT
      ADDL   GR2,=1
NCNT  POP    GR1
      SRL    GR1,1
      JNZ    LP1
      LD     GR1,TMP
      
      JZE    FIN
      OR     GR1,=#8000　;     　← α
FIN   POP    GR2
      RET
TMP   DS     1
      END

ア　AND GR1,=1　　　　イ　AND GR2,=1　　　　ウ　SLL GR1,1

エ　SLL GR2,1　　　　　オ　SRL GR1,1　　　　カ　SRL GR2,1

ア　#2010　　　　イ　#4020　　　　ウ　#5008　　　　エ　#A010

オ　#C020　　　　カ　#D008

ア　AND GR1,=#8000　　　　イ　OR GR1,=#4000

ウ　XOR GR1,=#8000　　　　エ　SLL GR1,1

オ　SRL GR1,1