You mean that replace the pause menu (that usually contains the Pokédex, party, trainer card, bag, etc. options) entirely with either trainer card/leave safari/options/exit (4 options) or save/options/exit (3 options)? That is, rather than just replace the "save" with a "quit"/info box on left while leaving the rest of the options intact.
This is certainly possible. If you look at the coloured-in script above, have a look to see how the "if" statement works. It starts with "if something" and end with "end" - anything in between those two happens only if that "if" statement is true.
Lines 114 to 137 in PokemonMenu is the following:
Code:
commands[cmdPokedex=commands.length]=_INTL("[COLOR=DarkOrchid]POKéDEX[/COLOR]") [COLOR=Red]if $Trainer.pokedex[/COLOR]
commands[cmdPokemon=commands.length]=_INTL("[COLOR=DarkOrchid]POKéMON[/COLOR]") [COLOR=Red]if $Trainer.party.length>0[/COLOR]
commands[cmdBag=commands.length]=_INTL("[COLOR=DarkOrchid]BAG[/COLOR]") [COLOR=Red]if !pbInBugContest?[/COLOR]
commands[cmdPokegear=commands.length]=_INTL("[COLOR=DarkOrchid]POKéGEAR[/COLOR]") [COLOR=Red]if $Trainer.pokegear[/COLOR]
commands[cmdTrainer=commands.length]=$Trainer.name
[COLOR=SeaGreen]if pbInSafari?[/COLOR]
@scene.pbShowInfo(_INTL("[COLOR=Blue]STEPS: {1}/600\nBALLS: {2}[/COLOR]",pbSafariState.steps,pbSafariState.ballcount))
commands[cmdQuit=commands.length]=_INTL("[COLOR=DarkOrchid]QUIT[/COLOR]")
[COLOR=SeaGreen]elsif pbInBugContest?[/COLOR]
[COLOR=SeaGreen]if pbBugContestState.lastPokemon[/COLOR]
@scene.pbShowInfo(_INTL("[COLOR=Blue]CAUGHT: {1}\nLEVEL: {2}\nBALLS: {3}[/COLOR]",
PBSpecies.getName(pbBugContestState.lastPokemon.species),
pbBugContestState.lastPokemon.level,
pbBugContestState.ballcount))
[COLOR=SeaGreen]else[/COLOR]
@scene.pbShowInfo(_INTL("[COLOR=Blue]CAUGHT: None\nBALLS: {1}[/COLOR]",pbBugContestState.ballcount))
[COLOR=SeaGreen]end[/COLOR]
commands[cmdQuit=commands.length]=_INTL("[COLOR=DarkOrchid]QUIT[/COLOR]")
[COLOR=SeaGreen]else[/COLOR]
commands[cmdSave=commands.length]=_INTL("[COLOR=DarkOrchid]SAVE[/COLOR]") [COLOR=Red]if !$game_system || !$game_system.save_disabled[/COLOR]
[COLOR=SeaGreen]end[/COLOR]
commands[cmdOption=commands.length]=_INTL("[COLOR=DarkOrchid]OPTION[/COLOR]")
commands[cmdDebug=commands.length]=_INTL("[COLOR=DarkOrchid]DEBUG[/COLOR]") [COLOR=Red]if $DEBUG[/COLOR]
commands[commands.length]=_INTL("[COLOR=DarkOrchid]EXIT[/COLOR]")
Again, coloured in a bit. What you need to do is take the idea of having an "if" section and put it around all of this, like so:
Code:
[COLOR=Red]if pbInSafari?[/COLOR]
commands[cmdTrainer=commands.length]=$Trainer.name
commands[cmdQuit=commands.length]=_INTL("[COLOR=DarkOrchid]QUIT[/COLOR]")
commands[cmdOption=commands.length]=_INTL("[COLOR=DarkOrchid]OPTION[/COLOR]")
commands[cmdDebug=commands.length]=_INTL("[COLOR=DarkOrchid]DEBUG[/COLOR]") [COLOR=SeaGreen]if $DEBUG[/COLOR]
commands[commands.length]=_INTL("[COLOR=DarkOrchid]EXIT[/COLOR]")
[COLOR=Red]elsif pbInBugContest?[/COLOR]
commands[cmdSave=commands.length]=_INTL("[COLOR=DarkOrchid]SAVE[/COLOR]") [COLOR=SeaGreen]if !$game_system || !$game_system.save_disabled[/COLOR]
commands[cmdOption=commands.length]=_INTL("[COLOR=DarkOrchid]OPTION[/COLOR]")
commands[cmdDebug=commands.length]=_INTL("[COLOR=DarkOrchid]DEBUG[/COLOR]") [COLOR=SeaGreen]if $DEBUG[/COLOR]
commands[commands.length]=_INTL("[COLOR=DarkOrchid]EXIT[/COLOR]")
[COLOR=Red]else[/COLOR]
commands[cmdPokedex=commands.length]=_INTL("[COLOR=DarkOrchid]POKéDEX[/COLOR]") [COLOR=SeaGreen]if $Trainer.pokedex[/COLOR]
commands[cmdPokemon=commands.length]=_INTL("[COLOR=DarkOrchid]POKéMON[/COLOR]") [COLOR=SeaGreen]if $Trainer.party.length>0[/COLOR]
commands[cmdBag=commands.length]=_INTL("[COLOR=DarkOrchid]BAG[/COLOR]")
commands[cmdPokegear=commands.length]=_INTL("[COLOR=DarkOrchid]POKéGEAR[/COLOR]") [COLOR=SeaGreen]if $Trainer.pokegear[/COLOR]
commands[cmdTrainer=commands.length]=$Trainer.name
commands[cmdSave=commands.length]=_INTL("[COLOR=DarkOrchid]SAVE[/COLOR]") [COLOR=SeaGreen]if !$game_system || !$game_system.save_disabled[/COLOR]
commands[cmdOption=commands.length]=_INTL("[COLOR=DarkOrchid]OPTION[/COLOR]")
commands[cmdDebug=commands.length]=_INTL("[COLOR=DarkOrchid]DEBUG[/COLOR]") [COLOR=SeaGreen]if $DEBUG[/COLOR]
commands[commands.length]=_INTL("[COLOR=DarkOrchid]EXIT[/COLOR]")
[COLOR=Red]end[/COLOR]
As far as I can tell, that's what you want. The first lot (trainer card/quit/options/exit) is displayed if you're in a Safari game (i.e. if pbInSafari? is true). The second lot (save/option/exit0 is displayed if you're in a Bug Catching Contest (i.e. if pbInBugContest? is true). If you're not in either of these, then the regular menu is shown.
I put the Debug options in each of them because it's always handy, just in case you need them. They won't be shown when you're just playing the game; they're to help you when you're designing the game and sorting things out.