游戏存档变大问题解决方案 - Project1

#游戏终极优化系统作者：crow2006 【屠魔勇士】的游戏作者 from 66RPG
#适用于使用P叔随机属性系统+八云紫物品仓库系统的游戏，能让游戏速度恢复到初始状态
#如果没有使用物品仓库系统，脚本中涉及的部分请自行删改
#如使用了物品仓库系统，使用本功能前玩家需自行将仓库内所有武器与防具取到背包里
#请各位大大优化一下脚本，我技术很渣，只能写成这样很臭的，但确实发挥作用了。。。。
#使用方法：事件脚本：$game_party.cleardata
class Game_Party < Game_Unit
def warehouses #仓库中的武器装备
result = []
for i in $game_party.warehouse[1]
result.push($data_weapons[i[0]]) if i[0] != nil
end
for i in $game_party.warehouse[2]
result.push($data_armors[i[0]]) if i[0] != nil
end
return result
end
def equipments #角色身上的武器装备
result = []
for i in 1...$data_actors.size
result += $game_actors[i].equips unless $game_actors[i].nil?
end
return result
end
def delete_equipments #平时可用$game_party.delete_equipments来清除所有身上没穿的、包里没放的、仓库中也没存的垃圾数据，但并不治本。
saved_equips = $game_party.items + $game_party.warehouses + $game_party.equipments
for i in 0...$data_weapons.size
$data_weapons[i] = nil unless saved_equips.include?($data_weapons[i]) unless $data_weapons[i].nil?
end
for i in 0...$data_armors.size
$data_armors[i] = nil unless saved_equips.include?($data_armors[i]) unless $data_armors[i].nil?
end
end
def cleardate #终极清理大招
delete_equipments
for m in 1...$data_actors.size
for a in 0..11 #卸下装备(注意：如果使用了装备扩张系统，这里的11必须要根据游戏作相应调整)
$game_actors[m].change_equip(a,nil)
end
end
item1 = [] #武器
item2 = [] #防具
@warehouse_weapon = {} #仓库里的武器清空
@warehouse_armor = {} #仓库里的防具清空
$game_party.warehouse[1] = {} #仓库里的武器清空
$game_party.warehouse[2] = {} #仓库里的防具清空
$base_weapons = load_data("Data/Weapons.rvdata") #还原武器
$base_armors = load_data("Data/Armors.rvdata") #还原防具
saved_equips = $game_party.items
a1 = 1
for i in $data_weapons
if i != nil and saved_equips.include?(i)
i.id = a1
item1.push(i)
a1 += 1
end
end
$data_weapons = [nil]
for i in item1
$data_weapons.push(i)
end
@weapons = {}
@weapons[0] = 0
for i in $data_weapons
if i != nil
a = i.id
@weapons[a] = 1
end
end
a1 = 1
for i in $data_armors
if i != nil and saved_equips.include?(i)
i.id = a1
item2.push(i)
a1 += 1
end
end
$data_armors = [nil]
for i in item2
$data_armors.push(i)
end
@armors = {}
@armors[0] = 0
for i in $data_armors
if i != nil
a = i.id
@armors[a] = 1
end
end
end
end

复制代码