artificial RED | Complete 721 Pok?mon rombase | Update 12/08/16 | Version 1.1

[pokefreak890]

MrDollSteak has a thread with all gen 6 pokemon sprites including megas use all of those and also I'm just glad u replied back to us :)

 

[NewDenverCity]

Still working on the sprites you guys. I have been busy, but I will finish this project! :) In the meantime, does anybody have some fancy list of forms, formes and mega's I shoud include?

Simply for the sake of completion, all the Mega Evolutions/Primal Reversions as far as that goes. Meloetta's forme was created but requires you to do a couple of battle script edits. This might be hard because both Meloetta's forme change and Mega Evolutions use the same spots for their hooks. Rotom, Deoxys, and the Therian formes will be incredibly easy, you don't even need to do anything. Meowstic is pretty simple, and should be done. Arceus and Giratina can be done as well. Darmanitan, Cherubi, small gender changes, Genesect, Hoopa, Shaymin, and Keldeo have not been done before, but some people might like to have Shaymin's other forme in there just for fun.
I don't think you need to include the small gender changes and Vivillion, as those are purely aesthetic, as is Cherubi's, but for some reason Cherubi got a lot of attention on the form development thread.

 

[azurile13]

Simply for the sake of completion, all the Mega Evolutions/Primal Reversions as far as that goes. Meloetta's forme was created but requires you to do a couple of battle script edits. This might be hard because both Meloetta's forme change and Mega Evolutions use the same spots for their hooks. Rotom, Deoxys, and the Therian formes will be incredibly easy, you don't even need to do anything. Meowstic is pretty simple, and should be done. Arceus and Giratina can be done as well. Darmanitan, Cherubi, small gender changes, Genesect, Hoopa, Shaymin, and Keldeo have not been done before, but some people might like to have Shaymin's other forme in there just for fun.
I don't think you need to include the small gender changes and Vivillion, as those are purely aesthetic, as is Cherubi's, but for some reason Cherubi got a lot of attention on the form development thread.

To add to this, just about everything not involving battlescript can be added using the getattr / setattr routines. The way they work, every data substructure is decrypted and pointers are placed in specific registers, so even when you hook from the "read" of species, moves, items, etc, you have pointers to all other substructures just sitting in higher registers. They're all pretty similar to Arceus/Giratina, making it pretty easy to implement Keldeo, Rotom forgetting special moves, and even time/season based mons by placing a "transformed" time in actual pokemon, then subtracting to see if three days or whatever have passed. The data is handled fine. Not sure about pretty graphical updates, however.

 

[thedarkdragon11]

Still working on the sprites you guys. I have been busy, but I will finish this project! :) In the meantime, does anybody have some fancy list of forms, formes and mega's I shoud include?

All MEs/PRs should definitely be included... Next should be the forms of Deoxys, Burmy, Wormadam, Rotom, Giratina, Shaymin, Arceus, Basculin, Tornadus, Thundurus, Landorus, Kyurem, Meloetta, Aegislash, Pumpkaboo, Gourgeist and Hoopa, those have stat and type changes in forms and are found in all games from debut and forward... Next would be the notable female forms of Unfezant, Frillish, Jellicent, Pyroar and Meowstic... Those are the must-included ones...

Darmanitan form would be next, it is somewhat necessary because of stat changes but the real availability of this is only from Gen. 5, else, should be transferred...

Genesect can be skipped but it's attack type should be manipulated even without sprite change...

Deerling and Sawsbuck can also be added but it needs seasons which cannot be found in this resource...

Shellos, Gastrodon, Keldeo, Xerneas, Cherubi, Flabebe, Floette, Florges, Vivillon and Furfrou are purely aesthetic... Their forms are the last thing that should be considered...

Cosplay Pikachu, Spiky Eared Pichu, Eternal Flower Floette... Forget them...

 

[pokefreak890]

For arceus and giratina kleenexfeu has a thread in his signature that has the routines for giratina and arceus as well as Danni's forms and formes thread has the rotom and burmy stuff so there's the first places to look then u can ask purple orange for his deoyxs code since he has a working one I'm not sure if there is one for fire red though

 

[anonyboy]

Still working on the sprites you guys. I have been busy, but I will finish this project! :) In the meantime, does anybody have some fancy list of forms, formes and mega's I shoud include?

Forms/Formes:
Deoxys Formes
Burmy
Wormadams
East/West Shellos&Gastrodon
Rotom
Giratina
Arceus
Gender Frilish&Jelicent
Therain Formes (Tornadus, Thundrus, Landorus)
Drive Genesects
Basculin
Zen Mode Darmanitan?
Kyurem Black and White
Keldo
Meloetta
Aegislash
Hoopa

Megas:
Charizard x&y
Blastoise
Venusaur
Pidgeot
Beedrill
Alakazam
Gengar
Kangaskhan
Slowbro
Pinsir
Gyarados
Aerodactyl
Mewtwo X&Y
Ampharos
Scizor
Steelix
Heracross
Houndoom
Tyranitar
Sceptile
Blaziken
Swampert
Gardevoir
Sableye
Sharpedo
Camerupt
Mawile
Aggron
Medicham
Manectric
Altaria
Absol
Banette
Glailie
Salamence
Metagross
Latias&Latios
Loppuny
Gallade
Lucario
Garchomp
Abomasnow
Audino

Primals:
Kyogre
Groudon
Rayquaza

 

[NicolasLukas]

Hello Epsilon,
great project:)
I fully support this!
I have three questions: 1. Are you going to add all new abilities from gen 4 - 6?
2. Are you adding more box slots in the pc?
3. Is it maybe possible, to expand a Pokemon Rom to 64mb (I know that´s really much, but why not?)?

Thanks in advance for your answer:)

 

[pokefreak890]

in the abilty resource thread not all abilites are finshed yet so most likley the answer is no second of all i dont think u can expand a rom to 64MB or else he may have done it in the beginning

and third thing and this may help epsilon out

Spoiler:

Arceus and Giratina Form/Formes Routine

.thumb
.thumb_func

.equ GriseousIndex, 0x____
.equ GiratinaIndex, 0x____
.equ GiratinaOIndex, 0x____

.equ ArceusNormal, 0x____

.equ FistPlateIndex, 0x____
.equ ArceusFight, 0x____

.equ SkyPlateIndex, 0x____
.equ ArceusFly, 0x____

.equ ToxicPlateIndex, 0x____
.equ ArceusPoison, 0x____

.equ EarthPlateIndex, 0x____
.equ ArceusGround, 0x____

.equ StonePlateIndex, 0x____
.equ ArceusRock, 0x____

.equ InsectPlateIndex, 0x____
.equ ArceusBug, 0x____

.equ SpookyPlateIndex, 0x____
.equ ArceusGhost, 0x____

.equ IronPlateIndex, 0x____
.equ ArceusSteel, 0x____

.equ FlamePlateIndex, 0x____
.equ ArceusFire, 0x____

.equ SplashPlateIndex, 0x____
.equ ArceusWater, 0x____

.equ ZapPlateIndex, 0x____
.equ ArceusElectric, 0x____

.equ MeadowPlateIndex, 0x____
.equ ArceusGrass, 0x____

.equ IciclePlateIndex, 0x____
.equ ArceusIce, 0x____

.equ DracoPlateIndex, 0x____
.equ ArceusDragon, 0x____

.equ DreadPlateIndex, 0x____
.equ ArceusDark, 0x____

.equ PixiPlateIndex, 0x____
.equ ArceusFairy, 0x____

Start:
ldrb r1, [r4]
ldrb r0, [r4, #1]
lsl r0, r0, #8
add r1, r1, r0
mov r0, r8
strh r1, [r0, #2]
push {r0-r7}

Initialising:
ldrh r2, [r0]
ldr r6, GiratinaO
cmp r2, r6
beq GrisCheck
ldr r6, Giratina
cmp r2, r6
beq GrisCheck2

LoadGivenItem:
mov r6, #6
adr r5, Table
add r5, #4
mov r7, r1
bl LoopLoad
cmp r6, #0
bne ItemInTable

ItemNotInTable:
adr r5, Table
add r5, #6
mov r6, #6
mov r7, r2
bl LoopLoad
cmp r6, #1
bne Return
ldrh r4, [r5, #2]
b Changing

GrisCheck:
ldr r6, GriseousOrb
cmp r1, r6
beq LoadGivenItem
ldr r4, Giratina
b Changing

GrisCheck2:
ldr r6, GriseousOrb
cmp r1, r6
bne LoadGivenItem
ldr r4, GiratinaO
b Changing

ItemInTable:
ldrh r3, [r5, #2]
mov r7, r2
mov r6, #6
adr r5, Table
bl LoopLoad
cmp r6, #1
bne Return
mov r4, r3
b Changing

Return:
pop {r0-r7}
Return3:
ldr r0, Back
bx r0
Return2:
ldr r0, Back2
bx r0

Changing:
strh r4, [r0]
pop {r0-r7}
ldr r3, Limit
cmp r0, r3
bhi Return3
mov r0, r7
ldr r3, pokemon_calc_checksum
bl Call
strh r0, [r7, #0x1C]
mov r0, r7
ldr r3, pokemon_encrypt
bl Call
mov r0, r7
ldr r3, pokemon_calculate_stats
bl Call
b Return2

LoopLoad:
push {lr}
Looping:
ldrh r4, [r5]
cmp r4, #0
beq Nope
cmp r4, r7
beq Yep
add r5, r6
b Looping
Nope:
mov r6, #0
pop {pc}
Yep:
mov r6, #1
pop {pc}

Call:
mov pc, r3

.align 2
GriseousOrb: .word GriseousIndex
Giratina: .word GiratinaIndex
GiratinaO: .word GiratinaOIndex
pokemon_calc_checksum: .word 0x0803E3E8+1
pokemon_encrypt: .word 0x0803F8F8+1
pokemon_calculate_stats: .word 0x0803E47C+1
Back: .word 0x08040ADA+1
Back2: .word 0x08040AEE+1
Limit: .word 0x02024540
Table:
.hword ArceusNormal, ArceusNormal, FistPlateIndex, ArceusFight, ArceusNormal, SkyPlateIndex, ArceusFly, ArceusNormal, ToxicPlateIndex
.hword ArceusPoison, ArceusNormal, EarthPlateIndex, ArceusGround, ArceusNormal, StonePlateIndex, ArceusRock, ArceusNormal, InsectPlateIndex
.hword ArceusBug, ArceusNormal, SpookyPlateIndex, ArceusGhost, ArceusNormal, IronPlateIndex, ArceusSteel, ArceusNormal, FlamePlateIndex
.hword ArceusFire, ArceusNormal, SplashPlateIndex, ArceusWater, ArceusNormal, ZapPlateIndex, ArceusElectric, ArceusNormal, MeadowPlateIndex
.hword ArceusGrass, ArceusNormal, IciclePlateIndex, ArceusIce, ArceusNormal, DracoPlateIndex, ArceusDragon, ArceusNormal, DreadPlateIndex
.hword ArceusDark, ArceusNormal, PixiPlateIndex, ArceusFairy, ArceusNormal, 0x0, 0x0, 0x0, 0x0

How to use it :

At the start of the routine, just replace the 0x___ with the values you use.

/* 00 49 08 47 xx+1 xx xx 08 at 08040780 with xx xx xx being the reversed address of your routine*/

Rotom and Deoyxs form/formes routine

.thumb

getpokeoffset:
push {r4, lr}
ldr r0, var8004
ldrh r2, [r0]
mov r0, #100
mul r2, r0
ldr r0, poke_slot_1
add r4, r2, r0
getandsetnewindexnumber:
ldr r2, var8005
mov r1, #0xB
mov r0, r4
ldr r3, pokemon_setattr
bl jump
recalc20bytes:
mov r0, r4
ldr r3, pokemon_calc_effective_stats
bl jump
pop {r4, pc}
jump:
mov pc, r3

.align 2
var8004: .word 0x020270B8 + 0x8004 * 2
poke_slot_1: .word 0x02024284
var8005: .word 0x020270B8 + 0x8005 * 2
pokemon_setattr: .word 0x0804037C
pokemon_calc_effective_stats: .word 0x0803e47c

/*insert anywhere. set var 0x8004 to the desired pokemon's slot and 0x8005 to the new index number, then callasm this routine+1.*/

Burmy Form routine part 1

.thumb

main:
ldr r3, burmytransform
mov pc, r3

burmytransform: .word 0x________ @address of burmytransform.asm here

continue:
str r0, [sp]

/*insert at 08030D40*/

Burmy form routine part 2

.thumb

getdex:
mov r1, #0xB
ldr r3, pokemon_getattr
bl jump
mov r6, r0
ldr r3, species_to_pokedex_index
bl jump
compareburmy:
ldr r1, burmy_dex
cmp r0, r1
bne ender
getform:
ldr r0, idx_for_battle_screen_elements_by_env
ldrb r0, [r0]
lsl r0, #0x1
ldr r2, area_to_burmy_cloak_table
add r2, r0
ldrh r0, [r2]
cmp r0, #0x0
beq ender
burmeeeeeeeeeeeeeeeeeeh:
mov r0, r4
mov r1, #0xB
ldr r3, pokemon_setattr
bl jump
ender:
mov r0, r6
ldr r3, return
jump:
mov pc, r3

.align
pokemon_getattr: .word 0x0803FBE8
species_to_pokedex_index: .word 0x08043298
idx_for_battle_screen_elements_by_env: .word 0x02022B50
area_to_burmy_cloak_table: .word 0x________ @pointer to burmytable here
pokemon_setattr: .word 0x0804037C
return: .word 0x08030D48
burmy_dex: .word ____ @dex number of burmy here

/*insert anywhere. place a pointer to this routine in burmytransformjump.*/

Now, this routine uses a so-called burmytable. It has ten halfword entries, being either zero or the index number of the following forms:
Code:
plant plant sandy 0000 0000 0000 sandy sandy trash plant
Insert it anywhere, and place a pointer to it in the routine above.

good luck epsilon :)

 

[Marky Vigoroth]

Forms/Formes:
Deoxys Formes
Burmy
Wormadams
East/West Shellos&Gastrodon
Rotom
Giratina
Arceus
Gender Frilish&Jelicent
Therain Formes (Tornadus, Thundrus, Landorus)
Drive Genesects
Basculin
Zen Mode Darmanitan?
Kyurem Black and White
Keldo
Meloetta
Meowstic (Male and Female)
Aegislash
Hoopa

Megas:
Charizard x&y
Blastoise
Venusaur
Pidgeot
Beedrill
Alakazam
Gengar
Kangaskhan
Slowbro
Pinsir
Gyarados
Aerodactyl
Mewtwo X&Y
Ampharos
Scizor
Steelix
Heracross
Houndoom
Tyranitar
Sceptile
Blaziken
Swampert
Gardevoir
Sableye
Sharpedo
Camerupt
Mawile
Aggron
Medicham
Manectric
Altaria
Absol
Banette
Glailie
Salamence
Metagross
Latias&Latios
Loppuny
Gallade
Lucario
Garchomp
Abomasnow
Audino

Primals:
Kyogre
Groudon
Rayquaza

I added Meowstic.

 

[Zef]

is aegislash even possible? i seriously doubt it

 

[DizzyEgg]

is aegislash even possible? i seriously doubt it

Everything's possible with ASM! (well almost)
Kleenexfeu got Aegislash working some time ago. The link is in his signature. Though, I'm not sure if it's for Fire Red and not for Emerald.

 

[pokefreak890]

It's for emerald and not for fire red

 

[redadam23]

Hey if Meloetta is possible then Aegislash is too, no?

 

[pokefreak890]

yeah but currently the stancechange ability for aegislash has not been done on fire red yet only on emerald

 

[Substitute Doll]

you could port it to firered

 

[pokefreak890]

You could but right now no one has added the code for it to fix the hardware at the moment besides kleenexfeu is the one who created stance change for emerald u should ask him to port it or make a firered version of it cause emerald code won't work on fire red

 

[thedarkdragon11]

The data for the "sword" Aegislash can be added already and once the FR version of the stance change is available, it can be applied to an update...

 

[NicolasLukas]

I think all the forms are unnecessary, but mega evolutions are fine;)

 

[Epsilon]

Anyone care to comment on my math and my choice of stuff to include? (Thanks previous posters for those great lists!)

Spoiler:

580 new places. 580 - (107(IV),156(V),72(VI)) = 245 free slots.

Extra forms / formes:
Deoxys | 3
Burmy | 2
Wormadam | 2
Shellos | 1
Gastrodon | 1
Rotom | 5
Giratina | 1
Arceus | 17
Frilish | 1
Jelicent | 1
Tornadus | 1
Thundurus | 1
Landorus | 1
Genesect | 4
Basculin | 1
Darmanitan | 1
Kyurem | 2
Keldeo | 1
Meloetta | 1
Meowstic | 1
Aegislash | 1
Hoopa | 1
Zygarde | 4

Mega's and primals:
Charizard | 2
Blastoise | 1
Venusaur | 1
Pidgeot | 1
Beedrill | 1
Alakazam | 1
Gengar | 1
Kangaskhan | 1
Slowbro | 1
Pinsir | 1
Gyarados | 1
Aerodactyl | 1
Mewtwo | 2
Ampharos | 1
Scizor | 1
Steelix | 1
Heracross | 1
Houndoom | 1
Tyranitar | 1
Sceptile | 1
Blaziken | 1
Swampert | 1
Gardevoir | 1
Sableye | 1
Sharpedo | 1
Camerupt | 1
Mawile | 1
Aggron | 1
Medicham | 1
Manectric | 1
Altaria | 1
Absol | 1
Banette | 1
Glailie | 1
Salamence | 1
Metagross | 1
Latios | 1
Latias | 1
Loppunny | 1
Gallade | 1
Lucario | 1
Garchomp | 1
Abomasnow | 1
Audino | 1
Kyogre | 1
Groudon | 1
Rayquaza | 1

Total: 103
245 - 103 = 142 left.

 

[pokefreak890]

epsilon youre math is good