URL https://opencores.org/ocsvn/t48/t48/trunk

Subversion Repositories t48

[/] [t48/] [tags/] [rel_1_1/] [sw/] [verif/] [black_box/] [movx/] [test.asm] - Blame information for rev 289

Go to most recent revision | Details | Compare with Previous | View Log


        ;; *******************************************************************
        ;; $Id: test.asm,v 1.2 2004-05-17 14:42:09 arniml Exp $
        ;;
        ;; Test MOVX A, @ Rr for RB0.
        ;; *******************************************************************
 
        INCLUDE "cpu.inc"
        INCLUDE "pass_fail.inc"
 
        ORG     0
 
        ;; Start of test
        mov     r0, #0FEH
fill_loop1:
        mov     a, r0
        movx    @r0, a
        djnz    r0, fill_loop1
 
        ;; check memory
        mov     a, r0
        jnz     fail
        mov     r0, #0FEH
        mov     r1, #002H
check_loop1:
        clr     a
        movx    a, @r1
        add     a, r0
        jnz     fail
        inc     r1
        dec     r0
        mov     a, r0
        dec     a
        jnz     check_loop1
 
 
 
        mov     r1, #0FEH
        mov     a, #002H
fill_loop2:
        movx    @r1, a
        inc     a
        djnz    r1, fill_loop2
 
        ;; check memory
        mov     a, r1
        jnz     fail
        mov     r0, #0FEH
check_loop2:
        clr     a
        movx    a, @r0
        add     a, r0
        jnz     fail
        dec     r0
        mov     a, r0
        dec     a
        jnz     check_loop2
 
pass:   PASS
 
fail:   FAIL

Line No.	Rev	Author	Line
1	12	arniml	`;; *******************************************************************`
2	102	arniml	`;; $Id: test.asm,v 1.2 2004-05-17 14:42:09 arniml Exp $`
3	12	arniml	`;;`
4			`;; Test MOVX A, @ Rr for RB0.`
5			`;; *******************************************************************`
6
7			`INCLUDE "cpu.inc"`
8			`INCLUDE "pass_fail.inc"`
9
10			`ORG 0`
11
12			`;; Start of test`
13	102	arniml	`mov r0, #0FEH`
14	12	arniml	`fill_loop1:`
15			`mov a, r0`
16			`movx @r0, a`
17			`djnz r0, fill_loop1`
18
19			`;; check memory`
20			`mov a, r0`
21			`jnz fail`
22	102	arniml	`mov r0, #0FEH`
23			`mov r1, #002H`
24	12	arniml	`check_loop1:`
25	102	arniml	`clr a`
26	12	arniml	`movx a, @r1`
27			`add a, r0`
28			`jnz fail`
29	102	arniml	`inc r1`
30	12	arniml	`dec r0`
31	102	arniml	`mov a, r0`
32			`dec a`
33	12	arniml	`jnz check_loop1`
34
35
36
37	102	arniml	`mov r1, #0FEH`
38			`mov a, #002H`
39	12	arniml	`fill_loop2:`
40			`movx @r1, a`
41			`inc a`
42			`djnz r1, fill_loop2`
43
44			`;; check memory`
45	102	arniml	`mov a, r1`
46	12	arniml	`jnz fail`
47	102	arniml	`mov r0, #0FEH`
48	12	arniml	`check_loop2:`
49	102	arniml	`clr a`
50	12	arniml	`movx a, @r0`
51			`add a, r0`
52			`jnz fail`
53	102	arniml	`dec r0`
54			`mov a, r0`
55			`dec a`
56			`jnz check_loop2`
57	12	arniml
58			`pass: PASS`
59
60			`fail: FAIL`

Browse

Tools

Subversion Repositories t48

[/] [t48/] [tags/] [rel_1_1/] [sw/] [verif/] [black_box/] [movx/] [test.asm] - Blame information for rev 289