查看: 3060|回复: 5

[已经过期] 提取放置物脚本怎麽在xas系统中实现掉宝功能啊?????

[复制链接]
梦石
0
星屑
996
在线时间
594 小时
注册时间
2012-6-3
回帖
343
发表于 2012-12-22 22:08:47 | 显示全部楼层 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有账号?注册会员

×
本人使用提取放置物脚本与xas想要实现掉宝功能,但是不知如何设置请教一下。如果有人会的话请发个范例啊,只要显示一下修改地方即可,好吧我又变成伸手党了。脚本如下[pre lang="ruby" line="1"]#==============================================================================
# ☆★☆ 提取放置物脚本(强化) ☆★☆  
#------------------------------------------------------------------------------
# - 美兽
# - 2007.4.12
#------------------------------------------------------------------------------
#  爱护环境,人人有责,现实中切勿乱丢垃圾。
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
#  脚本原理:
#  是从仓库地图中提取事件,将其拷贝放入指定的位置,
#  依此达成随时随地生成新事件的功能,如此可节省大量用RGSS编写事件所消耗的体力,很多地方写的
#  很保守,尽量减少冲突几率。。
#  此为强化版,可实现新事件的保存,但代价是冲突的随之增大,若只想单纯实现ARPG
#  一类的物品掉落,场所移动后便清除,请使用简洁版。
#------------------------------------------------------------------------------
=begin
                                Note:
  
一:生成物品主方法:
    Drop_Item.make_events(map_id,event_id,item_x,item_y,save=false)
    map_id : 仓库地图的ID。
    event_id : 仓库中对应事件的ID。
    item_x、item_y :新事件的X与Y坐标
    save : 是否存储标志;
           默认为false,即不存储,场所移动等转换场景后事件会消失;
           true 为存储,取档、关机、登火星,返回后事件仍存在。
           
二:删除事件方法:
    事件名若包含"delete"字段,则执行完毕会立即自我清除;
    注:任何事件皆如此。

三:必掌握语句:
    $game_map.events[@event_id]
    $game_player
    事件的脚本使用,表示“本事件”和“角色”,主要为取得事件的坐标,
    取得“本事件”X与Y坐标:$game_map.events[@event_id].event.x
                            $game_map.events[@event_id].event.y
    取得“角色”X与Y坐标:$game_player.x
                          $game_player.y                           
    例如,在某事件左侧生成2号地图的2号事件并永久存储,写法如下。
    x = $game_map.events[@event_id].event.x
    y = $game_map.events[@event_id].event.y
    Drop_Item.make_events(2,2,x-1,y,true)

四:备注:
    此脚本用法十分灵活,种植、建设、舍弃、掉宝等功能都可用以达成。   

=end
#==============================================================================


module Drop_Item
  
  def self.make_events(map_id,event_id,item_x,item_y,save=false,num=0)
      return unless self.is_map?        
      map = self.map_data_load(map_id)      
      temp = Marshal.load(Marshal.dump(map))      
      if !$game_system.map_events_number
         $game_system.map_events_number = {}
      end  
      sum = $game_system.map_events_number      
      m_id = $game_map.map_id      
      sum[m_id] == nil ? sum[m_id] = 2000 : sum[m_id] += 1
      new_event_id = sum[m_id]      
      temp.events[event_id].id = new_event_id      
      temp.events[event_id].x,temp.events[event_id].y = item_x,item_y
      temp.events[event_id].name = num.to_s
      $game_map.events[new_event_id] = Game_Event.new(m_id,temp.events[event_id])
      if save
         now_map = self.map_data_load(m_id)
         now_map.events[new_event_id] = temp.events[event_id]
         self.map_data_save(m_id,now_map)
      end  
      refresh_map   
  end
   
  def self.map_data_init   
      for i in 1..999
         begin
           map = load_data(sprintf("Data/Map%03d.rxdata", i))
         rescue Errno::ENOENT
           next
         end
         $game_system.map_data = Marshal.load(Marshal.dump(map))         
      end
  end  
  
  def self.map_data_save(map_id,event)
      $game_system.map_data[$game_map.map_id] = event           
  end   

  def self.map_data_load(map_id)
      if !$game_system.map_data
         $game_system.map_data = {}
         self.map_data_init
      end
      return $game_system.map_data[map_id]      
  end  
   
  def self.delete_events(event_id)
      return unless self.is_map?     
      $game_map.events.delete(event_id)
      self.refresh_map
  end
   
  def self.refresh_map
      return unless self.is_map?
      $scene.spriteset.dispose
      $scene.spriteset = Spriteset_Map.new   
  end
   
  def self.is_map?
      (return true) if $scene.is_a?(Scene_Map)
      return false
  end

end  



class Game_System
  
  attr_accessor :map_events_number            
  attr_accessor :map_data            
   
end  

class Scene_Map
  
  attr_accessor :spriteset            
  
end  
[/pre]
小白狐一只~
梦石
0
星屑
145
在线时间
190 小时
注册时间
2014-1-18
回帖
232
发表于 2016-5-1 17:44:45 | 显示全部楼层
不用加这个脚本的= =
XAS自带掉落系统。。。
在物品名称后加" (Item Field)",有个空格的

点评

也感谢你的回答,我很久不弄了,这个日期是2012年的,都已经4年了。不过感谢你的帮助  发表于 2016-6-20 03:08
回复

使用道具 举报

梦石
0
星屑
132
在线时间
20 小时
注册时间
2023-8-5
回帖
9
发表于 2023-9-11 11:04:13 | 显示全部楼层

看不懂怎麼用!
回复

使用道具 举报

梦石
0
星屑
4832
在线时间
287 小时
注册时间
2013-10-13
回帖
586
发表于 2023-9-20 21:16:33 | 显示全部楼层
xas是什么意思?

点评

我的天,2012年的帖子了,╮(╯▽╰)╭  发表于 2023-10-9 22:54
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

Powered by Discuz! X5.0 © 2001-2026 Discuz! Team.

在本版发帖返回顶部