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
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
|
.include "constants/gba_constants.inc"
.include "constants/species_constants.inc"
.include "asm/macros.inc"
.syntax unified
.text
thumb_func_start sub_810993C
sub_810993C: @ 810993C
push {r4-r7,lr}
mov r7, r10
mov r6, r9
mov r5, r8
push {r5-r7}
sub sp, 0x10
ldr r0, _081099C8 @ =gSaveBlock1 + 0x2D94
mov r9, r0
movs r2, 0
_0810994E:
adds r1, r2, 0x1
lsls r0, r1, 24
lsrs r5, r0, 24
str r1, [sp, 0xC]
cmp r5, 0x3
bhi _081099AC
movs r1, 0x1
add r1, r9
mov r8, r1
adds r6, r1, r2
movs r0, 0xB
mov r10, r0
mov r0, r10
muls r0, r2
adds r0, 0x5
mov r1, r9
adds r7, r1, r0
_08109970:
ldrb r0, [r6]
cmp r0, 0
bne _081099A2
adds r2, r0, 0
mov r0, r8
adds r1, r0, r5
ldrb r0, [r1]
strb r0, [r6]
strb r2, [r1]
mov r0, sp
adds r1, r7, 0
bl StringCopy
mov r4, r10
muls r4, r5
adds r4, 0x5
add r4, r9
adds r0, r7, 0
adds r1, r4, 0
bl StringCopy
adds r0, r4, 0
mov r1, sp
bl StringCopy
_081099A2:
adds r0, r5, 0x1
lsls r0, 24
lsrs r5, r0, 24
cmp r5, 0x3
bls _08109970
_081099AC:
ldr r1, [sp, 0xC]
lsls r0, r1, 24
lsrs r2, r0, 24
cmp r2, 0x2
bls _0810994E
add sp, 0x10
pop {r3-r5}
mov r8, r3
mov r9, r4
mov r10, r5
pop {r4-r7}
pop {r0}
bx r0
.align 2, 0
_081099C8: .4byte gSaveBlock1 + 0x2D94
thumb_func_end sub_810993C
thumb_func_start sub_81099CC
sub_81099CC: @ 81099CC
push {r4-r6,lr}
ldr r5, _08109A14 @ =gSaveBlock1 + 0x2D94
movs r1, 0
movs r0, 0x2
strb r0, [r5]
adds r0, r5, 0
adds r0, 0x31
strb r1, [r0]
movs r4, 0
ldr r6, _08109A18 @ =gUnknown_083F62D8
_081099E0:
movs r0, 0xB
muls r0, r4
adds r0, 0x5
adds r0, r5, r0
lsls r1, r4, 2
adds r1, r6
ldr r1, [r1]
bl StringCopy
adds r1, r5, 0x1
adds r1, r4
ldr r0, _08109A1C @ =gTraderDecorations
adds r0, r4, r0
ldrb r0, [r0]
strb r0, [r1]
adds r0, r4, 0x1
lsls r0, 24
lsrs r4, r0, 24
cmp r4, 0x3
bls _081099E0
bl sub_810993C
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_08109A14: .4byte gSaveBlock1 + 0x2D94
_08109A18: .4byte gUnknown_083F62D8
_08109A1C: .4byte gTraderDecorations
thumb_func_end sub_81099CC
thumb_func_start sub_8109A20
sub_8109A20: @ 8109A20
ldr r0, _08109A2C @ =gSaveBlock1 + 0x2D94
adds r0, 0x31
movs r1, 0
strb r1, [r0]
bx lr
.align 2, 0
_08109A2C: .4byte gSaveBlock1 + 0x2D94
thumb_func_end sub_8109A20
thumb_func_start sub_8109A30
sub_8109A30: @ 8109A30
push {lr}
adds r1, r0, 0
lsls r1, 24
lsrs r1, 24
ldr r0, _08109A44 @ =0x00004020
bl VarSet
pop {r0}
bx r0
.align 2, 0
_08109A44: .4byte 0x00004020
thumb_func_end sub_8109A30
thumb_func_start sub_8109A48
sub_8109A48: @ 8109A48
push {r4-r7,lr}
mov r7, r9
mov r6, r8
push {r6,r7}
sub sp, 0x8
lsls r0, 24
lsrs r0, 24
mov r9, r0
movs r6, 0x1
movs r5, 0
ldr r0, _08109AB8 @ =gSaveBlock1 + 0x2D94
movs r4, 0
adds r7, r0, 0x1
adds r1, r7, 0
_08109A64:
adds r0, r1, r4
ldrb r0, [r0]
cmp r0, 0
beq _08109A72
adds r0, r6, 0x1
lsls r0, 24
lsrs r6, r0, 24
_08109A72:
adds r0, r4, 0x1
lsls r0, 24
lsrs r4, r0, 24
cmp r4, 0x3
bls _08109A64
lsls r3, r6, 25
movs r0, 0x80
lsls r0, 18
adds r3, r0
lsrs r3, 24
movs r0, 0
movs r1, 0x1
movs r2, 0xC
bl MenuDrawTextWindow
movs r4, 0
mov r1, r9
lsls r1, 2
mov r8, r1
_08109A98:
adds r1, r7, r4
ldrb r0, [r1]
cmp r0, 0
beq _08109ADE
cmp r0, 0x78
bls _08109AC0
lsls r2, r5, 25
movs r0, 0x80
lsls r0, 18
adds r2, r0
lsrs r2, 24
ldr r0, _08109ABC @ =gOtherText_FiveQuestionsAndSlash
movs r1, 0x1
bl MenuPrint
b _08109AD8
.align 2, 0
_08109AB8: .4byte gSaveBlock1 + 0x2D94
_08109ABC: .4byte gOtherText_FiveQuestionsAndSlash
_08109AC0:
ldrb r0, [r1]
lsls r0, 5
ldr r1, _08109B28 @ =gDecorations + 0x1
adds r0, r1
lsls r2, r5, 25
movs r1, 0x80
lsls r1, 18
adds r2, r1
lsrs r2, 24
movs r1, 0x1
bl MenuPrint
_08109AD8:
adds r0, r5, 0x1
lsls r0, 24
lsrs r5, r0, 24
_08109ADE:
adds r0, r4, 0x1
lsls r0, 24
lsrs r4, r0, 24
cmp r4, 0x3
bls _08109A98
ldr r0, _08109B2C @ =gOtherText_CancelNoTerminator
lsls r2, r5, 25
movs r1, 0x80
lsls r1, 18
adds r2, r1
lsrs r2, 24
movs r1, 0x1
bl MenuPrint
movs r0, 0
str r0, [sp]
movs r0, 0xB
str r0, [sp, 0x4]
movs r0, 0
movs r1, 0x1
movs r2, 0x2
adds r3, r6, 0
bl InitMenu
ldr r1, _08109B30 @ =gTasks
mov r0, r8
add r0, r9
lsls r0, 3
adds r0, r1
strh r5, [r0, 0xA]
add sp, 0x8
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r7}
pop {r0}
bx r0
.align 2, 0
_08109B28: .4byte gDecorations + 0x1
_08109B2C: .4byte gOtherText_CancelNoTerminator
_08109B30: .4byte gTasks
thumb_func_end sub_8109A48
thumb_func_start sub_8109B34
sub_8109B34: @ 8109B34
push {r4,lr}
lsls r0, 24
lsrs r4, r0, 24
lsls r1, 24
lsrs r1, 24
cmp r1, 0x78
bls _08109B54
ldr r1, _08109B4C @ =gSpecialVar_0x8004
ldr r2, _08109B50 @ =0x0000ffff
adds r0, r2, 0
strh r0, [r1]
b _08109B58
.align 2, 0
_08109B4C: .4byte gSpecialVar_0x8004
_08109B50: .4byte 0x0000ffff
_08109B54:
ldr r0, _08109B78 @ =gSpecialVar_0x8004
strh r1, [r0]
_08109B58:
bl sub_8072DEC
movs r0, 0
movs r1, 0x1
movs r2, 0xC
movs r3, 0xC
bl MenuZeroFillWindowRect
adds r0, r4, 0
bl DestroyTask
bl EnableBothScriptContexts
pop {r4}
pop {r0}
bx r0
.align 2, 0
_08109B78: .4byte gSpecialVar_0x8004
thumb_func_end sub_8109B34
thumb_func_start sub_8109B7C
sub_8109B7C: @ 8109B7C
push {r4-r6,lr}
lsls r0, 24
lsrs r4, r0, 24
adds r5, r4, 0
ldr r6, _08109BA4 @ =gSaveBlock1 + 0x2D94
ldr r0, _08109BA8 @ =gMain
ldrh r1, [r0, 0x2E]
movs r0, 0x40
ands r0, r1
cmp r0, 0
beq _08109BAC
movs r0, 0x5
bl PlaySE
movs r0, 0x1
negs r0, r0
bl MoveMenuCursor
b _08109C3E
.align 2, 0
_08109BA4: .4byte gSaveBlock1 + 0x2D94
_08109BA8: .4byte gMain
_08109BAC:
movs r0, 0x80
ands r0, r1
cmp r0, 0
beq _08109BC2
movs r0, 0x5
bl PlaySE
movs r0, 0x1
bl MoveMenuCursor
b _08109C3E
_08109BC2:
movs r0, 0x1
ands r0, r1
cmp r0, 0
beq _08109C28
movs r0, 0x5
bl PlaySE
ldr r5, _08109BFC @ =gSpecialVar_0x8005
bl GetMenuCursorPos
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
ldr r1, _08109C00 @ =gTasks
lsls r0, r4, 2
adds r0, r4
lsls r0, 3
adds r0, r1
movs r1, 0xA
ldrsh r0, [r0, r1]
ldrh r2, [r5]
cmp r0, r2
bne _08109C04
adds r0, r4, 0
movs r1, 0
bl sub_8109B34
b _08109C3E
.align 2, 0
_08109BFC: .4byte gSpecialVar_0x8005
_08109C00: .4byte gTasks
_08109C04:
ldr r0, _08109C24 @ =gStringVar1
movs r1, 0xB
muls r1, r2
adds r1, 0x5
adds r1, r6
bl StringCopy
adds r0, r6, 0x1
ldrh r5, [r5]
adds r0, r5
ldrb r1, [r0]
adds r0, r4, 0
bl sub_8109B34
b _08109C3E
.align 2, 0
_08109C24: .4byte gStringVar1
_08109C28:
movs r0, 0x2
ands r0, r1
cmp r0, 0
beq _08109C3E
movs r0, 0x5
bl PlaySE
adds r0, r5, 0
movs r1, 0
bl sub_8109B34
_08109C3E:
pop {r4-r6}
pop {r0}
bx r0
thumb_func_end sub_8109B7C
thumb_func_start sub_8109C44
sub_8109C44: @ 8109C44
ldr r0, _08109C50 @ =gSaveBlock1 + 0x2D94
ldr r1, _08109C54 @ =gScriptResult
adds r0, 0x31
ldrb r0, [r0]
strh r0, [r1]
bx lr
.align 2, 0
_08109C50: .4byte gSaveBlock1 + 0x2D94
_08109C54: .4byte gScriptResult
thumb_func_end sub_8109C44
thumb_func_start sub_8109C58
sub_8109C58: @ 8109C58
push {r4,r5,lr}
movs r4, 0
ldr r5, _08109C70 @ =gScriptResult
_08109C5E:
adds r0, r4, 0
bl sub_8134194
lsls r0, 24
cmp r0, 0
beq _08109C74
movs r0, 0
strh r0, [r5]
b _08109C84
.align 2, 0
_08109C70: .4byte gScriptResult
_08109C74:
adds r0, r4, 0x1
lsls r0, 24
lsrs r4, r0, 24
cmp r4, 0x7
bls _08109C5E
ldr r1, _08109C8C @ =gScriptResult
movs r0, 0x1
strh r0, [r1]
_08109C84:
pop {r4,r5}
pop {r0}
bx r0
.align 2, 0
_08109C8C: .4byte gScriptResult
thumb_func_end sub_8109C58
thumb_func_start sub_8109C90
sub_8109C90: @ 8109C90
push {r4-r6,lr}
ldr r6, _08109CDC @ =gScriptResult
movs r0, 0
strh r0, [r6]
ldr r4, _08109CE0 @ =gDecorations
ldr r5, _08109CE4 @ =gSpecialVar_0x8004
ldrh r0, [r5]
lsls r0, 5
adds r2, r0, r4
ldr r0, _08109CE8 @ =gSpecialVar_0x8006
ldrh r0, [r0]
lsls r0, 5
adds r0, r4
ldrb r1, [r2, 0x13]
ldrb r0, [r0, 0x13]
cmp r1, r0
beq _08109CD6
adds r0, r1, 0
bl sub_8133F9C
lsls r0, 24
asrs r0, 24
movs r1, 0x1
negs r1, r1
cmp r0, r1
bne _08109CD6
ldr r0, _08109CEC @ =gStringVar2
ldrh r1, [r5]
lsls r1, 5
adds r1, r4
ldrb r1, [r1, 0x13]
bl sub_80FE7D4
movs r0, 0x1
strh r0, [r6]
_08109CD6:
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_08109CDC: .4byte gScriptResult
_08109CE0: .4byte gDecorations
_08109CE4: .4byte gSpecialVar_0x8004
_08109CE8: .4byte gSpecialVar_0x8006
_08109CEC: .4byte gStringVar2
thumb_func_end sub_8109C90
thumb_func_start sub_8109CF0
sub_8109CF0: @ 8109CF0
push {lr}
ldr r0, _08109D00 @ =sub_80FE7A8
movs r1, 0
bl CreateTask
pop {r0}
bx r0
.align 2, 0
_08109D00: .4byte sub_80FE7A8
thumb_func_end sub_8109CF0
thumb_func_start sub_8109D04
sub_8109D04: @ 8109D04
push {r4-r6,lr}
lsls r0, 24
lsrs r6, r0, 24
bl sub_8072DEC
movs r0, 0
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuZeroFillWindowRect
movs r0, 0
bl DestroyVerticalScrollIndicator
movs r0, 0x1
bl DestroyVerticalScrollIndicator
ldr r0, _08109D6C @ =gUnknown_020388F7
movs r1, 0x8
bl sub_80F9520
bl BuyMenuFreeMemory
bl sub_80FEFA4
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bne _08109D8C
ldr r5, _08109D70 @ =gSpecialVar_0x8006
ldr r0, _08109D74 @ =gUnknown_020388F5
ldrb r1, [r0]
ldr r0, _08109D78 @ =gUnknown_020388D0
ldr r0, [r0]
adds r0, r1
ldrb r0, [r0]
strh r0, [r5]
ldr r0, _08109D7C @ =gStringVar3
ldr r1, _08109D80 @ =gSpecialVar_0x8004
ldrh r1, [r1]
lsls r1, 5
ldr r4, _08109D84 @ =gDecorations + 0x1
adds r1, r4
bl StringCopy
ldr r0, _08109D88 @ =gStringVar2
ldrh r1, [r5]
lsls r1, 5
adds r1, r4
bl StringCopy
b _08109D94
.align 2, 0
_08109D6C: .4byte gUnknown_020388F7
_08109D70: .4byte gSpecialVar_0x8006
_08109D74: .4byte gUnknown_020388F5
_08109D78: .4byte gUnknown_020388D0
_08109D7C: .4byte gStringVar3
_08109D80: .4byte gSpecialVar_0x8004
_08109D84: .4byte gDecorations + 0x1
_08109D88: .4byte gStringVar2
_08109D8C:
ldr r1, _08109DA4 @ =gSpecialVar_0x8006
ldr r2, _08109DA8 @ =0x0000ffff
adds r0, r2, 0
strh r0, [r1]
_08109D94:
adds r0, r6, 0
bl DestroyTask
bl EnableBothScriptContexts
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_08109DA4: .4byte gSpecialVar_0x8006
_08109DA8: .4byte 0x0000ffff
thumb_func_end sub_8109D04
thumb_func_start sub_8109DAC
sub_8109DAC: @ 8109DAC
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
bl sub_8072DEC
movs r0, 0
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuZeroFillWindowRect
ldr r1, _08109DDC @ =gSpecialVar_0x8006
movs r0, 0
strh r0, [r1]
adds r0, r4, 0
bl DestroyTask
bl EnableBothScriptContexts
pop {r4}
pop {r0}
bx r0
.align 2, 0
_08109DDC: .4byte gSpecialVar_0x8006
thumb_func_end sub_8109DAC
thumb_func_start sub_8109DE0
sub_8109DE0: @ 8109DE0
push {r4-r6,lr}
ldr r4, _08109E20 @ =gSaveBlock1 + 0x2D94
ldr r6, _08109E24 @ =gSpecialVar_0x8006
ldrb r0, [r6]
bl sub_81340A8
ldr r0, _08109E28 @ =gSpecialVar_0x8004
ldrb r0, [r0]
bl IsThereStorageSpaceForDecoration
ldr r5, _08109E2C @ =gSpecialVar_0x8005
ldrh r1, [r5]
movs r0, 0xB
muls r0, r1
adds r0, 0x5
adds r0, r4
ldr r1, _08109E30 @ =gSaveBlock2
bl StringCopy
adds r0, r4, 0x1
ldrh r5, [r5]
adds r0, r5
ldrh r1, [r6]
strb r1, [r0]
bl sub_810993C
adds r4, 0x31
movs r0, 0x1
strb r0, [r4]
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_08109E20: .4byte gSaveBlock1 + 0x2D94
_08109E24: .4byte gSpecialVar_0x8006
_08109E28: .4byte gSpecialVar_0x8004
_08109E2C: .4byte gSpecialVar_0x8005
_08109E30: .4byte gSaveBlock2
thumb_func_end sub_8109DE0
thumb_func_start sub_8109E34
sub_8109E34: @ 8109E34
push {lr}
ldr r0, _08109E4C @ =sub_8109B7C
movs r1, 0
bl CreateTask
lsls r0, 24
lsrs r0, 24
bl sub_8109A48
pop {r0}
bx r0
.align 2, 0
_08109E4C: .4byte sub_8109B7C
thumb_func_end sub_8109E34
.align 2, 0 @ Don't pad with nop.
|
