即时遇敌无法使用？

纲·炎 · 发表于 2013-1-12 13:15:50

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

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由纲·炎于 2013-1-12 13:18 编辑

我做了事件标题，然后运行游戏时会有

不过我记得以前不会这样。
脚本如下：

RUBY 代码复制

#===============================================================
# ■ 即时遇敌，
#---------------------------------------------------------------
#    碰到什么怪物，周围是什么怪物战斗中就是什么怪物
#===============================================================
=begin
使用说明
 
在地图上放置事件，事件的第一个指令用注释
在里面填写 敌人: ID （注意是半角冒号），决定触碰到此事件时所战斗的敌人
第二行可以填写 视野: 数字 ，决定本事件追逐主角的视野范围（默认为8）
触碰后就会触发战斗，敌人队伍依照主角身边的敌人事件设定生成
如果主角身边有5个敌人事件，则敌人队伍有五个
 
战斗胜利、失败、逃跑后的公共事件，先设定好，把ID填写在脚本当中
（$win_common_event_id 这几行）
 
数据库里面的敌人队伍可以照常使用，没有影响。
作为敌人的事件也可以照常放置其他的指令，执行完后才会执行战斗
 
=end
 
 
$win_common_event_id = 1    # 战胜时的公共事件
$lose_common_event_id = 2   # 战败时的公共事件
$escape_common_event_id = 3 # 逃跑时的公共事件
 
class Game_Character < Game_CharacterBase
  def move_type_toward_player
    # 计算与主角的距离
    sx = (@x - $game_player.x).abs
    sy = (@y - $game_player.y).abs
    # 如果纵横共计离开 20 个元件
    if sx + sy >= approach_range
      # 随机
      move_random
      return
    end
    # 随机 0～5 的分支
    case rand(6)
    when 0..3  # 接近主角
      move_toward_player
    when 4  # 随机
      move_random
    when 5  # 前进一步
      move_forward
    end
  end
  def approach_range
    return 8
  end
end
class Game_Event < Game_Character
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #     map_id : 地图 ID
  #     event  : 事件 (RPG::Event)
  #--------------------------------------------------------------------------
  alias old_initialize initialize
  def initialize(map_id, event)
    old_initialize(map_id, event)
    name = event.name
    @enemy_id = 0
    @approach_range = 8
    setup_as_enemy
  end
  #--------------------------------------------------------------------------
  # ● 返回视野距离
  #--------------------------------------------------------------------------
  def approach_range
    return @approach_range
  end
  #--------------------------------------------------------------------------
  # ● 判断事件是否存在
  #--------------------------------------------------------------------------
  def exist?
    return !@erased
  end
  #--------------------------------------------------------------------------
  # ● 将事件设为敌人
  #--------------------------------------------------------------------------
  def setup_as_enemy
    enemy_comment = @list[0]
    scope_comment = @list[1] if @list[1] && @list[1].code == 408
    return if enemy_comment.code != 108
    # 读取敌人 ID
    if enemy_comment.parameters[0] =~ /(?:敌人):(?:\s|)(\d+)/
      @enemy_id = $1.to_i
    else
      return
    end
    # 读取敌人视野距离
    if scope_comment.parameters[0] =~ /(?:视野):(?:\s|)(\d+)/
      @approach_range = $1.to_i
    end
    command = RPG::EventCommand.new(355, 0, ["$instant_encounter_battle=true"])
    @list.push(command) # 执行脚本
    command = RPG::EventCommand.new(301, 0, [0, 1, true, true])
    @list.push(command) # 战斗处理
    command = RPG::EventCommand.new(601, 0)
    @list.push(command) # 战胜时的场合
    command = RPG::EventCommand.new(117, 1, [$win_common_event_id])
    @list.push(command) # 呼叫公共事件
    command = RPG::EventCommand.new(602, 0)
    @list.push(command) # 逃跑时的场合
    command = RPG::EventCommand.new(117, 1, [$escape_common_event_id])
    @list.push(command) # 呼叫公共事件
    command = RPG::EventCommand.new(603, 0)
    @list.push(command) # 战败时的场合
    command = RPG::EventCommand.new(117, 1, [$lose_common_event_id])
    @list.push(command) # 呼叫公共事件
    command = RPG::EventCommand.new(604, 0)
    @list.push(command) # 战斗处理结束
    command = RPG::EventCommand.new
    @list.push(command)
  end
  #--------------------------------------------------------------------------
  # ● 判断事件是否为敌人
  #--------------------------------------------------------------------------
  def isEnemy?
    return @enemy_id > 0
  end
  attr_reader :enemy_id # 指定的敌人ID
end
class Game_Map
  ENCOUNTER_RANGE = 3 #这个代表遇到敌人的范围大小
  #--------------------------------------------------------------------------
  # ●获取指定范围内的事件
  #     x : X 坐标
  #     y : Y 坐标
  #     l : 范围 
  #--------------------------------------------------------------------------
  def scope_event
    scope_event = []
    x = $game_player.x
    y = $game_player.y
    for event in $game_map.events.values
      next unless event.isEnemy?
      if (event.x - x).abs + (event.y - y).abs <=ENCOUNTER_RANGE and event.exist?
        scope_event.push(event.id)
        break if scope_event.size >= 8
      end
    end
    return scope_event 
  end
end
module BattleManager
  #--------------------------------------------------------------------------
  # ● 处理战斗结束
  #--------------------------------------------------------------------------
  class << self
    alias instant_encounter_setup setup
    def setup(troop_id, can_escape = true, can_lose = false)
      if $instant_encounter_battle
        $data_troops[1].members = []
        scope_event = $game_map.scope_event
        size = scope_event.size
        for i in 1..size
          temp = RPG::Troop::Member.new
          temp.enemy_id = $game_map.events[scope_event[i-1]].enemy_id
          if size > 4
            temp.x = Graphics.width * (i - 0.5) / size
            temp.y = 288 / 2*(i%2+1)
            temp.y += 100*((i+1)%2)
          else
            temp.x = Graphics.width * (i - 0.5) / size
            temp.y = 288
          end
          $data_troops[1].members.push(temp)
          $instant_encounter_battle = false
        end
      end
      instant_encounter_setup(troop_id, can_escape, can_lose)
    end
    alias instant_encounter_battle_end battle_end
    def battle_end(result)
      if result == 0
        # 战斗结束后清除事件(未完成)
        scope_event = $game_map.scope_event
        $game_troop.members.size.times{ |i|
          $game_map.events[scope_event[i]].erase
        }
      end
      instant_encounter_battle_end(result)
    end
  end
end

#===============================================================


# ■ 即时遇敌，


#---------------------------------------------------------------


#    碰到什么怪物，周围是什么怪物战斗中就是什么怪物


#===============================================================


=begin


使用说明


 


在地图上放置事件，事件的第一个指令用注释


在里面填写 敌人: ID （注意是半角冒号），决定触碰到此事件时所战斗的敌人


第二行可以填写 视野: 数字 ，决定本事件追逐主角的视野范围（默认为8）


触碰后就会触发战斗，敌人队伍依照主角身边的敌人事件设定生成


如果主角身边有5个敌人事件，则敌人队伍有五个


 


战斗胜利、失败、逃跑后的公共事件，先设定好，把ID填写在脚本当中


（$win_common_event_id 这几行）


 


数据库里面的敌人队伍可以照常使用，没有影响。


作为敌人的事件也可以照常放置其他的指令，执行完后才会执行战斗


 


=end


 


 


$win_common_event_id = 1    # 战胜时的公共事件


$lose_common_event_id = 2   # 战败时的公共事件


$escape_common_event_id = 3 # 逃跑时的公共事件


 


class Game_Character < Game_CharacterBase


  def move_type_toward_player


    # 计算与主角的距离


    sx = (@x - $game_player.x).abs


    sy = (@y - $game_player.y).abs


    # 如果纵横共计离开 20 个元件


    if sx + sy >= approach_range


      # 随机


      move_random


      return


    end


    # 随机 0～5 的分支


    case rand(6)


    when 0..3  # 接近主角


      move_toward_player


    when 4  # 随机


      move_random


    when 5  # 前进一步


      move_forward


    end


  end


  def approach_range


    return 8


  end


end


class Game_Event < Game_Character


  #--------------------------------------------------------------------------


  # ● 初始化对像


  #     map_id : 地图 ID


  #     event  : 事件 (RPG::Event)


  #--------------------------------------------------------------------------


  alias old_initialize initialize


  def initialize(map_id, event)


    old_initialize(map_id, event)


    name = event.name


    @enemy_id = 0


    @approach_range = 8


    setup_as_enemy


  end


  #--------------------------------------------------------------------------


  # ● 返回视野距离


  #--------------------------------------------------------------------------


  def approach_range


    return @approach_range


  end


  #--------------------------------------------------------------------------


  # ● 判断事件是否存在


  #--------------------------------------------------------------------------


  def exist?


    return !@erased


  end


  #--------------------------------------------------------------------------


  # ● 将事件设为敌人


  #--------------------------------------------------------------------------


  def setup_as_enemy


    enemy_comment = @list[0]


    scope_comment = @list[1] if @list[1] && @list[1].code == 408


    return if enemy_comment.code != 108


    # 读取敌人 ID


    if enemy_comment.parameters[0] =~ /(?:敌人):(?:\s|)(\d+)/


      @enemy_id = $1.to_i


    else


      return


    end


    # 读取敌人视野距离


    if scope_comment.parameters[0] =~ /(?:视野):(?:\s|)(\d+)/


      @approach_range = $1.to_i


    end


    command = RPG::EventCommand.new(355, 0, ["$instant_encounter_battle=true"])


    @list.push(command) # 执行脚本


    command = RPG::EventCommand.new(301, 0, [0, 1, true, true])


    @list.push(command) # 战斗处理


    command = RPG::EventCommand.new(601, 0)


    @list.push(command) # 战胜时的场合


    command = RPG::EventCommand.new(117, 1, [$win_common_event_id])


    @list.push(command) # 呼叫公共事件


    command = RPG::EventCommand.new(602, 0)


    @list.push(command) # 逃跑时的场合


    command = RPG::EventCommand.new(117, 1, [$escape_common_event_id])


    @list.push(command) # 呼叫公共事件


    command = RPG::EventCommand.new(603, 0)


    @list.push(command) # 战败时的场合


    command = RPG::EventCommand.new(117, 1, [$lose_common_event_id])


    @list.push(command) # 呼叫公共事件


    command = RPG::EventCommand.new(604, 0)


    @list.push(command) # 战斗处理结束


    command = RPG::EventCommand.new


    @list.push(command)


  end


  #--------------------------------------------------------------------------


  # ● 判断事件是否为敌人


  #--------------------------------------------------------------------------


  def isEnemy?


    return @enemy_id > 0


  end


  attr_reader :enemy_id # 指定的敌人ID


end


class Game_Map


  ENCOUNTER_RANGE = 3 #这个代表遇到敌人的范围大小


  #--------------------------------------------------------------------------


  # ●获取指定范围内的事件


  #     x : X 坐标


  #     y : Y 坐标


  #     l : 范围 


  #--------------------------------------------------------------------------


  def scope_event


    scope_event = []


    x = $game_player.x


    y = $game_player.y


    for event in $game_map.events.values


      next unless event.isEnemy?


      if (event.x - x).abs + (event.y - y).abs <=ENCOUNTER_RANGE and event.exist?


        scope_event.push(event.id)


        break if scope_event.size >= 8


      end


    end


    return scope_event 


  end


end


module BattleManager


  #--------------------------------------------------------------------------


  # ● 处理战斗结束


  #--------------------------------------------------------------------------


  class << self


    alias instant_encounter_setup setup


    def setup(troop_id, can_escape = true, can_lose = false)


      if $instant_encounter_battle


        $data_troops[1].members = []


        scope_event = $game_map.scope_event


        size = scope_event.size


        for i in 1..size


          temp = RPG::Troop::Member.new


          temp.enemy_id = $game_map.events[scope_event[i-1]].enemy_id


          if size > 4


            temp.x = Graphics.width * (i - 0.5) / size


            temp.y = 288 / 2*(i%2+1)


            temp.y += 100*((i+1)%2)


          else


            temp.x = Graphics.width * (i - 0.5) / size


            temp.y = 288


          end


          $data_troops[1].members.push(temp)


          $instant_encounter_battle = false


        end


      end


      instant_encounter_setup(troop_id, can_escape, can_lose)


    end


    alias instant_encounter_battle_end battle_end


    def battle_end(result)


      if result == 0


        # 战斗结束后清除事件(未完成)


        scope_event = $game_map.scope_event


        $game_troop.members.size.times{ |i|


          $game_map.events[scope_event[i]].erase


        }


      end


      instant_encounter_battle_end(result)


    end


  end


end

如果玩家初始位置不是在事件标题地图上就可以用

亿万星辰 · 发表于 2013-1-12 13:57:44

事件一开始做好注释了么？

纲·炎 · 发表于 2013-1-12 15:13:53

亿万星辰发表于 2013-1-12 13:57
事件一开始做好注释了么？

什么注释？

纲·炎 · 发表于 2013-1-12 15:49:30

有木有人啊

j433463 · 发表于 2013-1-12 18:53:37

您都没有看脚本中的说明吗？一开始要先在事件中第一个指令用注释方式填写敌人ID，这个您究竟有没有做？

纲·炎 · 发表于 2013-1-12 19:16:27

j433463 发表于 2013-1-12 18:53
您都没有看脚本中的说明吗？一开始要先在事件中第一个指令用注释方式填写敌人ID，这个您究竟有没有做？ ...

我还没设置敌人纳........难道要在事件标题上做？

亿万星辰 · 发表于 2013-1-12 19:44:27

纲·炎发表于 2013-1-12 19:16
我还没设置敌人纳........难道要在事件标题上做？

显然你没有仔细的阅读脚本开头的说明，然后就来问问题了……归结于脚本无法使用，殊不知是你自己根本就没有正确的用……你说我该说什么好呀……哎。。。。。

纲·炎 · 发表于 2013-1-12 19:49:11

亿万星辰发表于 2013-1-12 19:44
显然你没有仔细的阅读脚本开头的说明，然后就来问问题了……归结于脚本无法使用，殊不知是你自己根本就没 ...

..................
我很认真的看了
........
但是看不懂啊
{:2_271:}

纲·炎 · 发表于 2013-1-12 19:58:11

本帖最后由纲·炎于 2013-1-12 20:00 编辑

亿万星辰发表于 2013-1-12 19:44
显然你没有仔细的阅读脚本开头的说明，然后就来问问题了……归结于脚本无法使用，殊不知是你自己根本就没 ...

{:2_264:} 到底怎么弄，请详细说一下啊{:2_271:}
我在一个没注释的地图上可以不会那样啊

j433463 · 发表于 2013-1-12 20:02:31

开启事件后，在事件的执行内容上点两下，开启事件指令页，第一页最下面有个加入注解，点它会有一个输入框，输入敌人的ID，看程式码的正则式，应该是

敌人: ３

这样的写法，注解的颜色是绿色，然后第二行应该再加一个注解，填的是视野范围，应该是

视野: 10

这样的写法，如果没有第二行注解，预设视野范围是 8，也就是八格范围内的有几个敌人事件，战斗时就出现有几个敌人在战斗画面中。

至少这个应该看得懂吧？您对脚本似乎一点都不明白，那设公共事件后添加的语法您恐怕也不知道怎么做...

帐号		自动登录	找回密码
密码			注册会员

[已经过期] 即时遇敌无法使用？

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

点评

贵宾