CALL OUTL ; ↓
POP GR1 ; ↓
YNEXT OUT SEP,SLEN ; 区切り線を出力
LAD GR5,1,GR5 ; GR5 <- GR5 + 1
JUMP LOOPY ; LOOPYへジャンプ
WOV OUT YOMSG,YLEN ; オーバーフローした場合のメッセージを表示
CALL OUTL ; ↓
POP GR1 ; ↓
YNEXT OUT SEP,SLEN ; 区切り線を出力
LAD GR5,1,GR5 ; GR5 <- GR5 + 1
JUMP LOOPY ; LOOPYへジャンプ
WOV OUT YOMSG,YLEN ; オーバーフローした場合のメッセージを表示