Tool: PKSV - Pokémon Script Editor + GUI

[score_under]

This post applies to an OLD version of the program only

Hey, I was wondering how to compile scripts with this program? If it's possible.

Save the file as a .PKS file, right-click it, then press Compile. <- NOT USED IN PKSV 2.0 (This was used before v0.9)

Old version of post:

Spoiler:

Sorry for the inactivity.

Hey, I was wondering how to compile scripts with this program? If it's possible.

Go to command prompt and CD to the PKSV directory, then type...

pksv -r script.txt rom.gba

I've just started working on it again - working on getting it to decompile slot-machine scripts. (eg. buying coins, using slots). I've been testing on ruby.

 

[Swampert 22]

Hey score-under, I had an idea that may make a useful addition to the program. Functionality to export the decompiled script to a txt file. Whadda ya think, cus sometimes, on a really long script it chops the top off. This would let you read the whole thing, and make basing new scripts on the decoded ones easier.

Just an idea!

 

[score_under]

This post applies to an OLD version of the program only

Old post:

Spoiler:

OK, but to do this at the moment, I do:

pksv ruby.gba ABCDEF > script.txt

Check here to see some of my compiler woes implementing the feature:

Spoiler:

EDIT:
Compiler blues atm :(

In file included from codeproc.h:182,
                 from pksv.c:28:
decompiler.h: In function `writescr':
decompiler.h:50: error: syntax error before "va_list"
decompiler.h: In function `DecodeProc':
decompiler.h:73: warning: assignment from incompatible pointer type

Fixed with a simple replacement of va_list with va_arg (simple mistake)
and placing (typeof(func)) before one of the lines.
Now, I'm getting:

C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s: Assembler messages:
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2681: Error: ambiguous operand size for `cmp'
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2683: Error: ambiguous operand size for `dec'
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2686: Error: no such instruction: `movl -16(%ebp),%edx'
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2687: Error: no such instruction: `leal -16(%ebp),%eax'
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2688: Error: no such instruction: `addl $4,(%eax)'
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2689: Error: no such instruction: `movl (%edx),%eax'
C:\DOCUME~1\Charles\LOCALS~1\Temp/ccmybaaa.s:2690: Error: no such instruction: `movl %eax,-65564(%ebp)'

EDIT:
All solved with vsprintf. Good old vsprintf. Also freed about 6 bytes of memory!

New post:

Hey people! I got a new version out today.
It can decompile codes for the slot-machine much better now, with commands for altering and checking the coin case, and some purely semantic commands (to prevent false data being decompiled).
The unknown commands are prefixed with a "CMD_" both in the program AND in the decompiled code, and are useless until I find out what they actually do :D
@swampert22: This version can now do that!

EDIT:

Random no-confirmation trading script

setvar 0x8004 0x0 ' Their poke, slot number (still don't know the variable for trainer)
setvar 0x8005 0x0 ' Our poke, slot number [0-5]
special 0xfd
special 0xfe
waitspecial

 

[Lyzo]

Hey I've been trying to get the poké ball script because i still don't know how it works anyway the program worked but it says all these weird things that i don't get.

Here's what it says if anyone knows what it means please tell me.

copyvarifnotzero 0x8000 0x148
copyvarifnotzero 0x8001 0x1
callstd MSG_FIND ' PLAYER found one XXXXXX!
end


I think i understand the last 2 sentences. It plays a message just like the code message $**** and then the message. Then it ends. But i don't understand the first 2.

 

[score_under]

This post applies to an OLD version of the program only

Hi,

copyvarifnotzero 0x8000 0x148
copyvarifnotzero 0x8001 0x1

When you find/obtain an item, the game needs to know which item and how much.
The number stored in 0x8000 tells it which item (0x148 = TM40 Aerial Ace)
The number stored in 0x8001 tells it how many (one)
then it calls the function to give the item (callstd MSG_FIND) and ends the script.

Also, be careful not to mix up message and msgbox in pksv - they mean different things.

message 0x????????  ' Gets ready to show a message (only one page, ie. cannot have \p or \l)
showmsg
waitbutton
closemsg
end

--------------

msgbox 0x???????? 'can have multiple pages
callstd MSG_NORMAL 'shows message
end

message 0x???????? is used primarily in the "berry" script, as it provides more control over when the message closes, what it does, etc.
msgbox 0x???????? is used for general-purpose messages.

How to edit scripts
This is a copy of a PM I sent - I hope it's useful to you.

Spoiler:

I understand how to work the program, but I'm not sure how to change the scripts.

When I open it it comes up with a strange black box, then gives a prompt to open the ROM.
After that it asks for an offset. So I put it in and it comes up with the offset I asked for. But then if I hit any button it clicks out.

Help?

Sorry for being a bit ;) late, but if you're still at a loss, here's how to do it:

Save this as EditScript[NAME].bat (or something you can remember) EDIT: You need to put .bat on the end or it does not work!

@echo off
pksv ROMFILE.GBA OFFSET >edit_script
notepad edit_script
pksv -r edit_script ROMFILE.GBA

For example:
EditScript[Berry].bat

@echo off
pksv RubyRom.gba 1A14DD >edit_script
notepad edit_script
pksv -r edit_script RubyRom.gba

Then, move the EditScript[NAME].bat file into the PKSV folder (along with the ROM, if you don't know how to change BAT-files accordingly)
Now, double-click your .bat file and it should open notepad. Change the script in there, and as soon as you save and exit notepad, it will compile your script.

The 1st PKSV command chooses the ROM and offset, and decompiles it.
The last PKSV command chooses the ROM and script, and compiles it again.
ps. only 25% of people download this from pokecommunity.com - the rest come from pokecommunity.com

 

[LadyAshley]

download

ok, so i'm confused... is there a list of offsets somewhere? Or a list of what messages = what, or do you guys just magically just figure all this stuff out on your own?
all i want to do is add the dp pokemon to my rom ><;
not sure if there is an easier tool i can use or what >>;

 

[score_under]

This post... wait, no. This one is still valid.
This program edits scripts, whose offsets can be found using tools like advancemap or elitemap.

To add new pokemon, you need a program which will edit pokemon base stats, pokemon pokedex entries, pokemon sprites and pokemon cries.

 

[WaterSplash]

For some reason the pokescript tutorial's scripts aren't recognized by the PKSV. I really need a tutorial on writing these scripts. Hope someone can write one sometime.

 

[score_under]

This post applies to an OLD version of the program only

If you need pokescript scripts converted into PKSV scripts, don't hesitate to contact me (PM).

MAJOR update
Now you can specify free space, eg.

#define some_space FREESPACE100 ' defines some_space as free-space
                                ' which is 0x100 (256) bytes long
#org some_space
' BLAH etc...

Or, you can specify it temporarily:

#org FREESPACEB0 ' sets file pointer to nearest free space of 0xB0 bytes.
'do stuff here

Or more practically:

#define CODE_SPACE FREESPACE10 '16 (0x10) bytes
#define TEXT1 FREESPACE10      '16 (0x10) bytes
#org CODE_SPACE
msgbox text1
callstd msg_normal
end
#org text1
= Message!

Edit: Sorry to all 5 people who downloaded the version before 200802211825. The FindFreeSpace() function had a serious glitch. It is now fixed :)
Edit yet again:
The file size of PKSV is smaller than the filesize of a BMP with dimensions of 300*200

 

[GKS]

This actually works! Thank you very much for this tool.

 

[Danno]

I understand how to work the program, but I'm not sure how to change the scripts.

When I open it it comes up with a strange black box, then gives a prompt to open the ROM.
After that it asks for an offset. So I put it in and it comes up with the offset I asked for. But then if I hit any button it clicks out.

Help?

Same here. Im having a hard time changing the scripts too, same thing for me.

 

[score_under]

note to self: post made on ui release.
If this post is still on the last page of the topic, look at the date and just TRY telling me something isn't amiss.

 

[metalaggron]

i want to change the script, where i choose my starters in firered
but i can't find the script in advancemap

i chose the starters of gsc but the text still says bubasaur charmander and squirtle

 

[score_under]

Thank you man! You just alerted me to 2 different bugs - uploading the fixes:
1) Update bug
2) Decompiled code - unrecognised commands

Uploaded! All your auto-updates should have fired (v.1.1.2 onwards), although in the second-to-latest (v1.1.2) it is glitched - which I just fixed.

To MetalAggron:
Warning: HUGE

Spoiler:

#org 0x8169BAB
'-----------------------------------
lock
faceplayer
setvar 0x4001 0x0 '0x0 is left pokeball, 0x1 is middle and 0x2 is right
setvar 0x4002 0x1 'The pokemon in gary's pokeball
setvar 0x4003 0x4 'The pokemon in our pokeball
setvar 0x4004 0x7 'The one left over
compare 0x4055 0x3
if 0x4 jump 0x8169DE4 ' If they haven't started the event yet
compare 0x4055 0x2
if 0x1 jump 0x8169BE1 ' If the event hasn't finished yet
msgbox 0x818EA19 ' Those are POKé BALLS.\nThey contain POKéMON!
callstd MSG_NOCLOSE ' Non-closing msg
release
end

#org 0x8169DE4
'-----------------------------------
msgbox 0x818EA45 ' That's PROF. OAK's last POKéMON.
callstd MSG_NOCLOSE ' Non-closing msg
release
end

#org 0x8169BE1
'-----------------------------------
applymovement 0x4 0x81A75EF ' look_right end 
pauseevent 0x0
showpokepic 0x4002 0xA 0x3
textcolor 0x0 'Sets text color (Fire Red).
compare 0x4001 0x0
if 0x1 jump 0x8169C14 ' Equal To
compare 0x4001 0x1
if 0x1 jump 0x8169C33 ' Equal To
compare 0x4001 0x2
if 0x1 jump 0x8169C52 ' Equal To
end

#org 0x8169C14
'-----------------------------------
msgbox 0x818E272 ' I see! BULBASAUR is your choice.\nIt's very easy to raise.\pSo, \v\h01, you want to go with\nthe GRASS POKéMON BULBASAUR?
callstd MSG_YESNO ' Yes/No msg
compare LASTRESULT 0x1
if 0x1 jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if 0x1 jump 0x8169C71 ' Equal To
end

#org 0x8169C74
'-----------------------------------
hidepokepic
disappear 0x800F
msgbox 0x818E2E5 ' This POKéMON is really quite\nenergetic!
callstd MSG_NOCLOSE ' Non-closing msg
call 0x81A6675
setflag 0x828
setflag 0x291
addpokemon 0x4002 0x5 0x0 0x0 0x0 0x0
copyvar 0x4031 0x4001
storepokemon 0x0 0x4002
message 0x818E30D ' \v\h01 received the \v\h02\nfrom PROF. OAK!
showmsg
fanfare 0x13E
waitfanfare
msgbox 0x81A56A7 ' Do you want to give a nickname to\nthis \v\h02?
callstd MSG_YESNO ' Yes/No msg
compare LASTRESULT 0x1
if 0x1 jump 0x8169CCC ' Equal To
compare LASTRESULT 0x0
if 0x1 jump 0x8169CDC ' Equal To
end

#org 0x81A6675
'-----------------------------------
copyvar 0x8012 0x8013
return

#org 0x8169C33
'-----------------------------------
msgbox 0x818E207 ' Hm! SQUIRTLE is your choice.\nIt's one worth raising.\pSo, \v\h01, you've decided on the\nWATER POKéMON SQUIRTLE?
callstd MSG_YESNO ' Yes/No msg
compare LASTRESULT 0x1
if 0x1 jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if 0x1 jump 0x8169C71 ' Equal To
end

#org 0x8169C71
'-----------------------------------
hidepokepic
release
end

#org 0x8169C52
'-----------------------------------
msgbox 0x818E194 ' Ah! CHARMANDER is your choice.\nYou should raise it patiently.\pSo, \v\h01, you're claiming the\nFIRE POKéMON CHARMANDER?
callstd MSG_YESNO ' Yes/No msg
compare LASTRESULT 0x1
if 0x1 jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if 0x1 jump 0x8169C71 ' Equal To
end

#org 0x8169CCC
'-----------------------------------
setvar 0x8004 0x0
call 0x81A74EB
jump 0x8169CDC

#org 0x81A74EB
'-----------------------------------
fadescreen 0x1 ' Fade screen to black
special 0x9E
waitspecial
return

#org 0x8169CDC
'-----------------------------------
closemsg2
compare 0x4001 0x0
if 0x1 jump 0x8169CFF ' Equal To
compare 0x4001 0x1
if 0x1 jump 0x8169D1F ' Equal To
compare 0x4001 0x2
if 0x1 jump 0x8169D0F ' Equal To
end

#org 0x8169CFF
'-----------------------------------
applymovement 0x8 0x8169D62 ' walk_down walk_down walk_right walk_right walk_right walk_right walk_right walk_up end 
pauseevent 0x0
jump 0x8169D2F

#org 0x8169D2F
'-----------------------------------
textcolor 0x0 'Sets text color (Fire Red).
msgbox 0x818DD34 ' \v\h06: I'll take this one, then!
callstd MSG_NOCLOSE ' Non-closing msg
disappear 0x4004
textcolor 0x3 'Sets text color (Fire Red).
storepokemon 0x0 0x4003
message 0x818DD52 ' \v\h06 received the \v\h02\nfrom PROF. OAK!
showmsg
fanfare 0x13E
waitfanfare
setvar 0x4055 0x3
checkflag 0x83E
if 0x1 call 0x8169D5C
release
end

#org 0x8169D5C
'-----------------------------------
setvar 0x4070 0x1
return

#org 0x8169D1F
'-----------------------------------
applymovement 0x8 0x8169D72 ' walk_down walk_right walk_right walk_right raw_2E end 
pauseevent 0x0
jump 0x8169D2F

#org 0x8169D0F
'-----------------------------------
applymovement 0x8 0x8169D6B ' walk_down walk_right walk_right walk_right walk_right raw_2E end 
pauseevent 0x0
jump 0x8169D2F


#org 0x818EA19
= Those are POKé BALLS.\nThey contain POKéMON!

#org 0x818EA45
= That's PROF. OAK's last POKéMON.

#org 0x818E272
= I see! BULBASAUR is your choice.\nIt's very easy to raise.\pSo, \v\h01, you want to go with\nthe GRASS POKéMON BULBASAUR?

#org 0x818E2E5
= This POKéMON is really quite\nenergetic!

#org 0x818E30D
= \v\h01 received the \v\h02\nfrom PROF. OAK!

#org 0x81A56A7
= Do you want to give a nickname to\nthis \v\h02?

#org 0x818E207
= Hm! SQUIRTLE is your choice.\nIt's one worth raising.\pSo, \v\h01, you've decided on the\nWATER POKéMON SQUIRTLE?

#org 0x818E194
= Ah! CHARMANDER is your choice.\nYou should raise it patiently.\pSo, \v\h01, you're claiming the\nFIRE POKéMON CHARMANDER?

#org 0x818DD34
= \v\h06: I'll take this one, then!

#org 0x818DD52
= \v\h06 received the \v\h02\nfrom PROF. OAK!

#org 0x81A75EF
M look_right end 

#org 0x8169D62
M walk_down walk_down walk_right walk_right walk_right walk_right walk_right walk_up end 

#org 0x8169D72
M walk_down walk_right walk_right walk_right raw_2E end 

#org 0x8169D6B
M walk_down walk_right walk_right walk_right walk_right raw_2E end

 

[metalaggron]

tnx for that, but where can i copy this script to
that was what i was asking for
tnx anyway

 

[score_under]

You can find this script on any of the pokéballs in professor Oak's lab.
Just make sure to reset the first "setvar"s on each ball!

 

[metalaggron]

sorry that i keep bothering you, but how to reset the setvar
all i get from the script in the balls is this

#org 0x8169BAB
'-----------------------------------
lock
faceplayer
setvar 0x4001 0x0
setvar 0x4002 0x98
setvar 0x4003 0x60
setvar 0x4004 0x7
compare 0x4055 0x3
if 0x4 jump 0x8169DE4 ' Larger Than or Equal To
compare 0x4055 0x2
if 0x1 jump 0x8169BE1 ' Equal To
msgbox 0x818EA19 ' Those are POKé BALLS.\nThey contain POKéMON!
callstd MSG_NOCLOSE ' Non-closing msg
release
end

#org 0x8169DE4
'-----------------------------------
msgbox 0x818EA45 ' That's PROF. OAK's last POKéMON.
callstd MSG_NOCLOSE ' Non-closing msg
release
end

#org 0x8169BE1
'-----------------------------------
applymovement 0x4 0x81A75EF ' look_right end 
pauseevent 0x0
#raw 0x75
end


#org 0x818EA19
= Those are POKé BALLS.\nThey contain POKéMON!

#org 0x818EA45
= That's PROF. OAK's last POKéMON.

#org 0x81A75EF
M look_right end

 

[score_under]

Uploaded an update - for frontend and back-end.
GUI is now version 1.2.0 and PKSV is now 1.0.2

Also, added a check to make Lucida console the default font and Courier New the fallback. Mainly because on my PC courier new can't not be italic.

 

[MYSTERIOUS MISSINGNO]

Okay, you know that girl in pallet town that when you talk to her, she moves one step away from you and tells you about trainer tips? I want to replicate that, but every time I do, the test subject says the right things, but doesn't move. what gives?

Here is the exact script:

#org 0x816575C
'-----------------------------------
lock
compare 0x4070 0x2
if 0x1 jump 0x81657ED ' Equal To
compare 0x4070 0x1
if 0x1 jump 0x8165815 ' Equal To
compare 0x4002 0x1
if 0x1 jump 0x81658C2 ' Equal To
checkflag 0x2
if 0x1 jump 0x8165801 ' Equal To
msgbox 0x871B904 ' It appears to be a statue of\na rare POKéMON.\pHmm.... There seems to be something\nstrange about it.
callstd MSG_NOCLOSE ' Non-closing msg
applymovement 0x1 0x81A75E1 ' faceplayer end 
pauseevent 0x0
sound 0x15
applymovement 0x1 0x81A75DB ' say_! end 
pauseevent 0x0
applymovement 0x1 0x81A75DD ' raw_1C raw_1C raw_1C end 
pauseevent 0x0
msgbox 0x871B345 ' Oh!\pA secret stair case appeared!
callstd MSG_NOCLOSE ' Non-closing msg
closemsg
compare 0x800C 0x4
if 0x1 call 0x81657D7
compare 0x800C 0x4
if 0x5 call 0x81657E2
#raw 0x64
nop1 ' #raw 0x1
nop0 ' #raw 0x0
setflag 0x2
release
end
#org 0x81657ED
'-----------------------------------
applymovement 0x1 0x81A75E1 ' faceplayer end 
pauseevent 0x0
msgbox 0x817D7C8 ' I'm raising POKéMON, too.\pWhen they get strong, they can\nprotect me.
callstd MSG_NOCLOSE ' Non-closing msg
release
end
#org 0x8165815
'-----------------------------------
applymovement 0x1 0x81A75E1 ' faceplayer end 
pauseevent 0x0
msgbox 0x81B1CEC ' Signs are useful, aren't they?
callstd MSG_NOCLOSE ' Non-closing msg
release
end
#org 0x81658C2
'-----------------------------------
applymovement 0x1 0x81A75E1 ' faceplayer end 
pauseevent 0x0
call 0x8165894
release
end
#org 0x8165894
'-----------------------------------
textcolor 0x1 'Sets text color (Fire Red).
msgbox 0x81B1D0B ' Look, look!\pI copied what it said on one of\nthose TRAINER TIPS signs!
callstd MSG_NOCLOSE ' Non-closing msg
closemsg
pause 0x14
textcolor 0x3 'Sets text color (Fire Red).
setflag 0x83E
setvar 0x4070 0x1
setvar 0x4002 0x0
special 0x170
special 0x171
#raw 0xCA
msgbox 0x81B1D51 ' TRAINER TIPS!\pPress START to open the MENU!
callstd MSG_NOCLOSE ' Non-closing msg
#raw 0xCB
return
#org 0x8165801
'-----------------------------------
applymovement 0x1 0x81A75E1 ' faceplayer end 
pauseevent 0x0
msgbox 0x871BDC9 ' The eerie glow has disappeared.
callstd MSG_NOCLOSE ' Non-closing msg
release
end
#org 0x81657D7
'-----------------------------------
applymovement 0x1 0x8165829 ' walk_right raw_2F end 
pauseevent 0x0
return
#org 0x81657E2
'-----------------------------------
applymovement 0x1 0x816582C ' walk_left raw_30 end 
pauseevent 0x0
return

#org 0x871B904
= It appears to be a statue of\na rare POKéMON.\pHmm.... There seems to be something\nstrange about it.
#org 0x871B345
= Oh!\pA secret stair case appeared!
#org 0x817D7C8
= I'm raising POKéMON, too.\pWhen they get strong, they can\nprotect me.
#org 0x81B1CEC
= Signs are useful, aren't they?
#org 0x81B1D0B
= Look, look!\pI copied what it said on one of\nthose TRAINER TIPS signs!
#org 0x81B1D51
= TRAINER TIPS!\pPress START to open the MENU!
#org 0x871BDC9
= The eerie glow has disappeared.
#org 0x81A75E1
M faceplayer end 
#org 0x81A75DB
M say_! end 
#org 0x81A75DD
M raw_1C raw_1C raw_1C end 
#org 0x8165829
M walk_right raw_2F end 
#org 0x816582C
M walk_left raw_30 end ' Write script here, or press Script Generator to do it automatically.

 

[Celestro]

Eh. I believe you forgot faceplayer right under lock at the beginning of the script is what you're referring to.