R剧爱好者福音-华丽镜头移动脚本

黑暗之神

#==============================================================================
# ■ 华丽镜头移动脚本  by 黑暗之神Kaiser.DS
#------------------------------------------------------------------------------
# 　1-插入此段脚本到Main前面
#   2-功能
#     a-[镜头平滑移动到事件/角色]
#       在事件里的[设置移动路线]里选择需要镜头转向的角色输入脚本kds即可
#     b-[镜头跟随事件]
#       在事件里的[设置移动路线]选择好需要跟随的事件后输入脚本kds_move_start开
#       始跟随，当不想跟随时再输入kds_move_over
#==============================================================================
这个脚本是我SLG工程里的附产品，在镜头平滑指向事件、角色的同时，带来视觉上的华丽
工程范例：
http://rpg.blue/UP_PIC/200707/镜头跟随.rar

1. 
   
2. #==============================================================================
   
3. # ■ 华丽镜头移动脚本  by 黑暗之神Kaiser.DS
   
4. #------------------------------------------------------------------------------
   
5. # 　1-插入此段脚本到Main前面
   
6. #   2-功能
   
7. #     a-[镜头平滑移动到事件/角色]
   
8. #       在事件里的[设置移动路线]里选择需要镜头转向的角色输入脚本kds即可
   
9. #     b-[镜头跟随事件]
   
10. #       在事件里的[设置移动路线]选择好需要跟随的事件后输入脚本kds_move_start开
    
11. #       始跟随，当不想跟随时再输入kds_move_over
    
12. #==============================================================================
    
13. $平滑移动 = nil
    
14. class Scene_Map
    
15.   alias kds_update update
    
16.   def update
    
17.     kds_update
    
18.     if $平滑移动 != nil
    
19.       cen_x = (320 - 16) * 4
    
20.       cen_y = (240 - 16) * 4
    
21.       max_x = ($game_map.width - 20) * 128
    
22.       max_y = ($game_map.height - 15) * 128
    
23.       display_x = [0, [$平滑移动.x * 128 - cen_x, max_x].min].max
    
24.       display_y = [0, [$平滑移动.y * 128 - cen_y, max_y].min].max
    
25.       if $game_map.display_x != display_x
    
26.          if ($game_map.display_x - display_x).abs < 22
    
27.            $game_map.display_x = display_x
    
28.          else
    
29.            $game_map.display_x += (display_x - $平滑移动.old_display_x)/8
    
30.          end
    
31.       end
    
32.       if $game_map.display_y != display_y
    
33.          if ($game_map.display_y - display_y).abs <= 22
    
34.             $game_map.display_y = display_y
    
35.          else
    
36.             $game_map.display_y += (display_y - $平滑移动.old_display_y)/8
    
37.          end
    
38.       end
    
39.       if $game_map.display_x == display_x  and $game_map.display_y == display_y
    
40.          $平滑移动.center($平滑移动.x, $平滑移动.y)
    
41.          $平滑移动 = nil
    
42.       end
    
43.       return
    
44.     end
    
45.   end  
    
46. end
    
47. class Game_Character
    
48.   CENTER_X = (320 - 16) * 4
    
49.   CENTER_Y = (240 - 16) * 4
    
50.   attr_accessor :old_display_x
    
51.   attr_accessor :old_display_y
    
52.   attr_accessor :kds_move
    
53.   def center(x, y)
    
54.     max_x = ($game_map.width - 20) * 128
    
55.     max_y = ($game_map.height - 15) * 128
    
56.     $game_map.display_x = [0, [x * 128 - CENTER_X, max_x].min].max
    
57.     $game_map.display_y = [0, [y * 128 - CENTER_Y, max_y].min].max
    
58.   end
    
59.   def kds
    
60.     @old_display_x = $game_map.display_x
    
61.     @old_display_y = $game_map.display_y
    
62.     case @id
    
63.     when 0
    
64.       $平滑移动 = $game_player
    
65.     else
    
66.       $平滑移动 = $game_map.events[@id]
    
67.     end
    
68.   end
    
69.   def kds_move_start
    
70.       @kds_move = ""
    
71.   end
    
72.   def kds_move_over
    
73.       @kds_move = nil
    
74.   end
    
75.   alias kds_update update
    
76.   def update
    
77.     last_real_x = @real_x
    
78.     last_real_y = @real_y
    
79.     kds_update
    
80.     if @kds_move != nil
    
81.      if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
    
82.        $game_map.scroll_down(@real_y - last_real_y)
    
83.      end
    
84.      if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
    
85.        $game_map.scroll_left(last_real_x - @real_x)
    
86.      end
    
87.      if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
    
88.       $game_map.scroll_right(@real_x - last_real_x)
    
89.      end
    
90.      if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
    
91.        $game_map.scroll_up(last_real_y - @real_y)
    
92.      end
    
93.     end
    
94.   end  
    
95. end
    
96. #==============================================================================

复制代码

黑暗之神

重复内容

雪雾明日晴

先看看再说=w=

---

适合SLG那类的战场场景移动..恩..
不过我认为对R剧的作用不大呢...

幻の飞鱼

看完LZ头像就忽然觉得这是个好东西了^_^

另外orz LS的签名图

以下引用雪雾明日晴于2007-8-21 21:08:18的发言：

先看看再说=w=



适合SLG那类的战场场景移动..恩..
不过我认为对R剧的作用不大呢...


[本贴由作者于 2007-8-21 21:10:16 最后编辑]

{/fd}{/fd}R剧可是最可能需要用到镜头跟踪事件的呀

而且镜头移动华丽一点不也是增色么{/fd}

雪雾明日晴

不是啦...这个你看了就知道了..
一般R剧都是小场景的吧..我见过的都是那样的。
虽然我说对R剧可能作用不大，但是这个脚本的价值可丝毫不减啊~

七夕小雨

……………………………………………………


很好……很强大………………{/dk}

PS：……本人当年的怨念……

精灵使者

精灵可能那种场面会把主角作为npc用，npc作为主角用……
或者干脆主角行走图改为无，全部使用npc来做……不过镜头移动这个的确很好的说。

九泪

除了SLG，其实RPG关键NPC对话前、关键人物出场等，

镜头移动以重点突出，也是相当有用的。

鼓励{/qiang}{/qiang}

暴风の龙

不错不错,效果很好哦{/se}