赞 | 0 |
VIP | 0 |
好人卡 | 0 |
积分 | 1 |
经验 | 11219 |
最后登录 | 2012-8-9 |
在线时间 | 698 小时 |
Lv1.梦旅人
- 梦石
- 0
- 星屑
- 145
- 在线时间
- 698 小时
- 注册时间
- 2009-11-15
- 帖子
- 538
|
5楼
楼主 |
发表于 2011-3-26 21:23:30
|
只看该作者
回复 忧雪の伤 的帖子
$biaoti = 0
#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================
#格式:显示的cmd图片的命名格式为:
# cmd调用公共事件编号_名字
# cmd调用公共事件编号_名字_02 # 此为鼠标经过的图片
#
#即,带有cmd的为可以点击的图片,点击后执行相应的公共事件.....
#不带cmd的图片没任何影响。。。
#==============================================================================
class Game_Picture
def name=(str)
@name = str
end
end
class Sprite_Picture
alias update_old update
def update
update_old
begin
return if @picture_name[/com/].nil? or @picture_name == ""
rescue
return
end
mx,my = Mouse.get_mouse_pos
lx = self.x - self.ox
rx = lx + self.bitmap.width
ty = self.y - self.oy
by = ty + self.bitmap.height
if mx < lx or mx > rx or my < ty or my > by or
self.bitmap.get_pixel(mx-lx,my-ty).alpha == 0
@picture.name = @picture.name.split(/_/)[0]+"_"[email protected](/_/)[1]
return
end
if @picture.name.split(/_/)[2].nil?
picname = @picture.name + "_02"
#第2张图片不存在的时候不显示
if FileTest.exist?("Graphics/Pictures/#{picname}.png")
@picture.name = picname
picname2 = @picture.name.split(/_/)[1] + "map"
if FileTest.exist?("Graphics/Pictures/#{picname2}.png")
$mapname = picname2
end
end
end
#对话框存在的时候不启动事件
if Mouse.trigger?(Mouse::LEFT) and !$game_system.map_interpreter.running? and $biaoti == 0
@picture.name.split(/_/)[0].sub(/com([0-9]+)/,"")
$game_temp.common_event_id = $1.to_i
end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================
|
|