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

Subversion Repositories t48

[/] [t48/] [tags/] [rel_0_2_beta/] [sw/] [verif/] [black_box/] [anl/] [pp/] [test.asm] - Blame information for rev 292

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 12 arniml 
        ;; *******************************************************************
2 
        ;; $Id: test.asm,v 1.1.1.1 2004-03-25 22:29:17 arniml Exp $
3 
        ;;
4 
        ;; Test ANL Pp, data.
5 
        ;; *******************************************************************
6 
 
7 
        INCLUDE "cpu.inc"
8 
        INCLUDE "pass_fail.inc"
9 
 
10 
        ORG     0
11 
 
12 
        ;; Start of test
13 
        mov     a, #0FFH
14 
        outl    p1, a
15 
        outl    p2, a
16 
 
17 
        clr     a
18 
        in      a, p1
19 
        inc     a
20 
        jnz     fail
21 
 
22 
        in      a, p2
23 
        inc     a
24 
        jnz     fail
25 
 
26 
        anl     P1, #0AAH
27 
        jnz     fail
28 
        anl     P2, #055H
29 
        jnz     fail
30 
 
31 
        in      a, p1
32 
        add     a, #056H
33 
        jnz     fail
34 
 
35 
        in      a, p2
36 
        add     a, #0ABH
37 
        jnz     fail
38 
 
39 
pass:   PASS
40 
 
41 
fail:   FAIL

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.