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

Subversion Repositories t48

[/] [t48/] [tags/] [rel_1_0/] [sw/] [verif/] [black_box/] [tim/] [int/] [test.asm] - Blame information for rev 339

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 Timer Interrupt.
5 
        ;; *******************************************************************
6 
 
7 
        INCLUDE "cpu.inc"
8 
        INCLUDE "pass_fail.inc"
9 
 
10 
        ORG     0
11 
        jmp     start
12 
        nop
13 
        jmp     fail
14 
        jmp     fail
15 
        jmp     timer_int
16 
        jmp     fail
17 
 
18 
        ;; Start of test
19 
start:  mov     a, #0F8H
20 
        mov     t, a
21 
        clr     a
22 
        mov     r0, a
23 
        mov     r1, a
24 
 
25 
        en      tcnti
26 
        jtf     fail
27 
 
28 
        strt    t
29 
 
30 
loop:   mov     a, r0
31 
        jnz     pass
32 
        djnz    r1, loop
33 
 
34 
fail:   FAIL
35 
 
36 
pass:   PASS
37 
 
38 
 
39 
timer_int:
40 
        mov     r0, #0FFH
41 
        retr

powered by: WebSVN 2.1.0

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