- 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
|