• 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?".
  • Forum moderator applications are now open! Click here for details.
  • Welcome to PokéCommunity! Register now and join one of the best places on the 'net to talk Pokémon and more! Community members will not see the bottom screen advertisements.
  • Want to share your adventures playing Pokémon?
    Check out our new Travel Journals forum for sharing playthroughs of ROM Hacks, Fan Games, and other Pokémon content!
  • IMPORTANT: Following a takedown request, the following hacks have been delisted from PokéCommunity:

    • Pokémon Glazed
    • Pokémon: Giratina Strikes Back
    • Pokémon Flora Sky
    • Pokémon Stranded
    The downloads and discussion threads for these hacks will no longer be accessible, and staff will be unable to return questions regarding accessing this content.

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
  • Age 33
  • 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
  • Age 33
  • 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