华丽镜头移动脚本 VX化

趙雲 · 发表于 2008-2-28 07:16:43

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由雪流星于 2009-7-15 00:10 编辑

#==============================================================================
# ■ 华丽镜头移动脚本 by 黑暗之神Kaiser.DS
#------------------------------------------------------------------------------
# 　1-插入此段脚本到Main前面
# 2-功能
# a-[镜头平滑移动到事件/角色]
# 在事件里的[设置移动路线]里选择需要镜头转向的角色输入脚本kds即可
# b-[镜头跟随事件]
# 在事件里的[设置移动路线]选择好需要跟随的事件后输入脚本kds_move_start开
# 始跟随，当不想跟随时再输入kds_move_over
#==============================================================================
class Game_Map
attr_accessor :display_x # 显示 X 坐标 * 256
attr_accessor :display_y # 显示 Y 坐标 * 256
end
$平滑移动 = nil
class Scene_Map
alias kds_update update
def update
kds_update
if $平滑移动 != nil
cen_x = Game_Character::CENTER_X
cen_y = Game_Character::CENTER_Y
max_x = ($game_map.width - 17) * 256
max_y = ($game_map.height - 13) * 256
display_x = [0, [$平滑移动.x * 256 - cen_x, max_x].min].max
display_y = [0, [$平滑移动.y * 256 - cen_y, max_y].min].max
if $game_map.display_x != display_x
if ($game_map.display_x - display_x).abs < 22
$game_map.display_x = display_x
else
$game_map.display_x += (display_x - $平滑移动.old_display_x)/32
end
end
if $game_map.display_y != display_y
if ($game_map.display_y - display_y).abs <= 22
$game_map.display_y = display_y
else
$game_map.display_y += (display_y - $平滑移动.old_display_y)/32
end
end
if $game_map.display_x == display_x and $game_map.display_y == display_y
$平滑移动.center($平滑移动.x, $平滑移动.y)
$平滑移动 = nil
end
return
end
end
end
class Game_Character
CENTER_X = (544 / 2 - 16) * 8 # 画面中央的 X 坐标 * 8
CENTER_Y = (416 / 2 - 16) * 8 # 画面中央的 Y 坐标 * 8
attr_accessor :old_display_x
attr_accessor :old_display_y
attr_accessor :kds_move
def center(x, y)
max_x = ($game_map.width - 17) * 256
max_y = ($game_map.height - 13) * 256
$game_map.display_x = [0, [x * 256 - CENTER_X, max_x].min].max
$game_map.display_y = [0, [y * 256 - CENTER_Y, max_y].min].max
end
def kds
@old_display_x = $game_map.display_x
@old_display_y = $game_map.display_y
case @id
when 0
$平滑移动 = $game_player
else
$平滑移动 = $game_map.events[@id]
end
end
def kds_move_start
@kds_move = ""
end
def kds_move_over
@kds_move = nil
end
alias kds_update update
def update
last_real_x = @real_x
last_real_y = @real_y
kds_update
if @kds_move != nil
if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
$game_map.scroll_down(@real_y - last_real_y)
end
if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
$game_map.scroll_left(last_real_x - @real_x)
end
if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
$game_map.scroll_right(@real_x - last_real_x)
end
if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
$game_map.scroll_up(last_real_y - @real_y)
end
end
end
end
#==============================================================================

复制代码

适用默认分辨率。

范例，进入游戏后和左边的女生对话
http://rpg.blue/upload_program/f ... 范例_84746575.rar

桑田百合 · 发表于 2009-7-8 10:23:29

提示: 作者被禁止或删除内容自动屏蔽

drgdrg · 发表于 2008-9-14 06:43:07

以下引用chenlin3799于2008-9-13 21:22:12的发言：

回1:那个应该是SHOP脚本自身的错误吧..我试了下,在与女的对话后(镜头移动后)再跟大叔说话会出现错误提示,然后我又重新玩了一次,没有触发镜头移动,但与大叔对话仍然会出现BUG..
再然后我又复制了范例,把这个脚本删了,然后与大叔对话仍然出现BUG...（而且这个范例好象跟那个大叔没关系吧。。。= =）
所以说这个BUG和该脚本是没有关系的...
回2:请看脚本说明...

1.囧……估计因为对大叔无爱关注太少{/cy}{/cy}{/cy}
2.哦，知道了…
其实我的意思是范例工程里面应该要包含脚本的全部功能演示……

chenlin3799 · 发表于 2008-9-14 05:22:12

以下引用drgdrg于2008-9-13 16:25:12的发言：

以下引用chenlin3799于2008-9-13 13:58:00的发言：

呵呵..刚刚开也遇到这个问题...
不过只要把Main的第7行改成unless Font.exist?("黑体")

就可以了,只不过是字比较细而已,而且范例里面也没有对话的说..

还是有BUG……

和左下方的大叔说话会出错

还有，镜头怎么移动？随NPC移动那个就是示范了吗？

回1:那个应该是SHOP脚本自身的错误吧..我试了下,在与女的对话后(镜头移动后)再跟大叔说话会出现错误提示,然后我又重新玩了一次,没有触发镜头移动,但与大叔对话仍然会出现BUG..
再然后我又复制了范例,把这个脚本删了,然后与大叔对话仍然出现BUG...（而且这个范例好象跟那个大叔没关系吧。。。= =）
所以说这个BUG和该脚本是没有关系的...
回2:请看脚本说明...

莉可 · 发表于 2008-9-14 00:52:30

提示: 作者被禁止或删除内容自动屏蔽

drgdrg · 发表于 2008-9-14 00:25:12

以下引用chenlin3799于2008-9-13 13:58:00的发言：

呵呵..刚刚开也遇到这个问题...
不过只要把Main的第7行改成unless Font.exist?("黑体")

就可以了,只不过是字比较细而已,而且范例里面也没有对话的说..

还是有BUG……

和左下方的大叔说话会出错

还有，镜头怎么移动？随NPC移动那个就是示范了吗？

chenlin3799 · 发表于 2008-9-13 21:58:00

以下引用drgdrg于2008-9-10 22:53:42的发言：

为什么打不开范例……

“找不到字体”

呵呵..刚刚开也遇到这个问题...
不过只要把Main的第7行改成

unless Font.exist?("黑体")

复制代码

就可以了,只不过是字比较细而已,而且范例里面也没有对话的说..

龙轩 · 发表于 2008-9-12 21:12:39

提示: 作者被禁止或删除内容自动屏蔽

drgdrg · 发表于 2008-9-11 06:53:42

为什么打不开范例……

“找不到字体”

abwhywhy · 发表于 2008-9-11 03:48:26

太正了~謝謝拉~!

帐号		自动登录	找回密码
密码			注册会员

[RMVX发布] 华丽镜头移动脚本 VX化

加入我们，或者，欢迎回来。