blob: 8e54cb8046040f34b3fd6631f71363988346667b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
; returns a *= 10
ATimes10:
push de
ld e, a
add a
add a
add e
add a
pop de
ret
; returns hl *= 10
HLTimes10:
push de
ld l, a
ld e, a
ld h, $00
ld d, h
add hl, hl
add hl, hl
add hl, de
add hl, hl
pop de
ret
; returns a /= 10
; returns carry if a % 10 >= 5
ADividedBy10:
push de
ld e, -1
.asm_c62
inc e
sub 10
jr nc, .asm_c62
add 5
ld a, e
pop de
ret
|
