by Haren Thu Jan 01, 2009 10:49 am
I decided to try and see if I could put together the entire starter pokemon script. Here's what I came up with.
#org $start
lock
faceplayer
message $1
boxset 6
checkgender
compare LASTRESULT 0x0
if b_true goto $boy
compare LASTRESULT 0x1
if b_true goto $girl
release
end
#org $boy
message $2
boxset 5
compare LASTRESULT 0x1
if b_true goto $starterpokemon1b
if b_false goto $part2
release
end
#org $girl
message $3
boxset 5
compare LASTRESULT 0x1
if b_true goto $starterpokemon1g
if b_false goto $part 2
release
end
#org $part2
message $4
boxset 5
compare LASTRESULT 0x1
if b_true goto $starterpokemon2
if b_false goto $part 3
release
end
#org $part3
message $5
boxset 6
checkflag 0x200
if b_true goto $done
if b_false goto $take1
release
end
#org $take1
givepokemon 58 5 0
fanfare 0x13E
message $6
boxset 4
setflag 0x828
setflag 0x200
message $7
boxset 5
compare LASTRESULT 0x1
if b_true gosub $name
message $8
boxset 6
release
end
#org $starterpokemon1b
message $9
boxset 6
checkflag 0x200
if b_true goto $done
if b_false goto $take2
release
end
#org $starterpokemon1g
message $10
boxset 6
checkflag 0x200
if b_true goto $done
if b_false goto $take2
release
end
#org $take2
givepokemon 228 5 0
fanfare 0x13E
message $11
boxset 4
setflag 0x828
setflag 0x200
message $12
boxset 5
compare LASTRESULT 0x1
if b_true gosub $name
message $8
boxset 6
release
end
#org $starterpokemon2
message $13
boxset 6
checkflag 0x200
if b_true goto $done
if b_false goto $take3
release
end
#org $take3
givepokemon 286 5 0
fanfare 0x13E
message $14
boxset 4
setflag 0x828
setflag 0x200
message $15
boxset 5
compare LASTRESULT 0x1
if b_true gosub $name
message $8
boxset 6
release
end
#org $name
call 0x1A74EB
return
#org $done
message $16
boxset 6
release
end
#org $1
$1 1 =\c\h01\h08ERIC: Yo. You must be one of the prisoners.\nI'm Eric, the leader of this riot. Who're \lyou?\p\c\h01\h02\v\ho1: \v\ho1.\p\c\h01\h08ERIC: "\v\ho1" huh? Sounds foreign. Well anyway,\nif you're lookin' to leave this\l place, then you're gonna need\l some supplies. I'd check the complex.\p\c\h01\h02\v\h01: Will do.\p\c\h01\h08ERIC: Also, the cave that leads outta\nhere is crawlin' with pokemon.\lThey don't take too kindly to\lintruders to their territory,\l so you'll need some protection.\p\c\h01\h02\v\h01: What, are you going to escort me?
#org $2
$2 1 =\c\h01\h08ERIC: Hell naw. I'm needed here, to\ncoordinate the riot efforts.\pBut!\pWe did get ahold of a few of\nthe guard's pokemon.\p\c\h01\h02\v\ho1: Great! Mind giving me one?\p\c\h01\h08ERIC: Hmm... Well, I could... But\nI've got a few questions for ya\lfirst. Answer my questions, and I'll\lgive ya the pokemon. Deal?\p\c\h01\h02\v\ho1: ... You've gotta be kidding me.\p\c\h01\h08ERIC: No answers, no pokemon. We got a deal?\p\c\h01\h02\v\ho1: Tch... Fine.\p\c\h01\h08ERIC: Alright! First, I wanna know\na bit about your history. Where're\lya from?\p\c\h01\h02\v\ho1: Johto.\p\c\h01\h08ERIC: Really? That's pretty far away.\nThat where they caught ya?\p\c\h01\h02\v\ho1: Yeah...\p\c\h01\h08ERIC: Huh. I didn't know the other\nregions shipped their felons here,\lwhat with the war and all...\lSpeakin' of which... I wonder\lwhat you did. Lemme guess, you're\la murderer, right?
#org $3
$3 1 =\c\h01\h08ERIC: -huff- Well, even though I'd\nlove to hang out with a pretty young\lthing like yerself, I'm needed here,\lto coordinate the riot efforts.\pBut!\pWe did get ahold of a few of\nthe guard's pokemon.\p\c\h01\h02\v\ho1: Great! Mind giving me one?\p\c\h01\h08ERIC: Hmm... Well, I could... But\nI've got a few questions for ya\lfirst. Answer my questions, and I'll\lgive ya the pokemon. Deal?\p\c\h01\h02\v\ho1: ... You've gotta be kidding me.\p\c\h01\h08ERIC: No answers, no pokemon. We got a deal?\p\c\h01\h02\v\ho1: Tch... Fine.\p\c\h01\h08ERIC: Alright! First, I wanna know\na bit about your history. Where're\lya from?\p\c\h01\h02\v\ho1: Johto.\p\c\h01\h08ERIC: Really? That's pretty far away.\nThat where they caught ya?\p\c\h01\h02\v\ho1: Yeah...\p\c\h01\h08ERIC: Huh. I didn't know the other\nregions shipped their felons here,\lwhat with the war and all...\lSpeakin' of which... I wonder\lwhat you did. Lemme guess, you're\la murderer, right?
#org $4
$4 1 =\c\h01\h02\v\ho1: Of course not!\p\c\h01\h08ERIC: Aw, really? Then it's gotta be\nsomething smaller. Maybe... petty\lthefts?
#org $5
$5 1 =\c\h01\h02\v\ho1: Seriously?\p\c\h01\h08ERIC:No? Well... If you aren't guilty \nof anything, then you must be innocent.\p\c\h01\h02\v\ho1: Yeah. I was charged with a crime I didn't commit.\p\c\h01\h08ERIC: Yeah yeah, whatever you say.\nWell, that's all the info I\lwanted.\p\c\h01\h02\v\ho1: Great. Can I have that pokemon\nnow?\p\c\h01\h08ERIC: Yeah yeah, calm down.\nHere.
#org $6
$6 1 =\c\h01\h02You recieved a Growlithe!
#org $7
$7 1 =\c\h01\h02Would you like to rename Growlithe?
#org $8
$8 1 =\c\h01\h02\v\h01: Thanks. Would you mind moving\nso I can leave?\p\c\h01\h08ERIC: Now wait a minute. I never\n said you were getting away that\l easy.\p\c\h01\h02\v\h01: What now?\p\c\h01\h08ERIC: Before I can let you go, I\nneed to make sure you're ready to\lhead out. Just to keep my concious\lclear.\p\c\h01\h02\v\h01: What do you mean?\p\c\h01\h08ERIC: Some of the prisoners in the\narea have pokémon of their own.\lDefeat all of 'em, and I might let\lya pass.\p\c\h01\h02\v\h01: Are you serious?\p\c\h01\h08ERIC: Dead serious. I ain't gonna\nhave your death on my concious.\lCome back when you've beat 'em\lall.
#org $9
$9 1 =\c\h01\h02\v\h01: Well... Let's just say an old\nfriend learned to never cheat me out\lof what's mine.\p\c\h01\h08ERIC: Heh... I guess I had you pegged\nright. Ya do have that dark look about\lya... Well, that's all the info\lI wanted.\p\c\h01\h02\v\ho1: Great. Can I have that pokemon\nnow?\p\c\h01\h08ERIC: Yeah yeah, calm down.\nHere.
#org $10
$10 1 =\c\h01\h02\v\h01:Well... Let's just say my ex\nlearned never to cheat on me.\lThe hard way.\p\c\h01\h08ERIC: Heh... I guess I had you pegged\nright. Ya do have that dark look about\lya... Well, that's all the info\lI wanted.\p\c\h01\h02\v\ho1: Great. Can I have that pokemon\nnow?\p\c\h01\h08ERIC: Yeah yeah, calm down.\nHere.
#org $11
$11 1 =\c\h01\h02You recieved a Houndour!
#org $12
$12 1 =\c\h01\h02Would you like to rename Houndour?
#org $13
$13 1 =\c\h01\h02\v\h01: Yeah. I have some pretty skilled\lhands.\p\c\h01\h08ERIC: Well, that would explain that\nsly glint in your eyes... Well,\lthat's all the info I wanted.\p\c\h01\h02\v\ho1: Great. Can I have that pokemon\nnow?\p\c\h01\h08ERICERIC: Yeah yeah, calm down.\nHere.
#org $14
$14 1 =\c\h01\h02You recieved a Poochyena!
#org $15
$15 1 =\c\h01\h02Would you like to rename Poochyena?
#org $16
$16 1 =ERIC: You beat the others yet?
Yeah, it's pretty long lol. Something in there is fighting against me unfortunately. When I talk to the NPC, nothing shows up, but I get the clicking sound and I'm locked in place. Can anyone see what's wrong? A helpful tip might be that every time I burn it to the ROM, it asks me to set offsets for two of the 'goto's, instead of setting them itself.