遇敌变奏曲（随机+自定+破限+区域）

美兽

一：怪物单体随机出现。

1. 例如队伍中3个怪物，每个都随机出现，但至少一个。
   
2. 修改Game_Troop类的setup方法：
   
3. def setup(troop_id)
   
4.    @enemies = []
   
5.    troop = $data_troops[troop_id]
   
6.    #存储必定出现的怪物序号（为保证至少一个）
   
7.    kind = rand(troop.members.size)   
   
8.    for i in 0...troop.members.size
   
9.      enemy = $data_enemies[troop.members[i].enemy_id]
   
10.      #若不是必定出现的怪物，并且rand(2) == 0（50%）则跳过循环，该怪不出现
    
11.      if (i != kind) and (rand(2) == 0)
    
12.         next
    
13.      end   
    
14.      if enemy != nil
    
15.        @enemies.push(Game_Enemy.new(troop_id, i))
    
16.      end
    
17.    end
    
18.   end

复制代码

二：怪物种族群组随机出现。

1. 相同怪物作为一组，相对每组，每个怪物随机，但至少出现一次。
   
2. 例如出现2只A和2只B，可能2只A和2只B一起出现，或者出现1只A和2只B，或者2只A和1只B，或者1只A和1只B。
   
3. 依然修改Game_Troop类的setup方法：
   
4. def setup(troop_id)
   
5.    # 由敌人序列的设置来确定队伍的设置
   
6.    @enemies = []
   
7.    troop = $data_troops[troop_id]
   
8.    #存储已出现过的ID（为保证每组至少一个）
   
9.    kinds = []
   
10.    for i in 0...troop.members.size
    
11.      enemy = $data_enemies[troop.members[i].enemy_id]
    
12.      #代入成员的怪物ID
    
13.      id = troop.members[i].enemy_id
    
14.      #若该怪物已出现过并且rand(2) == 0（50%）则跳过循环，该怪不出现
    
15.      #若该怪物未出现过，则代入存储ID的数组用于下次判断
    
16.      kinds.include?(id) ? (next if rand(2) == 0) : (kinds.push id)   
    
17.      if enemy != nil
    
18.        @enemies.push(Game_Enemy.new(troop_id, i))
    
19.      end
    
20.    end
    
21.   end

复制代码

三：一+二

1. 为了不与默认方式冲突，并且使用灵活，将一、二两种随机方式与默认整合，利用变量区分，具体如下：
   
2.   def setup(troop_id)
   
3.     # 设置敌人的序列来确定队伍情况
   
4.     @enemies = []
   
5.     troop = $data_troops[troop_id]
   
6.     kinds = []
   
7.     kind = rand(troop.members.size)
   
8.     for i in 0...troop.members.size
   
9.       enemy = $data_enemies[troop.members[i].enemy_id]
   
10.       case $game_variables[10]
    
11.       when 1   # 单体随机
    
12.          if (i != kind) and (rand(2) == 0)
    
13.             next
    
14.          end
    
15.       when 2   # 组合随机
    
16.          id = troop.members[i].enemy_id
    
17.          kinds.include?(id) ? (next if rand(2) == 0) : (kinds.push id)           
    
18.       end  
    
19.       if enemy != nil
    
20.         @enemies.push(Game_Enemy.new(troop_id, i))
    
21.       end
    
22.     end
    
23.   end
    

复制代码

四：自定义遇敌

1. 专门建立个方法设置敌人组合，如下：
   
2. 
   
3. module District_Enemy
   
4.   
   
5.    def self.setup(id,members)
   
6.        #新建队伍，
   
7.        $data_troops[id] = RPG::Troop.new
   
8.        #设定队伍基本属性
   
9.        $data_troops[id].id = id     
   
10.        $data_troops[id].name = 'orz'
    
11.        #为新队伍添加成员
    
12.        for i in members
    
13.           enemy = RPG::Troop::Member.new
    
14.           enemy.enemy_id = i[0]
    
15.           enemy.x = i[1]
    
16.           enemy.y = i[2]
    
17.           $data_troops[id].members.push enemy         
    
18.        end
    
19.        #触发战斗
    
20.        $game_temp.battle_calling = true
    
21.        $game_temp.battle_troop_id = id
    
22.        $game_temp.battle_can_escape = true
    
23.        $game_temp.battle_can_lose = false
    
24.        return
    
25.    end
    
26.    
    
27. end  
    
28. 
    
29. 如此可依靠事件的“脚本”中输入
    
30. District_Enemy.setup(队伍ID,[[A敌人ID，A敌人x，A敌人y],[B敌人ID，B敌人x，B敌人y],…………])
    
31. 的方法设置敌人组合，也可事先将敌人组合在RGSS书写完成，通过全局数组插入，其中队伍ID尽量设定数据库不存在的ID，例如1000，2000之类。
    
32. 这个方法最大的意义是可以突破数据库最大成员8的限制，效果如图，具体见范例。
    

复制代码

破限之百鬼夜行

五：区域遇敌

使用脚本可大为提升效率。

1. 基础设定：
   
2. 其中DISTRICT常量为对应地图的遇敌区域与种类，设定规则为：
   
3. 地图ID => [[区域A左上X,区域A左上Y,区域A右下X,区域A右下Y,[敌人队伍A的ID，…]],[区域B左上X,区域B左上Y,区域B右下X,区域B右下Y,[敌人队伍A的ID，…]]……]
   
4. 例如想一号地图的0,0到5,5的位置遇到1,2号敌人队伍，4,4到10,10的位置遇到3,4号敌人队伍，
   
5. 则在DISTRICT{}里添加
   
6.    1 => [[0,0,5,5,[1,2]],[4,4,10,10,[3,4]]]
   
7. 注意，要保证添加的区域可构成矩形，例如-10,20i之类的就不要尝试了——
   
8. 
   
9. module District_Enemy
   
10.   
    
11.    #允许区域遇敌开关ID
    
12.    ALLOW_ID = 10
    
13. 
    
14.    #区域遇敌开启时，区域外部分是否遵循默认遇敌ID
    
15.    SYSTEM_ID = 11  
    
16.    
    
17.    #设置对应地图的遇敌区域与种类
    
18.    DISTRICT = {
    
19.    1 => [[0,0,5,5,[1,2]],[4,4,10,10,[3,4]]],
    
20.    2 => [[2,7,9,9,[6]],[4,4,10,10,[8]]]
    
21.    }
    
22.   
    
23.    def self.catch(id,x,y)
    
24.        data = DISTRICT[id]
    
25.        return nil if data.nil?
    
26.        temp = Array.new
    
27.        for i in data
    
28.           if x.between?(i[0], i[2]) and y.between?(i[1], i[3])
    
29.              temp.concat(i[4])
    
30.           end
    
31.        end
    
32.        return false if temp.empty?
    
33.        return temp
    
34.    end  
    
35.    
    
36. end  
    
37. 
    
38. 基础设定完毕后，将其插入遇敌部分：
    
39. 见Scene_Map类的
    
40.         # 确定队伍
    
41.         n = rand($game_map.encounter_list.size)
    
42.         troop_id = $game_map.encounter_list[n]
    
43. 将其改写为
    
44.         # 确定队伍
    
45.         # 获得当前地图区域遇敌的相关资料
    
46.         sum = District_Enemy.catch($game_map.map_id,$game_player.x,$game_player.y)
    
47.         # 若当前地图未设置过区域，或者区域遇敌未打开，则执行默认的遇敌方式
    
48.         if sum == nil or !$game_switches[District_Enemy::ALLOW_ID]  
    
49.            n = rand($game_map.encounter_list.size)
    
50.            troop_id = $game_map.encounter_list[n]           
    
51.         else
    
52.            # 反之若角色不在区域内   
    
53.            if sum == false
    
54.               # 区域外遇敌开关开启，则执行默认遇敌方式
    
55.               if $game_switches[District_Enemy::SYSTEM_ID]
    
56.                  n = rand($game_map.encounter_list.size)
    
57.                  troop_id = $game_map.encounter_list[n]
    
58.               else
    
59.                  # 反之，不遇敌  
    
60.                  troop_id = -100
    
61.               end           
    
62.            else
    
63.               # 若在区域内，遭遇对应区域设置的敌人队伍
    
64.               n = rand(sum.size)        
    
65.               troop_id = sum[n]
    
66.            end
    
67.         end

复制代码

区域遇敌

范例下载，注意查毒
ftp://[email protected]/个� ... 遇敌变奏曲.rar

　　　　　　　　　　　　　　[本贴由 叶舞枫 于 2007-6-20 9:41:31 进行了编辑]

叶舞枫

http://rpg.blue/web/htm/news755.htm
VIP 3

精灵使者

太有用了。绝版收藏。

美兽

一：怪物单体随机出现。

1. 例如队伍中3个怪物，每个都随机出现，但至少一个。
   
2. 修改Game_Troop类的setup方法：
   
3. def setup(troop_id)
   
4.    @enemies = []
   
5.    troop = $data_troops[troop_id]
   
6.    #存储必定出现的怪物序号（为保证至少一个）
   
7.    kind = rand(troop.members.size)   
   
8.    for i in 0...troop.members.size
   
9.      enemy = $data_enemies[troop.members[i].enemy_id]
   
10.      #若不是必定出现的怪物，并且rand(2) == 0（50%）则跳过循环，该怪不出现
    
11.      if (i != kind) and (rand(2) == 0)
    
12.         next
    
13.      end   
    
14.      if enemy != nil
    
15.        @enemies.push(Game_Enemy.new(troop_id, i))
    
16.      end
    
17.    end
    
18.   end

复制代码

二：怪物种族群组随机出现。

1. 相同怪物作为一组，相对每组，每个怪物随机，但至少出现一次。
   
2. 例如出现2只A和2只B，可能2只A和2只B一起出现，或者出现1只A和2只B，或者2只A和1只B，或者1只A和1只B。
   
3. 依然修改Game_Troop类的setup方法：
   
4. def setup(troop_id)
   
5.    # 由敌人序列的设置来确定队伍的设置
   
6.    @enemies = []
   
7.    troop = $data_troops[troop_id]
   
8.    #存储已出现过的ID（为保证每组至少一个）
   
9.    kinds = []
   
10.    for i in 0...troop.members.size
    
11.      enemy = $data_enemies[troop.members[i].enemy_id]
    
12.      #代入成员的怪物ID
    
13.      id = troop.members[i].enemy_id
    
14.      #若该怪物已出现过并且rand(2) == 0（50%）则跳过循环，该怪不出现
    
15.      #若该怪物未出现过，则代入存储ID的数组用于下次判断
    
16.      kinds.include?(id) ? (next if rand(2) == 0) : (kinds.push id)   
    
17.      if enemy != nil
    
18.        @enemies.push(Game_Enemy.new(troop_id, i))
    
19.      end
    
20.    end
    
21.   end

复制代码

三：一+二

1. 为了不与默认方式冲突，并且使用灵活，将一、二两种随机方式与默认整合，利用变量区分，具体如下：
   
2.   def setup(troop_id)
   
3.     # 设置敌人的序列来确定队伍情况
   
4.     @enemies = []
   
5.     troop = $data_troops[troop_id]
   
6.     kinds = []
   
7.     kind = rand(troop.members.size)
   
8.     for i in 0...troop.members.size
   
9.       enemy = $data_enemies[troop.members[i].enemy_id]
   
10.       case $game_variables[10]
    
11.       when 1   # 单体随机
    
12.          if (i != kind) and (rand(2) == 0)
    
13.             next
    
14.          end
    
15.       when 2   # 组合随机
    
16.          id = troop.members[i].enemy_id
    
17.          kinds.include?(id) ? (next if rand(2) == 0) : (kinds.push id)           
    
18.       end  
    
19.       if enemy != nil
    
20.         @enemies.push(Game_Enemy.new(troop_id, i))
    
21.       end
    
22.     end
    
23.   end
    

复制代码

四：自定义遇敌

1. 专门建立个方法设置敌人组合，如下：
   
2. 
   
3. module District_Enemy
   
4.   
   
5.    def self.setup(id,members)
   
6.        #新建队伍，
   
7.        $data_troops[id] = RPG::Troop.new
   
8.        #设定队伍基本属性
   
9.        $data_troops[id].id = id     
   
10.        $data_troops[id].name = 'orz'
    
11.        #为新队伍添加成员
    
12.        for i in members
    
13.           enemy = RPG::Troop::Member.new
    
14.           enemy.enemy_id = i[0]
    
15.           enemy.x = i[1]
    
16.           enemy.y = i[2]
    
17.           $data_troops[id].members.push enemy         
    
18.        end
    
19.        #触发战斗
    
20.        $game_temp.battle_calling = true
    
21.        $game_temp.battle_troop_id = id
    
22.        $game_temp.battle_can_escape = true
    
23.        $game_temp.battle_can_lose = false
    
24.        return
    
25.    end
    
26.    
    
27. end  
    
28. 
    
29. 如此可依靠事件的“脚本”中输入
    
30. District_Enemy.setup(队伍ID,[[A敌人ID，A敌人x，A敌人y],[B敌人ID，B敌人x，B敌人y],…………])
    
31. 的方法设置敌人组合，也可事先将敌人组合在RGSS书写完成，通过全局数组插入，其中队伍ID尽量设定数据库不存在的ID，例如1000，2000之类。
    
32. 这个方法最大的意义是可以突破数据库最大成员8的限制，效果如图，具体见范例。
    

复制代码

破限之百鬼夜行

五：区域遇敌

使用脚本可大为提升效率。

1. 基础设定：
   
2. 其中DISTRICT常量为对应地图的遇敌区域与种类，设定规则为：
   
3. 地图ID => [[区域A左上X,区域A左上Y,区域A右下X,区域A右下Y,[敌人队伍A的ID，…]],[区域B左上X,区域B左上Y,区域B右下X,区域B右下Y,[敌人队伍A的ID，…]]……]
   
4. 例如想一号地图的0,0到5,5的位置遇到1,2号敌人队伍，4,4到10,10的位置遇到3,4号敌人队伍，
   
5. 则在DISTRICT{}里添加
   
6.    1 => [[0,0,5,5,[1,2]],[4,4,10,10,[3,4]]]
   
7. 注意，要保证添加的区域可构成矩形，例如-10,20i之类的就不要尝试了——
   
8. 
   
9. module District_Enemy
   
10.   
    
11.    #允许区域遇敌开关ID
    
12.    ALLOW_ID = 10
    
13. 
    
14.    #区域遇敌开启时，区域外部分是否遵循默认遇敌ID
    
15.    SYSTEM_ID = 11  
    
16.    
    
17.    #设置对应地图的遇敌区域与种类
    
18.    DISTRICT = {
    
19.    1 => [[0,0,5,5,[1,2]],[4,4,10,10,[3,4]]],
    
20.    2 => [[2,7,9,9,[6]],[4,4,10,10,[8]]]
    
21.    }
    
22.   
    
23.    def self.catch(id,x,y)
    
24.        data = DISTRICT[id]
    
25.        return nil if data.nil?
    
26.        temp = Array.new
    
27.        for i in data
    
28.           if x.between?(i[0], i[2]) and y.between?(i[1], i[3])
    
29.              temp.concat(i[4])
    
30.           end
    
31.        end
    
32.        return false if temp.empty?
    
33.        return temp
    
34.    end  
    
35.    
    
36. end  
    
37. 
    
38. 基础设定完毕后，将其插入遇敌部分：
    
39. 见Scene_Map类的
    
40.         # 确定队伍
    
41.         n = rand($game_map.encounter_list.size)
    
42.         troop_id = $game_map.encounter_list[n]
    
43. 将其改写为
    
44.         # 确定队伍
    
45.         # 获得当前地图区域遇敌的相关资料
    
46.         sum = District_Enemy.catch($game_map.map_id,$game_player.x,$game_player.y)
    
47.         # 若当前地图未设置过区域，或者区域遇敌未打开，则执行默认的遇敌方式
    
48.         if sum == nil or !$game_switches[District_Enemy::ALLOW_ID]  
    
49.            n = rand($game_map.encounter_list.size)
    
50.            troop_id = $game_map.encounter_list[n]           
    
51.         else
    
52.            # 反之若角色不在区域内   
    
53.            if sum == false
    
54.               # 区域外遇敌开关开启，则执行默认遇敌方式
    
55.               if $game_switches[District_Enemy::SYSTEM_ID]
    
56.                  n = rand($game_map.encounter_list.size)
    
57.                  troop_id = $game_map.encounter_list[n]
    
58.               else
    
59.                  # 反之，不遇敌  
    
60.                  troop_id = -100
    
61.               end           
    
62.            else
    
63.               # 若在区域内，遭遇对应区域设置的敌人队伍
    
64.               n = rand(sum.size)        
    
65.               troop_id = sum[n]
    
66.            end
    
67.         end

复制代码

区域遇敌

范例下载，注意查毒
ftp://[email protected]/个� ... 遇敌变奏曲.rar

　　　　　　　　　　　　　　[本贴由 叶舞枫 于 2007-6-20 9:41:31 进行了编辑]