collapseos/blk/018

( b r -- )
: OP2br
    CREATE C,
    DOES>
    0xcb A,
    C@              ( b r op )
    ROT             ( r op b )
    <<3             ( r op b<<3 )
    OR OR A,
;
0xc0 OP2br SET,
0x80 OP2br RES,
0x40 OP2br BIT,
Copy z80a.fs to disk blocks I don't remove z80a.fs yet because build process needs it, but that will change shortly. 2020-04-20 10:36:13 +10:00			`( b r -- )`
			`: OP2br`
			`CREATE C,`
			`DOES>`
			`0xcb A,`
			`C@ ( b r op )`
			`ROT ( r op b )`
			`<<3 ( r op b<<3 )`
			`OR OR A,`
			`;`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-28 12:01:56 +10:00			`0xc0 OP2br SET,`
			`0x80 OP2br RES,`
			`0x40 OP2br BIT,`