URL https://opencores.org/ocsvn/ssbcc/ssbcc/trunk

Subversion Repositories ssbcc

[/] [ssbcc/] [trunk/] [core/] [9x8/] [peripherals/] [tb/] [open_drain/] [tb_open_drain.s] - Blame information for rev 6

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


; Copyright 2012, Sinclair R.F., Inc.
;
; Test bench for open_drain peripheral.
 
.main
 
  ; eat a few cycles
  ${2-1} :loop .jumpc(loop,1-) drop
 
  ; exercise the input and output port
  0x01 .outport(O_ENV)
  0xFF .outport(O_OD)
  0x55 .outport(O_OD)
  0x00 .outport(O_OD)
  0xAA .outport(O_OD)
  .inport(I_OD) 0xFF ^ .outport(O_OD)
  .inport(I_OD) <<msb .outport(O_OD)
  0xFF .outport(O_OD)
  0x00 .outport(O_ENV)
 
  ; end of test
  :infinite .jump(infinite)

Line No.	Rev	Author	Line
1	2	sinclairrf	`; Copyright 2012, Sinclair R.F., Inc.`
2			`;`
3			`; Test bench for open_drain peripheral.`
4
5			`.main`
6
7			`; eat a few cycles`
8			`${2-1} :loop .jumpc(loop,1-) drop`
9
10			`; exercise the input and output port`
11			`0x01 .outport(O_ENV)`
12			`0xFF .outport(O_OD)`
13			`0x55 .outport(O_OD)`
14			`0x00 .outport(O_OD)`
15			`0xAA .outport(O_OD)`
16			`.inport(I_OD) 0xFF ^ .outport(O_OD)`
17			`.inport(I_OD) <<msb .outport(O_OD)`
18			`0xFF .outport(O_OD)`
19			`0x00 .outport(O_ENV)`
20
21			`; end of test`
22			`:infinite .jump(infinite)`

Browse

Tools

Subversion Repositories ssbcc

[/] [ssbcc/] [trunk/] [core/] [9x8/] [peripherals/] [tb/] [open_drain/] [tb_open_drain.s] - Blame information for rev 6