设置一个调查脚本并在菜单栏加入调查选项

千夙

@taroxd 求帮写一个调查脚本，是很简单的那种，就象一个开关，，，在平常时按调查会显示(选项调查，不调查），然后在开关开启时可以调查事件，平常时显示（什么也没有）然后@VIPArcher 帮写一个对应调查脚本的在菜单添加调查二字选项

蓝儿

表示事件解决无误。

三途亚梦

用技能关联一个开关的公共事件如何？

kuerlulu

让@taroxd 把303_story.html【可能是302反正是菜单中添加选项的那页【给你看看

克莉丝

发现一个可疑物件，调出菜单-调查
这种规则我记得是上世纪的游戏了（你不觉得操作繁琐嘛

为什么不是直接对着事件按下回车来那

VIPArcher

瞎写一个来骗糖
使用方法插在Main以上▼ 插件脚本 以下
在可调查的事件名称里写上<地图 ID>其中ID为该事件存在的地图ID
优先检查人物前方是否有可调查事件不存在则调查脚下。
调查到事件则打开该事件的独立开关A。剩下的事件内容自己设置
有BUG不保修

1. class Game_Event < Game_Character
   
2. 
   
3.   attr_reader   :name
   
4.   alias vip_20140829_initialize initialize
   
5.   #--------------------------------------------------------------------------
   
6.   # ● 初始化对象
   
7.   #     event : RPG::Event
   
8.   #--------------------------------------------------------------------------
   
9.   def initialize(map_id, event)
   
10.     vip_20140829_initialize(map_id, event)
    
11.     @name = @event.name
    
12.   end
    
13. end
    
14. 
    
15. class Scene_Menu < Scene_MenuBase
    
16.   alias vip_20140829_create create_command_window
    
17.   def create_command_window
    
18.     vip_20140829_create
    
19.     @command_window.set_handler(:survey,    method(:command_survey))
    
20.   end
    
21.   def command_survey
    
22.     SceneManager.goto(Scene_Map)
    
23.     vip
    
24.   end
    
25.   def vip
    
26.     case $game_player.direction
    
27.     when 2
    
28.       y = $game_player.y + 1
    
29.       x = $game_player.x
    
30.     when 4
    
31.       y = $game_player.y
    
32.       x = $game_player.x - 1
    
33.     when 6
    
34.       y = $game_player.y
    
35.       x = $game_player.x + 1
    
36.     when 8
    
37.       y = $game_player.y - 1
    
38.       x = $game_player.x
    
39.     end
    
40.     param = $game_map.event_id_xy(x, y)
    
41.     param = $game_map.event_id_xy($game_player.x,$game_player.y) if param == 0
    
42.     if param != 0
    
43.       $game_map.events[param].name =~ /<地图\s*(\d+)>/
    
44.       $game_self_switches[[$1.to_i,param,"A"]] = true if $1.to_i != nil
    
45.     else
    
46.       $game_message.texts.push("什么都没发现")
    
47.     end
    
48.   end
    
49. end
    
50. 
    
51. 
    
52. class Window_MenuCommand < Window_Command
    
53.   alias vip_20140829_add add_main_commands
    
54.   def add_main_commands
    
55.     vip_20140829_add
    
56.     add_command("调查", :survey,   main_commands_enabled)#添加按钮
    
57.   end
    
58. end

复制代码