INOUT START
AGN  IN BUF,LEN
  LD GR1,LEN
  JZE FIN
  OUT BUF,LEN
  JUMP AGN
FIN  RET
LEN DS 1
BUF DS 150
  END
