lblnext BSET PC 0x1d - ORG @ 0x1b + ! ( next ) ( ovfl check ) BP SP CMPxx, IFNC, ( BP >= SP ) SP PS_ADDR MOVxI, BP RS_ADDR MOVxI, DI 0x13 ( oflw ) MOVxm, JMPs, L1 FWRs ( execute ) THEN, DI DX MOVxx, ( <-- IP ) DX INCx, DX INCx, DI [DI] MOVx[], ( wordref ) ( continue to execute ) L1 FSET