Development: The Miscellaneous Script Thread

[Dragonmaster91]

i found the various pointers don't have parameters
@end has none
@jump has none

Look harder. They are there.

Hey, thanks for the scripts! I tried the rock climb script, and it pretty much worked. However, for some reason, it repeats the movements 5 times (for instance, if I wanted it to push me one step down, it does five steps and stops). Is there a way to fix this?

You change the movements in the script.

Applymovement @pointer

#org @pointer
#raw 0x(whatever)
#raw 0xFE

You change that part.

#dynamic 0x800000
 
#org @1
#raw 0x7C 0x16 0x00
compare 0x800D 0x06
if 0x1 call @end
#raw 0x9D 0x00 0x0D 0x80
message @ha
boxset 5
compare LASTRESULT 0
if 0x1 goto @end
#raw 0x68
#raw 0x9C 0x25 0x00
waitstate
#raw 0x17 0x00 0x80 0x01 0x00
goto @jump
#org @jump
compare 0x8000 0x01
if 0x4 goto @move
release
end
#org @end
release
end
#org @move
applymovement 0xFF @move1
waitmovement 0x0
#raw 0x18 0x00 0x80 0x01 0x00
goto @jump
 
#org @ha
= It's some climbable rocks!\pWant to use VINE WHIP to\nclimb down them?
 
[B]#org @move1
#raw 0x1D 0x1D 0x1D 0xFE[/B]

To:

[B]#org @move1
#raw 0x1D 0xFE[/B]

 

[FoggyDoggy]

Hmm, this script seems useful indeed. A collaboration of scripts many people may want to use, all located in one place... Nice...

I may contribute in the future, if the thread does not die...
If it lasts a month, I'll post some fantastic scripts.
If not... well, I don't think I gotta explain that...

For this thread, I have a bit of advice... Try to enforce the format given, ESPECIALLY defining the ROM the script can be used in, if people start posting scripts that can only be used in Ruby, and then a FR/LG hacker comes, and uses it, well, things will end up a bit hectic... keep that in mind.

 

[HackMew]

@ Spherical Ice:
Didn't you know that comparing LASTRESULT multiple times won't work? Each time you use the compare command, the LASTRESULT is updated. The if command checks the LASTRESULT, indeed. Another thing. You messed up the random command. Random work in the range (0, X + 1). So (0,9) would be (0,10). Also, 0x10 is not the same as 10, of course. Please don't mix hex and dec. You should have tested the script before posting it...
Anyway, here's the optimized (and working) version:

Spoiler:

#dynamic 0x800000

#org @start
lock
random 0xA
compare LASTRESULT 0x9
if 0x1 goto @lucky
msgbox @nothing 0x6
release
end

#org @lucky
msgbox @jackpot 0x6
giveitem 0x1A 0x1 0x0
release
end

#org @nothing
= [PLAYER] reeled up the bucket...\p...\pNothing!

#org @jackpot
= [PLAYER] reeled up the bucket...\p...\pJackpot!

EDIT: You should update your XSE too, since it's old.

 

[Spherical Ice]

I did test my script, and it worked fine! I used the LASTRESULT multiple times, as it was like that in diego's tutorial. On XSE, when I asked for a live update, it said that version 1.1.1 is the newest version. Thanks for the help, though, HackMew.

 

[HackMew]

I did test my script, and it worked fine! I used the LASTRESULT multiple times, as it was like that in diego's tutorial. On XSE, when I asked for a live update, it said that version 1.1.1 is the newest version. Thanks for the help, though, HackMew.

It seemed to work fine, then. You're welcome.

 

[Tropical Sunlight]

Name: Bike Stand
ROMbase: Currently just FR/LG
Effect: It just activates the bike
Script:

Spoiler:

#dynamic 0x0FF5E1

#org @start
lock
special 0x157
release
end

Comments & Bugs: Just gets ON the bike, doesn't get OFF yet
Credits: IceCharizard, Tropical Sunlight, or ~Watermelon

 

[HackMew]

Name: Bike Stand
ROMbase: Currently just FR/LG
Effect: It just activates the bike
Script:

Spoiler:

#dynamic 0x0FF5E1

#org @start
lock
special 0x157
release
end

Comments & Bugs: Just gets ON the bike, doesn't get OFF yet
Credits: IceCharizard, Tropical Sunlight, or ~Watermelon

Don't get me wrong but... seriously, why should someone credit you for a simple special anyone can put in his/her script? I mean, some special lists are available alredy o.O

 

[-DarK-]

Don't get me wrong but... seriously, why should someone credit you for a simple special anyone can put in his/her script? I mean, some special lists are available alredy o.O

I agree. Credits are only to be received for bigger and more complex scripts, otherwise you can put in a simple check/setflag script as well...

 

[Tropical Sunlight]

I'm sorry but I don't think anyone's gonna post a big script here...
This is the point... Maybe I'll try smth with the script ;)

 

[Spherical Ice]

~Watermelon, I don't think I'll add it up, for the reasons mentioned above.

 

[Tropical Sunlight]

That's fine with me, I'm still trying smth out ;)

 

[Full Metal]

Here is a much better bike mounting script.
It
A) checks for the player even having the bike
B) asks the player if he/she wants to mount it!
I've not yet tested it, but it should work.

Spoiler:

#dynamic 0x800000

#org @begin
lock
faceplayer
checkitem 0x168 0x1
if 0x1 jump @havebike
release
end

#org @havebike
message @yesno 0x5
if 0x0 goto @pushno
special 0x157
release
end

#org @pushno
release
end

#org @yesno
= Do you want to mount your bike?

And no credits needed o'course

 

[Tropical Sunlight]

Here is a much better bike mounting script.
It
A) checks for the player even having the bike
B) asks the player if he/she wants to mount it!
I've not yet tested it, but it should work.

Spoiler:

#dynamic 0x800000

#org @begin
lock
faceplayer
checkitem 0x168 0x1
if 0x1 jump @havebike
release
end

#org @havebike
message @yesno 0x5
if 0x0 goto @pushno
special 0x157
release
end

#org @pushno
release
end

#org @yesno
= Do you want to mount your bike?

And no credits needed o'course

It is much better, put this one up!
Mine was just a special.

 

[HackMew]

Here is a much better bike mounting script.
It
A) checks for the player even having the bike
B) asks the player if he/she wants to mount it!
I've not yet tested it, but it should work.

Spoiler:

#dynamic 0x800000

#org @begin
lock
faceplayer
checkitem 0x168 0x1
compare LASTRESULT 0x1
if 0x1 jump @havebike
release
end

#org @havebike
message @yesno 0x5
compare LASTRESULT 0x0
if 0x1 goto @pushno
special 0x157
release
end

#org @pushno
release
end

#org @yesno
= Do you want to mount your bike?

And no credits needed o'course

It should, but it won't. Since this is not the Script Help Thread, please post working, tested scripts only thanks. Fixes in bold. And here's the optimized script:

Spoiler:

#dynamic 0x800000

#org @begin
lock
faceplayer
checkitem 0x168 0x1
compare LASTRESULT 0x1
if 0x0 jump @no
message @mount 0x5
compare LASTRESULT 0x0
if 0x1 goto @no
special 0x157
release
end

#org @no
release
end

#org @mount
= Do you want to mount your bike?

 

[ExitWound]

Name: POKéDEX Given
ROMbase: Sapphire
Effect: Enables the POKéDEX in the start menu
Script: Not needed
Comments & Bugs: My script is complete except for 1 problem: what flag is set or what special is used to activate the POKéDEX in the start menu for Sapphire?

 

[Tropical Sunlight]

Name: POKéDEX Given
ROMbase: Sapphire
Effect: Enables the POKéDEX in the start menu
Script: Not needed
Comments & Bugs: My script is complete except for 1 problem: what flag is set or what special is used to activate the POKéDEX in the start menu for Sapphire?

Eh... You need to post a script, maybe? O.o

Name: Honey Tree
ROMbase: Whatever, I used FR
Effect: A honey tree script which requires Honey in order to encounter a random Pokemon.
Script:

Spoiler:

#dynamic 0x0FF5E1

#org @start
lock
checkflag 0x200
compare LASTRESULT 0x1
if 0x1 call @already
msgbox @honeytree MSG_NORMAL
checkitem ITEM_HONEY 0x1
compare LASTRESULT 0x1
if 0x1 call @honey
setflag 0x200
release
end

#org @honey
msgbox @hunny MSG_YESNO
compare LASTRESULT 0x1
if 0x1 call @ona
return

#org @already
msgbox @pokemon MSG_NORMAL
random 0x0A
compare LASTRESULT 0x0
if 0x1 call @1
compare LASTRESULT 0x1
if 0x1 call @2
compare LASTRESULT 0x2
if 0x1 call @3
compare LASTRESULT 0x3
if 0x1 call @4
compare LASTRESULT 0x4
if 0x1 call @5
compare LASTRESULT 0x5
if 0x1 call @6
compare LASTRESULT 0x6
if 0x1 call @7
compare LASTRESULT 0x7
if 0x1 call @8
compare LASTRESULT 0x8
if 0x1 call @9
compare LASTRESULT 0x9
if 0x1 call @10
clearflag 0x200
release
end

#org @1
wildbattle PKMN_WURMPLE 0x8 0x0
return

#org @2
wildbattle PKMN_COMBEE 0xD 0x0
return

#org @3
wildbattle PKMN_WURMPLE 0x7 0x0
return

#org @4
wildbattle PKMN_WURMPLE 0xA 0x0
return

#org @5
wildbattle PKMN_MUNCHLAX 0xE 0x0
return

#org @6
wildbattle PKMN_HERACROSS 0x8 0x0
return

#org @7
wildbattle PKMN_AIPOM 0x8 0x0
return

#org @8
wildbattle PKMN_COMBEE 0x8 0x0
return

#org @9
wildbattle PKMN_CHERUBI 0x8 0x0
return

#org @10
wildbattle PKMN_CHERUBI 0x8 0x0
return

#org @ona
removeitem ITEM_HONEY 0x1
msgbox @hungry MSG_NORMAL
return

#org @pokemon
= Huh?\pIt looks like there's a POKéMON on\nthe HONEY TREE!

#org @honeytree
= It's a HONEY TREE.

#org @hunny
= Would you like to slather the bark\nwith HONEY?

#org @hungry
= [player] slathered the bark with\nHONEY.

Comments & Bugs: You need to make a different flag for all the honey trees, unless you want to slather one tree and catch Pokemon on another.
I didn't debug the script, replace the Pokemon with the ones you prefer.
Also, you need the item honey.
I replaced it with Berry Juice, but again, whatever you prefer.

 

[ExitWound]

Eh... You need to post a script, maybe? O.o

Well I didn't think my script was necessary but here it is:

Spoiler:

#dynamic 0x80731D

#org @start
checkflag 0x1005
if b_true goto @nevermind
applymovement 0xFF @1move
applymovement 0x21 @2move
waitmovement 0x0
msgbox @1msg 0x6
Something here to activate pokedex in start menu
fanfare 0x13E
msgbox @2msg 0x4
waitfanfare
closeonkeypress
fadescreen 0x1
applymovement 0x21 @3move
waitmovement 0x0
setflag 0x1005
fadescreen 0x0
release
end

#org @1msg
= [player], I almost forgot. You're\ngonna need this if you want to\lhave an easier journey.

#org @2msg
= [red_rs]You received a POKéDEX!

#org @nevermind
release
end

#org @1move
#raw 0x56 0x2 0xFE

#org @2move
#raw 0xB 0xFE

#org @3move
#raw 0x2F 0x2D 0x2D 0x54 0xFE

 

[Spherical Ice]

Well I didn't think my script was necessary but here it is:

Spoiler:

#dynamic 0x80731D

#org @start
checkflag 0x1005
if b_true goto @nevermind
applymovement 0xFF @1move
applymovement 0x21 @2move
waitmovement 0x0
msgbox @1msg 0x6
Something here to activate pokedex in start menu
fanfare 0x13E
msgbox @2msg 0x4
waitfanfare
closeonkeypress
fadescreen 0x1
applymovement 0x21 @3move
waitmovement 0x0
setflag 0x1005
fadescreen 0x0
release
end

#org @1msg
= [player], I almost forgot. You're\ngonna need this if you want to\lhave an easier journey.

#org @2msg
= [red_rs]You received a POKéDEX!

#org @nevermind
release
end

#org @1move
#raw 0x56 0x2 0xFE

#org @2move
#raw 0xB 0xFE

#org @3move
#raw 0x2F 0x2D 0x2D 0x54 0xFE

You seem to have misunderstood the purpose of this thread. It's for posting completed, workig scripts that most hackers will find useful to use in their hacks. For help on the scripts, the Script Help Thread is where you should be. If you do happen to understand this thread, and you're posting that script for other people, I can't really see why other would want to use the movement stuff, etc. The flag for activating the National Dex can be found in scripting tutorials, such as diegoisawesome's.

 

[sab]

effect: a random weather script
game: all gba games
credit: sab
script:

Spoiler:

'---------------
#org 0x(offset)
random 0x0A
compare LASTRESULT 0x0
if 0x1 goto @1
compare LASTRESULT 0x1
if 0x1 goto @2
compare LASTRESULT 0x2
if 0x1 goto @3
compare LASTRESULT 0x3
if 0x1 goto @4
compare LASTRESULT 0x4
if 0x1 goto @5
compare LASTRESULT 0x5
if 0x1 goto @6
compare LASTRESULT 0x6
if 0x1 goto @7
compare LASTRESULT 0x7
if 0x1 goto @8
compare LASTRESULT 0x8
if 0x1 goto @9
compare LASTRESULT 0x9
if 0x1 goto @10

#org @1
setweather 0x1
doweather
end

#org @2
setweather 0x2
doweather
end

#org @3
setweather 0x3
doweather
end

#org @4
setweather 0x4
doweather
end

#org @5
setweather 0x5
doweather
end

#org @6
setweather 0x7
doweather
end

#org @7
setweather 0xb
doweather
end

#org @8
setweather 0xd
doweather
end

#org @9
setweather 0x2
doweather
end

#org @10
setweather 0xb
doweather
end

 

[558122_DG]

cool...those are pretty custom scripts :) I've seen em at work in your hack and they seem pretty nice to me :) maybe you should post the vid of them at work that will make this post better, and maybe an explanation of how they work :)