赞 | 0 |
VIP | 0 |
好人卡 | 0 |
积分 | 1 |
经验 | 1374 |
最后登录 | 2013-3-28 |
在线时间 | 1 小时 |
Lv1.梦旅人
- 梦石
- 0
- 星屑
- 50
- 在线时间
- 1 小时
- 注册时间
- 2008-1-22
- 帖子
- 95
|
这个应该符合楼主的意思吧
http://rpg.blue/web/htm/news325.htm
这个大同小异应该也可以
#================================================
# ■ Window_Pos
#================================================
class Window_Pos < Window_Base
#------------------------------------------------
# ● 初始化
#------------------------------------------------
def initialize
super(0, 0, 122, 52)
self.z = 151
self.contents.font.size = 20
refresh
end
#------------------------------------------------
# ● 刷新
#------------------------------------------------
def refresh
self.contents.clear
self.contents.font.color = system_color
@x,@y = $game_player.x,$game_player.y
self.contents.draw_text(0, 0, 90, 20, "(#{@x},#{@y})", 1)
end
#------------------------------------------------
# ● 更新
#------------------------------------------------
def update
return if $game_player.x == @x and $game_player.y == @y
refresh
end
end
#================================================
# ■ Window_MapName
#================================================
class Window_MapName < Window_Base
#------------------------------------------------
# ● 初始化
#------------------------------------------------
def initialize
@map_id = $game_map.map_id
super(0, 0, 182, 52)
self.contents.font.size = 20
self.z = 151
refresh
end
#------------------------------------------------
# ● 刷新
#------------------------------------------------
def refresh
self.opacity = 255
self.contents_opacity = 255
name = $data_mapinfos[@map_id].name
width = self.contents.text_size(name).width
height = self.contents.text_size(name).height
self.width = width + 32
self.height = height + 32
self.contents = Bitmap.new(width, height)
self.contents.font.size = 20
self.x = (Graphics.width - self.width) / 2
self.y = (Graphics.height - self.height) / 2
self.contents.font.color = system_color
self.contents.draw_text(0, 0, width, 20, name, 1)
end
#------------------------------------------------
# ● 更新
#------------------------------------------------
def update
if $game_map.map_id != @map_id
@map_id = $game_map.map_id
refresh
self.opacity = 255
self.contents_opacity = 255
end
return if self.opacity == 0
self.opacity -= 5
self.contents_opacity -= 5
end
end
class Scene_Title < Scene_Base
#------------------------------------------------
# ● 数据库载入
#------------------------------------------------
alias old_ld load_database
def load_database
old_ld
$data_mapinfos = load_data("Data/MapInfos.rvdata")
end
end
class Scene_Map < Scene_Base
#------------------------------------------------
# ● 开始
#------------------------------------------------
alias old_start start
def start
old_start
@pos_window = Window_Pos.new
@mapname_window = Window_MapName.new
end
#------------------------------------------------
# ● 结束
#------------------------------------------------
alias old_ter terminate
def terminate
old_ter
@pos_window.dispose
@mapname_window.dispose
end
#------------------------------------------------
# ● 更新
#------------------------------------------------
alias old_update update
def update
old_update
@pos_window.update
@mapname_window.update
end
end
系统信息:本贴由本区版主认可为正确答案,66RPG感谢您的热情解答~ |
|