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

15 lines
584B
Raw Blame History 

  1. ( cont. find ) JNZ, AGAIN, ( loop )

  2.     SI DECx, SI PUSHx, AX AX XORrr, AX PUSHx,

  3. ;CODE

  4. CODE 0 AX AX XORxx, AX PUSHx, ;CODE

  5. CODE 1 AX 1 MOVxI, AX PUSHx, ;CODE

  6. CODE -1 AX -1 MOVxI, AX PUSHx, ;CODE

  7. CODE 1+ 1 chkPS, DI SP MOVxx, [DI] INC[w], ;CODE

  8. CODE 1- 1 chkPS, DI SP MOVxx, [DI] DEC[w], ;CODE

  9. CODE 2+ 1 chkPS, DI SP MOVxx, [DI] INC[w], [DI] INC[w], ;CODE

  10. CODE 2- 1 chkPS, DI SP MOVxx, [DI] DEC[w], [DI] DEC[w], ;CODE

  11. CODE RSHIFT ( n u -- n ) 2 chkPS,

  12.     CX POPx, AX POPx, AX SHRxCL, AX PUSHx, ;CODE

  13. CODE LSHIFT ( n u -- n ) 2 chkPS,

  14.     CX POPx, AX POPx, AX SHLxCL, AX PUSHx, ;CODE