MPL Bytecode Compiler Code

12 lines (8 with data), 232 Bytes

;LIBHDR;LIBSTR

MYSTR="   THIS IS AN EXAMPLE OF MPL PARSING USING STRARG 10 20 NUMB123   "

MAIN(;S%40,SS,I) [
  I=0; SS=STRARG(S$,MYSTR$,1); %S$ @ [
    WRITEF("%I2: '%S'*N", ++I, S$);
    SS=STRARG(S$,MYSTR$,SS)
  ]
]