%begin
%integer a,b
  ! 6809 opcode
  *tfr_1,a,b,3,4
%endofprogram