PC 0x1d - ORG @ 0x1b + ! ( next ) DI DX MOVxx, ( <-- IP ) DX INCx, DX INCx, DI [DI] MOVx[], ( wordref ) ( continue to execute ) lblexec BSET PC 0x36 - ORG @ 0x34 + ! ( DI -> wordref ) AL [DI] MOVr[], DI INCx, ( PFA ) AL AL ORrr, IFZ, DI JMPr, THEN, ( native ) ( continue to compiled ) PC 0x11 - ORG @ 0x0f + ! ( compiled -- DI -> PFA ) BP INCx, BP INCx, [BP] 0 DX MOV[]+x, ( pushRS ) DX DI MOVxx, DX INCx, DX INCx, ( --> IP ) DI [DI] MOVx[], JMPs, lblexec @ RPCs,