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

Subversion Repositories eus100lx

[/] [eus100lx/] [trunk/] [fpga/] [picoblaze-asm/] [basicpb.psm] - Blame information for rev 6

Details | Compare with Previous | View Log


             CONSTANT port, 04
 
             ;
start:       LOAD s2, FF                           ;initial output value
rep:         OUTPUT  s2, port
             LOAD    s0, 08                        ;delay size
      loop0: LOAD    sB, FF
      loop1: LOAD    sC, FF
      loop2: SUB     sC, 01
             JUMP    NZ, loop2
             SUB     SB, 01
             JUMP    NZ, loop1
             SUB     s0, 01                        ;delay loop
             JUMP    NZ, loop0
             XOR     s2, FF                        ;toggle waveform
             JUMP    rep                           ;repeat sequence
 
 

Line No.	Rev	Author	Line
1	4	freza	`CONSTANT port, 04`
2
3			`;`
4			`start: LOAD s2, FF ;initial output value`
5			`rep: OUTPUT s2, port`
6			`LOAD s0, 08 ;delay size`
7			`loop0: LOAD sB, FF`
8			`loop1: LOAD sC, FF`
9			`loop2: SUB sC, 01`
10			`JUMP NZ, loop2`
11			`SUB SB, 01`
12			`JUMP NZ, loop1`
13			`SUB s0, 01 ;delay loop`
14			`JUMP NZ, loop0`
15			`XOR s2, FF ;toggle waveform`
16			`JUMP rep ;repeat sequence`
17
18

Browse

Tools

Subversion Repositories eus100lx

[/] [eus100lx/] [trunk/] [fpga/] [picoblaze-asm/] [basicpb.psm] - Blame information for rev 6