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

Subversion Repositories t48

[/] [t48/] [tags/] [rel_0_3_beta/] [sw/] [verif/] [gp_sw/] [toggle/] [test.asm] - Blame information for rev 253

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

Line No. Rev Author Line
1 89 arniml 
        ;; *******************************************************************
2 
        ;; $Id: test.asm,v 1.1 2004-05-02 19:15:27 arniml Exp $
3 
        ;;
4 
        ;; Toggle P1[0]
5 
        ;; *******************************************************************
6 
 
7 
        INCLUDE "cpu.inc"
8 
        INCLUDE "pass_fail.inc"
9 
 
10 
        ORG     0
11 
 
12 
        mov     a, #0FFH
13 
 
14 
loop:   outl    p1, a
15 
        xrl     a, #001H
16 
 
17 
        mov     r1, #000H
18 
wait1:
19 
        mov     r0, #000H
20 
wait2:  djnz    r0, wait2
21 
        djnz    r1, wait1
22 
 
23 
        jmp     loop

powered by: WebSVN 2.1.0

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