mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-05 20:20:55 +11:00
8c452f5add
Not comparing strings yet. Without asm tooling support, it's a big chunk to swallow at once. It's progressing well!
14 lines
525 B
Plaintext
14 lines
525 B
Plaintext
: OP1 CREATE C, DOES> C@ A, ;
|
|
0xc3 OP1 RETn, 0xfa OP1 CLI, 0xfb OP1 STI,
|
|
0xf4 OP1 HLT, 0xfc OP1 CLD, 0xfd OP1 STD,
|
|
( no argument, jumps with relative addrs are special )
|
|
0xeb OP1 JMPs, 0xe9 OP1 JMPn, 0x74 OP1 JZ,
|
|
0x75 OP1 JNZ, 0xe8 OP1 CALLn,
|
|
0xf3 OP1 REPZ, 0xf2 OP1 REPNZ, 0xac OP1 LODSB,
|
|
0xa6 OP1 CMPSB, 0xa4 OP1 MOVSB, 0xae OP1 SCASB,
|
|
0xaa OP1 STOSB,
|
|
|
|
: OP1r CREATE C, DOES> C@ + A, ;
|
|
0x40 OP1r INCx, 0x48 OP1r DECx,
|
|
0x58 OP1r POPx, 0x50 OP1r PUSHx,
|