【RGSS脚本】高精度计时器 by FantasyDR [2005.10.18]

FantasyDR

不知道以前有没有有人弄过类似的，不管了……发了再说……%_%

[10.18更新]
修正了使用CPU嘀哒数计时出现的错误，忘记进位了^_^bb

『使用对象』
RPG Maker XP
（废话-_-|||）

『内容简介』
这个脚本的起因是因为，RGSS的内部时钟隐藏不可见，计时竟然是用帧频率和帧数相除换算出来的。
这个时间，只能是模糊的时间，要做到精确计时，不可能-_-b

而且，帧频率可以变，幅度在0~40之间，这样算出的时间可以说在动作游戏里根本无法使用。
因此调用API做了个高精度计时器。

『加入方法』
在Main之前随便插入一个脚本标题，比如System_Timer，拷贝最下方脚本框内所有内容进入这个标题，然后就可以调用了。

『调用方法』
下面是3个调用方法，针对不同需要

1、输入脚本事件：
$game_variables[变量号码]=$sys_timer.now_s()
将目前时间保存到变量中，单位“秒”

2、输入脚本事件：
$game_variables[变量号码]=$sys_timer.now()
将目前时间保存到变量中，单位“毫秒”

3、输入脚本事件：
$sys_timer.clear()
计时器归零。

PS：详细内容，或者RGSS使用者，参考脚本内注释。

『声明』
本脚本内容均为原创，虽然无多少高深技术含量，但是希望转载时候保留作者信息。


『脚本内容』

2. # ------------------------------------------------------------------------
3. # 高精度计时器 by FantasyDR
4. # ------------------------------------------------------------------------
5. # E-mail: [email]fnd@163.net[/email]
6. # ------------------------------------------------------------------------
7. # 2005.10.18
8. # ------------------------------------------------------------------------
9. # 该类已经被定义为全局变量 $sys_timer
10. # 如果只需要精确到毫秒，请设置初始化参数为true
11. # decimal属性设置返回时间值的小数位数。
12. # ------------------------------------------------------------------------
13. # 下面是一些有用的方法列表，调用时写：$sys_timer.方法名
14. # 例如 $sys_timer.clear()
15. # ------------------------------------------------------------------------
16. # clear() ：计时器清零
17. #   now() ：获取当前经过的时间，单位毫秒
18. # now_s() ：获取当前经过的时间，单位秒
19. # ------------------------------------------------------------------------
21. class SystemTimer
23.   attr_accessor:decimal  #小数位数设定，默认为3
24.   
25.   def initialize(use_GetTime=false)
26.     # 初始化，根据系统选择不同精度计时器
27.     @qpFrequency = Win32API.new("kernel32","QueryPerformanceFrequency",'p','L')
28.     @qpCounter = Win32API.new("kernel32","QueryPerformanceCounter",'p','L')
29.     @tGetTime = Win32API.new("winmm","timeGetTime",'','L')
30.    
31.     @decimal=3
32.     @perf_cnt=" " * 8
33.     @time_start=" " * 8
34.     @time_now=" " * 8
35.    
36.     result = @qpFrequency.call(@perf_cnt)
37.    
38.     if use_GetTime
39.       result = 0
40.     end
41.    
42.     if result!=0
43.       @perf_flag=true
44.     else
45.       @perf_flag=false
46.       @perf_cnt=[1000,0].pack('LL')
47.     end
48.    
49.     #设置时间比例因数
50.     @time_scale=@perf_cnt.unpack('LL')
51.     @time_scale[0] /= 1000.0
52.     @time_scale[1] /= 1000.0
53.    
54.     #起始时间清零
55.     self.clear()
56.   end
57.   
58.   #-=====================-#
59.   # 计时器清零
60.   #-=====================-#
61.   def clear()
62.     if @perf_flag
63.       @qpCounter.call(@time_start)
64.     else
65.       @time_start=[@tGetTime.call(),0].pack('LL')
66.     end
67.   end
68.   
69.   #-==============================-#
70.   # 获取当前经过的时间，单位毫秒
71.   #-==============================-#
72.   def now()
73.     now_time = 0.0e1
74.     now_time += self.timer() - self.start()
75.     now_time /= self.scale()
76.     return self.debug(now_time)
77.   end
78.   
79.   #-==============================-#
80.   # 获取当前经过的时间，单位秒
81.   #-==============================-#
82.   def now_s()
83.     now_time = 0.0e1
84.     now_time += self.timer() - self.start()
85.     now_time /= (self.scale()*1000)   
86.     return self.debug(now_time)
87.   end
88.   
89.   #-==============================-#
90.   # 帧错...
91.   #-==============================-#
92.   def debug(now_time)
93.     if @decimal>0
94.      now_time = (now_time * (10**@decimal)).floor/(10.0**@decimal)
95.     else
96.      now_time = now_time.floor
97.     end
98.     return now_time
99.    
100.     #以下用于debug模式
101.     if now_time < 0
102.       p "Timer Wrong!! Clear...",now_time,\
103.         @perf_flag,@qpCounter,@tGetTime,
104.         @time_now.unpack('LL')[0],@time_now.unpack('LL')[1],
105.         @time_start.unpack('LL')[0],@time_start.unpack('LL')[1]
106.       self.clear()
107.       return 0.0
108.     else
109.       return now_time
110.     end
111.   end
112.   
113.   #-=====================-#
114.   # 获取时间比例因数
115.   #-=====================-#
116.   def scale()
117.     return @time_scale[0]+\
118.            @time_scale[1]*0xffffffff
119.   end
120.   
121.   #-=====================-#
122.   # 获取起始滴答数
123.   #-=====================-#
124.   def start()
125.     return @time_start.unpack('LL')[0]+\
126.            @time_start.unpack('LL')[1]*0xffffffff
127.   end
128.   
129.   #-=====================-#
130.   # 获取当前的嘀哒数
131.   #-=====================-#
132.   def timer()
133.     if @perf_flag
134.       @qpCounter.call(@time_now)
135.     else
136.       @time_now=[@tGetTime.call(),0].pack('LL')
137.     end
138.     return @time_now.unpack('LL')[0]+\
139.            @time_now.unpack('LL')[1]*0xffffffff
140.   end
141. end
143. #-------------------------------------#
144. # 初始化自身成一个全局变量
145. #-------------------------------------#
146. $sys_timer=SystemTimer.new()
147. #-------------------------------------#

复制代码

CountD

原来XP的记时系统这么弱……= =|||
果然EB是越来越不厚道了……
技术帖，要顶。^^（偶尔也灌之……）

FantasyDR

EB的东西总有一点点诡异。

比如10s不调用Graphics.update方法的话，系统会死锁，然后自动弹出。
这样，如果播放长一点的AVI，还得不停的Graphics.update，屏幕会一闪一闪。

有些13点的设定。

月见草

（响应版主号召偶尔也灌水之……）

看此帖时的心情：

第一楼：好啊！！正好在作片头，恩，可以搞定了…………（狂喜ing）

第二楼：…………（这个缺点在看脚本时已经知道了，所以没反应）

第三楼：…………一闪一闪…………（心情谷底中|||||||）

FantasyDR

嗯……是两件事情吧？
似乎，计时器和AVI播放的事情，不太搭界的说。

月见草

计时器用来掐音乐播放（对白）时间用的。
其实我现在的op是用pt做的连续帧动画，所以无论是一张一张图的插，还是直接编辑成AVI，2种方法都可行。
用AVI就不用掐秒了，不过现在看起来还是只能掐秒阿~~~~（干脆把所有背景音乐和对白混响成一个文件算了~~~自暴自弃ing~~）

FantasyDR

小更新了一下，除去一个致命bug-_-b

PS：怎么看都是矛盾的话XD