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

11 lines
302B
Raw Blame History 

  1. CODE (n) ( number literal )

  2. PC ORG @ 0x25 + ! ( stable ABI JP )

  3.   ( Literal value to push to stack is next to (n) reference

  4.     in the atom list. That is where IP is currently pointing.

  5.     Read, push, then advance IP. )

  6.     E 0 IY+ LDrIXY,

  7.     D 1 IY+ LDrIXY,

  8.     IY INCd, IY INCd,

  9.     DE PUSH,

  10. ;CODE