/* Insert 00 48 00 47 XX XX XX 08 at 0x3DB00 */
/* Also insert 00 00 02 E0 at 0x3DAF6 */
.text
.align 2
.thumb
.thumb_func
Main:
/*Checks if 0x8003 = 1*/
/*If false it goes back to normal*/
ldr r0, .Var8003
ldrb r0, [r0]
cmp r0, #0x2
beq SetBackToZero
cmp r0, #0x1
bne Return
ldr r0, .Var8011 /* This will be used later */
mov r1, #0x1
strh r1, [r0]
SetBackToZero:
/* Sets 0x8003 back to 0 */
push {r4-r7}
ldr r0, .Var8003
mov r1, #0x0
strb r1, [r0]
SynchronizeCheck:
/* Checks for first Pokemon's ability */
ldr r0, .BattleType
ldr r0, [r0]
mov r1, #0x4 /* Wild Battle */
and r1, r0
cmp r1, #0x0
beq SetPID
bl GetAbility
cmp r1, #0x1C
beq Synchronize
b SetPID
Synchronize:
/* Gets first Pokemon's nature */
ldr r0, .FirstPoke
mov r1, #0x0
mov r2, #0x0
bl Decrypt
bl GetNature
lsl r0, r0, #0x18
lsr r5, r0, #0x18
GenPID:
/* Generates a new bottom half of PID */
/* Puts it together with stored top half */
/* Checks to see if it matches nature */
bl GeneratePID
mov r4, r0
bl GetNature
lsl r0, r0, #0x18
lsr r0, r0, #0x18
cmp r0, r5
beq GenerateC
b GenPID
SetPID:
/* Generates a PID for the Pokemon */
bl GeneratePID
mov r4, r0
GenerateC:
/* This generates a random number between 0 and 8 */
/* This number will be used as C */
bl PID
lsr r0, r0, #0x8
cmp r0, #0x7
bgt GenerateC
mov r3, r0
FirstXOR:
/*XORs the TID and SID*/
ldr r0, .SaveBlockC
ldr r0, [r0]
mov r1, #0xA
add r1, r1, r0 /*Gets Trainer ID*/
ldrh r1,[r1]
mov r2, #0xC
add r0, r0, r2 /*Gets Secret ID*/
ldrh r0, [r0]
eor r0, r0, r1 /*A = TID xor SID*/
eor r3, r3, r0 /*B = C xor A*/
SecondXOR:
/*This XORs PID1 and PID2*/
/*PID1 = first half of PID*/
lsl r4, r4, #0x10
lsr r4, r4, #0x10 /*r4 = PID2*/
eor r3, r3, r4 /*PID1 = PID2 xor B*/
ConcatenateR4R3:
/*Concatenate means 'to link together'*/
/*This puts PID1 and PID2 together*/
lsl r3, r3, #0x10
orr r3, r3, r4 /*PID for Shiny Pokemon*/
bl GetAbility
cmp r1, #0x1C
beq CheckNatureAgain
b PrepareEnd
CheckNatureAgain:
/*Basically loops through the whole process again*/
/*Until it finds a PID that gives the right nature*/
/*And is Shiny as well*/
mov r6, r3
mov r0, r3
bl GetNatureYou
lsl r0, r0, #0x18
lsr r0, r0, #0x18
cmp r0, r5
bne GenPID
mov r3, r6
PrepareEnd:
pop {r4-r7}
str r3, [SP, #0x14]
b End
Return:
/* This is when you have Synchronise but the Pokemon is not Shiny */
bl GetAbility
cmp r1, #0x1C
bne NoCrash
ldr r0, .FirstPoke
mov r1, #0x0
mov r2, #0x0
bl Decrypt
bl GetNatureMe
lsl r0, r0, #0x18
lsr r5, r0, #0x18
PIDLoop:
bl GeneratePID
mov r4, r0
bl GetNatureYou
lsl r0, r0, #0x18
lsr r0, r0, #0x18
cmp r5, r0
bne PIDLoop
b Old
NoCrash:
bl GeneratePID
mov r4, r0
Old:
str r4, [sp, #0x14]
End:
ldr r0, .Return
bx r0
RNG:
ldr r6, .RNGRoutine
bx r6
GeneratePID:
push {r4, lr}
bl HalfPID
mov r4, r0
bl HalfPID2
lsl r4, r4, #0x10
lsr r4, r4, #0x10
lsl r0, r0, #0x10
orr r4, r0
mov r0, r4
pop {r4, pc}
GetAbility:
push {r3-r4, lr}
ldr r0, .FirstPoke
mov r1, #0x2E
mov r2, #0x0
bl Decrypt
mov r4, r0
ldr r0, .FirstPoke
mov r1, #0xB
mov r2, #0x0
bl Decrypt
ldr r2, .Stats
ldr r2, [r2]
mov r1, #0x1C
mul r0, r1
add r2, r0, r2
cmp r4, #0x0
beq Ability0
ldrb r1, [r2, #0x17]
pop {r3-r4, pc}
Ability0:
ldrb r1, [r2, #0x16]
pop {r3-r4, pc}
GetNature:
ldr r3, .GetNature
bx r3
Decrypt:
ldr r3, .Decrypter
bx r3
HalfPID:
ldr r4, .PID
bx r4
HalfPID2:
ldr r3, .PID
bx r3
Divide:
ldr r7, .Divider
bx r7
.align 2
.Var8003: .word 0x020370BE
.Var8000: .word 0x020370B8
.Var8011: .word 0x020370D8
.BattleType: .word 0x02022B4C
.SaveBlockC: .word 0x0300500C
.Divider: .word 0x081E4019
.PID: .word 0x08044EC9
.Decrypter: .word 0x0803FBE9
.FirstPoke: .word 0x02024284
.Stats: .word 0x080001BC
.GetNature: .word 0x08042EB5
.Return: .word 0x0803DB15
