• Our software update is now concluded. You will need to reset your password to log in. In order to do this, you will have to click "Log in" in the top right corner and then "Forgot your password?".
  • Welcome to PokéCommunity! Register now and join one of the best fan communities on the 'net to talk Pokémon and more! We are not affiliated with The Pokémon Company or Nintendo.

3rd Gen Help me with a script

Status
Not open for further replies.

Nexes

Daniel
3
Posts
17
Years
  • In pokemon fire red there is a person that will teach your pokemon 3 moves: Blast Burn, Frenzy Plant and Hydro Cannon. I'm trying to put that script into Emerald. Can somone help me.

    when i try to compile thi script:

    '-----------------------
    #org 0x800000
    special 0x187
    compare LASTRESULT 0x2
    if 0x1 jump 0x800001
    special 0x188
    lock
    faceplayer
    checkflag 0x2E1
    if 0x1 jump 0x800002
    checkflag 0x2
    if 0x1 jump 0x800003
    #raw 0x7E
    nop
    msgbox 0x800004 '"I perfected the ulti..."
    callstd 0x4
    special2 LASTRESULT 0x1A3
    compare LASTRESULT 0x0
    if 0x1 jump 0x800005
    copyvar 0x8009 0x8005
    compare 0x800C 0x2
    if 0x1 call 0x800006
    compare 0x800C 0x1
    if 0x1 call 0x800007
    compare 0x800C 0x4
    if 0x1 call 0x800008
    compare 0x800C 0x3
    if 0x1 call 0x800009
    msgbox 0x80000A '"Oh! This is the one!..."
    callstd 0x5
    compare LASTRESULT 0x0
    if 0x1 jump 0x80000B
    call 0x80000C
    compare LASTRESULT 0x0
    if 0x1 jump 0x80000B
    msgbox 0x80000D '"You will allow it?\p..."
    callstd 0x4
    #raw 0x68
    fadescreen 0x1
    goto 0x80000E
    fadescreen 0x0
    goto 0x80000F
    end

    '-----------------------
    #org 0x800001
    release
    end

    '-----------------------
    #org 0x800002
    msgbox 0x800010 '"After I passed on my..."
    callstd 0x4
    release
    end

    '-----------------------
    #org 0x800003
    msgbox 0x800011 '"I implore you to mak..."
    callstd 0x4
    release
    end

    '-----------------------
    #org 0x800005
    msgbox 0x800012 '"[.]No[.]\nI was just..."
    callstd 0x4
    release
    end

    '-----------------------
    #org 0x800006
    applymovement 0x1 0x800013
    pause 0x0
    return

    '-----------------------
    #org 0x800007
    applymovement 0x1 0x800014
    pause 0x0
    return

    '-----------------------
    #org 0x800008
    applymovement 0x1 0x800015
    pause 0x0
    return

    '-----------------------
    #org 0x800009
    applymovement 0x1 0x800016
    pause 0x0
    return

    '-----------------------
    #org 0x80000B
    msgbox 0x800017 '"Gaah! You reject it?..."
    callstd 0x4
    release
    end

    '-----------------------
    #org 0x800018
    #raw 0xC7
    return

    '-----------------------
    #org 0x80000B
    msgbox 0x800017 '"Gaah! You reject it?..."
    callstd 0x4
    release
    end

    '-----------------------
    #org 0x800019
    call 0x80001A
    compare LASTRESULT 0x0
    if 0x1 jump 0x80000B
    goto 0x80000F
    end

    '-----------------------
    #org 0x80001B
    copyvar 0x8005 0x8009
    special2 LASTRESULT 0x1A4
    compare LASTRESULT 0x1
    if 0x1 jump 0x80001C
    msgbox 0x80001D '"Gasp, gasp, gasp[.]\..."
    callstd 0x4
    setflag 0x2
    release
    end

    '-----------------------
    #org 0x80001E
    special 0x18D
    #raw 0x27
    lock
    faceplayer
    return

    '-----------------------
    #org 0x80000B
    msgbox 0x800017 '"Gaah! You reject it?..."
    callstd 0x4
    release
    end

    '-----------------------
    #org 0x80001C
    msgbox 0x80001D '"Gasp, gasp, gasp[.]\..."
    callstd 0x4
    setflag 0x2E1
    release
    end


    '---------
    ' Strings
    '---------
    #org 0x80001E
    = I perfected the ultimate move of\nits type[.]\pBut will no one take it for\nfuture use?\p[.]Hm? Hmmm!\pY-you[.]\nTh-that \v\h02[.]
    #org 0x80001F
    = Oh! This is the one!\nThis is the POKéMON!\pThis \v\h02 is worthy of\nlearning my ultimate move!\pWill you allow it?\pWill you allow your \v\h02 to\nlearn my \v\h03?
    #org 0x800020
    = You will allow it?\pThen, let me confer my ultimate\n\v\h03 on your \v\h02.\pGgggrah-awooo!
    #org 0x800021
    = After I passed on my knowledge to\nyou, I felt so much relief.\pIn fact, I feel rejuvenated,\nas if I were younger again!
    #org 0x800022
    = I implore you to make the best\nuse of that move and gain power!
    #org 0x800023
    = [.]No[.]\nI was just mistaken.
    #org 0x800024
    = Gaah! You reject it?\nNo, I won't be dissuaded!
    #org 0x800024
    = Gaah! You reject it?\nNo, I won't be dissuaded!
    #org 0x800025
    = Gasp, gasp, gasp[.]\pI didn't think I could teach that\nmove while I still lived[.]
    #org 0x800024
    = Gaah! You reject it?\nNo, I won't be dissuaded!
    #org 0x800026
    = Gasp, gasp, gasp[.]\pI have no regrets now.\nI've passed on everything I know.\pNow I can live out my life knowing\nmy work is done.

    '-----------
    ' Movements
    '-----------
    #raw 52 'mov52
    #raw FE 'Exit

    #raw 53 'mov53
    #raw FE 'Exit

    #raw 54 'Hide
    #raw FE 'Exit

    #raw 55 'Show
    #raw FE 'Exit

    i get the following message:

    Run-time error '457
    This key is already associated with an element of this collection.

    What does this mean and how do I fix it.
     
    Last edited:
    Status
    Not open for further replies.
    Back
    Top