时间显示脚本求助

黑舞嗜

这个是图书馆里找到的显示时间的脚本，我想要通过开关控制显示和不显示（注意是显示和不显示而不是计不计时！）也就是脚本上面Map = :none这个地方，目前只能初始设置好显示不显示而无法在游戏中更改

1. #==============================================================================
   
2. # ** 虚拟日历
   
3. #  作者：影月千秋
   
4. #  适用：VA
   
5. #  要求：Smomo脚本核心 1.0+
   
6. #------------------------------------------------------------------------------
   
7. # * 简介：
   
8. #  模拟时间流逝，并在地图（菜单）进行显示
   
9. #  可以自定义计时规则和显示效果
   
10. #  请为本脚本准备变量和开关，在下方进行设定
    
11. #  本脚本需要Smomo脚本核心，请到此下载：http://tinyurl.com/l9kvg2p
    
12. #  如果链接失效，请到rpg.blue，[url=home.php?mod=space&uid=426609]@余烬之中[/url] 或 @影月千秋
    
13. #------------------------------------------------------------------------------
    
14. # * 使用方法：
    
15. #  将此脚本插入到其他脚本以下，Main以上，在下面给出的设定区进行设定后即可
    
16. #  在事件中操作指定的变量和开关，便可以获取和改变时间
    
17. #  也可以通过事件脚本进行操作
    
18. #  允许的脚本呼叫：
    
19. #    Smomo.calendar(type) 取得日历的内部数据
    
20. #   参数说明：type 想要获得的数据名
    
21. #       【:all】 获取所有数据的数组 依次为：时段 色调 刷新标志 周期历时 周期序号
    
22. #       【:zone】获取当前时段的名称（如："早晨"）
    
23. #       【:tone】不常用，获取当前色调（Tone色调类的实例）
    
24. #       【:need_change】没有任何实用意义，不常用，可以获取需要刷新的标志
    
25. #       【:period】当前周期经过的时间（如：1366）
    
26. #       【:prd】当前周期的序号，对应在周期名字（如:3）
    
27. #   例：【Smomo.calendar(:zone)】获取时段名
    
28. #------------------------------------------------------------------------------
    
29. # * 版本：
    
30. #   V 3.0 2014.07.31 修正了2.7以为成功实际上未修正成功的问题 并做了一些其他调整
    
31. #   V 2.9 2014.07.28 修正了Map不能为:none从2.3版延续过来的傻逼错误
    
32. #   V 2.8 2014.07.26 对2.7的小修正 并修改了自定义提示语
    
33. #   V 2.7 2014.07.24 修正了事件推进时不刷新周期的问题
    
34. #   V 2.6 2014.05.24 修正了日期出现0的BUG
    
35. #   V 2.5 2014.04.06 规范化脚本 消除冗余 重建逻辑结构 需要依赖Smomo脚本核心
    
36. #   V 2.4 2014.01.31 修正读档时报错的BUG
    
37. #   V 2.3 2014.01.29 可以自定义地图窗体的位置
    
38. #   V 2.2 2013.12.27 修正Window_MoVMe的错误
    
39. #   V 2.1 2013.12.15 修正过卡的BUG
    
40. #   V 2.0 2013.10.04 基本重写
    
41. #   V 1.0 2013.08.31 公开
    
42. #------------------------------------------------------------------------------
    
43. # * 声明：
    
44. #   本脚本由来自【影月千秋】，使用和转载请保留此信息
    
45. #==============================================================================
    
46. 
    
47. if $smomo["Core"].nil? || $smomo["Core"] < 1.0
    
48.   msgbox "请先安装Smomo脚本核心！"; %x!start http://tinyurl.com/l9kvg2p!
    
49. elsif $smomo["Calendar"].nil?
    
50. $smomo["Calendar"] = true
    
51. 
    
52. #==============================================================================
    
53. # ** Smomo::Calendar
    
54. #==============================================================================
    
55. module Smomo::Calendar
    
56.   Menu = false
    
57.   # 是否在菜单内显示日历
    
58.    # true 使用  false 不使用
    
59.    # 如果预设不能满足要求 请自行在下方自定义区更改
    
60.   
    
61.   Map = :none
    
62.   # 是否在地图上显示日历
    
63.    # :top 顶部  :bottom 底部  :none 不使用
    
64.    # 如果预设不能满足要求 请自行在下方自定义区更改
    
65.   
    
66.   Use = 13
    
67.   # 设定占用开关，只有当此开关打开时，才会计时
    
68.    # ！打开开关前 请确保下方Speed对应的变量不为0！
    
69.   
    
70.   Var = 81
    
71.   # 设定占用变量的起始编号 会占用以这个号码为开端的连续几个号码对应的游戏变量
    
72.   
    
73.   # 继续设置需要了解的事实：
    
74.   #  脚本内部用一个数字累加计时 然后依次推进到下一单位 把最开始的数字叫计时变量
    
75.   
    
76.   Speed = 100
    
77.   # 设定游戏时间进行速度占用变量，代表经过多少帧后游戏内部计时变量增加一
    
78.    # 一般情况下 1秒60帧
    
79.    # 再打开Use对应的开关前 请确保这个常量不为0
    
80.    # 请确保这个常量不与上面Var的常量（及其包括的范围内的变量）重合
    
81. 
    
82.   System = [
    
83.     # ["单位", 满多少进一（比最大值大一）, 是否以零起始（true/false）],
    
84.     ["分", 60, true],
    
85.     ["时", 24, true],
    
86.     ["日", 9999],
    
87.     ["月", 12],
    
88.     ["年", 9999],
    
89.   ]
    
90.   # 设定计时制，最后一个数据的单位与计时变量的单位统一
    
91.    # 可以突破公元历法的限制
    
92.     # 比如：636号时间线3145纪6887年6月4日 21:39:44:03
    
93.    # ！这里有几项 上面的Var就会占用几个变量！
    
94.    # ！从上往下！ 单位由小到大 如：分-->时-->日-->月-->年
    
95.    # 有的单位允许以0为值 比如 3:00 有的不行 比如 3月1日
    
96.     # 默认不允许0值 如果需要允许 请将“以零起始”填为【true】
    
97.   
    
98.   Start = [00, 7, 1, 1, 0001]
    
99.   # 设置游戏起始时间 与上面的单位从上到下依次对应
    
100.   
     
101.   PeriodName = ["周日", "周一", "周二", "周三", "周四", "周五", "周六"]
     
102.   # 日期的别名 每经过一个周期都会自动推进并显示下一个名字
     
103.    # 别名列表长度不固定 可以自行添加或缩短
     
104.    
     
105.   Start_PeriodName = 6
     
106.   # 确定游戏起始时的那个周期的别名是什么 0为第一个别名
     
107.    # 一定要用数字来指代 不要用"字符串"
     
108.   
     
109.   TimeZone = true
     
110.   # 是否启用时段功能， 即一个周期内是否有各时段的区分（如：凌晨-中午-黄昏-黑夜）
     
111.   
     
112.   Zone = [
     
113.   # [时段长度, Tone.new(红, 绿, 蓝, 灰), "名称"],
     
114.     [120, Tone.new( -75,-100,   0,  75), "夜晚"], # 0...120
     
115.     [120, Tone.new(-125,-125, -10, 125), "深夜"], # 120...240
     
116.     [120, Tone.new( -75,-100,   0,  75), "黎明"], # 240...360
     
117.     [300, Tone.new(   0,   0,   0,   0), "上午"], # 360...660
     
118.     [240, Tone.new(  50,  50,  10, -30), "中午"], # 660...900
     
119.     [180, Tone.new(   0,   0,   0,   0), "下午"], # 900...1080
     
120.     [180, Tone.new(  34, -34, -68, 170), "黄昏"], # 1080...1260
     
121.     [180, Tone.new( -75,-100,   0,  75), "夜晚"], # 1260...1440 则1440为周期长度
     
122.   ]
     
123.   # 设置时段周期内各时段的长度、色调及名称
     
124.    # 时段长度以计时变量的单位为单位
     
125.   # 到达对应时段时 会自动改变画面的色调
     
126.    # 【所有时段的长度加起来就是周期长度！】
     
127.    # 【所以，就算不需要使用时段功能，也一定要保证时段长度之和是一个合适的值！】
     
128.   # 当一次时段轮回完毕 就会推移到下一个周期（如：周三-->周四）
     
129.   
     
130.   IndoorMap = [0]
     
131.   # 室内地图的ID
     
132.    # 处于室内地图时，不会受到时段色调的影响
     
133.   
     
134.   Format = {
     
135.     # 菜单用的格式
     
136.     menu: %W!
     
137.             <4年>.<2月>.<2日>
     
138.             \\I[234]___<Period>
     
139.             <2时>:<2分>_<Zone>
     
140.           !,
     
141.     # 地图用的格式
     
142.     map:  %W!
     
143.             \\I[234]<2日>日___<2时>:<2分>
     
144.           !
     
145.   }
     
146.   # 输出格式 此处写多少行 游戏内就会依次对应输出多少行
     
147.    # 每一行的内部不要使用空格（ ），空格用下划线（_）代替
     
148.    # 尽量不要使用英文感叹号(!)，如果一定要用请在之前加上反斜杠（\!）
     
149.    # 使用【<符号>】的形式来代替指定的数据 其他的文字用于修饰
     
150.    # 可用的符号
     
151.     # 在上面计时制中设定的单位 可以加上一个数字来代表格式化位数
     
152.      # 如：<2时>:<2分> 显示 09:33 <时>:<分> 显示 9:33
     
153.     # <Period> 当前周期的名字（如：星期三）
     
154.     # <Zone>   当前时段的名字（如：早晨）
     
155.    # 两个符号必须用两对<>分别括起来 不能写在同一对<>内
     
156.     # 允许使用转义字符 但是必须有两个反斜杠
     
157.      # 如 显示图标 \I[3] 应写成 \\I[3]
     
158. end
     
159. 
     
160. #==============================================================================
     
161. # 如果你懂脚本，可以在下面调整时间窗口的显示方式
     
162. #==============================================================================
     
163. 
     
164. #==============================================================================
     
165. # ** Scene_Menu 建立菜单场景的窗口
     
166. #==============================================================================
     
167. class Scene_Menu
     
168.   _def_ :start do |*args|
     
169.     return unless Smomo::Calendar::Menu
     
170.     # 在下面添加自定义内容
     
171.     @mocalendar_window = Window_MoMenuCalendar.new(@gold_window)
     
172.   end
     
173. end
     
174. #==============================================================================
     
175. # ** Scene_Map 建立地图场景的窗口
     
176. #==============================================================================
     
177. class Scene_Map
     
178.   _def_ :create_all_windows do |*args|
     
179.     return if Smomo::Calendar::Map == :none
     
180.     # 在下面添加自定义内容
     
181.     @mocalendar_window = Window_MoMapCalendar.new
     
182.   end
     
183.   _def_ :call_menu do |*args|
     
184.     return if Smomo::Calendar::Map == :none
     
185.     # 在下面添加自定义内容
     
186.     @mocalendar_window.contents.clear
     
187.   end
     
188. end
     
189. #============================================================================
     
190. # ** Window_MoMenuCalendar 菜单画面中，显示当前游戏内部虚拟日历的窗口
     
191. #============================================================================
     
192. class Window_MoMenuCalendar < Window_Base
     
193.   include Smomo::Calendar
     
194.   
     
195.   def initialize(gold_window)
     
196.     unless $game_switches[Use]
     
197.       super(0, 0, 1, 1)
     
198.       self.opacity = 0
     
199.       return
     
200.     end
     
201.     Smomo::Calendar.ensure_time_legal
     
202.     Smomo::Calendar.check_period_and_zone
     
203.     height = Format[:menu].size * 30 + 20
     
204.     super(0, gold_window.y - height, gold_window.width, height)
     
205.     format = Smomo.deep_clone(Format[:menu])
     
206.     format.each_with_index do |t, l|
     
207.       t.gsub!(/_/){" "}
     
208.       System.each_with_index do |(u, m), i|
     
209.         t.gsub!(/<(\d*)#{u}>/){
     
210.           format("%0#{$1 ? $1.to_i : nil}d", $game_variables[Var + i])
     
211.         }
     
212.       end
     
213.       t.gsub!(/<Period>/){"#{PeriodName[Smomo::Calendar.prd]}"}
     
214.       t.gsub!(/<Zone>/){"#{Smomo::Calendar.zone}"}
     
215.       draw_text_ex(0, l * 30, t)
     
216.     end
     
217.   end
     
218. end
     
219. #============================================================================
     
220. # ** Window_MoMapCalendar 地图画面中，显示当前游戏内部虚拟日历的窗口
     
221. #                         但本质上是一个精灵
     
222. #============================================================================
     
223. class Window_MoMapCalendar < Window_Base
     
224.   include Smomo::Calendar
     
225.   
     
226.   def initialize
     
227.     height = Format[:map].size * 30 + 10
     
228.     @sprite = Sprite.new
     
229.     @sprite.y = Smomo::Calendar::Map == :top ? 0 : Graphics.height - height
     
230.     @sprite.bitmap = Bitmap.new(Graphics.width, height)
     
231.     @use = true
     
232.     update
     
233.     refresh
     
234.   end
     
235.   
     
236.   def update
     
237.     unless @use == $game_switches[Use]
     
238.       @use = $game_switches[Use]
     
239.       @sprite.x = @use ? 0 : Graphics.width
     
240.       refresh
     
241.     else
     
242.       refresh if @use && Graphics.frame_count % $game_variables[Speed] == 0 ||
     
243.       $game_map.need_refresh
     
244.     end
     
245.   end
     
246.   
     
247.   def refresh
     
248.     Smomo::Calendar.ensure_time_legal
     
249.     Smomo::Calendar.check_period_and_zone
     
250.     contents.clear
     
251.     contents.gradient_fill_rect(400, 0, 200, @sprite.width,
     
252.     Color.new(30, 30, 30), Color.new(0, 0, 0, 0))
     
253.     format = Smomo.deep_clone(Format[:map])
     
254.     format.each_with_index do |t, l|
     
255.       t.gsub!(/_/){" "}
     
256.       System.each_with_index do |(u, m), i|
     
257.         t.gsub!(/<(\d*)#{u}>/){
     
258.           format("%0#{$1 ? $1.to_i : nil}d", $game_variables[Var + i])
     
259.         }
     
260.       end
     
261.       t.gsub!(/<Period>/){"#{PeriodName[Smomo::Calendar.prd]}"}
     
262.       t.gsub!(/<Zone>/){"#{Smomo::Calendar.zone}"}
     
263.       draw_text_ex(410, l * 30 + 5, t)
     
264.     end
     
265.   end
     
266.   #------------------------------------------------------------------------
     
267.   # * 偷梁换柱 如果不明白这段的意义 请勿随意删除
     
268.   #------------------------------------------------------------------------
     
269.   def contents
     
270.     @sprite.bitmap
     
271.   end
     
272.   def windowskin
     
273.     Cache.system("Window")
     
274.   end
     
275. end
     
276. #=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+#
     
277. #------------------------------------------------------------------------------#
     
278.                                "请勿跨过这块区域"
     
279. #------------------------------------------------------------------------------#
     
280. #+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=#
     
281. 
     
282. #==============================================================================
     
283. # ** Smomo::Calendar
     
284. #==============================================================================
     
285. module Smomo::Calendar
     
286.   # 预处理
     
287.   PeriodSize = Zone.inject(0){|s, (l)| s + l}
     
288.   Zone.each_with_index{|z, i| z[0] += i == 0 ? 0 : Zone[i - 1][0]}
     
289.   _ = Smomo.deep_clone(Zone)
     
290.   _.each_with_index{|z, i| Zone[i][0] = (i == 0 ? 0 : _[i - 1][0])...z[0]}
     
291.   class << self
     
292.     attr_reader :zone, :prd, :ticking
     
293.     attr_accessor :period
     
294.     define_method(:data){[@zone, @tone, @need_change, @period, @prd]}
     
295.     define_method(:data=){|d| @zone, @tone, @need_change, @period, @prd = d}
     
296.     define_method(:function){|type| type == :all ? data : eval(%!@#{type}!)}
     
297.     # 初始化
     
298.     def ini
     
299.       @ticking = true
     
300.       System.each_index{|i| $game_variables[Var + i] = Start[i]}
     
301.       @ticking = false
     
302.       [url=home.php?mod=space&uid=43863]@zone[/url] = ""
     
303.       @tone = Tone.new(0, 0, 0, 0)
     
304.       @need_change = false
     
305.       @period = init_period
     
306.       @prd = Start_PeriodName
     
307.       check_period_and_zone
     
308.     end
     
309.     # 初始化周期
     
310.     def init_period
     
311.       sta = Start.reverse
     
312.       sta.each_with_index do |n, i|
     
313.         next if i == sta.size - 1
     
314.         sta[i + 1] += n * System.reverse[i + 1][1]
     
315.       end
     
316.       sta.reverse[0] % PeriodSize
     
317.     end
     
318.     # 计时
     
319.     def i_look_into_the_sky_as_time_passes_by
     
320.       return unless $game_switches[Use]
     
321.       return if $game_message.visible
     
322.       return unless Graphics.frame_count % $game_variables[Speed] == 0
     
323.       # 如果在这里报错 一定是你没有设置Speed所对应的变量的值
     
324.       @ticking = true
     
325.       $game_variables[Var] += 1
     
326.       @period += 1
     
327.       ensure_time_legal
     
328.       ensure_period_legal
     
329.       check_period_and_zone
     
330.       change_tone if TimeZone
     
331.       @ticking = false
     
332.     end
     
333.     # 确保变量在范围内
     
334.     def ensure_time_legal
     
335.       @ticking = true
     
336.       System.each_with_index do |(u, m, o), i|
     
337.         while $game_variables[Var + i] > m - (o ? 1 : 0)
     
338.           $game_variables[Var + i] -= m
     
339.           $game_variables[Var + i + 1] += 1
     
340.         end
     
341.         while $game_variables[Var + i] < 1 - (o ? 1 : 0)
     
342.           $game_variables[Var + i] += m
     
343.           $game_variables[Var + i + 1] -= 1
     
344.         end
     
345.       end
     
346.       @ticking = false
     
347.     end
     
348.     # 确保时段在范围内
     
349.     def ensure_period_legal
     
350.       @prd += (@period = 0) + 1 if @period >= PeriodSize
     
351.       @prd = 0 if @prd >= PeriodName.size
     
352.     end
     
353.     # 检查周期别名和时段
     
354.     def check_period_and_zone
     
355.       tone, @zone = Zone.find{|(r, t, n)| r.include?(@period)}[1, 2]
     
356.       @tone == tone ? nil : [@tone = tone, @need_change = true]
     
357.     end
     
358.     # 改变画面色调
     
359.     def change_tone(pt = false)
     
360.       return unless @need_change || pt
     
361.       @need_change = false
     
362.       if IndoorMap.include?($game_map.map_id)
     
363.         $game_map.screen.start_tone_change(Tone.new(0, 0, 0, 0), 0)
     
364.       else
     
365.         $game_map.screen.start_tone_change(@tone, pt ? 0 : 60)
     
366.       end
     
367.     end
     
368.   end
     
369. end
     
370. #==============================================================================
     
371. # ** Smomo.calendar(*a, &b)
     
372. #==============================================================================
     
373. def Smomo.calendar(*a, &b)
     
374.   Smomo::Calendar.function(*a, &b)
     
375. end
     
376. #==============================================================================
     
377. # ** Game_Switches
     
378. #==============================================================================
     
379. class Game_Switches
     
380.   _def_ :on_change do
     
381.     Smomo::Calendar.change_tone
     
382.   end
     
383. end
     
384. #==============================================================================
     
385. # ** Game_Variables
     
386. #==============================================================================
     
387. class Game_Variables
     
388.   _def_ :[]=, :c do |old, variable_id, value|
     
389.     if Smomo::Calendar.ticking
     
390.       old.call(variable_id, value)
     
391.     else
     
392.       min = Smomo::Calendar::Var
     
393.       max = min + Smomo::Calendar::System.size - 1
     
394.       if variable_id.between?(min, max)
     
395.         Smomo::Calendar.period += value - @data[variable_id]
     
396.         old.call(variable_id, value)
     
397.         Smomo::Calendar.ensure_time_legal
     
398.         Smomo::Calendar.ensure_period_legal
     
399.         Smomo::Calendar.check_period_and_zone
     
400.         Smomo::Calendar.change_tone
     
401.       else
     
402.         old.call(variable_id, value)
     
403.       end
     
404.     end
     
405.   end
     
406. end
     
407. #==============================================================================
     
408. # ** Scene_Map
     
409. #==============================================================================
     
410. class Scene_Map
     
411.   _def_ :update do |*args|
     
412.     Smomo::Calendar.i_look_into_the_sky_as_time_passes_by
     
413.   end
     
414.   _def_ :post_transfer, :b do |*args| Smomo::Calendar.change_tone(true) end
     
415. end
     
416. #==============================================================================
     
417. # ** DataManager
     
418. #==============================================================================
     
419. class << DataManager
     
420.   _def_ :setup_new_game do Smomo::Calendar.ini end
     
421.   _def_ :make_save_contents, :v do |contents, *args|
     
422.     contents[:mocalendar] = Smomo::Calendar.data
     
423.     contents
     
424.   end
     
425.   _def_ :extract_save_contents do |contents, *args|
     
426.     Smomo::Calendar.data = contents[:mocalendar]
     
427.   end
     
428. end
     
429. 
     
430. else # if $smomo
     
431.   msgbox "请不要重复加载此脚本 : )\n【虚拟日历】"
     
432. end
     
433. #==============================================================================#
     
434. #=====                        =================================================#
     
435.             "脚 本 尾"
     
436. #=====                        =================================================#
     
437. #==============================================================================#

复制代码

余烬之中

首先……最新版本在此

其次是针对你的问题所作的补丁，贴在原脚本以下

RUBY 代码复制

#==============================================================================
# ** 虚拟日历·定制插件 2014.09.30
#==============================================================================
 
#============================================================================
# ** Window_MoMenuCalendar 开关控制菜单画面是否显示时间
#  这一段是用于菜单画面的 不需要的话直接删掉
#============================================================================
class Window_MoMenuCalendar
  _def_ :initialize, :if do |*args|
    菜单开关ID = 10
    # 正在计时中 且该开关打开 才显示
    unless $game_switches[菜单开关ID]
      super(0, 0, 1, 1)
      self.opacity = 0
      return false
    end
    true
  end
end
 
#============================================================================
# ** Window_MoMapCalendar 开关控制地图画面是否显示时间
#  这一段是用于地图画面的 不需要的话直接删掉
#============================================================================
class Window_MoMapCalendar
  _def_ :update, :if do |*args|
    地图开关ID = 11
    # 正在计时中 且该开关打开 才显示
    if $game_switches[地图开关ID]
      @sprite.visible = true unless @sprite.visible
    else
      @sprite.visible = false if @sprite.visible
      return false
    end
    true
  end
end

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


# ** 虚拟日历·定制插件 2014.09.30


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


 


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


# ** Window_MoMenuCalendar 开关控制菜单画面是否显示时间


#  这一段是用于菜单画面的 不需要的话直接删掉


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


class Window_MoMenuCalendar


  _def_ :initialize, :if do |*args|


    菜单开关ID = 10


    # 正在计时中 且该开关打开 才显示


    unless $game_switches[菜单开关ID]


      super(0, 0, 1, 1)


      self.opacity = 0


      return false


    end


    true


  end


end


 


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


# ** Window_MoMapCalendar 开关控制地图画面是否显示时间


#  这一段是用于地图画面的 不需要的话直接删掉


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


class Window_MoMapCalendar


  _def_ :update, :if do |*args|


    地图开关ID = 11


    # 正在计时中 且该开关打开 才显示


    if $game_switches[地图开关ID]


      @sprite.visible = true unless @sprite.visible


    else


      @sprite.visible = false if @sprite.visible


      return false


    end


    true


  end


end