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.
1536 Commits
4 Branches
13MB
Tree: b21be43535
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'b21be43535'
${ noResults }
collapseos/blk/037

16 lines
506B
Raw Blame History 

  1. : OPrm CREATE C, DOES> C@ A, SWAP 3 LSHIFT OR A, ;

  2. 0x8a OPrm MOVr[],    0x8b OPrm MOVx[],

  3. 0x3a OPrm CMPr[],    0x3b OPrm CMPx[],

  4. 

  5. : OPmr CREATE C, DOES> C@ A, 3 LSHIFT OR A, ;

  6. 0x88 OPmr MOV[]r,    0x89 OPmr MOV[]x,

  7. 

  8. : OPrm+ ( r m off ) CREATE C, DOES>

  9.     C@ A, ROT 3 LSHIFT ROT OR 0x40 OR A, A, ;

  10. 0x8a OPrm+ MOVr[]+,    0x8b OPrm+ MOVx[]+,

  11. 0x3a OPrm+ CMPr[]+,    0x3b OPrm+ CMPx[]+,

  12. 

  13. : OPm+r ( m off r ) CREATE C, DOES>

  14.     C@ A, 3 LSHIFT ROT OR 0x40 OR A, A, ;

  15. 0x88 OPm+r MOV[]+r,    0x89 OPm+r MOV[]+x,