• 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.

thethethethe's Scripting Tutorial

1,104
Posts
16
Years
  • i will test it out and see if any changes

    also how do you make someone give you a badge without battleing?

    Do you remember this list from the first post?
    thethethethe said:
    Spoiler:
    Just set the flag for the badge that you want the player to recieve.

    For example, in Fire Red/Leaf Green, if you wanted the player to recieve the first badge, all you need is this line.
    setflag 0x820
     

    Pokepal2007

    angels awakening
    458
    Posts
    16
    Years
  • Do you remember this list from the first post?

    Just set the flag for the badge that you want the player to recieve.

    For example, in Fire Red/Leaf Green, if you wanted the player to recieve the first badge, all you need is this line.
    setflag 0x820

    ok then i understand but on morwe question this script keeps freexing btw i did change the unknown and var number to 03 00 and 40 50 so whats wrong with this

    #org $begin
    checkflag 0x201
    if b_true goto $done
    applymovement 0x14 $move
    pausemove 0
    message $hey
    boxset 6
    applymovement 0x14 $move2
    pausemove 0
    setflag 0x201
    release
    end

    #org $done
    release
    end

    #org $move
    #raw 0x20 0x20 0x20 0x20 0x20 0x62 0xFE

    #org $hey
    $hey 1 =Hey there, I am one of the\nthree dancers, come by our gym later.

    #org $move2
    #raw 0x1F 0x1F 0x1F 0x1F 0x1F 0x1E 0x1E 0x1F 0x1F 0x60 0xFE
     

    destinedjagold

    You can contact me in PC's discord server...
    8,593
    Posts
    16
    Years
    • Seen Dec 23, 2023
    erm, try this..?
    Code:
    #org $begin
    checkflag 0x201
    if b_true goto $done
    applymovement 0x14 $move
    pausemove 0
    message $hey
    boxset 6
    applymovement 0x14 $move2
    pausemove 0
    setflag 0x201
    release
    end
    
    #org $done
    release
    end
    
    #org $move
    $move 1 ; #binary 0x20 0x20 0x20 0x20 0x20 0x62 0xFE
    
    #org $hey
    $hey 1 =Hey there, I am one of the\nthree dancers, come by our gym later.
    
    #org $move2
    $move2 1 ; #binary 0x1F 0x1F 0x1F 0x1F 0x1F 0x1E 0x1E 0x1F 0x1F 0x60 0xFE
     

    Master_Track

    ROM Reaverz Scripter
    916
    Posts
    16
    Years
  • ok then i understand but on morwe question this script keeps freexing btw i did change the unknown and var number to 03 00 and 40 50 so whats wrong with this

    #org $begin
    checkflag 0x201
    if b_true goto $done
    applymovement 0x14 $move
    pausemove 0
    message $hey
    boxset 6
    applymovement 0x14 $move2
    pausemove 0
    setflag 0x201
    release
    end

    #org $done
    release
    end

    #org $move
    #raw 0x20 0x20 0x20 0x20 0x20 0x62 0xFE

    #org $hey
    $hey 1 =Hey there, I am one of the\nthree dancers, come by our gym later.

    #org $move2
    #raw 0x1F 0x1F 0x1F 0x1F 0x1F 0x1E 0x1E 0x1F 0x1F 0x60 0xFE

    I can't see anything wrong in this script.
    Which Advance Map are you using?
    I am using 1.90, and there the fields "unknown" and "variable number" looks like this:
    Unknown: 0003
    Var.Number:4051

    And it works!
    Hope that's the problem.
     

    Master_Track

    ROM Reaverz Scripter
    916
    Posts
    16
    Years
  • no that dosen't work.

    would it be the check flag
    Only if you have used setflag 0x201 before in another script, then checkflag 0x201 would see : "the script with setflag 0x201 was already activated" and go to the end of the script, so
    release
    end

    Try using another set and checkflag you SURE didn't use before, than it should work.
     

    destinedjagold

    You can contact me in PC's discord server...
    8,593
    Posts
    16
    Years
    • Seen Dec 23, 2023
    I tested the script myself and it worked fine.
    I'll put up a video when YouTube finishes uplaoding it. ;)

    and yeah, I guess it's because of the setflag...
     

    Master_Track

    ROM Reaverz Scripter
    916
    Posts
    16
    Years
  • Maybe it's used in an original script, so just try some other flag ;)

    edit:
    Well, now I have a problem -.-
    I made two scripts: One should activate 'till the hero got the Pokedex fromr Oak. Then it should just release,
    It's this one:

    Code:
    #org $begin
    checkflag 0x829
    compare lastresult 0x1
    if B_true goto $release
    applymovement 0x05 $move
    pause 0x30
    applymovement 0x05 $move2
    pausemove 0x0
    applymovement 0xFF $move4
    pausemove 0x0
    message $arbeiten
    $arbeiten 1 = Du kannst hier jetzt nicht\ndurch. Vor dem Vertania-Wald wird\lgerade aufgeräumt, der starke Regen\lhat eine Erdschicht abrutschen lassen.
    boxset 6
    applymovement 0xFF $move5
    pausemove 0x0
    applymovement 0x05 $move3
    pausemove 0x0
    release
    end
    
    #org $release
    release
    end
    
    #org $move
    #raw 0x65 0xFE
    
    #org $move2
    #raw 0x11 0x11 0x13 0x13 0x00 0xFE
    
    #org $move5
    #raw 0x10 0x10 0x10 0xFE
    
    #org $move3
    #raw 0x12 0x12 0x10 0x10 0xFE
    
    #org $move4
    #raw 0x01 0xFE
    Everything works fine with this script, It does what it is supposed to do, and after getting the pokedex ist doesn't anything.
    But now I have the second script, it should bar the hero from going into the arena 'till he received the 7th badge.
    There ist is:
    Code:
    #org $begin
    checkflag 0x826
    compare lastresult 0x1
    if B_true goto $continue
    lock
    applymovement 0xFF $move
    pausemove 0x0
    message $stop
    $stop 1 = Die Türen der Arena sind fest\nverschlossen.
    boxset 6
    applymovement 0xFF $move2
    pausemove 0x0
    release
    end
    
    #org $move
    #raw 0x01 0xFE
    
    #org $move2
    #raw 0x12 0x12 0xFE
    
    #org $continue
    release
    end
    Works fine too, but this script releases after I got the Pokedex, though the checkflag 0x826 checks for the 7th badge, doesn't it?
    Pls help ^^
     
    Last edited:

    Pokepal2007

    angels awakening
    458
    Posts
    16
    Years
  • what should change the flag to?

    or is it the event number will i need to change it to D or something?
     
    Last edited:

    thetribemaster

    Pokemon: Brink of Oblivion
    25
    Posts
    16
    Years
    • Seen Mar 30, 2009
    Okay, this script works well up until when you get the DEX, and Pokemon. Then it skips right to $adventure when it should give message $mission

    I also have a script on the first page that doesnt work.

    Code:
    #org $start
    lock
    faceplayer
    checkflag 0x201
    if B_false goto $news
    checkflag 0x828
    if B_false goto $flags
    checkflag 0x829
    if B_false goto $flags
    checkflag 0x202
    if B_true goto $missionfinish
    checkflag 0x203
    if B_true goto $bosses
    checkflag 0x205
    if B_true goto $adventure
    message $mission
    setflag 0x205
    release
    end
    
    #org $mission
    $mission 1 =Your mission, should you choose\nto accept it is:\pI need you to find the source of\ldarkness in this world.\pIt may sound a daunting task\lbut I think you can do it!\pI think you should visit my friends\l across Johto, they will train you\lto find and destroy the darkness\lhaunting this world.\pReturn here when you have\l seen all 8 of them.
    
    #org $news
    message $1
    boxset 6
    setflag 0x201
    release
    end
    
    #org $1
    $1 1 =Hello! I am Prof. XANU\pI have a proposition for you.\pBut first you need a pokemon\land a pokedex.\p Go grab them off of that table.
    
    #org $flags
    message $2
    boxset 6
    release
    end
    
    #org $2
    $2 1 =Did you get them yet?
    
    #org $missionfinish
    message $3
    boxset 6
    setflag 0x204
    release
    end
    
    #org $3
    $3 1 =So you finished?\pGreat!!!\nYour mom has something for\l you.\lGo get it!
    
    #org $bosses
    checkflag 0x207
    message $4
    boxset 6
    setflag 0x206
    release
    end
    
    #org $4
    $4 1 =We have discovered the source\nof darkness.\pIt is a pokemon called DARKRAI.\p We must find a way to destroy it.\pGo find him at his fortress.
    
    #org $adventure
    message $5
    boxset 6
    release
    end
    
    #org $5
    $5 1 =How's the mission coming?\p...\pOh thats wonderful!\lKeep it up!
    Help me plz, and with my script on the first page
     

    Master_Track

    ROM Reaverz Scripter
    916
    Posts
    16
    Years
  • @pokepal2007: Just try another number, like checkflag 0x240 and later in the script setflag 0x240.
    Code:
    #org $start
    checkflag 0x828
    if B_true goto $done
    message $wait
    boxset 6
    applymovement 0x01 $move
    pausemove 0x0
    applymovement 0xFF $youmove
    pausemove 0x0
    message $poke
    boxset 6
    applymovement 0x01 $move2
    release
    end
    
    $done
    release
    end
    
    #org $move
    #raw 0x1F 0x1F 0x1F 0x1D 0xFE
    
    #org $youmove
    #raw 0x17 0xFE
    
    #org $move2
    #raw 0x20 0x20 0x20 0x1E 0xFE
    
    #org $wait
    $wait 1 = WAIT!!!!
    
    #org $poke
    $poke 1 = You need a pokemon to go\nout!

    Maybe it will work if you write it like this:

    Code:
    #org $start
    checkflag 0x828
    if B_true goto $done
    message $wait
    $wait 1 = WAIT!
    boxset 6
    applymovement 0x01 $move
    pausemove 0x0
    applymovement 0xFF $youmove
    pausemove 0x0
    message $poke
    $poke 1 = You need a pokemon to go\nout!
    boxset 6
    applymovement 0x01 $move2
    pausemove 0x0
    release
    end
    
    #org $move
    #raw 0x1F 0x1F 0x1F 0x1D 0xFE
    
    #org $move2
    #raw 0x20 0x20 0x20 0x1E 0xFE
    
    #org $youmove
    #raw 0x17 0xFE
    
    #org $done
    release
    end
    It's your script from the first page, don't know what to do in the one you just postet. You wrote it too complicated, if you write all the ckeckflags in a row it's more complicated. It could be easier ^^

    But I hope at least this will work.
    If not, check if the unknown and the var.number in AM are REALLY right.
    It should work.
     
    Last edited:

    thetribemaster

    Pokemon: Brink of Oblivion
    25
    Posts
    16
    Years
    • Seen Mar 30, 2009
    Also the

    #org $name
    call 0x1A74EB
    return

    just changed a couple of tiles... and namepokemon doesnt work
     

    thetribemaster

    Pokemon: Brink of Oblivion
    25
    Posts
    16
    Years
    • Seen Mar 30, 2009
    I did, this is the script I'm using it in:

    Code:
    #org $start
    lock
    checkflag 0x201
    if B_false goto $done
    checkflag 0x828
    if B_true goto $1
    #raw 0x75 0x98 0x00 0x0A 0x03
    message $info
    boxset 6
    message $takeit
    boxset 5
    compare LASTRESULT 1
    if B_true goto $getpoke
    #raw 0x76
    release
    end
    
    #org $info
    $info 1 = Its the Leaf Pokemon Chikorita!
    
    #org $takeit
    $takeit 1 = Take the grass type Chikorita?
    
    #org $getpoke
    setflag 0x828 
    givepokemon 152 5 0
    #raw 0x76
    fanfare 0x13E
    message $recieved
    boxset 4
    waitfanfare
    #raw 0x68
    message $rename
    boxset 5
    compare LASTRESULT 1
    if B_true gosub $name
    #raw 0x53 0x0F 0x80
    release
    end
    
    #org $recieved
    $recieved 1 =You got a CHIKORITA!
    
    #org $rename
    $rename 1 = Rename Chikorita?
    
    #org $name
    call 0x1A74EB
    return
    
    #org $1
    message $gotit
    boxset 6
    release
    end
    
    #org $gotit
    $gotit 1 =You already have a Pokemon!
    
    #org $done
    message $pokeball
    boxset 6
    release
    end
    
    #org $pokeball
    $pokeball 1 =It's a pokeball!
     
    Back
    Top