- JOV DYOV ; オーバーフローの場合は、DYOVにジャンプ
- JUMP DSL ; ループ終端
-DYOV SRL GR2,1
- LAD GR2,#8000,GR2
- SRL GR4,1
- JUMP DLPIN
-DLOOP SRL GR4,1 ; ループ先頭。GR4を1回右シフト
- JZE DCP ; (GR4 = 0)の場合、ループ脱出
+ JOV YOV ; オーバーフローの場合は、YOVへジャンプ
+ JUMP SL ; ループ終端
+YOV LD GR2,TMP ; GR2の値をTMPから復元
+ SRL GR4,1 ; GR4を1回右シフト
+ JUMP LPIN ; LPINへジャンプ
+LOOP SRL GR4,1 ; ループ先頭。GR4を1回右シフト
+ JZE SETMOD ; (GR4 = 0)の場合、SETMODへループ脱出