izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
1
Fork 0
Code Issues 0 Releases 0 Wiki Activity
Mirror of CollapseOS
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1454 Commits
4 Branches
13MB
Tree: 5705cd5c31
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '5705cd5c31'
${ noResults }
collapseos/blk/812

14 lines
367B
Raw Blame History 

  1. ( native words )

  2. CODE EXECUTE 1 chkPS,

  3.     DI POPx, JMPn, lblexec @ RPCn,

  4. CODE EXIT

  5. PC 0x0f - ORG @ 0x0d + ! ( stable abi )

  6.     DX [BP] 0 MOVx[]+, BP DECx, BP DECx, ( popRS )

  7. ;CODE

  8. CODE (s) ( string literal, see B287 )

  9. PC 0x2f - ORG @ 0x2d + ! ( stable abi )

  10.     DI DX MOVxx, ( IP )

  11.     AH AH XORrr, AL [DI] MOVr[], ( slen )

  12.     DX PUSHx, DX INCx, DX AX ADDxx,

  13. ;CODE