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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
|
.include "constants/gba_constants.inc"
.include "asm/macros.inc"
.syntax unified
.text
thumb_func_start InitBGPaletteBuffer
InitBGPaletteBuffer:
push {lr}
movs r2, 0
ldr r1, =gBGPaletteBuffer
movs r0, 0x80
lsls r0, 2
_0800463E:
strh r2, [r1]
adds r1, 0x2
subs r0, 0x1
cmp r0, 0
bne _0800463E
ldr r1, =gBGPaletteUsed
movs r2, 0x1
adds r0, r1, 0
adds r0, 0x1F
_08004650:
strb r2, [r0]
subs r0, 0x1
cmp r0, r1
bge _08004650
pop {r0}
bx r0
.align 2, 0
.pool
thumb_func_end InitBGPaletteBuffer
thumb_func_start SetBGPaletteBufferColorRGB
SetBGPaletteBufferColorRGB:
push {r4-r7,lr}
adds r4, r0, 0
adds r5, r1, 0
cmp r2, 0
bge _08004670
movs r2, 0
_08004670:
cmp r2, 0x1F
ble _08004676
movs r2, 0x1F
_08004676:
ldr r1, =gBGPaletteUsed
adds r0, r4, 0
cmp r4, 0
bge _08004680
adds r0, 0xF
_08004680:
asrs r0, 4
adds r0, r1
movs r1, 0x1
strb r1, [r0]
cmp r3, 0
bne _080046D4
ldr r0, =gBGPaletteBuffer
lsls r1, r4, 1
adds r6, r1, r0
ldrb r0, [r5, 0x2]
muls r0, r2
cmp r0, 0
bge _0800469C
adds r0, 0xFF
_0800469C:
asrs r0, 8
movs r3, 0x1F
ands r0, r3
lsls r4, r0, 10
ldrb r0, [r5, 0x1]
muls r0, r2
cmp r0, 0
bge _080046AE
adds r0, 0xFF
_080046AE:
asrs r0, 8
ands r0, r3
lsls r1, r0, 5
orrs r1, r4
ldrb r0, [r5]
muls r0, r2
cmp r0, 0
bge _080046C0
adds r0, 0xFF
_080046C0:
asrs r0, 8
ands r0, r3
orrs r1, r0
strh r1, [r6]
b _08004722
.align 2, 0
.pool
_080046D4:
ldr r1, =gBGPaletteBuffer
lsls r0, r4, 1
adds r7, r0, r1
ldrb r0, [r5, 0x2]
lsls r0, 2
adds r0, r3
ldrb r0, [r0, 0x2]
muls r0, r2
cmp r0, 0
bge _080046EA
adds r0, 0xFF
_080046EA:
asrs r0, 8
movs r4, 0x1F
ands r0, r4
lsls r6, r0, 10
ldrb r0, [r5, 0x1]
lsls r0, 2
adds r0, r3
ldrb r0, [r0, 0x1]
muls r0, r2
cmp r0, 0
bge _08004702
adds r0, 0xFF
_08004702:
asrs r0, 8
ands r0, r4
lsls r1, r0, 5
orrs r1, r6
ldrb r0, [r5]
lsls r0, 2
adds r0, r3
ldrb r0, [r0]
muls r0, r2
cmp r0, 0
bge _0800471A
adds r0, 0xFF
_0800471A:
asrs r0, 8
ands r0, r4
orrs r1, r0
strh r1, [r7]
_08004722:
pop {r4-r7}
pop {r0}
bx r0
.align 2, 0
.pool
thumb_func_end SetBGPaletteBufferColorRGB
.align 2, 0 @ Don't pad with nop.
|
