Code: ASM Resource Thread

[Julez1003]

Heyo, i really like the 80x80 Mugshot Routine jiangzhengwenjzw has made and try atm to make it work on emerald, but unfortunately, i couldn´t achieve this.
I already tried to research the offsets for emerald but i couldn´t find the correct offsets for this.
So i would like to ask for some help.
Can somebody of you help me with the routine, please?
It would be awesome, because my knowledge is not the greatest. I also searched a lot on google, but the results, i found, aren´t really useful.

 

[Pyxal]

The following development is done by DoesntKnowHowToPlay, and I have no part in it. This has been re-posted as the original link had died.

[FR] Displaying IV's on the stat screen
A small piece of ASM that allows you to view IV's in the Pokémon stat screen.

• Step 1 - Image insert
First, insert the following image using NSE or TileMolester. Remember the address where you put it:

Spoiler:

It uses the same palette as the type chart, which is located at 0xE95DBC in vanilla FR. If you changed that palette, you'll have to change the above image as well (You'll probably want to change the image anyway since it's frankly rather minimalist).

• Step 2 - Actual ASM
Next you will need to insert the following ASM. It doesn't matter where, but do remember where you put it.

cmp r0, #0x0
beq Abort
cmp r0, #0x3
bgt Abort
cmp r0, #0x1
bne StandardAbort
b Start

Abort:
ldr r1, .AbortAddr
bx r1

StandardAbort:
ldr r1, .StandardAbortAddr
bx r1

.align 2
.AbortAddr: .word 0x08137bfd
.StandardAbortAddr: .word 0x08137bf9

Start:
ldr r0, .ActiveMonPtr
ldr r1, .ActiveOffset
ldr r0, [r0, #0x0]
add r6, r0, r1

add sp, #-0x18

HPIV:
mov r0, r6
mov r1, #0x27
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x6
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



AtkIV:
mov r0, r6
mov r1, #0x28
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x17
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



DefIV:
mov r0, r6
mov r1, #0x29
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x24
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler


SAtkIV:
mov r0, r6
mov r1, #0x2B
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x31
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



SDefIV:
mov r0, r6
mov r1, #0x2C
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x3E
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



SpeedIV:
mov r0, r6
mov r1, #0x2A
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x4B
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



add sp, #0x18
b Abort


GraphicHandler:
ldr r4, .HandlerAddr
bx r4

Decrypter:
ldr r2, .DecrypterAddr
bx r2

.align 2
.GraphicAddr: .word [B]0x08XXXXXX[/B]
.HandlerAddr: .word 0x080041f1
.ActiveMonPtr: .word 0x0203b140
.ActiveOffset: .word 0x00003290
.MonIndex: .word 0x0203b16c
.DecrypterAddr: .word 0x0803FBE9

Replace the 0x08XXXXXX with the address of the image you just inserted (no +1 or reverse needed).

• Step 3 - Byte changes

1. At 0x137BF0, place 00 49 08 47 followed by a pointer to the code you just inserted plus one (for example, if you inserted it at 0x800000, you will place 00 49 08 47 01 00 80 08 at 0x137BF0).
2. At 0x137BE4, place 01 20 03 E0.

Ending notes
With that, you should be good to go. In typical Pokémon fashion, this code does not give you the specific values; it instead gives you a unique two-value range. If you want to change that it's rather easy; cut every line starting with lsr in the code and reassemble it, then adjust the image so it has 32 meaningful values instead of 16.

Credits
DoesntKnowHowToPlay - Actual code, image
Lunos - He did the actual Google cache magic too find it

Again, this is done by DoesntKnowHowToPlay, and it is not done by me. Any credit should go DoesntKnowHowToPlay, and not me.

 

[Raduziel]

Hey Upsurge,

First, thanks for the feedback at the other thread.

Second, I have some questions (I told I was green)...

1) The image you kindly provided was saved at 71C000 (used Free Space Finder to find this spot). Should I replace the XXXXXX in your routine as 0x0871C000 or as 0x71C000? I guess it is the first option but I think it is best to ask.

2) I've copied your routine using Notepad++ and saved as IVRanking.asm but I have no idea about what I do with this file. So, I used a Thumb to turn this .asm into a .bin, opened this .bin file and my rom using HxD and pasted the bin's code inside the ROM starting at 71B500, I think this covers this step - let me know if I'm wrong, please.

3)

• Step 3 - Byte changes

1. At 0x137BF0, place 00 49 08 47 followed by a pointer to the code you just inserted plus one (for example, if you inserted it at 0x800000, you will place 00 49 08 47 01 00 80 08 at 0x137BF0).
2. At x137BE4, place 01 20 03 E0.

Can you please explain exactly how this is done?

Thanks in advance.

 

[Pyxal]

<snip>

This is NOT my routine. As said above, it is done by DoesntKnowHowToPlay.

1) This image was by DonestKnowHowToPlay, and yes, like this: 71C000. As an example, the routine would become:

Spoiler:

cmp r0, #0x0
beq Abort
cmp r0, #0x3
bgt Abort
cmp r0, #0x1
bne StandardAbort
b Start

Abort:
ldr r1, .AbortAddr
bx r1

StandardAbort:
ldr r1, .StandardAbortAddr
bx r1

.align 2
.AbortAddr: .word 0x08137bfd
.StandardAbortAddr: .word 0x08137bf9

Start:
ldr r0, .ActiveMonPtr
ldr r1, .ActiveOffset
ldr r0, [r0, #0x0]
add r6, r0, r1

add sp, #-0x18

HPIV:
mov r0, r6
mov r1, #0x27
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x6
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



AtkIV:
mov r0, r6
mov r1, #0x28
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x17
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



DefIV:
mov r0, r6
mov r1, #0x29
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x24
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler


SAtkIV:
mov r0, r6
mov r1, #0x2B
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x31
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



SDefIV:
mov r0, r6
mov r1, #0x2C
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x3E
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



SpeedIV:
mov r0, r6
mov r1, #0x2A
bl Decrypter

mov r5, r0
lsr r5, r5, #0x1
mov r0, #0x40
mul r5, r0, r5

mov r1, #0x80
str r1, [sp, #0x0]
str r1, [sp, #0x4]

#x, y position
mov r2, #0xC
str r2, [sp, #0x8]
mov r1, #0x4B
str r1, [sp, #0xc]

#x, y size
mov r2, #0x10
str r2, [sp, #0x10]
mov r1, #0x8
str r1, [sp, #0x14]

mov r0, #0x3
ldr r1, .GraphicAddr
add r1, r5
mov r2, #0x0
mov r3, #0x0
bl GraphicHandler



add sp, #0x18
b Abort


GraphicHandler:
ldr r4, .HandlerAddr
bx r4

Decrypter:
ldr r2, .DecrypterAddr
bx r2

.align 2
.GraphicAddr: .word 0x0871C000
.HandlerAddr: .word 0x080041f1
.ActiveMonPtr: .word 0x0203b140
.ActiveOffset: .word 0x00003290
.MonIndex: .word 0x0203b16c
.DecrypterAddr: .word 0x0803FBE9

2) Yes, it covers this step. To automagically insert routines into your ROM, use this tool.

3) Basically you go to address's 0x137BF0 and 0x137BE4 in any hex editor, and replace (Ctrl+B) them with the said bytes.

 

[Raduziel]

Thanks for linking the tool, this will make my life easier in the future, I suppose.

3) Basically you go to address's 0x137BF0 and 0x137BE4 in any hex editor, and replace (Ctrl+B) them with the said bytes.

Ok, I got step 3.2, but 3.1 keeps elluding me.

In your example 0x800000 became 00 80 08 and that is the part that I'm failing to understand. Can you please explain this further? My case is 71B500, would the final input be 00 49 08 47 01 00 71 B5 08?

Again, thanks for taking the time to guide me through this.

 

[Pyxal]

Thanks for linking the tool, this will make my life easier in the future, I suppose.



Ok, I got step 3.2, but 3.1 keeps elluding me.

In your example 0x800000 became 00 80 08 and that is the part that I'm failing to understand. Can you please explain this further? My case is 71B500, would the final input be 00 49 08 47 01 00 71 B5 08?

Again, thanks for taking the time to guide me through this.

It will become 00 49 08 47 01 01 B5 71 08.

 

[Raduziel]

It will become 00 49 08 47 01 01 B5 71 08.

Thanks!

Looks like it is almost done but apparently I messed up somehow. The attached image shows the ranking boxes are there but no value inside though.

Edit: This was how I've inserted the image

NSE -> Load ROM -> Open Sprite -> Selected the one from the image above -> File -> Insert -> Image Data -> FreeSpaceFinder (checking from the beginning of the ROM and telling the size is 2048 bytes) -> 71C000 - Save

It is working perfectly, I was dumb and using an old backup without the inserted image. Thanks for guiding me through this. Cheers!

 

[Raduziel]

Does anyone know how to alter the ASM routine to use a 256x8 image instead of a 128x32 one?

Thanks!

 

[Raduziel]

I've found a way to make TMs unsellable:

Hi,

I made all the changes but I can still sell TMs (they are reusable already).

On top of your changes I've used HexManiacAdvance to alter the Mystery Byte of TMs to "1" (the same way that HMs are displayed).

I'm using CFRU, by the way, but didn't set the flag for reusable TMs while installing that - everything achieved was through this thread (so far: reusable and no number display).

Thanks!

 

[BluRose]

modulate experience with two scripting vars

take your experience and multiply it by the "var numerator" and then divide it by the "var denominator"

strongly suggest using higher numbers, i.e. if you want a 60% experience thing then set the numerator to 60 and the denominator to 100 so that the processor generates slightly more accurate numbers
also make sure that you can't really get more than about 56,000 experience, as that causes interesting errors

credit me and akamethebulbasaur
for fire red:

Spoiler:

/* Put 00 48 00 47 XX XX XX 08 a 0x21C38 and edit the var numbers at the bottom as you please */
.text
.align 2
.thumb
.thumb_func

EditarExperiencia:
    push {r1}
    ldr r0, .VarDenominador        /* Puedes cambiarla */
    mov r3, pc
    add r3, #7
    mov lr, r3
    ldr r3, .VarGet
    bx r3
    cmp r0, #0
    beq _dontdividebyzero
_continue:
    push {r0}
    ldr r0, .VarNumerador
    mov r3, pc
    add r3, #7
    mov lr, r3
    ldr r3, .VarGet
    bx r3
_terminar:
    pop {r1-r2}
    mul r0, r2
    mov r3, pc
    add r3, #7
    mov lr, r3
    ldr r3, .Dividir
    bx r3
    ldr r2, .Volver
    bx r2

_dontdividebyzero:
    mov r0, #1
    b _continue  

.align 2


.Volver:
    .word 0x08021C40 | 1
.VarNumerador:
    .word 0x40XX
.VarDenominador:
    .word 0x40XX
.VarGet:
    .word 0x0806E568 | 1
.Dividir:
    .word 0x081E4018 | 1

 

[BluRose]

not to double post but

give your opposing trainers evs and ivs based on a var each

this primarily to make difficulty hacks where there can be multiple difficulties

put a value in one var that you want the opponents ivs to be and another value in another var that you want your opponent's evs to be (and yes, all of them will be the same)
the pokemon has to have just a custom item (at least that check mark ticked in your favorite trainer editor) then all of their values will be set. custom moveset doesn't have to be defined :P

pastebin right here

credit me and doesntknowhowtoplay
for fire red:

Spoiler:

@ new and improved
@ note:  check the box that makes the mon hold an item
@ pokemon tiene que tener un objeto, no importa si tiene movimientos personalizados

.align 2
.thumb
.thumb_func

.equ address_to_insert, 0xXXXXXX @ cambia esto, no 08 o algo así

.org 0x11596
mov r0, #1 @ used to determine return address
push {r0}
ldr r0, .Address_2
bx r0

.align 2

.Address_2: .word (0x08000001 | address_to_insert)

.org 0x115f6
mov r0, r1
mov r6, r0
b 0x11604

.org 0x1162c
mov r0, #0
push {r0}
ldr r0, .Method_Addr
bx r0

.align 2

.Method_Addr: .word (0x08000001 | address_to_insert)

.org 0x3dc70
b 0x3dcd0


.org address_to_insert 

LoadItem:
add r5, #0x6
add r0, r4, #0x0
mov r1, #0xc
add r2, r5, #0x0
bl Insert_Element

StartEVs:
ldr r0, .VarEVs
bl get_value_from_var
mov r5, #0x1A
push {r0}

LoadEVs:
mov r0, r4
mov r1, r5
mov r2, sp
bl Insert_Element
add r5, #1
cmp r5, #0x1F+1
bne LoadEVs

StartIVs:
pop {r0}
ldr r0, .VarIVs
bl get_value_from_var
mov r5, #0x27
push {r0}

IVLoop:
mov r0, r4
mov r1, r5
mov r2, sp
bl Insert_Element
add r5, r5, #0x1
cmp r5, #0x2C+1
bne IVLoop

End:
pop {r6}
mov r0, r4
bl Recalculate_Stats
pop {r1}
cmp r1, #0
bne return_2
ldr r1, .Return_Addr_1
bx r1

return_2:
ldr r1, .Return_Addr_2
bx r1

Insert_Element:
ldr r3, .Insert_Addr
bx r3

Recalculate_Stats:
ldr r1, .Recalc_Addr
bx r1

get_value_from_var:
ldr r2, .VarGet
bx r2

Mod:
ldr r3, .Mod_Addr
bx r3

.align 2
.Return_Addr_1: .word 0x08011639 @ item and custom moves
.Return_Addr_2: .word 0x0801166D @ just holding an item
.VarEVs: .word 0x000040XX @ change this
.VarIVs: .word 0x000040XX @ change this
.VarGet: .word 0x0806E569
.Insert_Addr: .word 0x0804037d
.Recalc_Addr: .word 0x0803e47d
.Mod_Addr: .word 0x081e4685

EDIT: new and improved! only needs you to check the custom item instead of going all in on the moveset too

 

[Bela]

Well done on that KDS !

<snip>

Bonus:
-Life Orb boost
-Light ball updated
-Item that boost a certain type of attack for Emerald
-Timespace Orbs for Emerald

Note that for timespace orbs and new boost-type item, you can adjust the power added the same way than miracle seed and the like.

Spoiler:

Emerald:

CheckLifeOrb:
cmp r2, #[I][U]0x43[/U][/I]	/*Held item effect of life orb, I chose 0x43 (= 67 in decimal) because it's unused*/
beq Lifeorb

CheckNewItem:
cmp r2, #[I][U]0x44[/U][/I]	/*Held item effect of the boost item, I chose 0x44 (= 68 in decimal) because it's unused*/
beq NewItem

CheckAdamantOrb:
cmp r2, #[I][U]0x45[/U][/I]	/*Unused held item effect*/
bne CheckLustreous
ldrh r0, [r6]
mov r3, #0xFF	/*0xFF + 0xE4 = 0x1E3 = 483 = index number of Dialga*/
add r3, #0xE4
cmp r0, r3
beq AdamantOrb

CheckLustreous:
cmp r2, #[I][U]0x46[/U][/I]	/*Unused held item effect*/
bne CheckGriseous
ldrh r0, [r6]
mov r3, #0xFF	/*0xFF + 0xE5 = 0x1E4 = 484 = index number of Palkia*/
add r3, #0xE5
cmp r0, r3
beq LustreousOrb

CheckGriseous:
cmp r2, #[I][U]0x47[/U][/I]	/*Unused held item effect*/
bne CheckLightBall
ldrh r0, [r6]
mov r3, #0xFF	/*0xFF + 0xE8 = 0x1E7 = 487 = index number of Giratina*/
add r3, #0xE8
cmp r0, r3
beq GriseousOrb
b Back

AdamantOrb:
push {r0-r5}
mov r1, #8	/*Steel type*/
mov r2, #0x10	/*Dragon type*/
b CheckExceptionTypeAttack

LustreousOrb:
push {r0-r5}
mov r1, #0xB	/*Water type*/
mov r2, #0x10	/*Dragon type*/
b CheckExceptionTypeAttack

GriseousOrb:
push {r0-r5}
mov r1, #7	/*Ghost type*/
mov r2, #0x10	/*Dragon type*/
b CheckExceptionTypeAttack

NewItem:
push {r0-r5}
mov r1, #9	/*New type you want to boost*/
mov r2, #9	/*New type you want to boost, here I choose the same because I want it boost only one type*/

CheckExceptionTypeAttack:
ldr r4, CheckTypeLoc
ldr r4, [r4]
ldrb r4, [r4, #0x13]
cmp r4, #0
beq GetMoveType
mov r5, #0x3F
and r4, r5
cmp r4, r1
beq Boost
cmp r4, r2
beq Boost
b PopAndBack

Back:
ldr r0, Return
bx r0

PopAndBack:
pop {r0-r5}
b Back

CheckLightBall:
cmp r2, #0x2D
bne Back
ldrh r0, [r6]
cmp r0, #0x19
beq Lightball
b Back

GetMoveType:
ldr r3, CurMoveIndex
ldrh r3, [r3]
ldr r4, MoveData
mov r5, #0xC
mul r5, r3
add r4, r5
ldrb r4, [r4, #2]
cmp r4, r1
beq Boost
cmp r4, r2
bne PopAndBack

Boost:
pop {r0-r5}
ldrh r3, [r6, #0x2E]
lsl r0, r3, #4
push {r1}
mov r1, #6
mul r3, r1
pop {r1}
add r3, r0
lsl r3, #1
ldr r0, LocItems
add r3, r0
add r3, #0x13
ldrb r0, [r3]
mov r3, #0x52
mul r0, r3
lsr r0, #6
add r0, #0x7B
mul r7, r0
lsr r7, #7
mov r3, r8
mul r3, r0
lsr r3, #7
mov r8, r3
b Back

Lifeorb:
mov r0, r8
mov r3, #0xA7
mul r0, r3
lsr r0, #7
mov r8, r0
mul r7, r3
lsr r7, #7
b Back

Lightball:
mov r0, r8
lsl r0, r0, #0x1
mov r8, r0
lsl r7, r7, #0x1
b Back

.align 2
Return: .word 0x0806983E+1
LocItems: .word 0x085839A0           /*Location of your items Data*/
CurMoveIndex: .word 0x020241EA
MoveData: .word 0x0831C898           /*Location of your move data*/
CheckTypeLoc: .word 0x0202449C

/*00 48 00 47 XX XX XX 08 00 00 00 at 0x6982C*/

Fire Red:

cmp r2, #0x43   /*Held item effect, I chose 0x43 (=67 in dec) because it is unused in the game*/
beq Lifeorb
cmp r2, #0x2D
bne Back
ldrh r0, [r6]
cmp r0, #0x19
beq Lightball
b Back

Lifeorb:
mov r0, r8
mov r3, #0xA7
mul r0, r3
lsr r0, #7
mov r8, r0
mul r7, r3
lsr r7, #7
b Back

Lightball:
mov r0, r8
lsl r0, r0, #0x1
mov r8, r0
lsl r7, r7, #0x1

Back:
ldr r0, Return
bx r0

.align 2
Return: .word 0x0803F00A+1

/*00 48 00 47 XX XX XX 08 00 00 00 at 0803EFF8*/

Hey everybody, I know it's been 5 years since this was written and most people have moved on from this form of hacking, but I have a small request. I'm interested in adding the time-space orbs and the Pixie Plate to FireRed. From what I have been able to find on this forum, it looks like kleenexfeu did both for Emerald, but this has never been ported to FireRed.

While I know the CFRU engine exists and likely has these elements, I'm not looking to completely overhaul the game or re-do everything to use that base. I'm also unsure if these could be extracted from CFRU or not. My thinking is that the routines in the quoted post have not been written for FireRed, and a port of them are what I'd need. If someone out there is able to help me with this, please reach out to me on Discord or reply here. Thank you! :)

 

[Super Versekr Dark]

not to double post but

give your opposing trainers evs and ivs based on a var each

this primarily to make difficulty hacks where there can be multiple difficulties

put a value in one var that you want the opponents ivs to be and another value in another var that you want your opponent's evs to be (and yes, all of them will be the same)
the pokemon has to have both a custom moveset and a custom item (at least those check marks ticked in your favorite trainer editor) then all of their values will be set

pastebin right here

credit me and doesntknowhowtoplay
for fire red:

Spoiler:

# note:  mon has to hold both an item and have a custom moveset
# pokemon tiene que tener un objeto y tener movimientos definidos

.align 2
.thumb
.thumb_func

.org 0x115f6
mov r0, r1
mov r6, r0
b 0x11604

.org 0x1162c
ldr r0, .Method_Addr
bx r0

.Method_Addr: .word (0x08000001 | 0xXXXXXX)

.org 0x3dc70
b 0x3dcd0


.org 0xXXXXXX # change this and the other above

LoadItem:
add r5, #0x6
add r0, r4, #0x0
mov r1, #0xc
add r2, r5, #0x0
bl Insert_Element

StartEVs:
ldr r0, .VarEVs
bl get_value_from_var
mov r5, #0x1A
push {r0}

LoadEVs:
mov r0, r4
mov r1, r5
mov r2, sp
bl Insert_Element
add r5, #1
cmp r5, #0x1F+1
bne LoadEVs

StartIVs:
pop {r0}
ldr r0, .VarIVs
bl get_value_from_var
mov r5, #0x27
push {r0}

IVLoop:
mov r0, r4
mov r1, r5
mov r2, sp
bl Insert_Element
add r5, r5, #0x1
cmp r5, #0x2C+1
bne IVLoop

End:
pop {r6}
mov r0, r4
bl Recalculate_Stats
ldr r1, .Return_Addr
bx r1

Insert_Element:
ldr r3, .Insert_Addr
bx r3

Recalculate_Stats:
ldr r1, .Recalc_Addr
bx r1

get_value_from_var:
ldr r2, .VarGet
bx r2

Mod:
ldr r3, .Mod_Addr
bx r3

.align 2
.Return_Addr: .word 0x08011639
.VarEVs: .word 0x000040XX # change this
.VarIVs: .word 0x000040XX # change this
.VarGet: .word 0x0806E569
.Insert_Addr: .word 0x0804037d
.Recalc_Addr: .word 0x0803e47d
.Mod_Addr: .word 0x081e4685

Excuse me, how would the script be done?

 

[BluRose]

Excuse me, how would the script be done?

if you want to have a trainer that has its evs and ivs change with difficulty, then you just need to
- make the trainer's pokémon have a custom held item (moveset optional)
- insert the routine
- in any script, set the variables that you chose to the evs and ivs you desire
i recommend using vars from 0x4012-0x40FF, or if you don't want to clean the rom of its scripts then 0x40C0-0x40FF

si quieres un entrenador que tiene evs y ivs que cambian con dificultad, pues necesitas
- hacer que el pokemon del entrenador tiene un objeto (moveset no es necesario)
- insertar la rutina
- en un script, carga las variables que escoges para tener los evs y los ivs a los valores que deseas
recomiendo que uses vars desde 0x4012-0x40FF, o si no quieres borrar la rom de sus scripts 0x40C0-0x40FF

 

[Dr. Seuss]

It's been a long time since the main post was updated, so after a few hours I finished to update the index for you to easily find any ASM routine posted in this thread.

If a link is not properly working or I missed a routine feel free to PM me or any mod to add it to the index

 

[BluRose]

- snip -

- snip -
Bonus:
-Life Orb boost
-Light ball updated
-Item that boost a certain type of attack for Emerald
-Timespace Orbs for Emerald

Note that for timespace orbs and new boost-type item, you can adjust the power added the same way than miracle seed and the like.

Spoiler:

Emerald:

CheckLifeOrb:
cmp r2, #[I][U]0x43[/U][/I]	/*Held item effect of life orb, I chose 0x43 (= 67 in decimal) because it's unused*/
beq Lifeorb

CheckNewItem:
cmp r2, #[I][U]0x44[/U][/I]	/*Held item effect of the boost item, I chose 0x44 (= 68 in decimal) because it's unused*/
beq NewItem

CheckAdamantOrb:
cmp r2, #[I][U]0x45[/U][/I]	/*Unused held item effect*/
bne CheckLustreous
ldrh r0, [r6]
mov r3, #0xFF	/*0xFF + 0xE4 = 0x1E3 = 483 = index number of Dialga*/
add r3, #0xE4
cmp r0, r3
beq AdamantOrb

CheckLustreous:
cmp r2, #[I][U]0x46[/U][/I]	/*Unused held item effect*/
bne CheckGriseous
ldrh r0, [r6]
mov r3, #0xFF	/*0xFF + 0xE5 = 0x1E4 = 484 = index number of Palkia*/
add r3, #0xE5
cmp r0, r3
beq LustreousOrb

CheckGriseous:
cmp r2, #[I][U]0x47[/U][/I]	/*Unused held item effect*/
bne CheckLightBall
ldrh r0, [r6]
mov r3, #0xFF	/*0xFF + 0xE8 = 0x1E7 = 487 = index number of Giratina*/
add r3, #0xE8
cmp r0, r3
beq GriseousOrb
b Back

AdamantOrb:
push {r0-r5}
mov r1, #8	/*Steel type*/
mov r2, #0x10	/*Dragon type*/
b CheckExceptionTypeAttack

LustreousOrb:
push {r0-r5}
mov r1, #0xB	/*Water type*/
mov r2, #0x10	/*Dragon type*/
b CheckExceptionTypeAttack

GriseousOrb:
push {r0-r5}
mov r1, #7	/*Ghost type*/
mov r2, #0x10	/*Dragon type*/
b CheckExceptionTypeAttack

NewItem:
push {r0-r5}
mov r1, #9	/*New type you want to boost*/
mov r2, #9	/*New type you want to boost, here I choose the same because I want it boost only one type*/

CheckExceptionTypeAttack:
ldr r4, CheckTypeLoc
ldr r4, [r4]
ldrb r4, [r4, #0x13]
cmp r4, #0
beq GetMoveType
mov r5, #0x3F
and r4, r5
cmp r4, r1
beq Boost
cmp r4, r2
beq Boost
b PopAndBack

Back:
ldr r0, Return
bx r0

PopAndBack:
pop {r0-r5}
b Back

CheckLightBall:
cmp r2, #0x2D
bne Back
ldrh r0, [r6]
cmp r0, #0x19
beq Lightball
b Back

GetMoveType:
ldr r3, CurMoveIndex
ldrh r3, [r3]
ldr r4, MoveData
mov r5, #0xC
mul r5, r3
add r4, r5
ldrb r4, [r4, #2]
cmp r4, r1
beq Boost
cmp r4, r2
bne PopAndBack

Boost:
pop {r0-r5}
ldrh r3, [r6, #0x2E]
lsl r0, r3, #4
push {r1}
mov r1, #6
mul r3, r1
pop {r1}
add r3, r0
lsl r3, #1
ldr r0, LocItems
add r3, r0
add r3, #0x13
ldrb r0, [r3]
mov r3, #0x52
mul r0, r3
lsr r0, #6
add r0, #0x7B
mul r7, r0
lsr r7, #7
mov r3, r8
mul r3, r0
lsr r3, #7
mov r8, r3
b Back

Lifeorb:
mov r0, r8
mov r3, #0xA7
mul r0, r3
lsr r0, #7
mov r8, r0
mul r7, r3
lsr r7, #7
b Back

Lightball:
mov r0, r8
lsl r0, r0, #0x1
mov r8, r0
lsl r7, r7, #0x1
b Back

.align 2
Return: .word 0x0806983E+1
LocItems: .word 0x085839A0           /*Location of your items Data*/
CurMoveIndex: .word 0x020241EA
MoveData: .word 0x0831C898           /*Location of your move data*/
CheckTypeLoc: .word 0x0202449C

/*00 48 00 47 XX XX XX 08 00 00 00 at 0x6982C*/

Fire Red:

cmp r2, #0x43   /*Held item effect, I chose 0x43 (=67 in dec) because it is unused in the game*/
beq Lifeorb
cmp r2, #0x2D
bne Back
ldrh r0, [r6]
cmp r0, #0x19
beq Lightball
b Back

Lifeorb:
mov r0, r8
mov r3, #0xA7
mul r0, r3
lsr r0, #7
mov r8, r0
mul r7, r3
lsr r7, #7
b Back

Lightball:
mov r0, r8
lsl r0, r0, #0x1
mov r8, r0
lsl r7, r7, #0x1

Back:
ldr r0, Return
bx r0

.align 2
Return: .word 0x0803F00A+1

/*00 48 00 47 XX XX XX 08 00 00 00 at 0803EFF8*/

life orb, new fairy plate, spacial orbs, and the new soul dew (as of gen 7) all in one routine! based on the quoted routine.

for fire red:

Spoiler:

.align 2

.thumb
.thumb_func

@ 00 48 00 47 XX XX XX 08 00 00 00 at 0803EFF8
@ also change gItems and gBattleMoves at the bottom of the post

.equ .giratina, 0x1000 @ giratina index
.equ .dialga, 0x1001 @ dialga index
.equ .palkia, 0x1002 @ palkia index
.equ .pikachu, 0x19 @ pikachu index
.equ .latios, 408
.equ .latias, 407

CheckAnyItem:
cmp r2, #0x43   @ boost life orb held effect
beq Lifeorb
cmp r2, #0x44   @ boost fairy type held effect
beq FairyPlate
cmp r2, #0x45   @ adamant orb held effect
beq AdamantOrb
cmp r2, #0x46   @ lustrous orb held effect
beq LustrousOrb
cmp r2, #0x47   @ griseous orb held effect
beq GriseousOrb
cmp r2, #0x48   @ soul dew gen 7 held effect.  can not be the same as the normal soul dew!  it's a new held effect here
beq NewSoulDew
cmp r2, #0x2D   @ light ball held effect
bne Back
ldrh r0, [r6]
cmp r0, #.pikachu
beq Lightball   @ if pikachu then go to lightball
b Back

FairyPlate:
push {r0-r5}
mov r0, #9 @ your fairy type
mov r1, #9 @ your fairy type
b CheckTypeOfAttack

AdamantOrb:
push {r0-r5}
ldrh r0, [r6]
ldr r1, =(.dialga)
cmp r0, r1
bne PopAndBack
mov r0, #8
mov r1, #16
b CheckTypeOfAttack

LustrousOrb:
push {r0-r5}
ldrh r0, [r6]
ldr r1, =(.palkia)
cmp r0, r1
bne PopAndBack
mov r0, #0xB
mov r1, #16
b CheckTypeOfAttack

GriseousOrb:
push {r0-r5}
ldrh r0, [r6]
ldr r1, =(.giratina)
cmp r0, r1
bne PopAndBack
mov r0, #7
mov r1, #16
b CheckTypeOfAttack

NewSoulDew:
push {r0-r5}
ldrh r0, [r6]
ldr r1, =(.latias)
cmp r0, r1
add r1, #1 @ latios = latias + 1
cmp r0, r1
bne PopAndBack
mov r0, #0xE
mov r1, #0x10
@b CheckTypeOfAttack  @ fall through

CheckTypeOfAttack:
ldr r4, gBattleStruct
ldr r4, [r4]
ldrb r4, [r4, #0x13] @ check for the dynamic move type
cmp r4, #0
beq GetMoveType
mov r5, #0x3F
and r4, r5
cmp r4, r1
beq Boost
cmp r4, r2
beq Boost
b PopAndBack

GetMoveType:
ldr r3, gCurrentMove
ldrh r3, [r3]
ldr r4, gBattleMoves
mov r5, #0xC
mul r5, r3
add r4, r5
ldrb r4, [r4, #2]
cmp r4, r1
beq Boost
cmp r4, r2
bne PopAndBack

@ fall through

Boost:
pop {r0-r5}
ldrh r3, [r6, #0x2E]
lsl r0, r3, #4
push {r1}
mov r1, #6
mul r3, r1
pop {r1}
add r3, r0
lsl r3, #1
ldr r0, gItems
add r3, r0
add r3, #0x13
ldrb r0, [r3]
mov r3, #0x52
mul r0, r3
lsr r0, #6
add r0, #0x7B
mul r7, r0
lsr r7, #7
mov r3, r8
mul r3, r0
lsr r3, #7
mov r8, r3
b Back

Lifeorb:
mov r0, r8
mov r3, #0xA7
mul r0, r3
lsr r0, #7
mov r8, r0
mul r7, r3
lsr r7, #7 
b Back

Lightball:
mov r0, r8
lsl r0, r0, #0x1
mov r8, r0
lsl r7, r7, #0x1

Back:
ldr r0, Return
bx r0

PopAndBack:
pop {r0-r5}
b Back

.align 2
Return: .word 0x0803F00A | 1
gCurrentMove:  .word 0x02023D4A
gBattleMoves:  .word 0x08250C04 @ change this
gBattleStruct:  .word 0x02023FE8
gItems:  .word 0x083DB028 @ change this

works the same where it's based on the parameter in the item effect structure

EDIT: added species requirements and now it doesn't crash
wholly tested now basically

EDIT: updated it to include gen 7's soul dew updates. note that it can't use the same held effect as the normal soul dew

 

[Super Versekr Dark]

Gen 7 Soul Dew Update

link down

 

[Megax Rocker]

Is there a way to change the species of an egg generated from the daycare to be random between parents? like instead of the egg always hatching as the mother's species, it has a chance if being the father's as well.

for example, if you breed Nidoking with with Kanghaskhan, the resulting egg has a 50% chance of being a Nidoran, instead of always generating a Kangaskhan egg.

My idea is to have every pokemon be able to hatch from an egg from normal mothers, male only pokemon are stuck with ditto for mothers.

 

[Splinxsh]

I don't suppose you could show me the HEX codes or the compiled script on here.

I've followed everything you put and made the Numerator 60 and Denominator on 100 and it only keeps saying that the Pokémon only receives 1 EXP.

Any help please would be great!

 

[Fantaseed]

Since the start menu only runs asm offset,

I'd like to request an asm routine that targets and runs any chosen normal script offset for the start menu's selection.

Game: BPRE Fire red