1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-27 23:18:06 +11:00
collapseos/blk/752

9 lines
189 B
Plaintext
Raw Normal View History

( Splits word into msb/lsb, lsb being on TOS )
: SPLITB
256 /MOD SWAP
;
2020-06-13 04:01:24 +10:00
: PC H@ ORG @ - BIN( @ + ;
2020-06-13 00:49:27 +10:00
: A, C, ;
( dst8 src8 -- modrm )
: MODRMrr 0x7 AND 3 LSHIFT SWAP 0x7 AND OR 0xc0 OR ;