exec$ = "PRINT ""Hello world!"""
      bbc$ = FNtokenise(exec$)

      tmpfile$ = @tmp$+"temp.bbc"
      tmpfile% = OPENOUT(tmpfile$)
      BPUT#tmpfile%, bbc$+CHR$0
      CLOSE #tmpfile%

      CALL tmpfile$
      END

      DEF FNtokenise(A$)
      LOCAL A%
      A% = EVAL("0:"+A$)
      A$ = $(!332+2)
      = CHR$(LENA$+4) + CHR$0 + CHR$0 + A$ + CHR$13