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

Script Requests/Sharing/Discussion

Status
Not open for further replies.

cooley

///Keepin' it simple
    • 1,148
    Posts
    17
    Years
    44tim44 said:
    Uhumm!:\
    Why does everybody always ignore my posts in the script thread?!

    I really need it.

    Please answer my request.:surprised:
    Click to expand...
    People don't always feel like making scripts, especially ones like that.
    Don't Demand requests either. Read the rules.
    -cooley
     
    destinedjagold

    destinedjagold

    I do not exist.
    • 8,593
    Posts
    17
    Years
    • Seen May 26, 2024
    Oh well...

    thethethethe said:
    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.
    Click to expand...

    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.
     

    cooley

    ///Keepin' it simple
    • 1,148
    Posts
    17
    Years
    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
     

    Dabomstew

    • 31
    Posts
    17
    Years
    • Seen Mar 8, 2024
    cooley said:
    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]
    Click to expand...
    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"
    Click to expand...
    No idea.
     

    cooley

    ///Keepin' it simple
    • 1,148
    Posts
    17
    Years
    Dabomstew said:
    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.
    Click to expand...
    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
     

    Geeked

    Pokemon Crimson Version
    • 352
    Posts
    17
    Years
    • Seen Oct 9, 2012
    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?
     

    Geeked

    Pokemon Crimson Version
    • 352
    Posts
    17
    Years
    • Seen Oct 9, 2012
    Poke-Roy said:
    You have to put the offset in a person.
    Click to expand...

    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:

    ♠εx

    Working on my hack, busy also.
    • 299
    Posts
    17
    Years
    • Seen Aug 15, 2008
    PKMNCollector said:
    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?
    Click to expand...

    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:
    Ooka

    Ooka

    [font=Maven Pro][color=#A75EE2]Cosmic[/color][/fon
    • 2,626
    Posts
    16
    Years
    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:

    ♠εx

    Working on my hack, busy also.
    • 299
    Posts
    17
    Years
    • Seen Aug 15, 2008
    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.
     

    thethethethe

    • 1,104
    Posts
    16
    Years
    yung stunna said:
    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
    Click to expand...

    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.

    ♠εx said:
    These scripts are everywhere, could you search next time?
    Click to expand...

    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!

    ~Kazaam~ said:
    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
    Click to expand...

    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
     

    spenceroone3

    <he eats lots of burgers.
    • 215
    Posts
    16
    Years
    Poke-Roy said:
    Does anybody have a list with all movements for Fire Red?
    Or a site?
    Click to expand...
    I just happen to have that :)

    Spoiler:
     

    thethethethe

    • 1,104
    Posts
    16
    Years
    spenceroone3 said:
    I just happen to have that :)

    Spoiler:
    Click to expand...

    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:
     

    Satoshi Sugimori

    Hermit
    • 860
    Posts
    17
    Years
    spenceroone3 said:
    I just happen to have that :)

    Spoiler:
    Click to expand...

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

    thethethethe said:
    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:
    Click to expand...

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