如何对场景上的事件进行复制？

CCD0645

首先，用的是提取放置脚本，
@张咚咚  大大进行了一些修改的这个脚本

1. #==============================================================================# ☆★☆ 提取放置物脚本（强化） ☆★☆  
   
2. #------------------------------------------------------------------------------
   
3. # - 美兽
   
4. # - 2007.4.12
   
5. #------------------------------------------------------------------------------
   
6. #  爱护环境，人人有责，现实中切勿乱丢垃圾。
   
7. #------------------------------------------------------------------------------
   
8. #------------------------------------------------------------------------------
   
9. #  脚本原理：
   
10. #  是从仓库地图中提取事件，将其拷贝放入指定的位置，
    
11. #  依此达成随时随地生成新事件的功能，如此可节省大量用RGSS编写事件所消耗的体力，很多地方写的
    
12. #  很保守，尽量减少冲突几率。。
    
13. #  此为强化版，可实现新事件的保存，但代价是冲突的随之增大，若只想单纯实现ARPG
    
14. #  一类的物品掉落，场所移动后便清除，请使用简洁版。
    
15. #------------------------------------------------------------------------------
    
16. =begin
    
17.                                 Note：
    
18. 
    
19. 一：生成物品主方法：
    
20.     Drop_Item.make_events(map_id,event_id,item_x,item_y,save=false)
    
21.     map_id ： 仓库地图的ID。
    
22.     event_id ： 仓库中对应事件的ID。
    
23.     item_x、item_y ：新事件的X与Y坐标
    
24.     save : 是否存储标志;
    
25.            默认为false，即不存储，场所移动等转换场景后事件会消失;
    
26.            true 为存储，取档、关机、登火星，返回后事件仍存在。
    
27. 
    
28. 二：删除事件方法：
    
29.     事件名若包含"delete"字段，则执行完毕会立即自我清除;
    
30.     注：任何事件皆如此。
    
31. 
    
32. 三：必掌握语句：
    
33.     $game_map.events[@event_id]
    
34.     $game_player
    
35.     事件的脚本使用，表示“本事件”和“角色”，主要为取得事件的坐标，
    
36.     取得“本事件”X与Y坐标：$game_map.events[@event_id].event.x
    
37.                             $game_map.events[@event_id].event.y
    
38.     取得“角色”X与Y坐标：$game_player.x
    
39.                           $game_player.y                           
    
40.     例如，在某事件左侧生成2号地图的2号事件并永久存储,写法如下。
    
41.     x = $game_map.events[@event_id].event.x
    
42.     y = $game_map.events[@event_id].event.y
    
43.     Drop_Item.make_events(2,2,x-1,y,true)
    
44. 
    
45. 四：备注：
    
46.     此脚本用法十分灵活，种植、建设、舍弃、掉宝等功能都可用以达成。   
    
47. 
    
48. =end
    
49. #==============================================================================
    
50. 
    
51. module Drop_Item
    
52. 
    
53.   #生成事件
    
54.   def self.make_events(warehouse_map_id,event_id,item_x,item_y,save=false)
    
55.     map_id = $game_map.map_id
    
56.     map_es = $game_system.map_data[map_id] ||= {}
    
57. 
    
58.     event = load_data(sprintf("Data/Map%03d.rxdata", warehouse_map_id)).events[event_id]
    
59.     event.id = (map_es.empty? ? 2000 : map_es.keys.max + 1)
    
60.     event.x = item_x
    
61.     event.y = item_y
    
62.     if save
    
63.       $game_system.map_data[map_id][event.id] = event
    
64.     else
    
65.       max_id = $game_map.events.keys.max
    
66.       max_id = 20000 if max_id.nil?
    
67.       event.id = (max_id < 20000 ? 20000 : max_id + 1)
    
68.     end
    
69.     puts "create_event_id：#{event.id}"
    
70. 
    
71.     $game_map.events[event.id] = Game_Event.new(map_id,event)
    
72.     refresh_map
    
73.   end
    
74. 
    
75.   #删除生成事件
    
76.   def self.delete_event(map_id, event_id)
    
77.     if !$game_system.map_data[map_id].nil?
    
78.       $game_system.map_data[map_id].delete(event_id)
    
79.     end
    
80.     $game_map.events.delete(event_id) if $game_map.map_id == map_id
    
81.     refresh_map
    
82.   end
    
83. 
    
84.   #获取地图所有的生成事件
    
85.   def self.get_map_events(map_id)
    
86.     map_data = $game_system.map_data[map_id]
    
87.     result = []
    
88.     map_data.values.each{|e| result.push(e) } if !map_data.nil?
    
89.     return result
    
90.   end
    
91. 
    
92.   #刷新地图精灵
    
93.   def self.refresh_map
    
94.     $scene.instance_variable_get(:@spriteset).dispose
    
95.     $scene.instance_variable_set(:@spriteset,Spriteset_Map.new)
    
96.   end
    
97. 
    
98. end  
    
99. 
    
100. class Game_Map
     
101.   alias qqeat_make_event_game_map_setup setup
     
102.   def setup(map_id)
     
103.     qqeat_make_event_game_map_setup(map_id)
     
104.     $game_system.map_data ||= {}
     
105.     Drop_Item.get_map_events(map_id).each{|e| @events[e.id] = Game_Event.new(map_id,e) }
     
106.   end
     
107. end
     
108. 
     
109. class Interpreter
     
110.   def command_end
     
111.     @list = nil
     
112.     if @main and @event_id > 0 and $game_map.events[@event_id] != nil
     
113.       if $game_map.events[@event_id].instance_variable_get(:@event).name[/delete/]
     
114.         Drop_Item.delete_event($game_map.map_id,@event_id)
     
115.       else
     
116.         $game_map.events[@event_id].unlock
     
117.       end
     
118.     end
     
119.   end
     
120. end
     
121. 
     
122. class Scene_Load < Scene_File
     
123.   alias qqeat_make_event_scene_file_read_save_data read_save_data
     
124.   def read_save_data(file)
     
125.     qqeat_make_event_scene_file_read_save_data(file)
     
126.     $game_map.events.keys.each{|id| $game_map.events.delete(id) if id >= 20000 }
     
127.   end
     
128. end
     
129. 
     
130. class Scene_Load2 < Scene_File
     
131.   alias qqeat_make_event_scene_file_read_save_data read_save_data
     
132.   def read_save_data(file)
     
133.     qqeat_make_event_scene_file_read_save_data(file)
     
134.     $game_map.events.keys.each{|id| $game_map.events.delete(id) if id >= 20000 }
     
135.   end
     
136. end
     
137. 
     
138. class Game_System
     
139.   attr_accessor :map_data
     
140.   alias qqeat_make_event_game_system_initialize initialize
     
141.   def initialize
     
142.     qqeat_make_event_game_system_initialize
     
143.     @map_data = {}
     
144.   end
     
145. end

复制代码

想要实现的功能是，首先，在当前场所放置一个物品（使用上面脚本从仓库中生成物品），然后使用类似多啦A梦复制镜子的道具，对放置的道具进行复制，使当前场景的这个物品变成了两个。

原本我设想是从当前场景的这个道具进行重新生成 Drop_Item.make_events(当前地图ID,    刚生成的物品的ID,      item_x,item_y,save=false) 但这个只能生成场景原本有的事件，新生成的物品ID读取是失败的。
所以，求各位大大帮忙，想想如何实现。

张咚咚

58行下面加上这几句试试，话说既然是仓库复制出来的，为什么还要复制 复制出来的 事件呢，直接复制仓库事件不就好= =

1.     if event.nil?
   
2.       event = $game_map.events[event_id] if map_id == warehouse_map_id
   
3.       event = $game_system.map_data[warehouse_map_id][event_id] if event.nil?
   
4.       event = event.instance_variable_get(:@event) unless event.nil?
   
5.     end

复制代码