tuts_rpg
Thread Id: 22645
Thread Name: [Pokemon Essentials] Menú Tactil una Pantalla
#0
VGS 12616
En vista que el RPG esta medio muerto y de que no e subido ningún aporte, hoy les traigo un menú táctil.
Pensaran que es como el otro de doble pantalla....pero NO
Este menú esta en la primera pantalla :D
Requisitos:

[LIST=1]
  • Tener el script de Mouse
  • [/LIST]

    Bien espesemos.

    Aquí esta:



    Gráficos

    Por ultimo queda disfrutar :)


    Creditos:
    VGS-Script.
    Jackster-Gráficos.
    spaceemotion-Gráficos.
    PSVX Team-Gráficos.
    y agradecimientos a ROCK7JD por pedirme que lo hiciera.
    #1
    Nyan_LV 28277
    Wow!!!

    este menu me gusta mas que el dual,mejor para los que prefieren una sola pantalla espero que el sigan habiendo aportes tuyos
    #2
    akane159 16805
    oye genial este menu creo q lo utilizare, no olvidare en dar creditos :D!
    #3
    VGS 12616
    Iniciado por Last_M
    Wow!!!

    este menu me gusta mas que el dual,mejor para los que prefieren una sola pantalla espero que el sigan habiendo aportes tuyos

    Si la mayoría prefieren tener una pantalla, pronto verán mas no solo menús xD

    Iniciado por akane159
    oye genial este menu creo q lo utilizare, no olvidare en dar creditos :D!

    Gracias :D
    #4
    akane159 16805
    Iniciado por VGS
    Si la mayoría prefieren tener una pantalla, pronto verán mas no solo menús xD


    Gracias :D


    O: mas cosas ya las quiero ver, si puedes dejame link en mi perfil para cuando hagas los post :)
    #5
    VGS 12616
    Iniciado por akane159
    O: mas cosas ya las quiero ver, si puedes dejame link en mi perfil para cuando hagas los post :)

    Si va a ver mas, ok te dejare link cuando haga post :blush:
    #6
    Dreiksilver 12515
    Me sale este error De verdad nose si puse bien el script de mouse no entiendo la parte de pegar
    Mouse.update
    $mouse.x = Mouse.pos_x
    $mouse.y = Mouse.pos_y

    En cada update nose cuales update e.e
    #7
    Tito Drimer301 27267
    El error es porque no encuentra la imagen llamada "fondomenu".

    Mouse.update
    $mouse.x = Mouse.pos_x
    $mouse.y = Mouse.pos_y

    Ese código lo debes poner en el loop principal o en el update local, da igual.
    #8
    Silver.Exe 28626
    ---------------------------
    Pokemon ámbar negro
    ---------------------------
    Exception: NoMethodError

    Message: undefined method `update' for Mouse:Module

    Pantalla táctil:15:in `pbUpdate'

    Pantalla táctil:157:in `pbScene'

    Pantalla táctil:154:in `loop'

    Pantalla táctil: 300:in `pbScene'

    Pantalla táctil: 315:in `pbStartPokemonMenu'

    Scene_Map:188:in `call_menu'

    Scene_Map:159:in `update'

    Scene_Map:68:in `main'

    Scene_Map:65:in `loop'

    Scene_Map:72:in `main'

    Me ayudarían?
    #9
    Tito Drimer301 27267
    ¿Tienes el sistema de Mouse?
    #10
    Mighter 28703
    Muy muy bueno! Felicitaciones!
    #11
    Silver.Exe 28626
    Supongo que no lo tengo.
    [MENTION=27267]Drimer[/MENTION]
    #12
    Arots 28929
    Yo se como es
    Esto
    class PokemonOptionScene
    def pbUpdate
    pbUpdateSpriteHash [MENTION=24071]Sprite[/MENTION]s)
    end
    def pbStartScene [MENTION=24071]Sprite[/MENTION]s={}
    @viewport=Viewport.new(0,0,Graphics.width,Graphics.height)
    @viewport.z=99999
    [MENTION=24071]Sprite[/MENTION]s["title"]=Window_UnformattedTextPokemon.newWithSize(
    _INTL("Options"),0,0,Graphics.width,64,@viewport)
    [MENTION=24071]Sprite[/MENTION]s["textbox"]=Kernel.pbCreateMessageWindow
    [MENTION=24071]Sprite[/MENTION]s["textbox"].letterbyletter=false
    [MENTION=24071]Sprite[/MENTION]s["textbox"].text=_INTL("Speech frame {1}.",1+$PokemonSystem.textskin)
    screensize1=_INTL("{1}x{2}",DEFAULTSCREENWIDTH/2,DEFAULTSCREENHEIGHT/2)
    screensize2=_INTL("{1}x{2}",DEFAULTSCREENWIDTH,DEFAULTSCREENHEIGHT)
    # These are the different options in the game. To add an option, define a setter and
    # a getter for that option. To delete an option, comment it out or delete it.
    # The game's options may be placed in any order.
    [MENTION=12671]pokemon[/MENTION]Options=[
    EnumOption.new(_INTL("TEXT SPEED"),[_INTL("SLOW"),_INTL("MID"),_INTL("FAST")],
    proc { $PokemonSystem.textspeed }, # Getter
    proc {|value|
    $PokemonSystem.textspeed=value
    MessageConfig.pbSetTextSpeed(pbSettingToTextSpeed(value))
    } # Setter
    ),
    EnumOption.new(_INTL("BATTLE SCENE"),[_INTL("ON"),_INTL("OFF")],
    proc { $PokemonSystem.battlescene },
    proc {|value| $PokemonSystem.battlescene=value }
    ),
    EnumOption.new(_INTL("BATTLE STYLE"),[_INTL("SHIFT"),_INTL("SET")],
    proc { $PokemonSystem.battlestyle },
    proc {|value| $PokemonSystem.battlestyle=value }
    ),
    EnumOption.new(_INTL("FONT STYLE"),[_INTL("Em"),_INTL("R/S"),_INTL("FRLG"),_INTL("DP")],
    proc { $PokemonSystem.font },
    proc {|value|
    $PokemonSystem.font=value
    MessageConfig.pbSetSystemFontName($VersionStyles[value])
    }
    ),
    NumberOption.new(_INTL("FRAME"),_INTL("TYPE%d"),1,$TextFrames.length,
    proc { $PokemonSystem.frame },
    proc {|value|
    $PokemonSystem.frame=value
    MessageConfig.pbSetSystemFrame($TextFrames[value])
    }
    ),
    EnumOption2.new(_INTL("MAP VIEW"),[_INTL("ORIGINAL"),_INTL("CUSTOM"),_INTL("PERSPECTIVE")],
    proc { $PokemonSystem.tilemap ? $PokemonSystem.tilemap : 0 },
    proc {|value|
    oldvalue=$PokemonSystem.tilemap
    $PokemonSystem.tilemap=value
    if value!=oldvalue
    ObjectSpace.each_object(TilemapLoader){|o| next if o.disposed?; o.updateClass }
    end
    }
    ),
    NumberOption.new(_INTL("SPEECH FRAME"),_INTL("TYPE%d"),1,$SpeechFrames.length,
    proc { $PokemonSystem.textskin },
    proc {|value| $PokemonSystem.textskin=value;
    MessageConfig.pbSetSpeechFrame(
    "Graphics/Windowskins/"+$SpeechFrames[value]) }
    )
    ]

    [MENTION=24071]Sprite[/MENTION]s["option"]=Window_PokemonOption.new [MENTION=12671]pokemon[/MENTION]Options,0,
    [MENTION=24071]Sprite[/MENTION]s["title"].height,Graphics.width,
    [email]Graphics.height [MENTION=24071]Sprite[/MENTION]s["title"].height[/email])
    [MENTION=24071]Sprite[/MENTION]s["option"].viewport=@viewport
    [MENTION=24071]Sprite[/MENTION]s["option"].visible=true
    # Get the values of each option
    for i in 0.. [MENTION=12671]pokemon[/MENTION]Options.length
    [MENTION=24071]Sprite[/MENTION]s["option"]= [MENTION=12671]pokemon[/MENTION]Options.get || 0)
    end
    pbDeactivateWindows [MENTION=24071]Sprite[/MENTION]s)
    pbFadeInAndShow [MENTION=24071]Sprite[/MENTION]s) { pbUpdate }
    end
    Hay k sustituir en el script de Pokemon options(Borras desde la linea 347[v13] asta la linea donde pone
    pbDeactivateWindows [MENTION=24071]Sprite[/MENTION]s)
    y asta el end.Tras borrarlo copiaas y pegas el script k te puse antes

    Yo se como es
    Esto
    class PokemonOptionScene
    def pbUpdate
    pbUpdateSpriteHash [MENTION=24071]Sprite[/MENTION]s)
    end
    def pbStartScene [MENTION=24071]Sprite[/MENTION]s={}
    @viewport=Viewport.new(0,0,Graphics.width,Graphics.height)
    @viewport.z=99999
    [MENTION=24071]Sprite[/MENTION]s["title"]=Window_UnformattedTextPokemon.newWithSize(
    _INTL("Options"),0,0,Graphics.width,64,@viewport)
    [MENTION=24071]Sprite[/MENTION]s["textbox"]=Kernel.pbCreateMessageWindow
    [MENTION=24071]Sprite[/MENTION]s["textbox"].letterbyletter=false
    [MENTION=24071]Sprite[/MENTION]s["textbox"].text=_INTL("Speech frame {1}.",1+$PokemonSystem.textskin)
    screensize1=_INTL("{1}x{2}",DEFAULTSCREENWIDTH/2,DEFAULTSCREENHEIGHT/2)
    screensize2=_INTL("{1}x{2}",DEFAULTSCREENWIDTH,DEFAULTSCREENHEIGHT)
    # These are the different options in the game. To add an option, define a setter and
    # a getter for that option. To delete an option, comment it out or delete it.
    # The game's options may be placed in any order.
    [MENTION=12671]pokemon[/MENTION]Options=[
    EnumOption.new(_INTL("TEXT SPEED"),[_INTL("SLOW"),_INTL("MID"),_INTL("FAST")],
    proc { $PokemonSystem.textspeed }, # Getter
    proc {|value|
    $PokemonSystem.textspeed=value
    MessageConfig.pbSetTextSpeed(pbSettingToTextSpeed(value))
    } # Setter
    ),
    EnumOption.new(_INTL("BATTLE SCENE"),[_INTL("ON"),_INTL("OFF")],
    proc { $PokemonSystem.battlescene },
    proc {|value| $PokemonSystem.battlescene=value }
    ),
    EnumOption.new(_INTL("BATTLE STYLE"),[_INTL("SHIFT"),_INTL("SET")],
    proc { $PokemonSystem.battlestyle },
    proc {|value| $PokemonSystem.battlestyle=value }
    ),
    EnumOption.new(_INTL("FONT STYLE"),[_INTL("Em"),_INTL("R/S"),_INTL("FRLG"),_INTL("DP")],
    proc { $PokemonSystem.font },
    proc {|value|
    $PokemonSystem.font=value
    MessageConfig.pbSetSystemFontName($VersionStyles[value])
    }
    ),
    NumberOption.new(_INTL("FRAME"),_INTL("TYPE%d"),1,$TextFrames.length,
    proc { $PokemonSystem.frame },
    proc {|value|
    $PokemonSystem.frame=value
    MessageConfig.pbSetSystemFrame($TextFrames[value])
    }
    ),
    EnumOption2.new(_INTL("MAP VIEW"),[_INTL("ORIGINAL"),_INTL("CUSTOM"),_INTL("PERSPECTIVE")],
    proc { $PokemonSystem.tilemap ? $PokemonSystem.tilemap : 0 },
    proc {|value|
    oldvalue=$PokemonSystem.tilemap
    $PokemonSystem.tilemap=value
    if value!=oldvalue
    ObjectSpace.each_object(TilemapLoader){|o| next if o.disposed?; o.updateClass }
    end
    }
    ),
    NumberOption.new(_INTL("SPEECH FRAME"),_INTL("TYPE%d"),1,$SpeechFrames.length,
    proc { $PokemonSystem.textskin },
    proc {|value| $PokemonSystem.textskin=value;
    MessageConfig.pbSetSpeechFrame(
    "Graphics/Windowskins/"+$SpeechFrames[value]) }
    )
    ]

    [MENTION=24071]Sprite[/MENTION]s["option"]=Window_PokemonOption.new [MENTION=12671]pokemon[/MENTION]Options,0,
    [MENTION=24071]Sprite[/MENTION]s["title"].height,Graphics.width,
    [email]Graphics.height [MENTION=24071]Sprite[/MENTION]s["title"].height[/email])
    [MENTION=24071]Sprite[/MENTION]s["option"].viewport=@viewport
    [MENTION=24071]Sprite[/MENTION]s["option"].visible=true
    # Get the values of each option
    for i in 0.. [MENTION=12671]pokemon[/MENTION]Options.length
    [MENTION=24071]Sprite[/MENTION]s["option"]= [MENTION=12671]pokemon[/MENTION]Options.get || 0)
    end
    pbDeactivateWindows [MENTION=24071]Sprite[/MENTION]s)
    pbFadeInAndShow [MENTION=24071]Sprite[/MENTION]s) { pbUpdate }
    end
    Hay k sustituir en el script de Pokemon options(Borras desde la linea 347[v13] asta la linea donde pone
    pbDeactivateWindows [MENTION=24071]Sprite[/MENTION]s)
    y asta el end.Tras borrarlo copiaas y pegas el script k te puse antes

    el mensaje se me bugeo y salio doble Lol
    #13
    Pokegod7020 29046
    Hola.

    Yo soy de los Estados Unidos. Mi español no es tan grande. He utilizado Google Translate para traducir esto, por lo que esperan algunos errores. Sin embargo, estoy usando Pokémon Essentials para hacer un juego. He visto que este guión tiene un montón de errores. Eso incluye cosas que no sé o errores de espaciado sencillo. ¿Puede alguien ayudarme? Muchas gracias.