mirror of
https://github.com/hsoft/collapseos.git
synced 2024-12-04 04:58:05 +11:00
8 lines
142 B
Plaintext
8 lines
142 B
Plaintext
( native words )
|
|
CODE EXECUTE 1 chkPS,
|
|
DI POPx, JMPn, lblexec @ RPCn,
|
|
CODE EXIT
|
|
DX [BP] 0 MOVx[]+, BP DECx, BP DECx, ( popRS )
|
|
;CODE
|
|
|