###EXCLUSIVO para Pokemon Atlas
#Para llamar a la interfaz tienes que poner MemoryScene.new.pbMemory

RECUERDO2 = 50
RECUERDO3 = 51
RECUERDO4 = 52
RECUERDO5 = 53

class MemoryScene
  def pbMemory
    viewport=Viewport.new(0,0,Graphics.width,Graphics.height)
    viewport.z=999998
    pbSetViableDexes
    page = 1
    @sprites = {}
    @sprites["pagina"]=IconSprite.new(0,0,viewport)
    @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R1")
    @sprites["pagina"].x =0
    @sprites["pagina"].y =0
    loop do
      Graphics.update
      Input.update
      if Input.trigger?(Input::B)
          pbSEPlay("select")
          pbFadeOutAndHide(@sprites){pbUpdateSpriteHash(@sprites)}
          viewport.dispose if viewport
          break
        end
        if Input.trigger?(Input::RIGHT) && page == 1 && $game_switches[RECUERDO2]
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R2")
          page += 1
        elsif Input.trigger?(Input::RIGHT) && page == 2 && $game_switches[RECUERDO3]
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R3")
          page += 1
        elsif Input.trigger?(Input::RIGHT) && page == 3 && $game_switches[RECUERDO4]
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R4")
          page += 1
        elsif Input.trigger?(Input::RIGHT) && page == 4 && $game_switches[RECUERDO5]
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R5")
          page += 1
        end
        if Input.trigger?(Input::LEFT) && page == 2
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R1")
          page -= 1
        elsif Input.trigger?(Input::LEFT) && page == 3
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R2")
          page -= 1
        elsif Input.trigger?(Input::LEFT) && page == 4
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R3")
          page -= 1
        elsif Input.trigger?(Input::LEFT) && page == 5
          pbSEPlay("page")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/6")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/5")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/4")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/3")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/2")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/1")
          pbWait(2)
          @sprites["pagina"].setBitmap("Graphics/Pictures/Recuerdos/R4")
          page -= 1
        end
      end
  end
end