URL
https://opencores.org/ocsvn/t48/t48/trunk
Subversion Repositories t48
[/] [t48/] [tags/] [rel_0_2_beta/] [sw/] [verif/] [black_box/] [anl/] [a_data/] [test.asm] - Rev 292
Compare with Previous | Blame | View Log
;; *******************************************************************
;; $Id: test.asm,v 1.1.1.1 2004-03-25 22:29:17 arniml Exp $
;;
;; Test ANL A, data.
;; *******************************************************************
INCLUDE "cpu.inc"
INCLUDE "pass_fail.inc"
ORG 0
;; Start of test
mov a, #0FFH
anl a, #000H
jnz fail
anl a, #000H
jnz fail
mov a, #0FFH
anl a, #055H
add a, #0ABH
jnz fail
mov a, #0FFH
anl a, #0B6H
anl a, #023H
add a, #0DEH
jnz fail
pass: PASS
fail: FAIL