特种驱魔香（地图中不遇到特定敌人）[修改]

凌冰

看到纯技术提问区有人要我便做了，原本要求是这样的“比如做一个幽灵驱魔香！在这一张地图中就不会碰到幽灵！而其他的怪物还会碰到！”，我不确定是下面哪种情况，便两个都做了，由于没有分开写，对于新人用起来可能比较纠结，orz。那个……就自己琢磨吧！总做伸手党也不好。这个看明白就行了，我也不知道该上传什么效果图。
根据飞虫的三点要求对脚本进行了修改。另外我连此类物品的效果范围都限定死了，就是“无”，无论你在数据库里设置效果范围是我单、敌单、我全、敌全、我单HP0、我全HP0、使用者还是无，都会被我强制改成“无”，所以干脆那里表设定了。而且貌似你设定的消耗还是不消耗，都会消耗。（这~~~~太霸道了点吧！orz）

1. 
   
2. #-------------------------------------------------------------------------------
   
3. #特种驱魔香（地图中不遇到特定敌人）By 凌冰 and Eclair
   
4. #下面设定驱魔时间，在物品的说明里添加EE敌人ID或ETE敌人ID（后面的敌人ID填你要驱魔
   
5. #的敌人的ID），可以缺省，缺省则默认为无驱魔功效。
   
6. #举例1，某物品名称为幽灵驱魔香，说明中包含EE1，也就是驱逐ID为1的敌人，即幽灵
   
7. #则使用幽灵驱魔香后遇到的队伍里不再包含幽灵
   
8. #举例2，某物品名称为幽灵驱魔香香香，说明中包含ETE1，也就是驱逐包含幽灵的队伍
   
9. #则使用幽灵驱魔香香香后不再遇到包含幽灵的队伍
   
10. #-------------------------------------------------------------------------------
    
11. $驱魔时间 = 60
    
12. #-------------------------------------------------------------------------------
    
13. module RPG
    
14.   class Item
    
15.     def enemy_expel
    
16.       return 0 if @description.split(/EE/)[1] == nil
    
17.      return @description.split(/EE/)[1].to_i
    
18.    end
    
19.    def enemy_troop_expel
    
20.      return 0 if @description.split(/ETE/)[1] == nil
    
21.      return @description.split(/ETE/)[1].to_i
    
22.    end
    
23.    def description
    
24.      des = @description.split(/EE/)[0]  if @description.split(/EE/)[1] != nil
    
25.      des = @description.split(/ETE/)[0]  if @description.split(/ETE/)[1] != nil
    
26.      des = "" if des == nil
    
27.      return des
    
28.    end
    
29.    def scope
    
30.      if @description.split(/ETE/)[1] != nil or @description.split(/EE/)[1] != nil
    
31.      return 0
    
32.      end
    
33.      return @scope                            #Eclair
    
34.    end
    
35.   end
    
36. end
    
37. class Scene_Item
    
38.   alias eci_update_item update_item
    
39.   def update_item
    
40.     eci_update_item
    
41.     return if @item == nil
    
42.     if Input.trigger?(Input::C)
    
43.       if @item.enemy_expel > 0
    
44.         $enemy_expel_switch = true
    
45.       $enemy_expel = @item.enemy_expel
    
46.       $game_system.timer = $驱魔时间 * Graphics.frame_rate
    
47.       $game_system.timer_working = true
    
48.         $game_party.lose_item(@item.id, 1)
    
49.       end
    
50.       if @item.enemy_troop_expel > 0
    
51.         $enemy_troop_expel_switch = true
    
52.       $enemy_troop_expel = @item.enemy_troop_expel
    
53.       $game_system.timer = $驱魔时间 * Graphics.frame_rate
    
54.       $game_system.timer_working = true
    
55.         $game_party.lose_item(@item.id, 1)
    
56.       end
    
57.       @item_window.refresh             #Eclair
    
58.     end
    
59.   end
    
60. end
    
61. 
    
62. class Sprite_Timer < Sprite
    
63.   def update
    
64.     super
    
65.     # 设置计时器执行中为可见
    
66.     self.visible = $game_system.timer_working
    
67.     # 如果有必要再次描绘计时器
    
68.     if $game_system.timer / Graphics.frame_rate != @total_sec
    
69.       # 清除窗口内容
    
70.       self.bitmap.clear
    
71.       # 计算总计秒数
    
72.       @total_sec = $game_system.timer / Graphics.frame_rate
    
73.       # 生成计时器显示用字符串
    
74.       if $enemy_expel_switch and @total_sec < 1
    
75.         $game_system.timer_working = false
    
76.         $enemy_expel_switch = false
    
77.       end
    
78.       if $enemy_troop_expel_switch and @total_sec < 1
    
79.         $enemy_troop_expel_switch = false
    
80.         $game_system.timer_working = false
    
81.       end
    
82.       min = @total_sec / 60
    
83.       sec = @total_sec % 60
    
84.       text = sprintf("%02d:%02d", min, sec)
    
85.       # 描绘计时器
    
86.       self.bitmap.font.color.set(255, 255, 255)
    
87.       self.bitmap.draw_text(self.bitmap.rect, text, 1)
    
88.     end
    
89.   end
    
90. end
    
91. class Game_Troop
    
92.   def setup(troop_id)
    
93.     # 由敌人序列的设置来确定队伍的设置
    
94.     @enemies = []
    
95.     troop = $data_troops[troop_id]
    
96.     for i in 0...troop.members.size
    
97.       enemy = $data_enemies[troop.members[i].enemy_id]
    
98.       if enemy != nil
    
99.         unless $enemy_expel_switch and enemy.id == $enemy_expel
    
100.         @enemies.push(Game_Enemy.new(troop_id, i))
     
101.         end
     
102.       end
     
103.       if @enemies.size == 0
     
104.         $zero_troop = troop_id
     
105.       end
     
106.     end
     
107.   end
     
108. end
     
109. class Game_Map
     
110.   def encounter_list
     
111.     troop_list = []
     
112.       for id in @map.encounter_list
     
113.         for i in 0...$data_troops[id].members.size
     
114.           unless $enemy_troop_expel_switch and
     
115.                  $data_troops[id].members[i].enemy_id == $enemy_troop_expel
     
116.                  if id == $zero_troop
     
117.                     troop_list.push(id)
     
118.                 end
     
119.           end
     
120.         end
     
121.       end
     
122.     return troop_list
     
123.   end
     
124. end
     

复制代码

范例工程
http://rpg.blue/upload_program/files/特种驱魔香_83419898.rar

凌冰

以下引用飞虫于2008-2-14 10:43:37的发言：

有三点需要修改的地方

1 设置不遇敌  虽然起到了驱散效果 但仍然会有遇敌事件
2 设置不遇敌  驱魔香会直接产生效果
3 蛇者不遇敌  在物品介绍中 会出现 EE 的字样~

第二点不明白@_@
还有我是凌冰，不是冰凌

凌冰

以下引用飞虫于2008-2-14 10:43:37的发言：

有三点需要修改的地方

1 设置不遇敌  虽然起到了驱散效果 但仍然会有遇敌事件
2 设置不遇敌  驱魔香会直接产生效果
3 设置不遇敌  在物品介绍中 会出现 EE 的字样~

按你这三点要求修改过了，只是没想到会涉及到这么多类

q2571875

不错啊,驱魔的

凌冰

以下引用Eclair于2008-2-14 15:24:33的发言：

不告诉新手……让他们自己去看好像也不太好。
这部分涉及的知识已经比较向高级靠拢了，新手看起来的确会很困难的。

这也是没办法的事情，就算我写的再详细，他的技术层次没达到，也不容易看懂啊
再说了，我也不是从菜鸟开始做起的吗？（虽然现在也不怎么样）

shanely

过来支持个~
先收藏了~{/cy}