0787e45aee
Removed BGE/BLT as native instructions for the 65816. git-svn-id: svn://svn.cc65.org/cc65/trunk@4427 b7a2c559-68d2-44c3-8de9-860c34a00d81
46 lines
808 B
Plaintext
46 lines
808 B
Plaintext
|
|
; add - Add without carry
|
|
.macro add Arg1, Arg2
|
|
clc
|
|
.if .paramcount = 2
|
|
adc Arg1, Arg2
|
|
.else
|
|
adc Arg1
|
|
.endif
|
|
.endmacro
|
|
|
|
; sub - subtract without borrow
|
|
.macro sub Arg1, Arg2
|
|
sec
|
|
.if .paramcount = 2
|
|
sbc Arg1, Arg2
|
|
.else
|
|
sbc Arg1
|
|
.endif
|
|
.endmacro
|
|
|
|
; bge - jump if unsigned greater or equal
|
|
.macro bge Arg
|
|
bcs Arg
|
|
.endmacro
|
|
|
|
; blt - Jump if unsigned less
|
|
.macro blt Arg
|
|
bcc Arg
|
|
.endmacro
|
|
|
|
; bgt - jump if unsigned greater
|
|
.macro bgt Arg
|
|
.local L
|
|
beq L
|
|
bcs Arg
|
|
L:
|
|
.endmacro
|
|
|
|
; ble - jump if unsigned less or equal
|
|
.macro ble Arg
|
|
beq Arg
|
|
bcc Arg
|
|
.endmacro
|
|
|