LOOPY CPA GR4,YCNT
JZE XNEXT
LD GR2,Y,GR4
LOOPY CPA GR4,YCNT
JZE XNEXT
LD GR2,Y,GR4
CALL OUTA
PUSH 0,GR1
LD GR1,GR2
CALL OUTA
PUSH 0,GR1
LD GR1,GR2
LD GR1,GR0
CALL OUTA
POP GR1
LD GR1,GR0
CALL OUTA
POP GR1
LAD GR4,1,GR4
JUMP LOOPY
WOV OUT YOMSG,YLEN
LAD GR4,1,GR4
JUMP LOOPY
WOV OUT YOMSG,YLEN