##############################################################################
##############################################################################
####### Script Menu Tactil ###################################################
####### En Primera Pantalla ##################################################
##############################################################################
######## BY: VGS #############################################################
##############################################################################

#-----------------------------------------------------------------------------

class PokemonMenu_Scene

#---------------------------------------------
def pbUpdate
Mouse.update
$mouse.x = Mouse.pos_x
$mouse.y = Mouse.pos_y
pbUpdateSpriteHash(@sprites)
end
#------------------------------------------------

def pbEndScene
pbDisposeSpriteHash(@sprites)
@viewport.dispose
end
#-----------------------------------------------------------------------------
def pbStartScene

if $Trainer.pokegear
@pokegear="Pokegear"
end
if $Trainer.pokedex
@pokedex="Pokedex"
end
if $Trainer.party.length>0
@equipo="Pokemon"
end

@sprites={}

@viewport=Viewport.new(0,0,Graphics.width, 660)
@viewport.z=99999

@sprites["overlay"]=BitmapSprite.new(Graphics.width,Graphics.height,@viewport)
@sprites["overlay"].z=9999
overlay= @sprites["overlay"].bitmap
overlay.clear
baseColor=Color.new(248,248,248)
shadowColor=Color.new(104,88,112)
pbSetSystemFont(@sprites["overlay"].bitmap)
textPositions=[
[_INTL("{1}",$Trainer.name),152-5,75,false,baseColor,shadowColor],
[_INTL("Mochila"),345-5,75,false,baseColor,shadowColor],
[_INTL("Guardar"),152-5,153,false,baseColor,shadowColor],
[_INTL("Opciones"),345-5,153,false,baseColor,shadowColor],
[_INTL("{1}",@equipo),152-5,228,false,baseColor,shadowColor],
[_INTL("{1}",@pokedex),345-5,228,false,baseColor,shadowColor],
[_INTL("{1}",@pokegear),234 ,299,false,baseColor,shadowColor]]
pbDrawTextPositions(overlay,textPositions)


@sprites["fondo"]=Sprite.new(@viewport)
@sprites["fondo"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/fondomenu")
@sprites["fondo"].x=0
@sprites["fondo"].y=0
@sprites["fondo"].opacity=99

@sprites["boton1"]=Sprite.new(@viewport)
@sprites["boton1"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton1"].x=69
@sprites["boton1"].y=65-10
@sprites["entrenador"]=Sprite.new(@viewport)
@sprites["entrenador"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/entrenadormenu")
@sprites["entrenador"].x=69
@sprites["entrenador"].y=65-10

@sprites["boton2"]=Sprite.new(@viewport)
@sprites["boton2"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton2"].x=69
@sprites["boton2"].y=65+78-10
@sprites["guardar"]=Sprite.new(@viewport)
@sprites["guardar"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/guardarmenu")
@sprites["guardar"].x=69
@sprites["guardar"].y=65+78-10

if $Trainer.party.length>0
@sprites["boton3"]=Sprite.new(@viewport)
@sprites["boton3"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton3"].x=69
@sprites["boton3"].y=218-10
@sprites["pokemon"]=Sprite.new(@viewport)
@sprites["pokemon"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/ballmenu")
@sprites["pokemon"].x=69
@sprites["pokemon"].y=218-10
end

@sprites["boton4"]=Sprite.new(@viewport)
@sprites["boton4"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton4"].x=261
@sprites["boton4"].y=65-10
@sprites["mochila"]=Sprite.new(@viewport)
@sprites["mochila"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/mochilamenu")
@sprites["mochila"].x=261
@sprites["mochila"].y=65-10

@sprites["boton5"]=Sprite.new(@viewport)
@sprites["boton5"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton5"].x=261
@sprites["boton5"].y=65+78-10
@sprites["opciones"]=Sprite.new(@viewport)
@sprites["opciones"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/opcionesmenu")
@sprites["opciones"].x=261
@sprites["opciones"].y=65+78-10

if $Trainer.pokedex
@sprites["boton6"]=Sprite.new(@viewport)
@sprites["boton6"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton6"].x=261
@sprites["boton6"].y=218-10
@sprites["pokedex"]=Sprite.new(@viewport)
@sprites["pokedex"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/pokedexmenu")
@sprites["pokedex"].x=261
@sprites["pokedex"].y=218-10
end

if $Trainer.pokegear
@sprites["boton7"]=Sprite.new(@viewport)
@sprites["boton7"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
@sprites["boton7"].x=165
@sprites["boton7"].y=289-10
@sprites["pokegear"]=Sprite.new(@viewport)
@sprites["pokegear"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/pokegearmenu")
@sprites["pokegear"].x=165
@sprites["pokegear"].y=289-10
end

@sprites["salir"]=Sprite.new(@viewport)
@sprites["salir"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/salirboton")
@sprites["salir"].x=430
@sprites["salir"].y=318

if $DEBUG
@sprites["debug"]=Sprite.new(@viewport)
@sprites["debug"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/debugboton")
@sprites["debug"].x=0
@sprites["debug"].y=318
end

end
#-----------------------------------------------------------------------------

def pbScene

loop do
Graphics.update
Input.update
pbUpdate

if Input.trigger?(Input::B)
break
end

if Mouse.mouse_in_area?(69, 65-10, 182, 65)
@sprites["boton1"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbPlayDecisionSE()
PBDebug.logonerr {
scene=PokemonTrainerCardScene.new
screen=PokemonTrainerCard.new(scene)
pbFadeOutIn(99999) {
screen.pbStartScreen
@scene.pbRefresh
}
}
end
else
@sprites["boton1"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end

if Mouse.mouse_in_area?(69, 65+68-10, 182, 65)
@sprites["boton2"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbPlayDecisionSE()
scene=PokemonSaveScene.new
screen=PokemonSave.new(scene)
if screen.pbSaveScreen
end
end
else
@sprites["boton2"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end

if $Trainer.party.length>0
if Mouse.mouse_in_area?(69, 218-10, 182, 65)
@sprites["boton3"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbPlayDecisionSE()
sscene=PokemonScreen_Scene.new
sscreen=PokemonScreen.new(sscene,$Trainer.party)
hiddenmove=nil
pbFadeOutIn(99999) {
hiddenmove=sscreen.pbPokemonScreen
if hiddenmove
@scene.pbEndScene
end
}
end
else
@sprites["boton3"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end
end

if Mouse.mouse_in_area?(261, 65-10, 182, 65)
@sprites["boton4"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbPlayDecisionSE()
item=0
scene=PokemonBag_Scene.new
screen=PokemonBagScreen.new(scene,$PokemonBag)
pbFadeOutIn(99999) {
item=screen.pbStartScreen
if item>0
break
end
}
if item>0
Kernel.pbUseKeyItemInField(item)
return
end
end
else
@sprites["boton4"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end

if Mouse.mouse_in_area?(261, 65+68-10, 182, 65)
@sprites["boton5"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbPlayDecisionSE()
pbFadeOutIn(99999){
scene=PokemonOptionScene.new
screen=PokemonOption.new(scene)
screen.pbStartScreen
}
end
else
@sprites["boton5"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end

if $Trainer.pokedex
if Mouse.mouse_in_area?(261, 218-10, 182, 65)
@sprites["boton6"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbPlayDecisionSE()
pbFadeOutIn(99999) {
scene=PokemonPokedexScene.new
screen=PokemonPokedex.new(scene)
screen.pbStartScreen
}
end
else
@sprites["boton6"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end
end

if $Trainer.pokegear
if Mouse.mouse_in_area?(165, 289-10, 182, 65)
@sprites["boton7"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu2")
if Mouse.click?(1)
pbFadeOutIn(99999) {
pbLoadRpgxpScene(Scene_Pokegear.new)
}
end
else
@sprites["boton7"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/botonmenu")
end
end

if $DEBUG
if Mouse.mouse_in_area?(0, 318, 82, 65)
@sprites["debug"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/debugbotonp")
if Mouse.click?(1)
pbFadeOutIn(99999) {
pbDebugMenu
}
end
else
@sprites["debug"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/debugboton")
end
end

if Mouse.mouse_in_area?(430, 318, 82, 65)
@sprites["salir"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/salirbotonp")
if Mouse.click?(1)
break
end
else
@sprites["salir"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/salirboton")
end

end
end
end



#----------------------------------------------------------

class PokemonMenu
def initialize(scene)
@scene = scene
end

def pbStartPokemonMenu
@scene.pbStartScene
@scene.pbScene
@scene.pbEndScene
end
end
#---------------------------------------------------------------