mirror of https://github.com/pret/pokeemerald.git
226 lines
3.4 KiB
ArmAsm
226 lines
3.4 KiB
ArmAsm
.include "asm/macros.inc"
|
|
.include "constants/constants.inc"
|
|
|
|
.syntax unified
|
|
|
|
.text
|
|
|
|
thumb_func_start GetMirageRnd
|
|
GetMirageRnd: @ 8137890
|
|
push {r4,lr}
|
|
ldr r0, =0x00004024
|
|
bl VarGet
|
|
adds r4, r0, 0
|
|
lsls r4, 16
|
|
lsrs r4, 16
|
|
ldr r0, =0x00004025
|
|
bl VarGet
|
|
lsls r0, 16
|
|
lsrs r0, 16
|
|
lsls r4, 16
|
|
orrs r4, r0
|
|
adds r0, r4, 0
|
|
pop {r4}
|
|
pop {r1}
|
|
bx r1
|
|
.pool
|
|
thumb_func_end GetMirageRnd
|
|
|
|
thumb_func_start SetMirageRnd
|
|
SetMirageRnd: @ 81378BC
|
|
push {r4,lr}
|
|
adds r4, r0, 0
|
|
ldr r0, =0x00004024
|
|
lsrs r1, r4, 16
|
|
bl VarSet
|
|
ldr r0, =0x00004025
|
|
lsls r4, 16
|
|
lsrs r4, 16
|
|
adds r1, r4, 0
|
|
bl VarSet
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end SetMirageRnd
|
|
|
|
thumb_func_start InitMirageRnd
|
|
InitMirageRnd: @ 81378E4
|
|
push {r4,lr}
|
|
bl Random
|
|
adds r4, r0, 0
|
|
bl Random
|
|
lsls r4, 16
|
|
lsls r0, 16
|
|
lsrs r0, 16
|
|
orrs r4, r0
|
|
adds r0, r4, 0
|
|
bl SetMirageRnd
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
thumb_func_end InitMirageRnd
|
|
|
|
thumb_func_start UpdateMirageRnd
|
|
UpdateMirageRnd: @ 8137904
|
|
push {r4,lr}
|
|
lsls r0, 16
|
|
lsrs r4, r0, 16
|
|
bl GetMirageRnd
|
|
adds r1, r0, 0
|
|
cmp r4, 0
|
|
beq _08137928
|
|
ldr r3, =0x41c64e6d
|
|
ldr r2, =0x00003039
|
|
_08137918:
|
|
adds r0, r1, 0
|
|
muls r0, r3
|
|
adds r1, r0, r2
|
|
subs r0, r4, 0x1
|
|
lsls r0, 16
|
|
lsrs r4, r0, 16
|
|
cmp r4, 0
|
|
bne _08137918
|
|
_08137928:
|
|
adds r0, r1, 0
|
|
bl SetMirageRnd
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end UpdateMirageRnd
|
|
|
|
thumb_func_start IsMirageIslandPresent
|
|
IsMirageIslandPresent: @ 813793C
|
|
push {r4-r6,lr}
|
|
bl GetMirageRnd
|
|
lsrs r6, r0, 16
|
|
movs r5, 0
|
|
_08137946:
|
|
movs r0, 0x64
|
|
adds r1, r5, 0
|
|
muls r1, r0
|
|
ldr r0, =gPlayerParty
|
|
adds r4, r1, r0
|
|
adds r0, r4, 0
|
|
movs r1, 0xB
|
|
bl GetMonData
|
|
cmp r0, 0
|
|
beq _08137978
|
|
adds r0, r4, 0
|
|
movs r1, 0
|
|
bl GetMonData
|
|
ldr r1, =0x0000ffff
|
|
ands r1, r0
|
|
cmp r1, r6
|
|
bne _08137978
|
|
movs r0, 0x1
|
|
b _08137980
|
|
.pool
|
|
_08137978:
|
|
adds r5, 0x1
|
|
cmp r5, 0x5
|
|
ble _08137946
|
|
movs r0, 0
|
|
_08137980:
|
|
pop {r4-r6}
|
|
pop {r1}
|
|
bx r1
|
|
thumb_func_end IsMirageIslandPresent
|
|
|
|
thumb_func_start UpdateShoalTideFlag
|
|
UpdateShoalTideFlag: @ 8137988
|
|
push {lr}
|
|
bl get_map_light_from_warp0
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
bl is_light_level_1_2_3_5_or_6
|
|
lsls r0, 24
|
|
cmp r0, 0
|
|
beq _081379CE
|
|
bl RtcCalcLocalTime
|
|
ldr r1, =gUnknown_085B2B44
|
|
ldr r0, =gLocalTime
|
|
ldrb r0, [r0, 0x2]
|
|
lsls r0, 24
|
|
asrs r0, 24
|
|
adds r0, r1
|
|
ldrb r0, [r0]
|
|
cmp r0, 0
|
|
beq _081379C8
|
|
ldr r0, =0x0000089a
|
|
bl FlagSet
|
|
b _081379CE
|
|
.pool
|
|
_081379C8:
|
|
ldr r0, =0x0000089a
|
|
bl FlagClear
|
|
_081379CE:
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end UpdateShoalTideFlag
|
|
|
|
thumb_func_start Task_WaitWeather
|
|
Task_WaitWeather: @ 81379D8
|
|
push {r4,lr}
|
|
lsls r0, 24
|
|
lsrs r4, r0, 24
|
|
bl sub_80AC3BC
|
|
lsls r0, 24
|
|
cmp r0, 0
|
|
beq _081379F2
|
|
bl EnableBothScriptContexts
|
|
adds r0, r4, 0
|
|
bl DestroyTask
|
|
_081379F2:
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
thumb_func_end Task_WaitWeather
|
|
|
|
thumb_func_start WaitWeather
|
|
WaitWeather: @ 81379F8
|
|
push {lr}
|
|
ldr r0, =Task_WaitWeather
|
|
movs r1, 0x50
|
|
bl CreateTask
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end WaitWeather
|
|
|
|
thumb_func_start InitBirchState
|
|
InitBirchState: @ 8137A0C
|
|
push {lr}
|
|
ldr r0, =0x00004049
|
|
bl GetVarPointer
|
|
movs r1, 0
|
|
strh r1, [r0]
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end InitBirchState
|
|
|
|
thumb_func_start UpdateBirchState
|
|
UpdateBirchState: @ 8137A20
|
|
push {r4,r5,lr}
|
|
adds r4, r0, 0
|
|
lsls r4, 16
|
|
lsrs r4, 16
|
|
ldr r0, =0x00004049
|
|
bl GetVarPointer
|
|
adds r5, r0, 0
|
|
ldrh r0, [r5]
|
|
adds r4, r0
|
|
strh r4, [r5]
|
|
ldrh r0, [r5]
|
|
movs r1, 0x7
|
|
bl __umodsi3
|
|
strh r0, [r5]
|
|
pop {r4,r5}
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end UpdateBirchState
|