• Just a reminder that providing specifics on, sharing links to, or naming websites where ROMs can be accessed is against the rules. If your post has any of this information it will be removed.
  • Ever thought it'd be cool to have your art, writing, or challenge runs featured on PokéCommunity? Click here for info - we'd love to spotlight your work!
  • PokéCommunity's Easter Egg Hunt is now on! If you're interested in looking for some eggs and earning badges, click here!
  • Our weekly protagonist poll is now up! Vote for your favorite Conquest protagonist in the poll by clicking here.
  • 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.
    Register

Script Requests/Sharing/Discussion

Status
Not open for further replies.
Can someone please make this script.

Prof Oak comes out of his lab and walks down down down down right right right, and then he says:"Wait! [PLAYER] come with me to my lab. I have something for you. Then Prof Oak takes you
left left left up up up up then warp to the lab. Map Bank is 4, Map is 3 and the Warp Number is 0.

And also another script.
Prof Oak comes out of his lab and walks down down down down down right right right, and then he says:"Wait! [PLAYER] come with me to my lab. I have something for you. Then Prof Oak takes you
left left left up up up up up then warps to the lab. Map Bank is 4, Map is 3 and the Warp Number is 0.

I tried making those scripts but I had no luck and I was hoping a more experienced scripter could make it for me.
 
stead573:Go to Google and type in Birmin Studios. Go to the first link and you should come up with a website with an ocean blue background. On the Hack Tools Page you should find what your looking for and also, make sure you download PkmnAdv in the same place you downloaded Pokescript. (sorry it took so long)

Here are your codes Sceptilehero:

first code:
Code: 
#org $begin
checkflag [input the flag for after Oak takes you back # 0x...]
if B_true goto $done
playsound 0x13B
#raw 0x33
applmovement 0x01 $aidwalk
pause 0x50
message $aidtalk
boxset 6
applymovement 0x01 $aidfollow
applymovement 0xFF $aidfollow
pause 0x50
fadesound
release
end

#org $done
release
end

#org $aidwalk
applymovement $aidwalk ; #binary 0x1D 0x1E 0xFE

#org $aidtalk
message $aidtalk 1 = Wait! v\h01 come with me to my lab.\nI have something for you.

#org $aidfollow
applymovement $aidfollow ; #binary 0x12 0x12 0x12 0x1E 0xFE

second code:
Code: 
#org $begin
checkflag [input the flag for after Oak takes you back # 0x...]
if B_true goto $done
playsound 0x13B
#raw 0x33
applmovement 0x01 $aidwalk
pause 0x50
message $aidtalk
boxset 6
applymovement 0x01 $aidfollow
applymovement 0xFF $aidfollow
pause 0x50
fadesound
release
end

#org $done
release
end

#org $aidwalk
applymovement $aidwalk ; #binary 0x1D 0x1E 0x10 0xFE

#org $aidtalk
message $aidtalk 1 = Wait! v\h01 come with me to my lab.\nI have something for you.

#org $aidfollow
applymovement $aidfollow ; #binary 0x12 0x12 0x12 0x1E 0x11 0xFE
You will have to provide the flag for the first part of the code or Oak will call the character forever. I will add the warp codes in a little while.
A link to where you can learn follow scripts.
 
Last edited:
Hey Yoderpet!

Thanks alot! I had been looking for it for a few hours using Google lastnight, but had no luck.
 
Dosen't matter since I am beginner
I'll just do it that no matter what starter you pick you're rival will have Eevee!
 
Can anyone help me with this?

Right, I've just read through a few tutorials on Pokescript, and I've created a short movement script.

The player walks into a script where, he stops, a man moves two steps right and talks to him.

The Script:

#org $IfElse
checkflag 0x200 ' empty flag
if 0x1 goto $Move
release
end

#org $Move
applymovement 0x05 $ManMove ' 0x05 [people number 5, is this correct?]
pausemove 0
return

#org $ManMove
#Binary 0x0B 0xFE ' the man moves two steps right

#org $ShowText
lock
faceplayer
message $NewTrainer
$NewTrainer 1 = Hey! You're a new trainer,\laren't you?
boxset 6
setflag 0x200
release
end
Click to expand...

Any help on this would be much appreciated!
 
Last edited:
stead573 said:
Can anyone help me with this?

Right, I've just read through a few tutorials on Pokescript, and I've created a short movement script.

The player walks into a script where, he stops, a man moves two steps right and talks to him.

The Script:



Any help on this would be much appreciated!
Click to expand...

I don't know if it is that you want, But try this:

#org $newtrainer
lock
faceplayer
checkflag 0x200
if 1 gosub $Move
message $NewTrainer
$NewTrainer 1 = Hey! You're a new trainer,\laren't you?
boxset 6
setflag 0x200
release
end

#org $Move
applymovement 5 $ManMove
$ManMove 1 ; #Binary 0x0B 0x0B 0xFE
pausemove 0
return
 
#org $IfElse
checkflag 0x200
if 0x1 goto $Move
release
end

#org $Move
applymovement 0x05 $ManMove
pausemove 0
goto $ShowText
return
end

#org $ManMove
$ManMove 1 ; binary 0x0B 0x0B 0xFE

#org $ShowText
lock
faceplayer
message $NewTrainer
$NewTrainer 1 = Hey! You're a new trainer,\laren't you?
boxset 6
setflag 0x200
release
end

Spoiler:
 
Hey, thanks for the input Derlo and destinedjagold!

The only thing is, I can't get any of these scripts to work. It may be in the method of how I am assigning the offset to the script in Advance Map...not too sure.

Right, so I've gone through the right method using Pokescript and Buf Rite, I'm certain of that.

So...to assign the offset set by Buf Rite [800000] I open the ROM in Advance Map, create a new sprite [people number 5] and script. Then input the offset of the code [800000] into the offset of the script. Am I right in thinking that's correct?

So on the map, it would look like this:
[5] sprite to move
[E] empty space
script

[5][E][E]

The sprite [5] would move two spaces right to face the [PLAYER] which is stood on the script:

[5][>][>]

I hope I have included enough information on my problem for someone to hopefully help me with!

Thanks in advance!
 
stead573 said:
Hey, thanks for the input Derlo and destinedjagold!

The only thing is, I can't get any of these scripts to work. It may be in the method of how I am assigning the offset to the script in Advance Map...not too sure.

Right, so I've gone through the right method using Pokescript and Buf Rite, I'm certain of that.

So...to assign the offset set by Buf Rite [800000] I open the ROM in Advance Map, create a new sprite [people number 5] and script. Then input the offset of the code [800000] into the offset of the script. Am I right in thinking that's correct?

So on the map, it would look like this:
[5] sprite to move
[E] empty space
script

[5][E][E]

The sprite [5] would move two spaces right to face the [PLAYER] which is stood on the script:

[5][>][>]

I hope I have included enough information on my problem for someone to hopefully help me with!

Thanks in advance!
Click to expand...


In the header of SCRIPT
put that:

unknown: 03 00
number VAR: 50 40
value of VAR: 00 00
unknown: 00 00​
 
Sceptilehero:What is it that Oak was supposed to do after he brought you back in?

Oh and I finished the script except for the flag:

code 1:

Code: 
#org $begin
checkflag [input the flag for after Oak takes you back # 0x...]
if B_true goto $done
playsound 0x13B
#raw 0x33
applmovement 0x01 $aidwalk
pause 0x50
message $aidtalk
boxset 6
applymovement 0x01 $aidfollow
applymovement 0xFF $aidfollow
pause 0x50
fadesound
warp 0x4 0x3 0x0
release
end

#org $done
release
end

#org $aidwalk
applymovement $aidwalk ; #binary 0x1D 0x1E 0xFE

#org $aidtalk
message $aidtalk 1 = Wait! v\h01 come with me to my lab.\nI have something for you.

#org $aidfollow
applymovement $aidfollow ; #binary 0x12 0x12 0x12 0x1E 0xFE

code 2:

Code: 
#org $begin
checkflag [input the flag for after Oak takes you back # 0x...]
if B_true goto $done
playsound 0x13B
#raw 0x33
applmovement 0x01 $aidwalk
pause 0x50
message $aidtalk
boxset 6
applymovement 0x01 $aidfollow
applymovement 0xFF $aidfollow
pause 0x50
fadesound
warp 0x4 0x3 0x0
release
end

#org $done
release
end

#org $aidwalk
applymovement $aidwalk ; #binary 0x1D 0x1E 0x10 0xFE

#org $aidtalk
message $aidtalk 1 = Wait! v\h01 come with me to my lab.\nI have something for you.

#org $aidfollow
applymovement $aidfollow ; #binary 0x12 0x12 0x12 0x1E 0x11 0xFE

And I still need someone to check one of my codes!

Code: 
#org $StartWild
lock
faceplayer
checkflag 0x305
if B_true goto $done
cry5
message $Mewcry
boxset 6
checkflag 0x304
if B_true goto $WildBatt
setflag 0x305
release
end

#org $done
release
end

#org $WildBatt
lock
wildbattle 151 30 0
release
setflag 0x401
fadscreen 0
end
 
Last edited:
Prof oak script

Hi im really bad at scripting ive been trying to learn to script for a couple of months now so could someone make me this script

Can someone make a script that makes the professor be in the lab from the start.
and instead of him giving u the kanto pokedex he gives u the national dex after ur first battle with ur rivel he asks you back and he gives u the national dex after ur first battle with gary in the lab.

Please can someone make this i need it for my hack and ill add u to my credits
Please.
 
I was trying to make a starter pokemon script for my hack and I tried it out, but it wasn't working. The script didn't even start, it just froze. If anyone can see what's wrong with it, that would help a lot.

If no one can understand what's happening, I'll tell them.

Code: 
#org $begin
lock
faceplayer
checkflag 0x207
if B_true goto $done
message $ah
release
playsound 0xFFFF
#raw 0x33
applymovement 0x02 $mv1
setflag 0x207
goto $giveball

#org $giveball
applymovement 0x02 $mv2
message $well
playsound 0x13B
applymovement 0x04 $mv3
message $here
fadesound
lock
message $so
goto $getdex

#org $getdex
setflag 0x800
setflag 0x801
boxset 6
jingle
message $gotdex
givepokemon 179 5 8E
boxset 6
jingle
message $gotpoke
boxset 6
message $namepoke
boxset 5
compare LASTRESULT 1
if B_False goto $Sea
namepokemon
goto $sea
release
end

#org $ah
$ah 1 = Ah, there you are,\n\v\h01!\pHere, I have something for you.

#org $mv1
$mv1 ; #binary 0x13 0x13 0xFE

#org $mv2
$mv2 ; #binary 0x12 0x12 0x4A 0xFE

#org $well
$well 1 = Well, \v\h01, here\nis a pokemon in my hand.\pThis is no ordinary pokemon.\nIt is a new pokemon found in\pa different region.  Its\nname is Shinx.  I want you\pto take this pokemon and\ngo to the Seafoam Islands.\pLately, there have been some\nshady people around Seafoam Islands.\pI want you to go with\nmy friend..wait, where\pis he?

#org $mv3
$mv3 ; #binary 0x13 0x13 0x13 0x13 0x11 0x11 0x11 0xFE

#org $here
$here 1 = Here I am!  Sorry, I\n was reading a book on the shelf.\pSo, Professor, what is it?

#org $so
$so 1 = Now that you both are here,\nfirst I need to give you\pyour pokedexes.  Then, \v\h01,\nI'll give you your pokemon.\pHere, both of you, take these.

#org $gotdex
$gotdex 1 = You got the pokedex!

#org $gotpoke
$gotpoke 1 = You obtained a Shinx!

#org $namepoke
$namepoke 1 = Would you like to give Shinx a nickname?

#org $sea
$sea 1 = There's a boat waiting outside\nto take you to the Seafoam\pIslands.  Before you go, go to the machine\nand get your pokedex upgraded.

#org $done
message $hey
$hey 1 = Hey \v\h01, how are you?
release
end
 
~*Pikafan*~ said:
I was trying to make a starter pokemon script for my hack and I tried it out, but it wasn't working. The script didn't even start, it just froze. If anyone can see what's wrong with it, that would help a lot.

If no one can understand what's happening, I'll tell them.

Code: 
#org $begin
lock
faceplayer
checkflag 0x207
if B_true goto $done
message $ah
release
playsound 0xFFFF
#raw 0x33
applymovement 0x02 $mv1
setflag 0x207
goto $giveball

#org $giveball
applymovement 0x02 $mv2
message $well
playsound 0x13B
applymovement 0x04 $mv3
message $here
fadesound
lock
message $so
goto $getdex

#org $getdex
setflag 0x800
setflag 0x801
boxset 6
jingle
message $gotdex
givepokemon 179 5 8E
boxset 6
jingle
message $gotpoke
boxset 6
message $namepoke
boxset 5
compare LASTRESULT 1
if B_False goto $Sea
namepokemon
goto $sea
release
end

#org $ah
$ah 1 = Ah, there you are,\n\v\h01!\pHere, I have something for you.

#org $mv1
$mv1 ; #binary 0x13 0x13 0xFE

#org $mv2
$mv2 ; #binary 0x12 0x12 0x4A 0xFE

#org $well
$well 1 = Well, \v\h01, here\nis a pokemon in my hand.\pThis is no ordinary pokemon.\nIt is a new pokemon found in\pa different region.  Its\nname is Shinx.  I want you\pto take this pokemon and\ngo to the Seafoam Islands.\pLately, there have been some\nshady people around Seafoam Islands.\pI want you to go with\nmy friend..wait, where\pis he?

#org $mv3
$mv3 ; #binary 0x13 0x13 0x13 0x13 0x11 0x11 0x11 0xFE

#org $here
$here 1 = Here I am!  Sorry, I\n was reading a book on the shelf.\pSo, Professor, what is it?

#org $so
$so 1 = Now that you both are here,\nfirst I need to give you\pyour pokedexes.  Then, \v\h01,\nI'll give you your pokemon.\pHere, both of you, take these.

#org $gotdex
$gotdex 1 = You got the pokedex!

#org $gotpoke
$gotpoke 1 = You obtained a Shinx!

#org $namepoke
$namepoke 1 = Would you like to give Shinx a nickname?

#org $sea
$sea 1 = There's a boat waiting outside\nto take you to the Seafoam\pIslands.  Before you go, go to the machine\nand get your pokedex upgraded.

#org $done
message $hey
$hey 1 = Hey \v\h01, how are you?
release
end
Click to expand...

Try this:

#org $begin
lock
faceplayer
checkflag 0x207
if 1 goto $done
message $ah
boxset 6
playsound 0xFFFF
#raw 0x33
applymovement 2 $mv1
pusemove 0
setflag 0x207
applymovement 2 $mv2
pausemove 0
message $well
boxset 6
playsound 0x13B
applymovement 4 $mv3
pausemove 0
message $here
boxset 6
fadesound
message $so
goto $getdex

#org $getdex
setflag 0x800
setflag 0x801
jingle
message $gotdex
boxset 6
givepokemon 179 5 8E
jingle
message $gotpoke
boxset 6
message $namepoke
boxset 5
compare LASTRESULT 1
if 0 goto $Sea
namepokemon
goto $sea
release
end

#org $ah
$ah 1 = Ah, there you are,\n\v\h01!\pHere, I have something for you.

#org $mv1
$mv1 1 ; #binary 0x13 0x13 0xFE

#org $mv2
$mv2 1 ; #binary 0x12 0x12 0x4A 0xFE

#org $well
$well 1 = Well, \v\h01, here\nis a pokemon in my hand.\pThis is no ordinary pokemon.\nIt is a new pokemon found in\pa different region. Its\nname is Shinx. I want you\pto take this pokemon and\ngo to the Seafoam Islands.\pLately, there have been some\nshady people around Seafoam Islands.\pI want you to go with\nmy friend..wait, where\pis he?

#org $mv3
$mv3 1 ; #binary 0x13 0x13 0x13 0x13 0x11 0x11 0x11 0xFE

#org $here
$here 1 = Here I am!\nSorry, I was reading a book on\lthe shelf.\pSo, Professor, what is it?

#org $so
$so 1 = Now that you both are here,\nfirst I need to give you\lyour pokedexes. \pThen, \v\h01, I'll give you\nyour pokemon.\pHere, both of you, take these.

#org $gotdex
$gotdex 1 = You got the pokedex!

#org $gotpoke
$gotpoke 1 = You obtained a Shinx!

#org $namepoke
$namepoke 1 = Would you like to give Shinx a nickname?

#org $sea
$sea 1 = There's a boat waiting outside\nto take you to the Seafoam\lIslands.\p Before you go, go to the machine\nand get your pokedex upgraded.

#org $done
message $hey
$hey 1 = Hey \v\h01, how are you?
boxset 6
release
end
 
Well, it worked up to

message $well

And the pokeball didn't dissappear. Did it work for you?
 
I did. The pokeball has the ID 0207. Is there anything else needed, or is something just wrong?
 
Derlo said:
Try this:

#org $begin
lock
faceplayer
checkflag 0x207
if 1 goto $done
message $ah
boxset 6
playsound 0xFFFF
#raw 0x33
applymovement 2 $mv1
pusemove 0
setflag 0x207
applymovement 2 $mv2
pausemove 0
message $well
boxset 6
playsound 0x13B
applymovement 4 $mv3
pausemove 0
message $here
boxset 6
fadesound
message $so
goto $getdex

#org $getdex
setflag 0x800
setflag 0x801
jingle
message $gotdex
boxset 6
givepokemon 179 5 8E
jingle
message $gotpoke
boxset 6
message $namepoke
boxset 5
compare LASTRESULT 1
if 0 goto $Sea
namepokemon
goto $sea
release
end

#org $ah
$ah 1 = Ah, there you are,\n\v\h01!\pHere, I have something for you.

#org $mv1
$mv1 1 ; #binary 0x13 0x13 0xFE

#org $mv2
$mv2 1 ; #binary 0x12 0x12 0x4A 0xFE

#org $well
$well 1 = Well, \v\h01, here\nis a pokemon in my hand.\pThis is no ordinary pokemon.\nIt is a new pokemon found in\pa different region. Its\nname is Shinx. I want you\pto take this pokemon and\ngo to the Seafoam Islands.\pLately, there have been some\nshady people around Seafoam Islands.\pI want you to go with\nmy friend..wait, where\pis he?

#org $mv3
$mv3 1 ; #binary 0x13 0x13 0x13 0x13 0x11 0x11 0x11 0xFE

#org $here
$here 1 = Here I am!\nSorry, I was reading a book on\lthe shelf.\pSo, Professor, what is it?

#org $so
$so 1 = Now that you both are here,\nfirst I need to give you\lyour pokedexes. \pThen, \v\h01, I'll give you\nyour pokemon.\pHere, both of you, take these.

#org $gotdex
$gotdex 1 = You got the pokedex!

#org $gotpoke
$gotpoke 1 = You obtained a Shinx!

#org $namepoke
$namepoke 1 = Would you like to give Shinx a nickname?

#org $sea
$sea 1 = There's a boat waiting outside\nto take you to the Seafoam\lIslands.\p Before you go, go to the machine\nand get your pokedex upgraded.

#org $done
message $hey
$hey 1 = Hey \v\h01, how are you?
boxset 6
release
end
Click to expand...

Do you think the problem may be that you have used a capital letter:

#org $begin
lock
faceplayer
checkflag 0x207
if 1 goto $done
message $ah
boxset 6
playsound 0xFFFF
#raw 0x33
applymovement 2 $mv1
pusemove 0
setflag 0x207
applymovement 2 $mv2
pausemove 0
message $well
boxset 6
playsound 0x13B
applymovement 4 $mv3
pausemove 0
message $here
boxset 6
fadesound
message $so
goto $getdex

#org $getdex
setflag 0x800
setflag 0x801
jingle
message $gotdex
boxset 6
givepokemon 179 5 8E
jingle
message $gotpoke
boxset 6
message $namepoke
boxset 5
compare LASTRESULT 1
if 0 goto $Sea 'here, when it should be lower?
namepokemon
goto $sea
release
end

#org $ah
$ah 1 = Ah, there you are,\n\v\h01!\pHere, I have something for you.

#org $mv1
$mv1 1 ; #binary 0x13 0x13 0xFE

#org $mv2
$mv2 1 ; #binary 0x12 0x12 0x4A 0xFE

#org $well
$well 1 = Well, \v\h01, here\nis a pokemon in my hand.\pThis is no ordinary pokemon.\nIt is a new pokemon found in\pa different region. Its\nname is Shinx. I want you\pto take this pokemon and\ngo to the Seafoam Islands.\pLately, there have been some\nshady people around Seafoam Islands.\pI want you to go with\nmy friend..wait, where\pis he?

#org $mv3
$mv3 1 ; #binary 0x13 0x13 0x13 0x13 0x11 0x11 0x11 0xFE

#org $here
$here 1 = Here I am!\nSorry, I was reading a book on\lthe shelf.\pSo, Professor, what is it?

#org $so
$so 1 = Now that you both are here,\nfirst I need to give you\lyour pokedexes. \pThen, \v\h01, I'll give you\nyour pokemon.\pHere, both of you, take these.

#org $gotdex
$gotdex 1 = You got the pokedex!

#org $gotpoke
$gotpoke 1 = You obtained a Shinx!

#org $namepoke
$namepoke 1 = Would you like to give Shinx a nickname?

#org $sea
$sea 1 = There's a boat waiting outside\nto take you to the Seafoam\lIslands.\p Before you go, go to the machine\nand get your pokedex upgraded.

#org $done
message $hey
$hey 1 = Hey \v\h01, how are you?
boxset 6
release
end
 
Status
Not open for further replies.
Back
Top