Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #In UI_Options (PScreen_Options in earlier versions), right at the top-
- class PokemonSystem
- attr_accessor :textspeed
- attr_accessor :battlescene
- attr_accessor :battlestyle
- attr_accessor :frame
- attr_writer :textskin
- attr_accessor :font
- attr_accessor :screensize
- attr_writer :border
- attr_writer :language
- attr_writer :runstyle
- attr_writer :bgmvolume
- attr_writer :sevolume
- attr_writer :textinput
- #Add:
- attr_accessor :battlesize
- #Below that:
- def initialize
- @textspeed = 1 # Text speed (0=slow, 1=normal, 2=fast)
- @battlescene = 0 # Battle effects (animations) (0=on, 1=off)
- @battlestyle = 0 # Battle style (0=switch, 1=set)
- @frame = 0 # Default window frame (see also $TextFrames)
- @textskin = 0 # Speech frame
- @font = 0 # Font (see also $VersionStyles)
- @screensize = (SCREEN_ZOOM.floor).to_i # 0=half size, 1=full size, 2=double size
- @border = 0 # Screen border (0=off, 1=on)
- @language = 0 # Language (see also LANGUAGES in script PokemonSystem)
- @runstyle = 0 # Run key functionality (0=hold to run, 1=toggle auto-run)
- @bgmvolume = 100 # Volume of background music and ME
- @sevolume = 100 # Volume of sound effects
- @textinput = 0 # Text input mode (0=cursor, 1=keyboard)
- #Add:
- @battlesize = 0 # Battle size (0 = single, 1 = double)
- #Further down, below
- EnumOption.new(_INTL("Battle Effects"),[_INTL("On"),_INTL("Off")],
- proc { $PokemonSystem.battlescene },
- proc { |value| $PokemonSystem.battlescene = value }
- ),
- #Add
- EnumOption.new(_INTL("Battle Size"),[_INTL("Single"),_INTL("Double"),_INTL("Triple")],
- proc { $PokemonSystem.battlesize },
- proc { |value| $PokemonSystem.battlesize = value }
- ),
- #This last part can technically be put in any section, but I think it's best to put in PField_EncounterModifiers, with similar scripts-
- Events.onTrainerPartyLoad += proc { |_sender, e|
- if $PokemonTemp.battleRules["size"] == nil && e[0]
- case $PokemonSystem.battlesize
- when 1
- setBattleRule("double") if pbCanDoubleBattle?
- when 2
- setBattleRule("triple") if pbCanTripleBattle?
- setBattleRule("double") if !pbCanTripleBattle? && pbCanDoubleBattle?
- end
- end
- }
Add Comment
Please, Sign In to add comment