怎么实现溜冰效果？ - Project1

#==============================================================================
#
# ▼ Yanfly Engine Ace - 滑冰图块 v1.00
# -- 最后更新: 2011.12.03
# -- 使用难度: 普通
# -- 需要脚本: 无
#
#==============================================================================
$imported = {} if $imported.nil?
$imported["YEA-SlipperyTiles"] = true
#==============================================================================
# ▼ Updates
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# 2011.12.03 - Started Script and Finished.
#
#==============================================================================
# ▼ 介绍
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# 想使用滑冰效果而不想使用密密麻麻的事件？现在你可以做到了！
# 本脚本可以使某图块具有滑冰效果，角色会保持进入该图块的朝向一直移动，直到撞上
# 障碍物.
#
#==============================================================================
# ▼ 安装方式
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# 打开脚本编辑器，将本脚本拷贝/复制到一个在▼ 插件脚本之下▼ Main之上的新
# 脚本页/槽中.记得保存你的工程以使脚本生效.
#
# -----------------------------------------------------------------------------
# 图块备注 - 在数据库-图块中可以使用的备注.
# -----------------------------------------------------------------------------
# <滑冰: x>
# <滑冰: x, x>
#
# 将地形标志为x的图块设定为其具有滑冰效果.
#
#==============================================================================
# ▼ 兼容性
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# 本脚本仅为RPG Maker VX Ace编写.极不可能在无任何修改的情况下运行于RPG Maker VX.
#
#==============================================================================
module YEA
module SLIPPERY_TILES
#=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
# - 滑冰踏步动画 -
#=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
# 设定玩家在滑冰时踏步动画的帧数，帧数越大，脚动的越快.标准行走帧数为1.
#=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
SLIDE_FRAME = 2
end # SLIPPERY_TILES
end # YEA
#==============================================================================
# ▼ 编辑以下内容可能会出现电脑损坏、死机，电脑主人脑袋爆炸、昏迷、死亡或口臭
# 所以编辑了后果自负。
#==============================================================================
module YEA
module REGEXP
module TILESET
SLIPPERY = /<(?:SLIPPERY|滑冰):[ ]*(\d+(?:\s*,\s*\d+)*)>/i
end # TILESET
end # REGEXP
end # YEA
#==============================================================================
# ■ DataManager
#==============================================================================
module DataManager
#--------------------------------------------------------------------------
# alias method: load_database
#--------------------------------------------------------------------------
class <<self; alias load_database_st load_database; end
def self.load_database
load_database_st
load_notetags_st
end
#--------------------------------------------------------------------------
# new method: load_notetags_st
#--------------------------------------------------------------------------
def self.load_notetags_st
groups = [$data_tilesets]
for group in groups
for obj in group
next if obj.nil?
obj.load_notetags_st
end
end
end
end # DataManager
#==============================================================================
# ■ RPG::Tileset
#==============================================================================
class RPG::Tileset
#--------------------------------------------------------------------------
# public instance variables
#--------------------------------------------------------------------------
attr_accessor :slippery
#--------------------------------------------------------------------------
# common cache: load_notetags_st
#--------------------------------------------------------------------------
def load_notetags_st
@slippery = []
#---
self.note.split(/[\r\n]+/).each { |line|
case line
#---
when YEA::REGEXP::TILESET::SLIPPERY
$1.scan(/\d+/).each { |num|
@slippery.push(num.to_i) if num.to_i > 0 }
#---
end
} # self.note.split
#---
end
end # RPG::Tileset
#==============================================================================
# ■ Game_Map
#==============================================================================
class Game_Map
#--------------------------------------------------------------------------
# new method: slippery_floor?
#--------------------------------------------------------------------------
def slippery_floor?(dx, dy)
return (valid?(dx, dy) && slippery_tag?(dx, dy))
end
#--------------------------------------------------------------------------
# new method: slippery_tag?
#--------------------------------------------------------------------------
def slippery_tag?(dx, dy)
return tileset.slippery.include?(terrain_tag(dx, dy))
end
end # Game_Map
#==============================================================================
# ■ Game_CharacterBase
#==============================================================================
class Game_CharacterBase
#--------------------------------------------------------------------------
# new method: on_slippery_floor?
#--------------------------------------------------------------------------
def on_slippery_floor?; $game_map.slippery_floor?(@x, @y); end
#--------------------------------------------------------------------------
# new method: slippery_pose?
#--------------------------------------------------------------------------
def slippery_pose?
return false unless on_slippery_floor?
return false if @step_anime
return true
end
end # Game_CharacterBase
#==============================================================================
# ■ Game_Player
#==============================================================================
class Game_Player < Game_Character
#--------------------------------------------------------------------------
# alias method: dash?
#--------------------------------------------------------------------------
alias game_player_dash_st dash?
def dash?
return false if on_slippery_floor?
return game_player_dash_st
end
#--------------------------------------------------------------------------
# alias method: update
#--------------------------------------------------------------------------
alias game_player_update_st update
def update
game_player_update_st
update_slippery
end
#--------------------------------------------------------------------------
# new method: update_slippery
#--------------------------------------------------------------------------
def update_slippery
return if $game_map.interpreter.running?
return unless on_slippery_floor?
return if moving?
move_straight(@direction)
end
#--------------------------------------------------------------------------
# new method: pattern
#--------------------------------------------------------------------------
def pattern
return YEA::SLIPPERY_TILES::SLIDE_FRAME if slippery_pose?
return @pattern
end
end # Game_Player
#==============================================================================
# ■ Game_Follower
#==============================================================================
class Game_Follower < Game_Character
#--------------------------------------------------------------------------
# new method: pattern
#--------------------------------------------------------------------------
def pattern
return YEA::SLIPPERY_TILES::SLIDE_FRAME if slippery_pose?
return @pattern
end
end # Game_Follower
#==============================================================================
#
# ▼ End of File
#
#==============================================================================

复制代码