【求助】RP魔塔的伤害显示与地图上显示NPC名字的脚本冲突！ - Project1

#==============================================================================
# 本脚本来自www.66rpg.com，转载、使用请保留此信息
#==============================================================================
# 作者：柳柳
#
# 使用方法：插入到main前即可，之后就会显示每个事件的名字。
# 不想显示名字的NPC直接把名字设置为一个空格就行了。
#
# 附加功能：名字颜色区分：比如一个NPC的名字是柳柳,2 就会用2号颜色(红色)显示
#
# 修改NPC名的方法：$game_map.events[事件ID编号].name =
# 比如某个宝箱，原名宝箱，打开后名为“打开的宝箱”，则
# $game_map.events[@event_id].name = "打开的宝箱" 或者
# $game_map.events[2].name = "打开的宝箱" (假设宝箱是2号事件)
#
# 修改颜色定义：70-88行，131-149行，自己随便改。
#
# 给主角带上名字：192行，改 "" 为 "主角" 或者 $game_party.actors[0].name 即可
#
# 是否显示姓名的开关：157行，开头的井号去掉。则以后39号开关打开的时候才会显示姓名
#
#==============================================================================
# ■ Game_Event
#------------------------------------------------------------------------------
# 　处理事件的类。条件判断、事件页的切换、并行处理、执行事件功能
# 在 Game_Map 类的内部使用。
#==============================================================================
class Game_Event < Game_Character
#——————————————————————————————————————
# 用来返回名称
#——————————————————————————————————————
def name
return @event.name
end
def name=(newname)
@event.name = newname
end
end
#==============================================================================
# ■ Sprite_Character
#------------------------------------------------------------------------------
# 　角色显示用脚本。监视 Game_Character 类的实例、
# 自动变化脚本状态。
#==============================================================================
class Sprite_Character < RPG::Sprite
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_accessor :character # 角色
#--------------------------------------------------------------------------
# ● 初始化对像
# viewport : 查看端口
# character : 角色 (Game_Character)
#--------------------------------------------------------------------------
def initialize(viewport, character = nil)
name = character.name
super(viewport)
@character = character
@namesprite = Sprite.new
@namesprite.bitmap = Bitmap.new(160, 48)
@namesprite.bitmap.font.name = "黑体"
@namesprite.bitmap.font.size = 16
@namesprite.bitmap.font.color.set(255, 255, 255)
@evname = name
@evname_split = name.split(/,/)[0]
if name[0, 2]=="EV"
@evname_split = " "
else
if name[0, 3]=="暗"
@evname_split = " "
else
if name=="dead"
@evname_split = " "
else
if name[0, 6]=="怪物"
@evname_split = "怪物"
else
if name[0, 6]=="尸体"
@evname_split = "尸体"
end
end
end
end
end
if name.split(/,/)[1] != nil
case name.split(/,/)[1]
when "0"
@namesprite.bitmap.font.color.set(255, 255, 255)
when "1"
@namesprite.bitmap.font.color.set(128, 128, 255)
when "2"
@namesprite.bitmap.font.color.set(255, 128, 128)
when "3"
@namesprite.bitmap.font.color.set(128, 255, 128)
when "4"
@namesprite.bitmap.font.color.set(128, 255, 255)
when "5"
@namesprite.bitmap.font.color.set(255, 128, 255)
when "6"
@namesprite.bitmap.font.color.set(255, 255, 128)
when "7"
@namesprite.bitmap.font.color.set(192, 192, 192)
else
@namesprite.bitmap.font.color.set(255, 255, 255)
end
end
if @evname_split != "" and @evname_split != nil
@namesprite.bitmap.draw_text(0, 0, 160, 36, @evname_split, 1)
end
update
end
#--------------------------------------------------------------------------
# ● 更新画面
#--------------------------------------------------------------------------
def update
super
# 元件 ID、文件名、色相与现在的情况存在差异的情况下
if @tile_id != @character.tile_id or
@character_name != @character.character_name or
@character_hue != @character.character_hue
# 记忆元件 ID 与文件名、色相
@tile_id = @character.tile_id
@character_name = @character.character_name
@character_hue = @character.character_hue
# 元件 ID 为有效值的情况下
if @tile_id >= 384
self.bitmap = RPG::Cache.tile($game_map.tileset_name,
@tile_id, @character.character_hue)
self.src_rect.set(0, 0, 32, 32)
self.ox = 16
self.oy = 32
# 元件 ID 为无效值的情况下
else
self.bitmap = RPG::Cache.character(@character.character_name,
@character.character_hue)
@cw = bitmap.width / 4
@ch = bitmap.height / 4
self.ox = @cw / 2
self.oy = @ch
end
end
if @evname != @character.name
@namesprite.bitmap.clear
@evname = @character.name
@evname_split = @character.name.split(/,/)[0]
if @character.name.split(/,/)[1] != nil
case @character.name.split(/,/)[1]
when "0"
@namesprite.bitmap.font.color.set(255, 255, 255)
when "1"
@namesprite.bitmap.font.color.set(128, 128, 255)
when "2"
@namesprite.bitmap.font.color.set(255, 128, 128)
when "3"
@namesprite.bitmap.font.color.set(128, 255, 128)
when "4"
@namesprite.bitmap.font.color.set(128, 255, 255)
when "5"
@namesprite.bitmap.font.color.set(255, 128, 255)
when "6"
@namesprite.bitmap.font.color.set(255, 255, 128)
when "7"
@namesprite.bitmap.font.color.set(192, 192, 192)
else
@namesprite.bitmap.font.color.set(255, 255, 255)
end
end
if @evname_split != "" and @evname_split != nil
@namesprite.bitmap.draw_text(0, 0, 160, 36, @evname_split, 1)
end
end
@namesprite.x = self.x-80
@namesprite.y = self.y-self.oy-24
#@namesprite.visible = $game_switches[39]
# 设置可视状态
self.visible = (not @character.transparent)
# 图形是角色的情况下
if @tile_id == 0
# 设置传送目标的矩形
sx = @character.pattern * @cw
sy = (@character.direction - 2) / 2 * @ch
self.src_rect.set(sx, sy, @cw, @ch)
end
# 设置脚本的坐标
self.x = @character.screen_x
self.y = @character.screen_y
self.z = @character.screen_z(@ch)
# 设置不透明度、合成方式、茂密
self.opacity = @character.opacity
self.blend_type = @character.blend_type
self.bush_depth = @character.bush_depth
# 动画
if @character.animation_id != 0
animation = $data_animations[@character.animation_id]
animation(animation, true)
@character.animation_id = 0
end
end
end
#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# 　处理主角的类。事件启动的判定、以及地图的滚动等功能。
# 本类的实例请参考 $game_player。
#==============================================================================
class Game_Player < Game_Character
def name
return ""
end
end
#==============================================================================
# 本脚本来自www.66rpg.com，转载、使用请保留此信息
#==============================================================================

复制代码

module RPG
class Sprite < ::Sprite
def initialize(viewport = nil)
super(viewport)
@_whiten_duration = 0
@_appear_duration = 0
@_escape_duration = 0
@_collapse_duration = 0
@_damage_duration = 0
@_animation_duration = 0
@_blink = false
###########################################################################
@_word_duration = 0 #(和上面保持阵形 = =|||)
###########################################################################
end
def dispose
dispose_damage
dispose_animation
dispose_loop_animation
###########################################################################
dispose_word
###########################################################################
super
end
def word(value) #本脚本63行 = =||| 众：“太恶劣了！太恶劣了！”
dispose_word #= =b 64行
bitmap = Bitmap.new(250, 48) #.....65
bitmap.font.name = "黑体" #注意字体
bitmap.font.size = 22 #字体大小
#bitmap.font.italic = true #这个是斜体一般可以不用
bitmap.font.color.set(0, 0, 0) #R G B
bitmap.draw_text(-1, 12-1, 250, 36, value, 1)
bitmap.draw_text(+1, 12-1, 250, 36, value, 1)
bitmap.draw_text(-1, 12+1, 250, 36, value, 1)
bitmap.draw_text(+1, 12+1, 250, 36, value, 1)
#颜色当然可以加很多只要你记得住 = =|||
case $word_color
when 0 #==
bitmap.font.color.set(255, 255, 255)
when 1 #==
bitmap.font.color.set(255, 0, 0)
when 2 #==
bitmap.font.color.set(0, 255, 0)
when 3 #==
bitmap.font.color.set(0, 0, 255)
when 4 # = =
bitmap.font.color.set(255, 255, 0)
when 5 #==
bitmap.font.color.set(255, 255, 255, 255)
when 6 #==
bitmap.font.color.set(128, 128, 255, 255)
when 7 #==
bitmap.font.color.set(255, 128, 128, 255)
when 8 #==
bitmap.font.color.set(128, 255, 128, 255)
when 9 #==
bitmap.font.color.set(128, 255, 255, 255)
when 10#==
bitmap.font.color.set(255, 128, 255, 255)
when 11#==
bitmap.font.color.set(255, 255, 128, 255)
when 12#==
bitmap.font.color.set(192, 192, 192, 255)
when 13#==
bitmap.font.color.set(0, 0, 0, 255)
when 14#==
bitmap.font.color.set(255, 50, 50, 255)
when 15#==
bitmap.font.color.set(128, 255, 128, 255)
when 16#==
bitmap.font.color.set(140, 140, 140, 255)
when 17#==
bitmap.font.color.set(255, 255, 0, 200)
when 18#==
bitmap.font.color.set(0, 255, 255, 255)
when 19#==
bitmap.font.color.set(119, 0, 255, 255)
when 20#==
bitmap.font.color.set(255, 255, 255, 255)
when 21#==
bitmap.font.color.set(128, 128, 255, 255)
when 22#==
bitmap.font.color.set(255, 128, 128, 255)
when 23#==
bitmap.font.color.set(128, 255, 128, 255)
when 24#==
bitmap.font.color.set(128, 255, 255, 255)
when 25#==
bitmap.font.color.set(255, 128, 255, 255)
when 26#==
bitmap.font.color.set(255, 255, 128, 255)
when 27#==
bitmap.font.color.set(192, 192, 192, 255)
end
bitmap.draw_text(0, 12, 250, 36, value, 1)
#那啥 = = 呃....94行
@_word_sprite = ::Sprite.new(self.viewport)
@_word_sprite.bitmap = bitmap
@_word_sprite.ox = 105
@_word_sprite.oy = 15
@_word_sprite.x = self.x - self.ox
@_word_sprite.y = self.y - self.oy
#Z坐标约等于层次值越大越在前
@_word_sprite.z = 3001
@_word_duration = 40
end
def dispose_word #善后工作 = =||| 收尸......
if @_word_sprite != nil
@_word_sprite.bitmap.dispose
@_word_sprite.dispose
@_word_sprite = nil
@_word_duration = 0
end
end
def update
super
if @_whiten_duration > 0
@_whiten_duration -= 1
self.color.alpha = 128 - (16 - @_whiten_duration) * 10
end
if @_appear_duration > 0
@_appear_duration -= 1
self.opacity = (16 - @_appear_duration) * 16
end
if @_escape_duration > 0
@_escape_duration -= 1
self.opacity = 256 - (32 - @_escape_duration) * 10
end
if @_collapse_duration > 0
@_collapse_duration -= 1
self.opacity = 256 - (48 - @_collapse_duration) * 6
end
if @_damage_duration > 0
@_damage_duration -= 1
case @_damage_duration
when 38..39
@_damage_sprite.y -= 4
when 36..37
@_damage_sprite.y -= 2
when 34..35
@_damage_sprite.y += 2
when 28..33
@_damage_sprite.y += 4
end
@_damage_sprite.opacity = 256 - (12 - @_damage_duration) * 32
if @_damage_duration == 0
dispose_damage
end
end
###########################################################################
#众："你小子要抄到什么时候？"
#众人使出了必杀：语法错误！
#Zapper充满恐惧的想要转身逃跑！
if @_word_duration > 0
@_word_duration -= 1
case @_word_duration
when 38..39
@_word_sprite.y -= 4
when 36..37
@_word_sprite.y -= 3
when 34..35
@_word_sprite.y -= 2
when 28..33
@_word_sprite.y -= 1
end
@_word_sprite.opacity = 256 - (12 - @_word_duration) * 32
if @_word_duration == 0
dispose_word #还记得那个善后工作么？
end
end
###########################################################################
if @_animation != nil and (Graphics.frame_count % 2 == 0)
@_animation_duration -= 1
update_animation
end
if @_loop_animation != nil and (Graphics.frame_count % 2 == 0)
update_loop_animation
@_loop_animation_index += 1
@_loop_animation_index %= @_loop_animation.frame_max
end
if @_blink
@_blink_count = (@_blink_count + 1) % 32
if @_blink_count < 16
alpha = (16 - @_blink_count) * 6
else
alpha = (@_blink_count - 16) * 6
end
self.color.set(255, 255, 255, alpha)
end
@@_animations.clear
end
end
end

复制代码

#==============================================================================
# ■ Sprite_Character
#------------------------------------------------------------------------------
# 　角色显示用脚本。监视 Game_Character 类的实例、
# 自动变化脚本状态。
#==============================================================================
class Sprite_Character < RPG::Sprite
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_accessor :character # 角色
#--------------------------------------------------------------------------
# ● 初始化对像
# viewport : 查看端口
# character : 角色 (Game_Character)
#--------------------------------------------------------------------------
def initialize(viewport, character = nil)
super(viewport)
@character = character
update
end
#--------------------------------------------------------------------------
# ● 更新画面
#--------------------------------------------------------------------------
def update
super
# RP魔塔伤害提示
if @character.talk == true
word(@character.word)
@character.word = ""
@character.talk = false
end
# 元件 ID、文件名、色相与现在的情况存在差异的情况下
if @tile_id != @character.tile_id or
@character_name != @character.character_name or
@character_hue != @character.character_hue
# 记忆元件 ID 与文件名、色相
@tile_id = @character.tile_id
@character_name = @character.character_name
@character_hue = @character.character_hue
# 元件 ID 为有效值的情况下
if @tile_id >= 384
self.bitmap = RPG::Cache.tile($game_map.tileset_name,
@tile_id, @character.character_hue)
self.src_rect.set(0, 0, 32, 32)
self.ox = 16
self.oy = 32
# 元件 ID 为无效值的情况下
else
self.bitmap = RPG::Cache.character(@character.character_name,
@character.character_hue)
@cw = bitmap.width / 4
@ch = bitmap.height / 4
self.ox = @cw / 2
self.oy = @ch
end
end
# 设置可视状态
self.visible = (not @character.transparent)
# 图形是角色的情况下
if @tile_id == 0
# 设置传送目标的矩形
sx = @character.pattern * @cw
sy = (@character.direction - 2) / 2 * @ch
self.src_rect.set(sx, sy, @cw, @ch)
end
# 设置脚本的坐标
self.x = @character.screen_x
self.y = @character.screen_y
self.z = @character.screen_z(@ch)
# 设置不透明度、合成方式、茂密
self.opacity = @character.opacity
self.blend_type = @character.blend_type
self.bush_depth = @character.bush_depth
# 动画
if @character.animation_id != 0
animation = $data_animations[@character.animation_id]
animation(animation, true)
@character.animation_id = 0
end
end
end

复制代码

#==============================================================================
# ■ Sprite_Battler
#------------------------------------------------------------------------------
# 　战斗显示用活动块。Game_Battler 类的实例监视、
# 活动块的状态的监视。
#==============================================================================
class Sprite_Battler < RPG::Sprite
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_accessor :battler # 战斗者
#--------------------------------------------------------------------------
# ● 初始化对像
# viewport : 显示端口
# battler : 战斗者 (Game_Battler)
#--------------------------------------------------------------------------
def initialize(viewport, battler = nil)
super(viewport)
@battler = battler
@battler_visible = false
end
#--------------------------------------------------------------------------
# ● 释放
#--------------------------------------------------------------------------
def dispose
if self.bitmap != nil
self.bitmap.dispose
end
super
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
super
# 战斗者为 nil 的情况下
if @battler == nil
self.bitmap = nil
loop_animation(nil)
return
end
# 文件名和色相与当前情况有差异的情况下
if @battler.battler_name != @battler_name or
@battler.battler_hue != @battler_hue
# 获取、设置位图
@battler_name = @battler.battler_name
@battler_hue = @battler.battler_hue
self.bitmap = RPG::Cache.battler(@battler_name, @battler_hue)
@width = bitmap.width
@height = bitmap.height
self.ox = @width / 2
self.oy = @height
# 如果是战斗不能或者是隐藏状态就把透明度设置成 0
if @battler.dead? or @battler.hidden
self.opacity = 0
end
end
# 动画 ID 与当前的情况有差异的情况下
if @battler.damage == nil and
@battler.state_animation_id != @state_animation_id
@state_animation_id = @battler.state_animation_id
loop_animation($data_animations[@state_animation_id])
end
# 应该被显示的角色的情况下
if @battler.is_a?(Game_Actor) and @battler_visible
# 不是主状态的时候稍稍降低点透明度
if $game_temp.battle_main_phase
self.opacity += 3 if self.opacity < 255
else
self.opacity -= 3 if self.opacity > 207
end
end
# 明灭
if @battler.blink
blink_on
else
blink_off
end
# 不可见的情况下
unless @battler_visible
# 出现
if not @battler.hidden and not @battler.dead? and
(@battler.damage == nil or @battler.damage_pop)
appear
@battler_visible = true
end
end
# 可见的情况下
if @battler_visible
# 逃跑
if @battler.hidden
$game_system.se_play($data_system.escape_se)
escape
@battler_visible = false
end
# 白色闪烁
if @battler.white_flash
whiten
@battler.white_flash = false
end
# 动画
if @battler.animation_id != 0
animation = $data_animations[@battler.animation_id]
animation(animation, @battler.animation_hit)
@battler.animation_id = 0
end
# 伤害
if @battler.damage_pop
damage(@battler.damage, @battler.critical)
@battler.damage = nil
@battler.critical = false
@battler.damage_pop = false
end
# korapusu
if @battler.damage == nil and @battler.dead?
if @battler.is_a?(Game_Enemy)
$game_system.se_play($data_system.enemy_collapse_se)
else
$game_system.se_play($data_system.actor_collapse_se)
end
collapse
@battler_visible = false
end
end
# 设置活动块的坐标
self.x = @battler.screen_x
self.y = @battler.screen_y
self.z = @battler.screen_z
end
end

复制代码

#==============================================================================
# ■ Game_Character (分割定义 1)
#------------------------------------------------------------------------------
# 　处理角色的类。本类作为 Game_Player 类与 Game_Event
# 类的超级类使用。
#==============================================================================
class Game_Character
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :id # ID
attr_reader :x # 地图 X 坐标 (理论坐标)
attr_reader :y # 地图 Y 坐标 (理论坐标)
attr_reader :real_x # 地图 X 坐标 (实际坐标 * 128)
attr_reader :real_y # 地图 Y 坐标 (实际坐标 * 128)
attr_reader :tile_id # 元件 ID (0 为无效)
attr_accessor :character_name # 角色文件名
attr_reader :character_hue # 角色色相
attr_reader :opacity # 不透明度
attr_reader :blend_type # 合成方式
attr_reader :direction # 朝向
attr_reader :pattern # 图案
attr_reader :move_route_forcing # 移动路线强制标志
attr_reader :through # 穿透
attr_accessor :animation_id # 动画 ID
attr_accessor :transparent # 透明状态
attr_accessor :talk # 显示伤害标志
attr_accessor :word # 伤害值
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
@id = 0
@x = 0
@y = 0
@real_x = 0
@real_y = 0
@tile_id = 0
@character_name = ""
@character_hue = 0
@opacity = 255
@blend_type = 0
@direction = 2
@pattern = 0
@move_route_forcing = false
@through = false
@animation_id = 0
@transparent = false
@original_direction = 2
@original_pattern = 0
@move_type = 0
@move_speed = 4
@move_frequency = 6
@move_route = nil
@move_route_index = 0
@original_move_route = nil
@original_move_route_index = 0
@walk_anime = true
@step_anime = false
@direction_fix = false
@always_on_top = false
@anime_count = 0
@stop_count = 0
@jump_count = 0
@jump_peak = 0
@wait_count = 0
@locked = false
@prelock_direction = 0
@talk = false
@word = ""
end
#--------------------------------------------------------------------------
# ● 移动中判定
#--------------------------------------------------------------------------
def moving?
# 如果在移动中理论坐标与实际坐标不同
return (@real_x != @x * 128 or @real_y != @y * 128)
end
#--------------------------------------------------------------------------
# ● 跳跃中判定
#--------------------------------------------------------------------------
def jumping?
# 如果跳跃中跳跃点数比 0 大
return @jump_count > 0
end
#--------------------------------------------------------------------------
# ● 矫正姿势
#--------------------------------------------------------------------------
def straighten
# 移动时动画以及停止动画为 ON 的情况下
if @walk_anime or @step_anime
# 设置图形为 0
@pattern = 0
end
# 清除动画计数
@anime_count = 0
# 清除被锁定的向前朝向
@prelock_direction = 0
end
#--------------------------------------------------------------------------
# ● 强制移动路线
# move_route : 新的移动路线
#--------------------------------------------------------------------------
def force_move_route(move_route)
# 保存原来的移动路线
if @original_move_route == nil
@original_move_route = @move_route
@original_move_route_index = @move_route_index
end
# 更改移动路线
@move_route = move_route
@move_route_index = 0
# 设置强制移动路线标志
@move_route_forcing = true
# 清除被锁定的向前朝向
@prelock_direction = 0
# 清除等待计数
@wait_count = 0
# 自定义移动
move_type_custom
end
#--------------------------------------------------------------------------
# ● 可以通行判定
# x : X 坐标
# y : Y 坐标
# d : 方向 (0,2,4,6,8) ※ 0 = 全方向不能通行的情况判定 (跳跃用)
#--------------------------------------------------------------------------
def passable?(x, y, d)
# 求得新的坐标
new_x = x + (d == 6 ? 1 : d == 4 ? -1 : 0)
new_y = y + (d == 2 ? 1 : d == 8 ? -1 : 0)
#1不能向下、2不能向左、4不能向右、8不能向上
###以下增加图块中箭头方向的指向功能###箭头画在第3层
@tu_id=$game_map.data[x,y,2]
if $game_map.have_an_event?(x,y)
@iid=$game_map.check_event(x,y)
@tu_id=$game_map.events[@iid].tile_id
end#if表示事件采用图片时的情况
@tunew_id=$game_map.data[new_x,new_y,2]
if $game_map.have_an_event?(new_x,new_y)
@iid=$game_map.check_event(new_x,new_y)
@tunew_id=$game_map.events[@iid].tile_id
end#if表示事件采用图片时的情况
v=$game_variables[85]
if @tu_id==v[9]#当前坐标为黑框时
if d==2 and (@tunew_id==v[0] or @tunew_id==v[4])
return false#向上同时新坐标为向下箭头那么也不能出去
end
if d==8 and (@tunew_id==v[1] or @tunew_id==v[5])
return false#向下新坐标为向上箭头
end
if d==6 and (@tunew_id==v[2] or @tunew_id==v[6])
return false#向右新坐标为向左箭头
end
if d==4 and (@tunew_id==v[3] or @tunew_id==v[7])
return false#向左新坐标为向右箭头
end
$data_tilesets[1].passages[@tu_id]=0#将黑框通行设为全向
end
case @tunew_id
when v[0]#新坐标为向上箭头
if d!=2#主角不是向下的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向上箭头且主角不是向上前进
else
return true
end
else
return false
end
when v[1]#新坐标为向下箭头
if d!=8#主角不是向上的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向下箭头且主角不是向下前进
else
return true
end
else
return false
end
when v[2]#新坐标为向左箭头
if d!=6#主角不是向右的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向左箭头且主角不是向左前进
else
return true
end
else
return false
end
when v[3]#新坐标为向右箭头
if d!=4#主角不是向左的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向右箭头且主角不是向右前进
else
return true
end
else
return false
end
#以下四个为可以两两交换的箭头标记
when v[4]#新坐标为向上箭头
if d!=2#主角不是向下的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向上箭头且主角不是向上前进
else
return true
end
else
return false
end
when v[5]#新坐标为向下箭头
if d!=8#主角不是向上的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向下箭头且主角不是向下前进
else
return true
end
else
return false
end
when v[6]#新坐标为向左箭头
if d!=6#主角不是向右的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向左箭头且主角不是向左前进
else
return true
end
else
return false
end
when v[7]#新坐标为向右箭头
if d!=4#主角不是向左的情况
if ((@tu_id==v[0] or @tu_id==v[4]) and d!=8) or ((@tu_id==v[1] or @tu_id==v[5]) and d!=2) or ((@tu_id==v[2] or @tu_id==v[6]) and d!=4) or ((@tu_id==v[3] or @tu_id==v[7]) and d!=6)
return false#当前坐标也为向右箭头且主角不是向右前进
else
return true
end
else
return false
end
###上一段在踩上箭头后设置通行只可沿箭头方向前进###
#使用楼层范围变量来定位
when v[8]#菱形标志，双箭头转换
for i in $game_variables[90][0]...$game_variables[90][0]+$game_variables[90][1]
for j in $game_variables[90][2]...$game_variables[90][2]+$game_variables[90][3]
case $game_map.data[i,j,2]
when v[4]
$game_map.data[i,j,2]=v[5]
when v[5]
$game_map.data[i,j,2]=v[4]
when v[6]
$game_map.data[i,j,2]=v[7]
when v[7]
$game_map.data[i,j,2]=v[6]
end
end
end
when v[9]#黑框不可进入，但可以出去
#$data_tilesets[1].passages[@tunew_id]=15
return false#新坐标为黑框则不能通行
end
###以上增加图块中箭头方向的指向功能###箭头画在第3层
# 坐标在地图以外的情况
unless $game_map.valid?(new_x, new_y)
# 不能通行
return false
end
# 穿透是 ON 的情况下
if @through
# 可以通行
return true
end
# 移动者的元件无法来到指定方向的情况下
unless $game_map.passable?(x, y, d, self)
# 通行不可
return false
end
# 从指定方向不能进入到移动处的元件的情况下
unless $game_map.passable?(new_x, new_y, 10 - d)
# 不能通行
return false
end
# 循环全部事件
for event in $game_map.events.values
# 事件坐标于移动目标坐标一致的情况下
if event.x == new_x and event.y == new_y
# 穿透为 ON
unless event.through
# 自己就是事件的情况下
if self != $game_player
# 不能通行
return false
end
# 自己是主角、对方的图形是角色的情况下
if event.character_name != ""
# 不能通行
return false
end
end
end
end
# 主角的坐标与移动目标坐标一致的情况下
if $game_player.x == new_x and $game_player.y == new_y
# 穿透为 ON
unless $game_player.through
# 自己的图形是角色的情况下
if @character_name != ""
# 不能通行
return false
end
end
end
# 可以通行
return true
end
#--------------------------------------------------------------------------
# ● 锁定
#--------------------------------------------------------------------------
def lock
# 如果已经被锁定的情况下
if @locked
# 过程结束
return
end
# 保存锁定前的朝向
@prelock_direction = @direction
# 保存主角的朝向
turn_toward_player
# 设置锁定中标志
@locked = true
end
#--------------------------------------------------------------------------
# ● 锁定中判定
#--------------------------------------------------------------------------
def lock?
return @locked
end
#--------------------------------------------------------------------------
# ● 解除锁定
#--------------------------------------------------------------------------
def unlock
# 没有锁定的情况下
unless @locked
# 过程结束
return
end
# 清除锁定中标志
@locked = false
# 没有固定朝向的情况下
unless @direction_fix
# 如果保存了锁定前的方向
if @prelock_direction != 0
# 还原为锁定前的方向
@direction = @prelock_direction
end
end
end
#--------------------------------------------------------------------------
# ● 移动到指定位置
# x : X 坐标
# y : Y 坐标
#--------------------------------------------------------------------------
def moveto(x, y)
@x = x % $game_map.width
@y = y % $game_map.height
@real_x = @x * 128
@real_y = @y * 128
@prelock_direction = 0
end
#--------------------------------------------------------------------------
# ● 获取画面 X 坐标
#--------------------------------------------------------------------------
def screen_x
# 通过实际坐标和地图的显示位置来求得画面坐标
return (@real_x - $game_map.display_x + 3) / 4 + 16
end
#--------------------------------------------------------------------------
# ● 获取画面 Y 坐标
#--------------------------------------------------------------------------
def screen_y
# 通过实际坐标和地图的显示位置来求得画面坐标
y = (@real_y - $game_map.display_y + 3) / 4 + 32
# 取跳跃计数小的 Y 坐标
if @jump_count >= @jump_peak
n = @jump_count - @jump_peak
else
n = @jump_peak - @jump_count
end
return y - (@jump_peak * @jump_peak - n * n) / 2
end
#--------------------------------------------------------------------------
# ● 获取画面 Z 坐标
# height : 角色的高度
#--------------------------------------------------------------------------
def screen_z(height = 0)
# 在最前显示的标志为 ON 的情况下
if @always_on_top
# 无条件设置为 999
return 999
end
# 通过实际坐标和地图的显示位置来求得画面坐标
z = (@real_y - $game_map.display_y + 3) / 4 + 32
# 元件的情况下
if @tile_id > 0
# 元件的优先不足 * 32
return z + $game_map.priorities[@tile_id] * 32
# 角色的场合
else
# 如果高度超过 32 就判定为满足 31
return z + ((height > 32) ? 31 : 0)
end
end
#--------------------------------------------------------------------------
# ● 取得茂密
#--------------------------------------------------------------------------
def bush_depth
# 是元件、并且在最前显示为 ON 的情况下
if @tile_id > 0 or @always_on_top
return 0
end
# 以跳跃中以外要是繁茂处属性的元件为 12，除此之外为 0
if @jump_count == 0 and $game_map.bush?(@x, @y)
return 12
else
return 0
end
end
#--------------------------------------------------------------------------
# ● 取得地形标记
#--------------------------------------------------------------------------
def terrain_tag
return $game_map.terrain_tag(@x, @y)
end
end

复制代码