ARCHIVE

Thread Id: 22645
Thread Name: [Pokemon Essentials] Menú Tactil una Pantalla

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.

Lo primero que hay que hacer es borrar el script que dice "PokemonPauseMenu".
Lo segundo es insertar el nuevo script, con el nombre que quieran.

Aquí esta:

Seguimos con los graficos, descarguen este archivo y descomprimanlo en la carpeta de "Pictures" de su proyecto.

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.

Wow!!!

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

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

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

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 :)

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:

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

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.

---------------------------
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?

¿Tienes el sistema de Mouse?

Muy muy bueno! Felicitaciones!

Supongo que no lo tengo.
[MENTION=27267]Drimer[/MENTION]

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

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.