EV/IV Lecture - Emerald

// The following script was created by me (Lunos) on July 5, 2018.
// It uses an ASM Routine created by PokeCommunity user Blurose to read the EVs and/or IVs of a Pokémon in your party.
// Please give credits where it's due if used.

// Source: https://www.pokecommunity.com/showthread.php?p=9897717#post9897717
// Archived: http://web.archive.org/web/20191228093104/https://www.pokecommunity.com/showthread.php?t=339153&page=56

// Note: 0x8XXXXXX+1 = Offset where the routine was inserted +1.

#dynamic 0x71BBA0

#org @start
lock
msgbox @string1 0x5
compare 0x800D 0x1
if 0x1 goto @snippet1
if 0x0 goto @snippet2
#org @snippet1
special 0xA2
waitstate
compare 0x8004 0x6
if 0x4 goto @snippet3
setvar 0x8000 0x1
callasm 0x8XXXXXX+1
buffernumber 0x0 0x8000
buffernumber 0x1 0x8001
buffernumber 0x2 0x8002
msgbox @string2 0x4
closeonkeypress
buffernumber 0x0 0x8003
buffernumber 0x1 0x8004
buffernumber 0x2 0x8005
msgbox @string3 0x4
closeonkeypress
goto @snippet2

#org @snippet2
msgbox @string4 0x5
compare 0x800D 0x1
if 0x1 goto @snippet4
release
end

#org @snippet3
end

#org @snippet4
special 0xA2
waitstate
compare 0x8004 0x6
if 0x4 goto @snippet3
setvar 0x8000 0x0
callasm 0x8XXXXXX+1
buffernumber 0x0 0x8000
buffernumber 0x1 0x8001
buffernumber 0x2 0x8002
msgbox @string5 0x4
closeonkeypress
buffernumber 0x0 0x8003
buffernumber 0x1 0x8004
buffernumber 0x2 0x8005
msgbox @string3 0x4
closeonkeypress
release
end

#org @string1
= Do you want to check a pokémon's\nIVs?

#org @string2
= Its IVs are: [buffer1], [buffer2], [buffer3]

#org @string3
= Followed by: [buffer1], [buffer2], [buffer3]

#org @string4
= Do you want to check a pokémon's\nEVs?

#org @string5
= Its EVs are: [buffer1], [buffer2], [buffer3]