[FSL]窗口滑動效果

雪流星

作另一个系统的时候，为了让窗口滑动，顺便制作出来的副产品......
使用说明:
创建窗口之后，可以使用调整窗口的座标，并且将窗口滑动到指定位置。
可用于制作华丽菜单显示效果
* 窗口.in(方向[, 移动距离])
    方向可以为 2(下), 4(左), 6(右), 8(上)
    移动距离默认为 10
   将窗口滑动至画面外。

* 窗口.out(方向[, 移动距离])
    方向可以为 2(下), 4(左), 6(右), 8(上)
    移动距离默认为 10
   将窗口由画面外滑动至原位。

* 窗口.move_to(目标 X 座标, 目标 Y 座标[, 移动距离])
    移动距离默认为 10
   将窗口滑动至指定座标。

1. 
   
2. #==============================================================================
   
3. # ■ [VX] 窗口滑动
   
4. #     [VX] WindowSlide
   
5. #----------------------------------------------------------------------------
   
6. # 使用说明:
   
7. # 创建窗口之后，可以使用调整窗口的座标，并且将窗口滑动到指定位置。
   
8. # 可用于制作华丽菜单显示效果
   
9. # * 窗口.in(方向[, 移动距离])
   
10. #     方向可以为 2(下), 4(左), 6(右), 8(上)
    
11. #     移动距离默认为 10
    
12. #    将窗口滑动至画面外。
    
13. #
    
14. # * 窗口.out(方向[, 移动距离])
    
15. #     方向可以为 2(下), 4(左), 6(右), 8(上)
    
16. #     移动距离默认为 10
    
17. #    将窗口由画面外滑动至原位。
    
18. #
    
19. # * 窗口.move_to(目标 X 座标, 目标 Y 座标[, 移动距离])
    
20. #     移动距离默认为 10
    
21. #    将窗口滑动至指定座标。
    
22. #----------------------------------------------------------------------------
    
23. #    更新作者： 雪流星(Snstar2006)
    
24. #    许可协议： FSL
    
25. #    项目版本： 1.0.1
    
26. #----------------------------------------------------------------------------
    
27. #    - *1.0.1* (2011-01-21) By 雪流星(Snstar2006)
    
28. #      *修改算法，省去计算根号的步骤，稍微提高效率
    
29. #    - *1.0.0* (2011-01-21) By 雪流星(Snstar2006)
    
30. #      *初版
    
31. #==============================================================================
    
32. $fscript = {} if $fscript == nil
    
33. $fscript["WindowSlide"] = "1.0.0"
    
34. 
    
35. class Window_Base < Window
    
36.   alias move_window_initialize initialize
    
37.   def initialize(x, y, width, height)
    
38.     move_window_initialize(x, y, width, height)
    
39.     @permanent_x = x
    
40.     @permanent_y = y
    
41.   end
    
42.   def in(direction, step=10)
    
43.     case direction
    
44.     when 2
    
45.       move_to(self.x, -self.height, step)
    
46.     when 4
    
47.       move_to(-self.width, self.y, step)
    
48.     when 6
    
49.       move_to(Graphics.width + self.width, self.y, step)
    
50.     when 8
    
51.       move_to(self.x, Graphics.height + self.height, step)
    
52.     end
    
53.     Graphics.wait(1)
    
54.   end
    
55.   def out(direction, step=10)
    
56.     case direction
    
57.     when 2, 8
    
58.       move_to(self.x, @permanent_y, step)
    
59.     when 4, 6
    
60.       move_to(@permanent_x, self.y, step)
    
61.     end
    
62.   end
    
63.   def move_to(dest_x, dest_y, move_step=10)
    
64.     dx = dest_x - self.x
    
65.     dy = dest_y - self.y
    
66.     if dx == 0
    
67.       dy_step = move_step
    
68.       dx_step = 0
    
69.     elsif dy == 0
    
70.       dx_step = move_step
    
71.       dy_step = 0
    
72.     else
    
73.       max_distance_sq = dx**2+dy**2
    
74.       angle = Math.atan(dy.abs/dx.abs)
    
75.       dy_step = move_step*Math.sin(angle)
    
76.       dx_step = max_distance_sq - dy_step**2
    
77.     end
    
78.     while (self.x != dest_x || self.y != dest_y)
    
79.       if dx > 0
    
80.         self.x = [self.x + dx_step, dest_x].min
    
81.       else
    
82.         self.x = [self.x - dx_step, dest_x].max
    
83.       end
    
84.       if dy > 0
    
85.         self.y = [self.y + dy_step, dest_x].min
    
86.       else
    
87.         self.y = [self.y - dy_step, dest_x].max
    
88.       end
    
89.       Graphics.wait(1)
    
90.     end
    
91.   end
    
92. end
    

复制代码

一瞬间的幻觉

又有好东西了！！谢谢楼主分享

DeathKing

这个才是实用的东西啊，支持一个。
另外，有个项目的讨论，实现RMVX窗体特效：http://rpg.blue/thread-155595-1-1.html

提交BUG：

move_to有一处拼写错误，应该是dest_y而不是dest_x。

提交更新：

1. #==============================================================================
   
2. # ■ [VX] 窗口滑动
   
3. #    [VX] WindowSlide
   
4. #----------------------------------------------------------------------------
   
5. #    使用说明:
   
6. #    创建窗口之后，可以使用调整窗口的座标，并且将窗口滑动到指定位置。
   
7. #    可用于制作华丽菜单显示效果
   
8. #    * 窗口.in(方向[, 移动距离])
   
9. #       方向可以为 2(下), 4(左), 6(右), 8(上)
   
10. #       移动距离默认为 10
    
11. #       将窗口滑动至画面外。
    
12. #
    
13. #    * 窗口.out(方向[, 移动距离])
    
14. #       方向可以为 2(下), 4(左), 6(右), 8(上)
    
15. #       移动距离默认为 10
    
16. #       将窗口由画面外滑动至原位。
    
17. #
    
18. #    * 窗口.move_to(目标 X 座标, 目标 Y 座标[, 移动距离])
    
19. #       移动距离默认为 10
    
20. #       将窗口滑动至指定座标。
    
21. #
    
22. #----------------------------------------------------------------------------
    
23. #    更新作者： 雪流星(Snstar2006) DeathKing
    
24. #    许可协议： FSL
    
25. #    项目版本： 1.1.0131
    
26. #    引用网址：
    
27. #----------------------------------------------------------------------------
    
28. #    - 1.2.0131 By DeathKing
    
29. #      * 修正了move_to方法中的一个拼写错误导致的死循环；
    
30. #
    
31. #    - 1.1.0121 By 雪流星(Snstar2006)
    
32. #      * 修改算法，省去计算根号的步骤，稍微提高效率；
    
33. #
    
34. #    - 1.0.0121 By 雪流星(Snstar2006)
    
35. #      * 初版；
    
36. #==============================================================================
    
37. $fscript = {} if $fscript == nil
    
38. $fscript["WindowSlide"] = "1.2.0131"
    
39. 
    
40. #==============================================================================
    
41. # ■ Window_Base
    
42. #------------------------------------------------------------------------------
    
43. # 　游戏中全部窗口的超级类。
    
44. #==============================================================================
    
45. 
    
46. class Window_Base < Window
    
47.   alias move_window_initialize initialize
    
48.   def initialize(x, y, width, height)
    
49.     move_window_initialize(x, y, width, height)
    
50.     @permanent_x = x
    
51.     @permanent_y = y
    
52.   end
    
53.   #--------------------------------------------------------------------------
    
54.   # ● 窗体划出
    
55.   #     direction :  方向
    
56.   #     step      ： 移动的步长
    
57.   #--------------------------------------------------------------------------
    
58.   def in(direction, step=10)
    
59.     case direction
    
60.     when 2
    
61.       move_to(self.x, -self.height, step)
    
62.     when 4
    
63.       move_to(-self.width, self.y, step)
    
64.     when 6
    
65.       move_to(Graphics.width + self.width, self.y, step)
    
66.     when 8
    
67.       move_to(self.x, Graphics.height + self.height, step)
    
68.     end
    
69.     Graphics.wait(1)
    
70.   end
    
71.   #--------------------------------------------------------------------------
    
72.   # ● 窗体划回
    
73.   #     direction :  方向
    
74.   #     step      ： 移动的步长
    
75.   #--------------------------------------------------------------------------
    
76.   def out(direction, step=10)
    
77.     case direction
    
78.     when 2, 8
    
79.       move_to(self.x, @permanent_y, step)
    
80.     when 4, 6
    
81.       move_to(@permanent_x, self.y, step)
    
82.     end
    
83.   end
    
84.   #--------------------------------------------------------------------------
    
85.   # ● 移动窗体
    
86.   #     dest_x    :  目的地x坐标
    
87.   #     dest_y    :  目的地y坐标
    
88.   #     move_step ： 移动的步长
    
89.   #--------------------------------------------------------------------------
    
90.   def move_to(dest_x, dest_y, move_step=10)
    
91.     dx = dest_x - self.x
    
92.     dy = dest_y - self.y
    
93.     if dx == 0
    
94.       dy_step = move_step
    
95.       dx_step = 0
    
96.     elsif dy == 0
    
97.       dx_step = move_step
    
98.       dy_step = 0
    
99.     else
    
100.       max_distance_sq = dx**2+dy**2
     
101.       angle = Math.atan(dy.abs/dx.abs)
     
102.       dy_step = move_step*Math.sin(angle)
     
103.       dx_step = max_distance_sq - dy_step**2
     
104.     end
     
105.     while (self.x != dest_x || self.y != dest_y)
     
106.       if dx > 0
     
107.         self.x = [self.x + dx_step, dest_x].min
     
108.       else
     
109.         self.x = [self.x - dx_step, dest_x].max
     
110.       end
     
111.       if dy > 0
     
112.         self.y = [self.y + dy_step, dest_y].min
     
113.       else
     
114.         self.y = [self.y - dy_step, dest_y].max
     
115.       end
     
116.       Graphics.wait(1)
     
117.     end
     
118.   end
     
119. end

复制代码

sd592078335

阿勒？这个脚本怎么用呐...看起来怪怪的说..

asdbnm166

DeathKing 发表于 2011-1-31 00:45
这个才是实用的东西啊，支持一个。
另外，有个项目的讨论，实现RMVX窗体特效：http://rpg.blue/thread ...

这个脚本咋用。。是直接修改window_base还是在main前面。。。