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

Subversion Repositories t48

[/] [t48/] [tags/] [rel_0_6__beta/] [sw/] [verif/] [black_box/] [orl/] [pp/] [test.asm] - Blame information for rev 333

Go to most recent revision | 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:18 arniml Exp $
3
        ;;
4
        ;; Test ORL 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, #000H
14
        outl    p1, a
15
        outl    p2, a
16
 
17
        cpl     a
18
        in      a, p1
19
        jnz     fail
20
 
21
        cpl     a
22
        in      a, p2
23
        jnz     fail
24
 
25
        orl     P1, #0AAH
26
        jnz     fail
27
        orl     P2, #055H
28
        jnz     fail
29
 
30
        in      a, p1
31
        add     a, #056H
32
        jnz     fail
33
 
34
        in      a, p2
35
        add     a, #0ABH
36
        jnz     fail
37
 
38
pass:   PASS
39
 
40
fail:   FAIL

powered by: WebSVN 2.1.0

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