mirror of https://github.com/hsoft/collapseos.git
17 lines
559 B
Plaintext
17 lines
559 B
Plaintext
: OPrm CREATE C, DOES> C@ A, SWAP 3 LSHIFT OR A, ;
|
|
0x8a OPrm MOVr[], 0x8b OPrm MOVx[],
|
|
|
|
: OPrm+ ( r m off ) CREATE C, DOES>
|
|
C@ A, ROT 3 LSHIFT ROT OR 0x40 OR A, A, ;
|
|
0x8a OPrm+ MOVr[]+, 0x8b OPrm+ MOVx[]+,
|
|
|
|
: MOVri, SWAP 0xb0 OR A, A, ;
|
|
: MOVxI, SWAP 0xb8 OR A, A,, ;
|
|
: MOVsx, 0x8e A, SWAP 3 LSHIFT OR 0xc0 OR A, ;
|
|
: MOVxm, 0x8b A, SWAP 3 LSHIFT 0x6 OR A, A,, ;
|
|
: INT, 0xcd A, A, ;
|
|
: ADDAXI, 0x05 A, A,, ; : ADDALi, 0x04 A, A, ;
|
|
: SUBxi, 0x83 A, SWAP 0xe8 OR A, A, ;
|
|
: JMPr, 0xff A, 7 AND 0xe0 OR A, ;
|
|
: JMPf, ( seg off ) 0xea A, SPLITB A, A, A,, ;
|