• 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!
  • Our weekly protagonist poll is now up! Vote for your favorite Trading Card Game 2 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.

Script Requests/Sharing/Discussion

Status
Not open for further replies.
Oh well...

I had this problem a while a ago. Some numbers used in trainerbattles, don't allow '$further' to work. You'll just have to try some other numbers and see if they work. '1' works.

I know 1 will work, but I just wished to do something new, like a double battle. Oh well.., thanks thethethethe and linkandzlda. I already fixed it now, with '1', at least.

Good day all.
 
Hi, I

Was wondering:


Does anyone know why this script freezes when I select no, on all of the choices.
Or why it freezes when I select yes on anyone and when it is time to get the pokemon(givepokemon) the screen turns Red.

Here is the script:

Code:
#org $start
lock
faceplayer
checkflag 0x202
if B_true goto $done
message $oak
$oak 1 = Hello \v\h01,\pI was expecting you,\pLet me tell you something,\pYou see, I'm not a man\nof many words, \lso I'll start you off with \psome basic stuff.
boxset 6
message $char
$char 1 = Would you Like Charmander,\nthe fire POKéMON?
boxset 5
compare LASTRESULT 1
if B_true goto $done1
message $squirt
$squirt 1 = Would you like Squirtle,\nthe Water POKéMON?
boxset 5
compare LASTRESULT 1
if b_true goto $done2
message $bulb
$bulb 1 = What about Bulbasaur,\nthe grass POKéMON?
boxset 5
compare LASTRESULT 1
if b_true goto $done3
goto $char

#org $done
message $have
$have 1 = Did you get the potion?
boxset 5
compare LASTRESULT 1
if b_true goto $check
message $no
$no 1 =You don't have it, go get it.\pNOW!!!
boxset 6
release
end

#org $check
#raw 0x47 0x0D 0x00 0x01 0x00
compare LASTRESULT 0x1
if 1 goto $get
release
end

#org $get
message $kl
$kl 1 = Good job, you got it!
boxset 6
fanfare 0x13E
message $en
$en 1 = Now it is the end of the preview.\pBut on the good side,\nyou get to keep the items!
boxset 6
release
end

#org $done1
message $hm
$hm 1 = Here you go then,\pA Charmander!
boxset 6
givepokemon 0x04 5
fanfare 0x13D
message $got
boxset 6
setflag 0x202
release
end

#org $done2
message $hn
$hn 1 = Well Here it is,\pA Squirtle!
boxset 6
givepokemon 0x07 5
fanfare 0x13D
message $got
boxset 6
setflag 0x202
release
end

#org $done3
message $hl
$hl 1 = Ok here you go,\ABulbasaur
boxset 6
givepokemon 0x01 5
fanfare 0x13D
message $got
boxset 6
setflag 0x202
release
end

#org $got
$got 1 =Now, that you have a POKéMON,\pI need you to go on a mission for\nme.\lGet me the potion from the police\pthen bring it back to me.\pNow GO!!!
Ummm.......This is ny first attempt at making a script with multiple choices, without using the multi-script. Silly isn't it? But it is a try.

How do I make it repeat over and over again until you select yes. And you actually receive the pokemon. Also, What is the Fanfare for "Jingle".
Thank you to whoever helps me.
-cooley
 
Can anyone give me a script of just people giving advices? I want to do it myself but my ScriptEd program won't work.
 
Hi, I

Was wondering:


Does anyone know why this script freezes when I select no, on all of the choices.
Or why it freezes when I select yes on anyone and when it is time to get the pokemon(givepokemon) the screen turns Red.

Here is the script:

Code:
#org $start
lock
faceplayer
checkflag 0x202
if B_true goto $done
message $oak
$oak 1 = Hello \v\h01,\pI was expecting you,\pLet me tell you something,\pYou see, I'm not a man\nof many words, \lso I'll start you off with \psome basic stuff.
boxset 6
message $char
$char 1 = Would you Like Charmander,\nthe fire POKéMON?
boxset 5
compare LASTRESULT 1
if B_true goto $done1
message $squirt
$squirt 1 = Would you like Squirtle,\nthe Water POKéMON?
boxset 5
compare LASTRESULT 1
if b_true goto $done2
message $bulb
$bulb 1 = What about Bulbasaur,\nthe grass POKéMON?
boxset 5
compare LASTRESULT 1
if b_true goto $done3
goto $char

#org $done
message $have
$have 1 = Did you get the potion?
boxset 5
compare LASTRESULT 1
if b_true goto $check
message $no
$no 1 =You don't have it, go get it.\pNOW!!!
boxset 6
release
end

#org $check
#raw 0x47 0x0D 0x00 0x01 0x00
compare LASTRESULT 0x1
if 1 goto $get
release
end

#org $get
message $kl
$kl 1 = Good job, you got it!
boxset 6
fanfare 0x13E
message $en
$en 1 = Now it is the end of the preview.\pBut on the good side,\nyou get to keep the items!
boxset 6
release
end

#org $done1
message $hm
$hm 1 = Here you go then,\pA Charmander!
boxset 6
givepokemon 0x04 5
fanfare 0x13D
message $got
boxset 6
setflag 0x202
release
end

#org $done2
message $hn
$hn 1 = Well Here it is,\pA Squirtle!
boxset 6
givepokemon 0x07 5
fanfare 0x13D
message $got
boxset 6
setflag 0x202
release
end

#org $done3
message $hl
$hl 1 = Ok here you go,\ABulbasaur
boxset 6
givepokemon 0x01 5
fanfare 0x13D
message $got
boxset 6
setflag 0x202
release
end

#org $got
$got 1 =Now, that you have a POKéMON,\pI need you to go on a mission for\nme.\lGet me the potion from the police\pthen bring it back to me.\pNow GO!!!
[/B]
Here's the script fixed to work:
Code:
#org $start
lock
faceplayer
checkflag 0x202
if B_true goto $done
message $oak
$oak 1 = Hello \v\h01,\pI was expecting you,\pLet me tell you something,\pYou see, I'm not a man\nof many words, \lso I'll start you off with \psome basic stuff.
boxset 6
goto $select

#org $select
setvar 0x4002 0x0
message $char
$char 1 = Would you Like Charmander,\nthe fire POKéMON?
boxset 5
compare LASTRESULT 1
if B_true goto $charm
message $squirt
$squirt 1 = Would you like Squirtle,\nthe Water POKéMON?
boxset 5
compare LASTRESULT 1
if b_true goto $squir
message $bulb
$bulb 1 = What about Bulbasaur,\nthe grass POKéMON?
boxset 5
compare LASTRESULT 1
if b_true goto $bulba
goto $select

#org $end
release
end

#org $charm
setvar 0x4002 0x4
goto $give

#org $squir
setvar 0x4002 0x7
goto $give

#org $bulba
setvar 0x4002 0x1
goto $give

#org $done
message $have
$have 1 = Did you get the potion?
boxset 5
compare LASTRESULT 1
if b_true goto $check
message $no
$no 1 =You don't have it, go get it.\pNOW!!!
boxset 6
release
end

#org $check
#raw 0x47 0x0D 0x00 0x01 0x00
compare LASTRESULT 0x1
if 1 goto $get
release
end

#org $get
message $kl
$kl 1 = Good job, you got it!
boxset 6
fanfare 0x13E
message $en
$en 1 = Now it is the end of the preview.\pBut on the good side,\nyou get to keep the items!
boxset 6
waitfanfare
release
end

#org $give
#raw 7D 00 02 40 'sets the Pokemons name to \v\h02
message $hm
$hm 1 = Here you go then,\pA \v\h02!
boxset 6
givepokemon 0x4002 5 0
fanfare 0x13D
message $got
$got 1 = \v\h01 got \v\h02!
boxset 4
waitfanfare
message $got2
$got2 1 =Now, that you have a POKéMON,\pI need you to go on a mission for\nme.\lGet me the potion from the police\pthen bring it back to me.\pNow GO!!!
boxset 6
setflag 0x202
setflag 0x828
release
end
The #raw 7D code I added is command not in the Pokescript database, but its easy to understand. I didnt bother bolding the changes as there were too many of them. This works as you wanted it to, reason your goto wasn't working before is that message text pointers (in this case $char) cant be used as goto points.
Also, What is the Fanfare for "Jingle"
No idea.
 
The #raw 7D code I added is command not in the Pokescript database, but its easy to understand. I didnt bother bolding the changes as there were too many of them. This works as you wanted it to, reason your goto wasn't working before is that message text pointers (in this case $char) cant be used as goto points.
Thanks alot. I didn't use the multi-script because, I don't know how to make it so that you receive the pokemon, nothing happens when I edit it.
Also thanks for putting your website in your sig too. It helps alot.
-cooley
 
When inserting a script in a-map for a give pokemon do i just put the offset into a person or create a new sripttile and put it over a person?
 
You have to put the offset in a person.

thanks alot poke-roy it worked

Anybody can tell me how to start a followme script were you follow someone?? i've been trying but all i get is the person move but you stay where you are please help
 
Last edited:
If its not too much to ask, can somebody show me a working trainer battle script and a working giveitem script that only gives the item once?

These scripts are everywhere, could you search next time?

Giveitem:

Code:
#org 0x800000
lock
faceplayer
message 0x800100                  'Getting the item message.
message 0x800010                  'After you get the item message.
boxset 0x6
giveitem 0x45 0x1                   'Item/Quantity
release
end

#org 0x800100 = Here, have a gift.

#org 0x800010 = You only get one!

Someone correct me if this script is wrong... still learning.

Givepokemon:

Code:
#org 0x800000
lock
faceplayer
message 0x800001                        'Message before getting the Pokemon.
message 0x800101                        'Message after getting the Pokemon.
boxset 0x6
givepokemon 0x78 0x5 0x3              'Pokemon/Level/Item.
release
end

#org 0x800001 = Here, have a Pokemon!

#org 0x00101 = Hows my old buddy going?

Again someone correct me if this is wrong.

And last, Pokemon Trainer Battle:

Code:
#org 0x800000
lock
faceplayer
trainerbattle 0x00 0x1A 0x800100            'Kind of battle/Trainer/Before message
message 0x800200                               'After Message
release
end

#org 0x800100 = Think you're so dominating?

#org 0x800200 = I can't beleive this!\1Losing to you...
 
Last edited:
Again, no idea what is up with this script. All the text goes screwy with wierd letters. Need some help.....

Code:
#org $pick
#raw 75
#raw 07
#raw 00
#raw 0A
#raw 03
message $piplup
$piplup 1=Do you want the/lwater penguin Piplup?
boxset 5
compare LASTRESULT 1
if b_true goto $yes
#raw 76
message $back
boxset 6
release
end

#org $yes
#raw 76
applymovement 0x60 0x1E 
givepokemon 7 5 0x8B
jingle
message $recieve
$recieve 1=You recieved Piplup!
boxset 6
end

#org $nope
message $back
$back 1=Placed the Piplup back.
boxset 6
end
 
Last edited:
I cant see anything wrong with your script.
Are you supposed to use the $?

Your putting in $piplup and so on. I think it's just message piplup.
I find it easier to use numbers like 0x800000
I don't think it makes a difference though.
 
thanks alot poke-roy it worked

Anybody can tell me how to start a followme script were you follow someone?? i've been trying but all i get is the person move but you stay where you are please help

Here's a pretty simple one.
Code:
#org $dont
checkflag 0x828
if b_true goto $done
applymovement 0x11 $move
pausemove 0
message $wait
boxset 6
applymovement 0x11 $move1         '{
applymovement 0xFF $move1         '{follow me part
pausemove 0                               '{
release
end

#org $done
release
end

#org $move
$move 1 ; #binary 0x1D 0x1D 0x1D 0x1D 0xFE

#org $move1
$move1 1 ; #binary 0x11 0x11 0x11 0x11 0xFE    '{Shared movement

#org $wait
$wait 1 =Wait there. You don't have a\npokemon yet.

These scripts are everywhere, could you search next time?

I'll fix your scripts for you. I know you're still learning. I use pokescript(because I don't like looking for offsets), so I use $pointer. But both pokescript an scripted follow some basic ideas, so you can still look at these.
Next time, pkmncollector you should probably look at a tutorial because they should contain these kinds of scripts.
Giveitem:
Code:
#org $start
lock
faceplayer
checkflag 0x200         'To prevent repeating
if b_true goto $done   'To prevent repeating
message $talk           'Getting the item message.
boxset 6
giveitem 0x45 0x1      'Item/Quantity
setflag 0x200            'To prevent repeating
release
end

#org $done
message $talk2         'After you get the item message.
boxset 6
release
end

#org $talk 
$talk 1 = Here, have a gift.

#org $talk2
$talk2 1 = You only get one!

Givepokemon:

Code:
#org $start
lock
faceplayer
checkflag 0x200
if b_true goto $done
message $talk                        'Message before getting the Pokemon.
boxset 6
givepokemon 0x78 0x5 0x3        'Pokemon/Level/Item.
setflag 0x200
release
end

#org $done
message $talk2                       'Message after getting the Pokemon.
boxset 0x6
release
end

#org $talk
$talk 1 = Here, have a Pokemon!

#org $talk2
$talk2 1 = Hows my old buddy going?

And last, Pokemon Trainer Battle:

Code:
#org $start
lock
faceplayer
trainerbattle 0x00 0x1A $before $after     'Kind of battle/Trainer/Before message/after message  (Trainerbattles don't repeat, so no need for checkflags)
message $beaten                                'If already battled
boxset 6
release
end

#org before 
$before 1 = Think you're so dominating?

#org after
$after 1  = I can't beleive this!\nLosing to you...

#org $beaten
$beaten 1 =You already beat me, get lost!

Again, no idea what is up with this script. All the text goes screwy with wierd letters. Need some help.....

Code:
#org $pick
#raw 75
#raw 07
#raw 00
#raw 0A
#raw 03
message $piplup
$piplup 1 =Do you want the water\npenguin Piplup?
boxset 5
compare LASTRESULT 1
if b_true goto $yes
#raw 76
message $back
$back 1 =Placed the Piplup back.
boxset 6
release
end

#org $yes
#raw 76
applymovement 0x<people no> $move 
givepokemon 7 5 0x8B
jingle
message $recieve
$recieve 1 =You recieved Piplup!
boxset 6
end

#org $move
$move 1 ; #binary 0x60 0x1E 0xFE

I fixed what I think was wrong with this. You also may want to add a setflag, to prevent the event from repeating.

What a long post:D
 
Does anybody have a list with all movements for Fire Red?
Or a site?
I just happen to have that :)

Spoiler:
 
I just happen to have that :)

Spoiler:

That's a RS items list. Wasn't he asking for a movement's list? A full movements list probably won't be anywhere, but there are some lists, that have the most useful ones.
As a matter of fact hers' one.
Spoiler:
 
I just happen to have that :)

Spoiler:

Uhmmm..sorry that are the items...
I need the movements..XD
But still nice...:)

That's a RS items list. Wasn't he asking for a movement's list? A full movements list probably won't be anywhere, but there are some lists, that have the most useful ones.
As a matter of fact hers' one.
Spoiler:

Wow nice thethethethe..:D
Thanks..:)
 
Status
Not open for further replies.
Back
Top