804B328h:
push r14
mov r1,r0 ;r0 always =1
ldr r0,84F0B28h
ldr r0,[r0]
ldr r3,=1325Ch
add r0,r0,r3 ;r0=0201325Ch
cmp r1,1h ;always true, in this case.
beq + ;804B358h
**SKIP**
804B358:
+ ldrb r2,[r0,11h] ;0201326D
mov r0,r2
pop r1080684CEh: ;not real label.
and r0,r1
cmp r0,0h
beq + ;80684D0h
mov r5,7h ;luck base is 7.
+ mov r0,1h
bl 804B328h
[b]cmp r0,28h ;if r0=28h, gives you 8.
bne + ;80684DCh
add r5,8h[/b]
+ ldrb r1,[r6,12h]8000a90h is some mystery function. I'm not sure what that formula is suppose to do, but it will always operate on what ever the pointer in 0x02000008 goes to, then moves it back there, it seems. Possibly 'randomize.'
#define bignum1 0x6911396F
#define bignum2 0x1B0cB175
int rand_seed;
int rand() // 08000A90h
{
rand_seed = (rand_seed >> 8) * bignum1 + bignum2;
return rand_seed;
}
void dunno_80684ee()
{
int rnd;
if (something > 0x0f) return; // (?)
rnd = (rand() >> 2) % 0x10; // Now rnd is between 0-15
if (rnd < comparething) get_soul();
}
08000A90:
ldr r0,=84F0B28h
ldr r2,[r0] ;r2=[02000000]
ldr r0,[r0,8h] ;r0=[02000008]
ldr r1,=3243F6ADh
mul r0,r1 ;r0=3243F6AD*[02000008]
ldr r1,=1B0CB175h
add r0,r0,r1 r0=r0+1B0CB175
str r0,[r2,8h]
bx r14mem[0x02000008] = mem[0x02000000] * (mem[0x02000008] * 0x3243F6AD) + 0x1B0CB175(((mem[02000008] >> 8) * 0x3243F6AD + 0x1B0cB175) >> 2) % 0x1B0cB175) < r5 mov r4,10h
+ bl 8000a90h
lsr r0,r0,2h
mov r1,r4 <---
bl MOD
mov r4,r0
(((mem[02000008] >> 8) * 0x3243F6AD + 0x1B0cB175) >> 2) % 0x10) < r5;Calculate mod
080684DC:
ldrb r1,[r6,12h]
lsl r1,r1,3h
ldr r0,[sp,14h]
add r0,0E8h
ldrh r0,[r0] ;loads luck
lsl r0,r0,10h
asr r0,r0,14h
sub r0,20h
sub r4,r1,r0
cmp r4,0Fh
bgt + ;80684F4h
mov r4,10h
+bl PRND
mov r4,10h <-- r4 is set to 0x10 here.
+ bl 8000a90h
lsr r0,r0,2h
mov r1,r4 <--- r4 is now copied to r1, so r1 (the divisor) is now 0x10
bl MOD <-- do % 0x10
mov r4,r0
the mod is a constant 10.mov r4,10h <-- r4 is set to 0x10 here. + bl 8000a90h lsr r0,r0,2h mov r1,r4 <--- r4 is now copied to r1, so r1 (the divisor) is now 0x10 bl MOD <-- do % 0x10 mov r4,r0
080684EEh:
cmp r4,0Fh
bgt + ;80684F4h
mov r4,10h
+ bl 8000a90h
lsr r0,r0,2h
mov r1,r4
bl MOD
mov r4,r0
cmp r4,r5
bcs 8068540h ;if r4 < r5, get soul.#define WRAM 0x02000000
#define TIMER 0x02000000
#define SEED 0x02000008
#define WRAM_P 0x084F0B28 ;adress in pool which contains WRAM.
#define MOD r4
#define CHANCE r5
;Psudo-random number generator.
PRNG:
08000A90h:
ldr r0,=WRAM_P
ldr r2,[r0] ;contains 0x02000000 (wram)
ldr r0,[r2,8h] ;this time loaded 0x4C34683F
lsr r0,r0,8h ;now 0x004C3468
ldr r1,=3243F6ADh
mul r0,r1 ;r0=6911396F, c
ldr r1,=1B0cB175h
add r0,r0,r1 ;r0=0x841DEAE4, nv
str r0,[r2,8h] ;Write this back to where we first read from.
;gets mod of r0/r1. Returns to r0.
MOD:
080D8140h:
swi 6h ;div (r0/r1)
mov r0,r1
bx r14
;there's also a bunch more stuff above here which handles other CHANCE values.
080684CEh: ;not real label.
and r0,r1
cmp r0,0h
beq + ;80684D0h
mov CHANCE,7h ;CHANCE base is 7.
+ mov r0,1h
bl 804B328h
cmp r0,28h ;if r0==28h, gives you 8 luck.
bne + ;80684DCh
add CHANCE,8h
+ ldrb r1,[r6,12h]
lsl r1,r1,3h
ldr r0,[sp,14h]
add r0,0E8h
ldrh r0,[r0] ;loads luck
lsl r0,r0,10h
asr r0,r0,14h
sub r0,20h
sub MOD,r1,r0
cmp MOD,0Fh ;make sure mod value dosn't go below 0x10
bgt + ;80684F4h
mov MOD,10h
+ bl PRND
lsr r0,r0,2h
mov r1,MOD
bl MOD
mov r4,r0
cmp r4,r5
bcs 8068540h ;if r4 < r5, get soul.
804B328h:
push r14
mov r1,r0 ;r0 always =1
ldr r0,WRAM_P
ldr r0,[r0]
ldr r3,=1325Ch
add r0,r0,r3 ;r0=0201325Ch
cmp r1,1h ;always true, in this case.
beq + ;804B358h
**SKIP**
804B358:
+ ldrb r2,[r0,11h] ;0201326D
mov r0,r2
pop r1
bx r1
;Calculate seed
;mem[SEED] = mem[TIMER] * (mem[SEED] * 0x3243F6AD) + 0x1B0CB175
MAKE_SEED:
08000A90:
ldr r0,=WRAM_P
ldr r2,[r0] ;r2=[TIMER]
ldr r0,[r0,8h] ;r0=[SEED]
ldr r1,=3243F6ADh
mul r0,r1 ;r0=3243F6AD*[SEED]
ldr r1,=1B0CB175h
add r0,r0,r1 r0=r0+1B0CB175
str r0,[r2,8h]
bx r14 cmp MOD,0Fh ;make sure mod value dosn't go below 0x10
bgt + ;80684F4h
mov MOD,10h
+ bl PRNDYour PRNG is same as MAKE_SEED btw.
So basically all that needs to be done now, is make a calculator built into the emulator that handles this for every frame you play, and tells you what random value you would receive that frame (at the final cmp r4,r5).. :P
;the on hit function.
0807B116: ;not real label
add r2,2Dh
mov r0,8h
strb r0,[r2]
ldrh r0,[r6,34h]
lsl r1,r1,10h
asr r1,r1,10h
sub r0,r0,r1
strh r0,[r6,34h]
mov r0,r6
mov r2,0h
bl 8042BA0h
mov r1,34h
ldsh r0[r6,r1]
cmp r0,0h ;find out if the monster is dead. If not, skip
bgt + ;807B1C4h
mov r0,r6
bl SoulFunction ;80683D0h ;This is our soul function.
mov r0,70h
bl 80D7924h
mov r0,r6
mov r1,3h
mov r2,0h
mov r3,0h
bl 803F2Dch
mov r1,r6
add r1,2Ch
mov r3,r6
add r3,5Ah
mov r0,0Fh
ldrb r1,[r1]
and r1,r0
lsl r1,r1,3h
ldrb r2,[r3]
mov r0,79h
neg r0,r0
and r0,r2
orr r0,r1
strb r0,[r3]
mov r0,28h
strb r0,[r6,-Dh]
mov r0,1h
strb r0,[r6,0Bh]
bl PRNG ;8000a90h
ldr r4,=3FFFFh
and r0,r4
ldr r1,[r6,40h]
add r7,r7,r1
ldr r1,=0FFe60000h
add r0,r0,r1
ldr r1,[r6,44h]
add r2,r0,r1
mov r0,r6
mov r1,r7
bl 807B26Ch
bl PRNG ;8000a90h
mov r1,r8
and r0,r1
add r7,r0,r5
bl PRNG ;8000a90h
and r0,r4
ldr r1,[r6,40h]
add r7,r7,r1
ldr r1,=0FFE60000h
add r0,r0,r1
ldr r1,[r6,44h]
add r2,r0,r1
mov r0,r6
mov r1,r7
bl 807B26Ch
+ pop r3 ;where the function goes if a monster didn't die.
mov r8,r3
pop r4-r7
pop r0
bx r0 ;returnSoulFunction:
080683D0h: ;Soul function entry point
push r4-r7,r14
mov r7,r10
mov r6,r9
mov r5,r8
push r5,r7
add sp,-24h
mov r7,r0
add r0,36h
ldrb r0,[r0]
mov r8,r0
lsl r0,r0,3h
...skip...
0806845Ah: ;not real label.
cmp r0,0h
beq + ;8068464h
ldr r0,=133h
mul r0,r4
lsr r4,r0,8h
+ cmp r4,0h
beq 806848Ah
mov r1,r9
ldr r0,[r1,30h]
add r0,r0,r4
str r0,[r1,30h]
ldr r1,=5F5E0FFh
cmp r0,r1
bls 806847Ah ;false if you went up a level
...skip...
080684CEh: ;not real label.
;see other posts for the code that goes here.Well, that would be cheating and the code doesn't work anyway.
