请问怎样突破开关上限 - Project1

$data_actors = load_data("Data/Actors.rxdata") #——角色
$data_classes = load_data("Data/Classes.rxdata") #——职业
$data_skills = load_data("Data/Skills.rxdata") #——特技
$data_items = load_data("Data/Items.rxdata") #——物品
$data_weapons = load_data("Data/Weapons.rxdata") #——武器
$data_armors = load_data("Data/Armors.rxdata") #——防具
$data_enemies = load_data("Data/Enemies.rxdata") #——敌人
$data_troops = load_data("Data/Troops.rxdata") #——队伍
$data_states = load_data("Data/States.rxdata") #——状态
$data_animations = load_data("Data/Animations.rxdata") #——动画
$data_tilesets = load_data("Data/Tilesets.rxdata") #——图块
$data_common_events = load_data("Data/CommonEvents.rxdata") #——公共事件
$data_system = load_data("Data/System.rxdata") #——状态
for i in 1..5000 #——上限设置
$data_actors[i] = RPG::Actor.new if $data_actors[i]==nil
$data_classes[i] = RPG::Class.new if $data_classes[i]==nil
$data_skills[i] = RPG::Skill.new if $data_skills[i]==nil
$data_items[i] = RPG::Item.new if $data_items[i]==nil
$data_weapons[i] = RPG::Weapon.new if $data_weapons[i]==nil
$data_armors[i] = RPG::Armor.new if $data_armors[i]==nil
$data_enemies[i] = RPG::Enemy.new if $data_enemies[i]==nil
$data_troops[i] = RPG::Troop.new if $data_troops[i]==nil
$data_states[i] = RPG::State.new if $data_states[i]==nil
$data_animations[i] = RPG::Animation.new if $data_animations[i]==nil
$data_tilesets[i] = RPG::Tileset.new if $data_tilesets[i]==nil
$data_common_events[i] = RPG::CommonEvent.new if $data_common_events[i]==nil
$data_system.elements[i] = "" if $data_system.elements[i]==nil
end
save_data($data_actors,"Data/Actors.rxdata")
save_data($data_classes,"Data/Classes.rxdata")
save_data($data_skills,"Data/Skills.rxdata")
save_data($data_items,"Data/Items.rxdata")
save_data($data_weapons,"Data/Weapons.rxdata")
save_data($data_armors,"Data/Armors.rxdata")
save_data($data_enemies,"Data/Enemies.rxdata")
save_data($data_troops,"Data/Troops.rxdata")
save_data($data_states,"Data/States.rxdata")
save_data($data_animations,"Data/Animations.rxdata")
save_data($data_tilesets,"Data/Tilesets.rxdata")
save_data($data_common_events,"Data/CommonEvents.rxdata")
save_data($data_system,"Data/System.rxdata")
exit
#复制代码如果有不需要的，请删除以上三段中相同位置的脚本。（也可用$data_xxx识别）
#<地图宽高>强烈不建议……
==========================================
a = load_data("Data/Map001.rxdata") #—— 001：地图ID
$data_map = RPG::Map.new(200,250) #—— 200：长 250：宽
$data_map.tileset_id = a.tileset_id
$data_map.autoplay_bgm = a.autoplay_bgm
$data_map.bgm = a.bgm
$data_map.autoplay_bgs = a.autoplay_bgs
#——白字
$data_map.bgs = a.bgs
$data_map.encounter_list = a.encounter_list
$data_map.encounter_step = a.encounter_step
$data_map.events = a.events
save_data($data_map,"Data/Map001.rxdata")
exit
#强烈不建议……破坏力极强，卡了我老半天……
==========================================
#<破除地图999张的限制> by TERENCE（龙皇）
#http://rpg.blue/web/htm/news1092.htm
#<开关、变量>
$data_system = load_data("Data/System.rxdata")
$data_system.switches = [] #——开关
$data_system.variables = [] #——变量
#——上限设置
for i in 1..6000
$data_system.switches.push("")
$data_system.variables.push("")
end
save_data($data_system,"Data/System.rxdata")
exit
#除此还需把Game_Switches、Game_Variables两个脚本中的5000改为更高。
#PS：多用变量可以节约许多开关。
#咳咳……这个脚本的用处极小。写得初衷也是因为今天某人提问如何突破，结果后面一个跟着一个提问的现象。顺便照应RMXP提问区即将来临的“我的情人在哪”这个活动。
#各位都来大显身手吧=w=

复制代码