divide.asm

来自「这是一篇关于8位RISC CPU设计的文章」· 汇编 代码 · 共 133 行

 ;---------------------------
 ; Test for udiv
 ;---------------------------

 org 0x0000

 ldi r0 0xaa
 ldi r1 0x55
 pmov a1 0x0002 
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0x55
 ldi r7 0xaa
 pmov a1 0x5500
 udiv r7
 cmp r2
 jmpa ne error
 mov r0 r7
 cmp r3
 jmpa ne error

 ldi r0 0x00
 ldi r1 0xaa
 pmov a1 0x0000
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0xff
 ldi r1 0x01
 pmov a1 0x00ff 
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0xff
 ldi r1 0x11
 pmov a1 0x000f 
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0xf3
 ldi r6 0x23
 pmov a1 0x2106
 udiv r6
 cmp r2
 jmpa ne error
 mov r0 r6
 cmp r3
 jmpa ne error

 ldi r0 0xea
 ldi r1 0x02
 pmov a1 0x0075 
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0xeb
 ldi r1 0x02
 pmov a1 0x0175
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0xb8
 ldi r5 0x07
 pmov a1 0x021a
 udiv r5
 cmp r2
 jmpa ne error
 mov r0 r5
 cmp r3
 jmpa ne error

 ldi r0 0xff
 ldi r1 0xff
 pmov a1 0x0001 
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 ldi r0 0x84
 ldi r1 0x12
 pmov a1 0x0607
 udiv r1
 cmp r2
 jmpa ne error
 mov r0 r1
 cmp r3
 jmpa ne error

 jmpa al finish
error:
  ldi r0 0xa2
  sta r0 0x1234
  jmpr al skip

finish:
  ldi r0 0x55
  sta r0 0xffff

skip:
  nop
  nop
  end