Скрипт на выбор уровня сложности в New Game

=begin CSCA Difficulty System version: 1.0.3 (Released: April 6, 2013) Created by: Casper Gaming (http://www.caspergaming.com/) Compatibility: Made for RPGVXAce IMPORTANT: ALL CSCA Scripts should be compatible with each other unless otherwise noted. Requires CSCA Core script v1.0.4 + FFEATURES Allows you to have a difficulty selection, which alters the difficulty of the game by changing encoutner rates, enemy stats, and exp & gold gains. SETUP Setup below required. Intructions below. ================================================================================ UPDATES version 1.0.1 - Aliased param_base - Changed hash keys to symbols version 1.0.2 -Difficulty array is now 0 based for all script calls version 1.0.3 - Proeprly aliased initialize in CSCA_Core... *facepalm* ================================================================================ CREDIT: Free to use in noncommercial games if credit is given to: Casper Gaming (http://www.caspergaming.com/) To use in a commercial game, please purchase a license here: http://www.caspergaming.com/licenses.html TERMS: http://www.caspergaming.com/terms_of_use.html =end module CSCA module DIFFICULTY #=========================================================================== # Script Calls # # Difficulty acts as a variable. To use it in a conditional branch, use # the following syntax: $csca.difficulty == x # where x is the difficulty. Difficulty values start at 1. It is set to # 0 before selection. # # To call the Difficulty Select Scene, use the following script call: # scene = CSCA_Scene_DifficultySelect # SceneManager.call(scene) #=========================================================================== DIFFICULTIES = [] # Don't Touch HEADER = "Difficulty Select" # Header window text. ENCRATE = "Encounter Rate: " # Text for each modified value shown in window. ENEMYEXP = "Enemy EXP: " # Text for each modified value shown in window. ENEMYGOLD = "Enemy Gold: " # Text for each modified value shown in window. ENEMYSTATS = "Enemy Stats: " # Text for each modified value shown in window. MODIFY_HPMP = false # Allow "enemystats" to modify HP and MP too? #Define difficulties the following way: #DIFFICULTIES[x] = { #"name" => "Easy", # The name of the difficulty. #"enemyexp" => 110, # The experience modifier. This number is a percentage. #"enemygold" => 120, # The gold modifier. This number is a percentage. #"encrate" => 50, # Encoutner rate modifier. This number is a percentage. #"enemystats" => 80, # Base stat modifier. This number is a percentage. # # MP/HP are NOT modified by this unless changed above. #"descr" => ["Line One", # Description text. Make sure the proper format # "Line Two", # followed. # "Line Three"] # Default resolutions support up to 6 lines of #} # Descriptive text. # # A modifier with a percent value of 100 represents no change(normal). # Greater than 100% is an increase; lower than 100% is a decrease. DIFFICULTIES[0] = { :name => "Story", :enemyexp => 120, :enemygold => 150, :encrate => 0, :enemystats => 50, :descr => ["Line One", "Line Two", "Line Three"] } DIFFICULTIES[1] = { :name => "Easy", :enemyexp => 110, :enemygold => 120, :encrate => 50, :enemystats => 80, :descr => ["Line One", "Line Two", "Line Three"] } DIFFICULTIES[2] = { :name => "Normal", :enemyexp => 100, :enemygold => 100, :encrate => 100, :enemystats => 100, :descr => ["Line One", "Line Two", "Line Three"] } DIFFICULTIES[3] = { :name => "Hard", :enemyexp => 95, :enemygold => 90, :encrate => 110, :enemystats => 120, :descr => ["Line One", "Line Two", "Line Three", "Line Four"] } DIFFICULTIES[4] = { :name => "Insane", :enemyexp => 90, :enemygold => 80, :encrate => 120, :enemystats => 150, :descr => ["Line One", "Line Two", "Line Three"] } end # End Setup. end $imported = {} if $imported.nil? $imported["CSCA-Difficulty"] = true msgbox('Missing Script: CSCA Core Script! CSCA Difficulty System requires this script to work properly.') if !$imported["CSCA-Core"] #============================================================================== # ** CSCA_Scene_DifficultySelect #------------------------------------------------------------------------------ # Handles Difficulty Select Screen processing. #============================================================================== class CSCA_Scene_DifficultySelect < Scene_MenuBase #--------------------------------------------------------------------------# # Start Processing # #--------------------------------------------------------------------------# def start super create_head_window create_info_window create_select_window end #--------------------------------------------------------------------------# # Create Background # #--------------------------------------------------------------------------# def create_background super @background_sprite.tone.set(0, 0, 0, 128) end #--------------------------------------------------------------------------# # Create Header Window # #--------------------------------------------------------------------------# def create_head_window @head_window = CSCA_Window_Header.new(Graphics.width/6,50,Graphics.width/1.5, CSCA::DIFFICULTY::HEADER) @head_window.viewport = @viewport end #--------------------------------------------------------------------------# # Create Select Window # #--------------------------------------------------------------------------# def create_select_window x = Graphics.width/6 y = @head_window.height + @head_window.y w = Graphics.width/4 h = Graphics.height-148 @select_window = CSCA_Window_DifficultySelect.new(x, y, w, h) @select_window.set_handler(:ok, method(:on_difficulty_select)) @select_window.viewport = @viewport @select_window.help_window = @info_window @select_window.activate end #--------------------------------------------------------------------------# # Create Info Window # #--------------------------------------------------------------------------# def create_info_window x = Graphics.width/6 + Graphics.width/4 y = @head_window.height + @head_window.y w = @head_window.width - Graphics.width/4 h = Graphics.height-148 @info_window = CSCA_Window_DifficultyInfo.new(x, y, w, h) @info_window.viewport = @viewport end #--------------------------------------------------------------------------# # Select Difficulty # #--------------------------------------------------------------------------# def on_difficulty_select $csca.difficulty = @select_window.index return_scene end end #============================================================================== # ** CSCA_Window_SidequestSelect #------------------------------------------------------------------------------ # Handles selection of sidequests, and updates objectives info. #============================================================================== class CSCA_Window_DifficultySelect < Window_Selectable #--------------------------------------------------------------------------# # Object Initialization # #--------------------------------------------------------------------------# def initialize(x,y,width,height) super(x,y,width,height) @data = [] refresh select(0) end #--------------------------------------------------------------------------# # Get Item Max # #--------------------------------------------------------------------------# def item_max @data ? @data.size : 1 end #--------------------------------------------------------------------------# # Get Item # #--------------------------------------------------------------------------# def item @data && index >= 0 ? @data[index] : nil end #--------------------------------------------------------------------------# # Populate item list # #--------------------------------------------------------------------------# def make_item_list @data = CSCA::DIFFICULTY::DIFFICULTIES end #--------------------------------------------------------------------------# # Draw Items # #--------------------------------------------------------------------------# def draw_item(index) item = @data[index] if item rect = item_rect(index) name = CSCA::DIFFICULTY::DIFFICULTIES[index][:name] draw_text(rect.x, rect.y, contents.width, line_height, name) end end #--------------------------------------------------------------------------# # Refresh # #--------------------------------------------------------------------------# def refresh make_item_list create_contents draw_all_items end #--------------------------------------------------------------------------# # Update Help Window # #--------------------------------------------------------------------------# def update_help @help_window.set_item(index) end end #============================================================================== # ** CSCA_Window_SidequestTask #------------------------------------------------------------------------------ # Displays tasks for each mission. #============================================================================== class CSCA_Window_DifficultyInfo < Window_Base #--------------------------------------------------------------------------# # Object Initialization # #--------------------------------------------------------------------------# def initialize(x, y, width, height) super(x, y, width, height) end #--------------------------------------------------------------------------# # Set Item # #--------------------------------------------------------------------------# def set_item(index) contents.clear draw_info(CSCA::DIFFICULTY::DIFFICULTIES[index]) end #--------------------------------------------------------------------------# # Draw Tasks # #--------------------------------------------------------------------------# def draw_info(difficulty) w = contents.width h = line_height contents.font.bold = true draw_text(0,0,w,h,difficulty["name"],1) contents.font.bold = false contents.font.size = 20 change_color(system_color) draw_text(0,h,w,h,CSCA::DIFFICULTY::ENCRATE) draw_text(0,h*2-4,w,h,CSCA::DIFFICULTY::ENEMYSTATS) draw_text(0,h*3-8,w,h,CSCA::DIFFICULTY::ENEMYEXP) draw_text(0,h*4-12,w,h,CSCA::DIFFICULTY::ENEMYGOLD) change_color(normal_color) x1 = text_size(CSCA::DIFFICULTY::ENCRATE).width x2 = text_size(CSCA::DIFFICULTY::ENEMYSTATS).width x3 = text_size(CSCA::DIFFICULTY::ENEMYEXP).width x4 = text_size(CSCA::DIFFICULTY::ENEMYGOLD).width draw_text(x1,h,w-x1,h,difference(difficulty[:encrate])) draw_text(x2,h*2-4,w-x2,h,difference(difficulty[:enemystats])) draw_text(x3,h*3-8,w-x3,h,difference(difficulty[:enemyexp])) draw_text(x4,h*4-12,w-x4,h,difference(difficulty[:enemygold])) y = h*6-20 difficulty[:descr].each do |text| draw_text(0,y,w,h,text) y += h-4 end end #--------------------------------------------------------------------------# # Calculate Value # #--------------------------------------------------------------------------# def difference(value) value -= 100 value >= 0 ? pos = "+" : pos = "" return pos + value.to_s + "%" end end #============================================================================== # ** CSCA_Core #------------------------------------------------------------------------------ # Adds difficulty information. #Aliases: initialize #============================================================================== class CSCA_Core attr_reader :difficulty attr_reader :d_enemyexp attr_reader :d_enemygold attr_reader :d_encrate attr_reader :d_enemystats #--------------------------------------------------------------------------# # Initialize # #--------------------------------------------------------------------------# alias :difficulty_init :initialize def initialize difficulty_init @difficulty = 0 @d_enemyexp = 100 @d_enemygold = 100 @d_encrate = 100 @d_enemystats = 100 end #--------------------------------------------------------------------------# # Writer Method # #--------------------------------------------------------------------------# def difficulty=(difficulty) @difficulty = difficulty on_change(difficulty) end #--------------------------------------------------------------------------# # Modify values on difficulty change # #--------------------------------------------------------------------------# def on_change(difficulty) modifier = CSCA::DIFFICULTY::DIFFICULTIES[difficulty] @d_enemyexp = modifier[:enemyexp] @d_enemygold = modifier[:enemygold] @d_encrate = modifier[:encrate] @d_enemystats = modifier[:enemystats] $game_system.encounter_disabled == (@d_encrate == 0) $game_player.make_encounter_count end end #============================================================================== # ** Game_Troop #------------------------------------------------------------------------------ # Modifies enemy drops such as EXP and GOLD #Aliases: exp_total, gold_total #============================================================================== class Game_Troop < Game_Unit #--------------------------------------------------------------------------# # Alias Method; Calculate Total Experience # #--------------------------------------------------------------------------# alias :csca_difficulty_exp_total :exp_total def exp_total (csca_difficulty_exp_total * ($csca.d_enemyexp.to_f/100)).to_i end #--------------------------------------------------------------------------# # Alias Method; Calculate Total Gold # #--------------------------------------------------------------------------# alias :csca_difficulty_gold_total :gold_total def gold_total (csca_difficulty_gold_total * ($csca.d_enemygold.to_f/100)).to_i end end #============================================================================== # ** Game_Player #------------------------------------------------------------------------------ # Modifies encounter rate. #Aliases: make_encounter_count #============================================================================== class Game_Player < Game_Character alias :csca_difficulty_make_encounter_count :make_encounter_count def make_encounter_count encrate = $csca.d_encrate encrate += 1 if encrate == 0 nom = csca_difficulty_make_encounter_count c = (nom / (encrate.to_f/100)).to_i return c end end #============================================================================== # ** Game_Enemy #------------------------------------------------------------------------------ # Modifies base parameters such as ATK and DEF. #Aliases: param_base #============================================================================== class Game_Enemy < Game_Battler #--------------------------------------------------------------------------# # Alias Method; Get Base Value of Parameter # #--------------------------------------------------------------------------# alias :csca_ds_param_base :param_base def param_base(param_id) return enemy.params[param_id] if (param_id == 1 || param_id == 0) && !CSCA::DIFFICULTY::MODIFY_HPMP (csca_ds_param_base(param_id) * ($csca.d_enemystats.to_f/100)).to_i end end