I know that this is quite late but i just found this post today. I fixed Venom12's version for regular Pokemon Essentials. This will allow you to chose the squirtle as well. also this will ask you to confirm your choiceHi, I tried your script, but I was unable to pick the last pokemon(Squirtle). I was only able to pick the two first pokemon(Bulbasaur, Charmander) I'm I doing something wrong? (Sorry, I had to delete the link since I haven't posted 15 times yet).
Spoiler:
Code:
class PokemonStarterSelectScene
def update
pbUpdateSpriteHash(@sprites)
end
LEVEL=5#level ofstarters
def pbStartScene(starter1,starter2,starter3,graphic1,graphic2,graphic3)
@sprites={}
@viewport=Viewport.new(0,0,Graphics.width,Graphics.height)
@viewport.z=99999
@select=0
@starter1=starter1
@starter2=starter2
@starter3=starter3
@graphic1=graphic1
@graphic2=graphic2
@graphic3=graphic3
pbSprite("bg","Graphics/Pictures/starterbg",0,0)
pbSprite("choose1","Graphics/Pictures/#{graphic1}",40,132,155)
pbSprite("choose2","Graphics/Pictures/#{graphic2}",180,132,155)
pbSprite("choose3","Graphics/Pictures/#{graphic3}",320,132,155)
pbFadeInAndShow(@sprites) { update }
end
def pbEndScene
pbFadeOutAndHide(@sprites) { update }
pbDisposeSpriteHash(@sprites)
@viewport.dispose
end
def pbSprite(name,bitmap,x,y,opacity=255)
@sprites["#{name}"]=Sprite.new(@viewport)
@sprites["#{name}"].bitmap=BitmapCache.load_bitmap("#{bitmap}")
@sprites["#{name}"].x=x
@sprites["#{name}"].y=y
@sprites["#{name}"].opacity = opacity
end
def pbStarterSelect
loop do
Graphics.update
Input.update
self.update
case @select
when 0#choose1
@sprites["choose1"].opacity=255
@sprites["choose2"].opacity=155
@sprites["choose3"].opacity=155
when 1#choose2
@sprites["choose1"].opacity=155
@sprites["choose2"].opacity=255
@sprites["choose3"].opacity=155
when 2#choose2
@sprites["choose1"].opacity=155
@sprites["choose2"].opacity=155
@sprites["choose3"].opacity=255
end
if Input.trigger?(Input::LEFT)
@select-=1 if not @select==0
end
if Input.trigger?(Input::RIGHT)
@select+=1 if not @select==2
end
if Input.trigger?(Input::C)
case @select
when 0#choose1
cmd=Kernel.pbMessage(_INTL("Do you want this pokemon ?"),
[_INTL("Yes"),_INTL("No")],2)
if cmd==0
pbAddPokemon(@starter1,LEVEL)
$game_variables[7]=1
break
end
when 1#choose2
cmd=Kernel.pbMessage(_INTL("Do you want this pokemon ?"),
[_INTL("Yes"),_INTL("No")],2)
if cmd==0
pbAddPokemon(@starter2,LEVEL)
$game_variables[7]=2
break
end
when 2#choose3
cmd=Kernel.pbMessage(_INTL("Do you want this pokemon ?"),
[_INTL("Yes"),_INTL("No")],2)
if cmd==0
pbAddPokemon(@starter3,LEVEL)
$game_variables[7]=3
break
end
end
end
end
end
end
class PokemonStarterSelect
def initialize(scene)
@scene=scene
end
def pbStartScreen(starter1,starter2,starter3,graphic1,graphic2,graphic3)
@scene.pbStartScene(starter1,starter2,starter3,graphic1,graphic2,graphic3)
@scene.pbStarterSelect
@scene.pbEndScene
end
end
def pbCallStarterSelect(starter1=1,starter2=4,starter3=7,graphic1="001",graphic2="004",graphic3="007")
scene=PokemonStarterSelectScene.new
screen=PokemonStarterSelect.new(scene)
pbFadeOutIn(99999) {
screen.pbStartScreen(starter1,starter2,starter3,graphic1,graphic2,graphic3)
}
end
