Seen January 10th, 2017
Posted April 21st, 2016
180 posts
5.4 Years
For Emerald:

All credits to Chaos Rush as I've pretty much just edited his Gastro Acid (and his post).

Worry Seed:
First insert this string:
Spoiler:
FD 10 00 D5 07 E5 E9 DD E6 D9 D8 00 FE C3 E2 E7 E3 E1 E2 DD D5 AB FF 00

(it says, "[the target] acquired Insomnia!")

Next insert this ASM code:
Spoiler:
.text
.align 2
.thumb
.thumb_func
.global test

main:
push {lr}
ldr r0, .TargetBank
ldr r1, .BattleData
ldrb r0, [r0]
mov r2, #0x58
mul r2, r0
add r1, #0x20
add r1, r2
mov r3, #0xF
ldrb r4, [r1]
cmp r3, r4
beq Abort
strb r3, [r1]
b End

Abort:
ldr r0, .CurrentScript
ldr r1, .FailScript
str r1, [r0]

End:
pop {r0}
bx r0

.align 2
.BattleData:	.word 0x02024084
.UserBank:	.word 0x0202420B
.TargetBank:	.word 0x0202420C
.BasePower: 	.word 0x02024400
.CurrentScript: .word 0x02024214
.FailScript: 	.word 0x082D9F1A


And finally, use this battle script:
Spoiler:
#org @main
attackcanceler
accuracycheck 0x82D8A5E 0x0
attackstring
ppreduce
callasm 0x8(offset of ASM routine + 1)
attackanimation
waitanimation
setword 0x203B200 0x8[offset of string]
printstring 0x184
waitmessage 0x40
goto 0x82D8A4E


Note that your setword command might be different from mine depending on whether you used KDS' or Hidoran's port.

String at A20000 (Sky Attack's)
FD 0F B4 E7 00 D6 D9 D7 D5 E1 D9 00 D7 E0 E3 D5 DF D9 D8 00 DD E2 00 D5 00 DC D5 E6 E7 DC 00 E0 DD DB DC E8 AB FF
Just a small nitpick:
A string that is more consistent with the official games would be:
 FD 0F 00 D6 D9 D7 D5 E1 D9 00 FE D7 E0 E3 D5 DF D9 D8 00 DD E2 00 D5 00 DC D5 E6 E7 DC 00 E0 DD DB DC E8 AB FF
I didn't check the other two but I can see that they use FD 0F B4 E7 instead of just FD 0F.