dolphin/Source/DSPSpy/tests/arith_test.ds
nakeee 90ae2a8e55 fixed neg and added arith test
git-svn-id: https://dolphin-emu.googlecode.com/svn/trunk@3140 8ced0084-cf51-0410-be5f-012b33b47a6e
2009-05-02 22:47:13 +00:00

151 lines
1.5 KiB
Plaintext

; various arithmetic tests
incdir "tests"
include "dsp_base.inc"
set40
clr $acc0
tst $acc0
call send_back ; 1
clr $acc1
tst $acc1
call send_back ; 2
set16
tst $acc0
set40
call send_back ; 3
lri $ac0.h, #0x1111
lri $ac0.m, #0x0100
lri $ac0.l, #0x0001
lsl $acc0, #1
call send_back ; 4
lri $ac0.h, #0x1111
lri $ac0.m, #0x0100
lri $ac0.l, #0x0001
asl $acc0, #1
call send_back ; 5
clr $acc0
lri $ac0.h, #0x1111
tst $acc0
call send_back ; 6
lri $ac0.m, #0x0100
tst $acc0
call send_back ; 7
lri $ac0.l, #0x0001
tst $acc0
call send_back ; 8
clr $acc0
lri $ac0.l, #-1
tst $acc0
call send_back ; 9
clr $acc0
set16
lri $ac0.l, #-1
tst $acc0
set40
call send_back ; 10
clr $acc0
lri $ac0.h, #0x1000
tst $acc0
call send_back ; 11
clr $acc0
lri $ac0.h, #0x0100
tst $acc0
call send_back ; 12
clr $acc0
lri $ac0.h, #0x0010
tst $acc0
call send_back ; 13
clr $acc0
lri $ac0.h, #0x0001
tst $acc0
call send_back ; 14
clr $acc0
lri $ac0.l, #0x1000
tst $acc0
call send_back ; 15
clr $acc0
lri $ac0.l, #0x0100
tst $acc0
call send_back ; 16
clr $acc0
lri $ac0.l, #0x0010
tst $acc0
call send_back ; 17
clr $acc0
lri $ac0.l, #0x0001
tst $acc0
call send_back ; 18
clr $acc0
clr $acc1
lri $ac0.l, #0x0001
sub $acc1, $acc0
call send_back ; 19
clr $acc0
clr $acc1
set16
lri $ac0.l, #0x0001
sub $acc1, $acc0
set40
call send_back ; 20
clr $acc0
clr $acc1
lri $ac0.l, #0x0001
lri $ac1.h, #0x8000
sub $acc1, $acc0
call send_back ; 21
clr $acc0
clr $acc1
set16
lri $ac0.l, #0x0001
lri $ac1.h, #0x8000
sub $acc1, $acc0
set40
call send_back ; 22