URL
https://opencores.org/ocsvn/t400/t400/trunk
Subversion Repositories t400
[/] [t400/] [trunk/] [sw/] [verif/] [black_box/] [lqid/] [test.asm] - Rev 179
Compare with Previous | Blame | View Log
;; *******************************************************************;; $Id: test.asm 179 2009-04-01 19:48:38Z arniml $;;;; Checks the LQID and INL instruction.;;;; the cpu type is defined on asl's command lineorg 0x00clra;; preload reference datalbi 0, 0stii 0x0lbi 0, 9stii 0x1stii 0x2stii 0x3stii 0x4stii 0x5stii 0x6stii 0x7lbi 1, 0stii 0x8lbi 1, 9stii 0x9stii 0xastii 0xbstii 0xcstii 0xdstii 0xestii 0xfload MACRO addr, noaddlbi 2, 0stii addr & 0x0fclraIF noadd <> 1aisc (addr >> 4) & 0x0fENDIFlbi 2, 0lqidinlENDM;; enable Q output to Llei 0x4;;load read_block_0_55, 0lbi 0, 8 + 5skejmp faillbi 2, 0skejmp fail;;load read_block_0_aa, 0lbi 1, 0xaskejmp faillbi 2, 0skejmp fail;;load read_block_0_0f, 0lbi 1, 0xfskejmp faillbi 2, 0clraskejmp fail;;load read_block_0_f0, 0lbi 0, 0skejmp faillbi 2, 0clraaisc 0xfskejmp failjmp block_1;; -------------------------------------------------------------------;; Block 0 testdata;;org 0x064read_block_0_55:db 0x55org 0x071read_block_0_aa:db 0xaaorg 0x0a9read_block_0_0f:db 0x0forg 0x0ffread_block_0_f0:db 0xf0;; -------------------------------------------------------------------;; Block 1 testdata;;org 0x105read_block_1_68:db 0x68org 0x120read_block_1_b1:db 0xb1org 0x17eread_block_1_04:db 0x04org 0x1c2read_block_1_db:db 0xdborg 0x128block_1:;;load read_block_1_68, 1lbi 1, 0skejmp faillbi 2, 0clraaisc 0x6skejmp fail;;load read_block_1_b1, 0lbi 0, 8 + 1skejmp faillbi 2, 0clraaisc 0xbskejmp fail;;load read_block_1_04, 0lbi 0, 8 + 4skejmp faillbi 2, 0clraskejmp fail;;load read_block_1_db, 0lbi 1, 0xbskejmp faillbi 2, 0clraaisc 0xdskejmp failIF MOMCPUNAME <> "COP420"jmp passELSEIFjmp block_2ENDIForg 0x180include "pass_fail.asm"IF MOMCPUNAME = "COP420";; -------------------------------------------------------------------;; Block 2 testdata;;org 0x211read_block_2_34:db 0x34org 0x237read_block_2_91:db 0x91org 0x254read_block_2_89:db 0x89org 0x296read_block_2_3c:db 0x3corg 0x2b0block_2:;;load read_block_2_34, 0lbi 0, 8 + 4skejmp faillbi 2, 0clraaisc 0x3skejmp fail;;load read_block_2_91, 0lbi 0, 8 + 1skejmp faillbi 2, 0clraaisc 0x9skejmp fail;;load read_block_2_89, 0lbi 1, 9skejmp faillbi 2, 0clraaisc 0x8skejmp fail;;load read_block_2_3c, 0lbi 1, 0xcskejmp faillbi 2, 0clraaisc 0x3skejmp failjmp block_3;; -------------------------------------------------------------------;; Block 3 testdata;;org 0x300read_block_3_76:db 0x76org 0x34bread_block_3_33:db 0x33org 0x3a4read_block_3_e9:db 0xe9org 0x3e0read_block_3_9d:db 0x9dorg 0x350block_3:;;load read_block_3_76, 1lbi 0, 8 + 6skejmp faillbi 2, 0clraaisc 0x7skejmp fail;;load read_block_3_33, 0lbi 0, 8 + 3skejmp faillbi 2, 0clraaisc 0x3skejmp fail;;load read_block_3_e9, 0lbi 1, 9skejmp faillbi 2, 0clraaisc 0xeskejmp fail;;load read_block_3_9d, 0lbi 1, 0xdskejmp faillbi 2, 0clraaisc 0x9skejmp failjmp passENDIF