summaryrefslogtreecommitdiff
path: root/gas/testsuite/gas/h8300/ffxx1.s
blob: 53fc84160d407fc247f81bf3056fff05e10a0899 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
	.equ    p6ddr,  0xffb9          ;0x7f for output 
	.equ    p6dr,    0xffbb
	.equ    seed,    0x01
	.text
	.org    0
reset:  .word   main            ;reset vector 
;
	.org    0x400
main:   mov.b   #0x7f,r0l       ;port 6 ddr = 7F 
	mov.b   @0xffbb:8,r0l   ;***test***
	mov.b   r0l,@p6ddr:16
;
	mov.b   #seed,r0l       ;start with 0000001
loop:   mov.b   r0l,@p6dr:16    ;output to port 6 
delay:  mov.w   #0x0000,r1
deloop: adds.w  #1,r1
	bne     deloop:8        ;not = 0
	rotl    r0l
        bra     loop:8
	.word	0