| 赞 | 0 |
| VIP | 0 |
| 好人卡 | 1 |
| 积分 | 1 |
| 经验 | 895 |
| 最后登录 | 2020-5-5 |
| 在线时间 | 16 小时 |
Lv1.梦旅人
- 梦石
- 0
- 星屑
- 55
- 在线时间
- 16 小时
- 注册时间
- 2008-6-30
- 帖子
- 105
|
re:主题：《为什么显小地图的脚本和显坐标的脚本不能同时起作用》
以下引用hgfor于2008-12-21 9:02:36的发言：
试试这个小地图
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
不是没有小地图，是两个脚本放在一起小地图就不显示了
#冬夜更新说明
#更改了小地图的位置，Q是开启小地图跟随开关
#S是固定小地图位置
#更新了场所移动时地图的不同步，更新了战斗后的地图不同步
#小地图默认成为FLASE，只在第一次登入时是，以后跟随开关的指示
#恩恩
#最后更新，测试过
#修正了由于小地图变化引起的不能转换问题，修休整了房间内的地图原先的那个羁押功能
#==============================================================================
# ■ 縮小地图的表示(ver 0.999)
# by ピニョン clum-sea
#==============================================================================
#==============================================================================
# □ 前期定义
#==============================================================================
module PLAN_Map_Window
WIN_X = 0 # 地图的 X 座標
WIN_Y = 0 # 地图的 Y 座標
WIN_WIDTH = 250 # 地图的宽度
WIN_HEIGHT = 200 # 地图的高度
ZOOM = 3.5 # 地图的放缩比例
WINDOWSKIN = "" # 自定义地图窗口素材，如果留空则是默认的
ON_OFF_KEY = Input::L # 打开地图的按钮，L就是键盘的Q键
SWITCH = 1 # 禁用地图功能的开关，默认这个就是打开100号开关则禁止
# 使用地图功能，关闭则可以使用地图功能
WINDOW_MOVE = true # 窗口中的地图跟随移动，(true:跟随, false:固定)
OVER_X = 632 - WIN_WIDTH # 移動后的 X 座標(初期位置と往復します)
OVER_Y = 0 # 移動后的 Y 座標(初期位置と往復します)
OPACITY = 255 # 窗口的透明度
C_OPACITY = 255 # 地图的透明度
VISIBLE = false # 最初是否可见
SWITCH_KEY = Input::L # Q键锁定/解锁小地图
end
#==============================================================================
# ■ Game_Temp
#==============================================================================
class Game_Temp
attr_accessor :map_visible # 地图的表示状態
end
#==============================================================================
# ■ Scene_Map
#==============================================================================
class Scene_Map
#--------------------------------------------------------------------------
# ● 主处理
#--------------------------------------------------------------------------
alias plan_map_window_main main
def main
$小地图 = false
@map_window = Window_Map.new
@map_window.visible = $game_switches[406]
plan_map_window_main
@map_window.dispose
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
alias plan_map_window_update update
def update
$game_temp.map_visible = @map_window.visible
plan_map_window_update
if $game_switches[PLAN_Map_Window::SWITCH]
if @map_window.visible
@map_window.visible = false
$game_switches[406] = false
$game_switches[405] = false
$game_variables[19] = $direction
$地图关闭 = true
end
else
if $地图关闭
@map_window.visible = true
$game_switches[406] = true
$地图关闭 = false
end
if !$game_temp.in_battle
if Input.trigger?(PLAN_Map_Window::ON_OFF_KEY)
if @map_window.visible
$game_system.se_play($data_system.cancel_se)
@map_window.visible = false
$game_switches[406] = false
$game_switches[405] = false
$game_variables[19] = $direction
else
$game_system.se_play($data_system.decision_se)
@map_window.visible = true
$game_switches[406] = true
end
end
if Input.trigger?(PLAN_Map_Window::SWITCH_KEY)
if @map_window.visible
if $game_switches[405]
$game_system.se_play($data_system.cancel_se)
$game_switches[405] = false
$game_variables[19] = $direction
else
$game_system.se_play($data_system.decision_se)
$game_switches[405] = true
end
end
end
end
end
if @map_window.visible
@map_window.update
end
end
#--------------------------------------------------------------------------
# ● 场所移动的变化
#--------------------------------------------------------------------------
alias plan_map_window_transfer_player transfer_player
def transfer_player
# visible = @map_window.visible
@map_window.visible = false
plan_map_window_transfer_player
@map_window.dispose
@map_window = Window_Map.new
end
end
#==============================================================================
# ■ Window_Map
#==============================================================================
class Window_Map < Window_Base
#--------------------------------------------------------------------------
# ● 初始化
#--------------------------------------------------------------------------
def initialize
$direction = $game_variables[19]
if $win_x != nil
x = $win_x
y = $win_y
else
case $direction
when 0
x = 0
y = 0
$win_x = x
$win_y = y
when 1
x = 382
y = 8
$win_x = x
$win_y = y
when 2
x = 8
y = 280 - 8
$win_x = x
$win_y = y
when 3
x = 382
y = 280 - 8
$win_x = x
$win_y = y
end
end
w = PLAN_Map_Window::WIN_WIDTH
h = PLAN_Map_Window::WIN_HEIGHT
$小地图 = true
super(x, y, w, h)
$小地图 = false
# @windowskin_name = $game_system.windowskin_name
# self.windowskin = RPG::Cache.windowskin(@windowskin_name)
self.contents = Bitmap.new(width - 32, height - 32)
self.opacity = PLAN_Map_Window::OPACITY
self.contents_opacity = PLAN_Map_Window::C_OPACITY
@map_data = $game_map.data
@tileset = RPG::Cache.tileset($game_map.tileset_name)
@autotiles = []
for i in 0..6
autotile_name = $game_map.autotile_names
@autotiles = RPG::Cache.autotile(autotile_name)
end
@old_real_x = $game_player.real_x
@old_real_y = $game_player.real_y
if $game_map.width > 70 or $game_map.height > 70
$ZOOM = 2 * PLAN_Map_Window::ZOOM
else
if $game_map.width < 40 or $game_map.height < 40
$ZOOM = PLAN_Map_Window::ZOOM / 2
else
$ZOOM = PLAN_Map_Window::ZOOM
end
end
@all_map = make_all_map
self.visible = $game_switches[406]
unless PLAN_Map_Window::WINDOWSKIN.empty?
self.windowskin = RPG::Cache.windowskin("")
end
# PLAN_Map_Window::WINDOWSKIN
# self.visible = PLAN_Map_Window::VISIBLE
refresh
end
#--------------------------------------------------------------------------
# ● 缩小图做成
#--------------------------------------------------------------------------
def make_all_map
all_map = Bitmap.new($game_map.width * 32, $game_map.height * 32)
for y in 0...$game_map.height
for x in 0...$game_map.width
for z in 0...3
tile_num = @map_data[x, y, z]
next if tile_num == nil
if tile_num < 384
if tile_num >= 48
tile_num -= 48
src_rect = Rect.new(32, 2 * 32, 32, 32)
all_map.blt(x * 32, y * 32, @autotiles[tile_num / 48], src_rect)
end
else
tile_num -= 384
src_rect = Rect.new(tile_num % 8 * 32, tile_num / 8 * 32, 32, 32)
all_map.blt(x * 32, y * 32, @tileset, src_rect)
end
end
end
end
w = ($game_map.width / $ZOOM) * 32
h = ($game_map.height / $ZOOM) * 32
ret_bitmap = Bitmap.new(w, h)
src_rect = Rect.new(0, 0, all_map.width, all_map.height)
dest_rect = Rect.new(0, 0, ret_bitmap.width, ret_bitmap.height)
ret_bitmap.stretch_blt(dest_rect, all_map, src_rect)
all_map.dispose
return ret_bitmap
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
self.x = $win_x
self.y = $win_y
self.z = 9999 # 让窗口在最上层
@small_map = false
if $game_map.width < 80 or $game_map.height < 80
#这个是当地图大小宽和高小于指定大小时才改变大小，限制小地图窗口大小
if $game_map.width < 40 or $game_map.height < 40
#这同时限制了变换小地图的大小，防止关卡和队长办公室因为地图宽长无法切换
self.width = [@all_map.width,200].min
self.height = [@all_map.height,200].min
self.contents = Bitmap.new(width-32, height-32)
#让改变的小地图X坐标紧贴边缘
if self.x + self.width > 250
self.x = 625 - self.width
end
#让改变的小地图Y左边紧贴边缘
if self.y + self.height > 380
self.y = 470 - self.height
end
@small_map = true
end
end
if self.windowskin == nil
@windowskin_name = $game_system.windowskin_name
self.windowskin = RPG::Cache.windowskin(@windowskin_name)
end
one_tile_size = 32 / $ZOOM
x = $game_player.real_x - 128 * (self.contents.width / one_tile_size) / 2
y = $game_player.real_y - 128 * (self.contents.height / one_tile_size) / 2
x = x * one_tile_size / 128
y = y * one_tile_size / 128
half_width = self.contents.width * 128 / 2
rest_width = ($game_map.width * 128 - $game_player.real_x) * one_tile_size
rev_x = 0
if @all_map.width < self.contents.width
rev_x = (half_width - $game_player.real_x * one_tile_size) / 128
rev_x -= (self.contents.width - @all_map.width) / 2
x += rev_x
elsif half_width > $game_player.real_x * one_tile_size
rev_x = (half_width - $game_player.real_x * one_tile_size) / 128
x += rev_x
elsif half_width > rest_width
rev_x = -((half_width - rest_width) / 128)
x += rev_x
end
half_height = self.contents.height * 128 / 2
rest_height = ($game_map.height * 128 - $game_player.real_y) * one_tile_size
rev_y = 0
if @all_map.height < self.contents.height
rev_y = (half_height - $game_player.real_y * one_tile_size) / 128
rev_y -= (self.contents.height - @all_map.height) / 2
y += rev_y
elsif half_height > $game_player.real_y * one_tile_size
rev_y = (half_height - $game_player.real_y * one_tile_size) / 128
y += rev_y
elsif half_height > rest_height
rev_y = -((half_height - rest_height) / 128)
y += rev_y
end
src_rect = Rect.new(x, y, self.contents.width, self.contents.height)
self.contents.blt(0, 0, @all_map, src_rect)
if PLAN_Map_Window::WINDOW_MOVE == true
w = self.x - 32 .. self.x + self.width + 32
h = self.y - 64 .. self.y + self.height + 64
if w === $game_player.screen_x and h === $game_player.screen_y
if !@small_map
case self.x
when 8
self.x = 382
when 382
self.x = 8
end
case self.y
when 272
self.y = 8
when 8
self.y = 272
end
else
case self.x
when 625 - self.width
self.x = 8
when 8
self.x = 625 - self.width
end
case self.y
when 470 - self.height
self.y = 8
when 8
self.y = 470 - self.height
end
end
end
end
#主角位置
if $game_party.actors.size > 0
# for i in [2, 1, 0]
# tile = @map_data[$game_player.x, $game_player.y, i]
# next if tile == 0
# return if $game_map.priorities[tile] > 0
# end
actor = $game_party.actors[0]
bitmap = RPG::Cache.character(actor.character_name, actor.character_hue)
width = bitmap.width/ 4
height = bitmap.height / 4
sy = ($game_player.direction - 2) / 2 * height
#原始行走图大小矩形
src_rect = Rect.new(0, sy, width, height)
if $ZOOM > 7
w = width / 5
h = height / 5
else
w = width / $ZOOM
h = height / $ZOOM
end
x = self.contents.width / 2 - w / 2 + one_tile_size / 2 - rev_x
y = self.contents.height / 2 - h / 2 - rev_y
#小地图上的行走图大小
dest_rect = Rect.new(x, y, w, h)
self.contents.stretch_blt(dest_rect, bitmap, src_rect)
end
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
super
if @old_real_x != $game_player.real_x or @old_real_y != $game_player.real_y
@old_real_x = $game_player.real_x
@old_real_y = $game_player.real_y
refresh
end
end
#--------------------------------------------------------------------------
# ● 解放
#--------------------------------------------------------------------------
def dispose
super
@all_map.dispose
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
|
|
楼主: heronba
[复制链接]
写轮眼
发表于 2008-12-20 23:56:35
楼主
