mirror of
https://github.com/autc04/Retro68.git
synced 2024-11-11 12:05:55 +00:00
31 lines
223 B
ArmAsm
31 lines
223 B
ArmAsm
|
.global ___udivhi3
|
||
|
|
|
||
|
|
___udivhi3:
|
||
|
|
stz <r0
|
||
|
|
ldy #1
|
||
|
|
ldx <r4
|
||
|
|
lda <r5
|
||
|
|
|
||
|
|
div1:
|
||
|
|
asl a
|
||
|
|
bcs div2
|
||
|
|
iny
|
||
|
|
cpy #17
|
||
|
|
bne div1
|
||
|
|
|
||
|
|
div2: ror a
|
||
|
|
|
||
|
|
div4: pha
|
||
|
|
txa
|
||
|
|
sec
|
||
|
|
sbc 1,s
|
||
|
|
bcc div3
|
||
|
|
tax
|
||
|
|
|
||
|
|
div3: rol <r0
|
||
|
|
pla
|
||
|
|
lsr a
|
||
|
|
dey
|
||
|
|
bne div4
|
||
|
|
rtl
|