【1V悬赏】麻烦把这个得失物品脚本改成用图片来显示原来的

吸血鬼之妻 · 发表于 2012-9-7 19:23:36

本帖最后由吸血鬼之妻于 2012-10-3 17:21 编辑

#==============================================================================
# 本腳本來自www.66RPG.com，使用和轉載請保留此信息
#==============================================================================
# 注意！！！在對話後得到物品，請在對話後先用事件等待3幀，否則對話框來不及消失。
# 開關定義：
$noshowgold = 98 # 不显示金钱得失
$noshowitem = 99 # 不显示物品得失
$noshowweapon = 96 # 不显示武器得失
$noshowarmor = 97 # 不显示防具得失
# 以上開關，當打開的時候，獲得物品將不會提示，比如默認打開41號開關，獲得金錢不再提示
# 不想提示等级升降时，就在事件命令直接选择是否显示就行了。
#——聲效，可以自己改
folder = "Audio/SE/"
$gain_gold_se = folder +"Shop" # 获得金钱声效
$loss_gold_se = folder +"Blow2" # 失去金钱声效
$gain_item_se = folder +"Item1" # 获得物品声效
$loss_item_se = folder +"Blow2" # 失去物品声效
$gain_weapon_se = folder +"Item1" # 获得武器声效
$loss_weapon_se = folder +"Blow2" # 失去武器声效
$gain_armor_se = folder +"Item1" # 获得防具声效
$loss_armor_se = folder +"Blow2" # 失去防具声效
$gain_lv_se = folder +"Item1" # 提升等级声效
$loss_lv_se = folder +"Blow2" # 降低等级声效
# ————————————————————————————————————
class Game_Interpreter
#--------------------------------------------------------------------------
# ● 增減金錢
#--------------------------------------------------------------------------
def command_125
value = operate_value(@params[0], @params[1], @params[2])
$game_party.gain_gold(value)
if $game_switches[$noshowgold]==false
show_gain_window(0, value)
end
return true
end
#--------------------------------------------------------------------------
# ● 增減物品
#--------------------------------------------------------------------------
def command_126
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_items[@params[0]], value)
if $game_switches[$noshowitem]==false
show_gain_window(1, value)
end
$game_map.need_refresh = true
return true
end
#--------------------------------------------------------------------------
# ● 增減武器
#--------------------------------------------------------------------------
#--------------------------------------------------------------------------
# ● 增減防具
#--------------------------------------------------------------------------
#--------------------------------------------------------------------------
# ● 等级増減
#--------------------------------------------------------------------------
def command_316
value = operate_value(@params[1], @params[2], @params[3])
iterate_actor_id(@params[0]) do |actor|
actor.change_level(actor.level + value, false)
if @params[4]
show_gain_level_window(actor,value)
end
end
return true
end
def show_gain_window(type, value)
snstar2006_66rpg_item = $data_armors[@params[0]]
snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
if value >= 0
gain_text = "獲得"
else
gain_text = "失去"
end
case type
when 0
gain_type = "金錢"
if value >=0
Audio.se_play($gain_gold_se,80,100)
else
Audio.se_play("Audio/SE/"+"Item1",80,100)
end
when 1
gain_type = "物品"
string = $data_items[@params[0]]
if value >=0
Audio.se_play($gain_item_se,80,100)
else
Audio.se_play($loss_item_se,80,100)
end
when 2
gain_type = "武器"
string = $base_weapons[@params[0]]
if value >=0
Audio.se_play($gain_weapon_se,80,100)
else
Audio.se_play($loss_weapon_se,80,100)
end
when 3
gain_type = "防具"
string = $base_armors[@params[0]]
if value >=0
Audio.se_play($gain_armor_se,80,100)
else
Audio.se_play($loss_armor_se,80,100)
end
end
snstar2006_66rpg.contents.draw_text(0,0,160,32,gain_text+gain_type+"：")
unless type == 0
snstar2006_66rpg.draw_item_name(string, 28, 32, true)
snstar2006_66rpg.contents.draw_text(0, 32, 150, 32, "×"+value.abs.to_s, 2)
else
snstar2006_66rpg.contents.draw_text(32,32,240,32,value.abs.to_s + " "+ Vocab::gold)
end
snstar2006_66rpg.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
snstar2006_66rpg.opacity -= 30
snstar2006_66rpg.contents_opacity -= 30
Graphics.update
end
snstar2006_66rpg.dispose
end
def show_gain_level_window(actor,value)
lvstring = Vocab::level
snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
if value >= 0
gain_text = "提升"
Audio.se_play($gain_lv_se,80,100)
else
gain_text = "降低"
Audio.se_play($loss_lv_se,80,100)
end
snstar2006_66rpg.contents.draw_text(0, 0, 108, 32, actor.name)
string = lvstring+gain_text+value.abs.to_s+"级"
snstar2006_66rpg.contents.draw_text(32,32,160,32,string)
snstar2006_66rpg.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
snstar2006_66rpg.opacity -= 30
snstar2006_66rpg.contents_opacity -= 30
Graphics.update
end
snstar2006_66rpg.dispose
end
end

复制代码

丿梁丶小柒 · 发表于 2012-9-8 11:38:17

将皮肤设置成透明。
在获取物品的时候使用事件显示出图片。
莫约60帧后图片淡出消失

吸血鬼之妻 · 发表于 2012-9-8 18:07:23

丿梁丶小柒发表于 2012-9-8 11:38
将皮肤设置成透明。
在获取物品的时候使用事件显示出图片。
莫约60帧后图片淡出消失 ...

这个早想过了
很麻烦
我想改脚本实现

咕噜 · 发表于 2012-9-9 17:57:25

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
class Game_Interpreter
UnShowSwitch = 0 #禁止显示提示开关
GainSe = "Audio/SE/Recovery.ogg"
LoseSe = "Audio/SE/Raise2.ogg"
#--------------------------------------------------------------------------
# ● 增减金钱
#--------------------------------------------------------------------------
def command_125
value = operate_value(@params[0], @params[1], @params[2])
$game_party.gain_gold(value)
show_window(0,value) unless $game_switches[UnShowSwitch]
return true
end
#--------------------------------------------------------------------------
# ● 增减物品
#--------------------------------------------------------------------------
def command_126
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_items[@params[0]], value)
$game_map.need_refresh = true
show_window(1,value,@params[0]) unless $game_switches[UnShowSwitch]
return true
end
#--------------------------------------------------------------------------
# ● 增减武器
#--------------------------------------------------------------------------
def command_127
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_weapons[@params[0]], value, @params[4])
show_window(2,value,@params[0]) unless $game_switches[UnShowSwitch]
return true
end
#--------------------------------------------------------------------------
# ● 增减防具
#--------------------------------------------------------------------------
def command_128
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_armors[@params[0]], value, @params[4])
show_window(3,value,@params[0]) unless $game_switches[UnShowSwitch]
return true
end
def show_window(type,value,id = 0)
if type == 0
item = "gold"
else #物品，武器，防具
if type == 1
item = $data_items[id]
elsif type == 2
item = $data_weapons[id]
else
item = $data_armors[id]
end
end
width = 150 + (type == 0 ? value.to_s.size * 7 - 16 : item.name.size * 7)
w = Window_Base.new((640-width)/2 - 85 ,110,width,64)
w.windowskin = Cache.system("Window")
w.contents = Bitmap.new(w.width - 32, w.height - 32)
w.contents.font.color = w.text_color(1)
w.contents.fill_rect(w.contents.rect,w.text_color(0))
w.opacity = w.contents_opacity =0
for i in 0..10
w.opacity += 26
w.contents_opacity += 26
w.x += 3
Graphics.update
end
if value >= 0
w.contents.draw_text(0,4,48,24,"获得")
Audio.se_play(GainSe)
else
w.contents.draw_text(0,4,48,24,"失去")
Audio.se_play(LoseSe)
end
if type != 0
w.draw_item_name_c(item,50, 4 ,type + 23)
w.opacity = w.back_opacity = 255
w.contents.font.color = w.text_color(14)
w.contents.draw_text(width - 72 , 4, 40, 24, "× " + value.abs.to_s ,2)
else
bitmap = Cache.system("gold")
w.contents.blt(50, 4 ,bitmap , bitmap.rect)
w.contents.font.color = w.text_color(14)
w.contents.draw_text(width - 112 , 4, 72, 24, " " + value.abs.to_s ,2)
end
for i in 0..50
Graphics.update
end
for i in 0..20
w.opacity -= 13
w.contents_opacity -= 13
w.x += 2
Graphics.update
end
w.dispose
end
end
class Window_Base
def draw_item_name_c(item, x, y , color)
if item != nil
draw_icon(item.icon_index, x, y, true)
self.contents.font.color = self.text_color(color)
self.contents.draw_text(x + 24, y, 172, WLH, item.name)
end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码

路过，这个比那个烂，不能通过开关控制，可以自己改

吸血鬼之妻 · 发表于 2012-9-14 20:00:31

delv25 发表于 2012-9-9 17:57
路过，这个比那个烂，不能通过开关控制，可以自己改

要用图片来显示啊拜托

吸血鬼之妻 · 发表于 2012-9-20 18:34:25

自顶一下，没有人会脚本吗？

吸血鬼之妻 · 发表于 2012-10-1 20:58:15

自顶一下

莉德露 · 发表于 2012-10-2 14:11:00

做好了
樓主是要這種效果嗎？

把這個附件放入System文件夾內

插入這段腳本就可以了

#==============================================================================
# 本腳本來自www.66RPG.com，使用和轉載請保留此信息
#==============================================================================
# 注意！！！在對話後得到物品，請在對話後先用事件等待3幀，否則對話框來不及消失。
# 略作修改
# BY：莉德露（6R ID）
# 加入圖片顯示效果，取消窗口顯示。
# 開關定義：
$noshowgold = 51 # 不显示金钱得失
$noshowitem = 52 # 不显示物品得失
$noshowweapon = 53 # 不显示武器得失
$noshowarmor = 54 # 不显示防具得失
# 以上開關，當打開的時候，獲得物品將不會提示，比如默認打開41號開關，獲得金錢不再提示
# 不想提示等级升降时，就在事件命令直接选择是否显示就行了。
#——聲效，可以自己改
folder = "Audio/SE/"
$gain_gold_se = folder +"Shop" # 获得金钱声效
$loss_gold_se = folder +"Blow2" # 失去金钱声效
$gain_item_se = folder +"Item1" # 获得物品声效
$loss_item_se = folder +"Blow2" # 失去物品声效
$gain_weapon_se = folder +"Item1" # 获得武器声效
$loss_weapon_se = folder +"Blow2" # 失去武器声效
$gain_armor_se = folder +"Item1" # 获得防具声效
$loss_armor_se = folder +"Blow2" # 失去防具声效
$gain_lv_se = folder +"Item1" # 提升等级声效
$loss_lv_se = folder +"Blow2" # 降低等级声效
# ————————————————————————————————————
class Game_Interpreter
#--------------------------------------------------------------------------
# ● 增減金錢
#--------------------------------------------------------------------------
def command_125
value = operate_value(@params[0], @params[1], @params[2])
$game_party.gain_gold(value)
if $game_switches[$noshowgold]==false
show_gain_window(0, value)
end
return true
end
#--------------------------------------------------------------------------
# ● 增減物品
#--------------------------------------------------------------------------
def command_126
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_items[@params[0]], value)
if $game_switches[$noshowitem]==false
show_gain_window(1, value)
end
$game_map.need_refresh = true
return true
end
#--------------------------------------------------------------------------
# ● 增減武器
#--------------------------------------------------------------------------
def command_127
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_weapons[@params[0]], value, @params[4])
if $game_switches[$noshowweapon]==false
show_gain_window(2, value)
end
return true
end
#--------------------------------------------------------------------------
# ● 增減防具
#--------------------------------------------------------------------------
def command_128
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_armors[@params[0]], value, @params[4])
if $game_switches[$noshowarmor]==false
show_gain_window(3, value)
end
return true
end
#--------------------------------------------------------------------------
# ● 等级増減
#--------------------------------------------------------------------------
def command_316
value = operate_value(@params[1], @params[2], @params[3])
iterate_actor_id(@params[0]) do |actor|
actor.change_level(actor.level + value, false)
if @params[4]
show_gain_level_window(actor,value)
end
end
return true
end
def show_gain_window(type, value)
snstar2006_66rpg_item = $data_armors[@params[0]]
snstar2006_66rpg = Window_Base.new((640-360)/2,158,200,100)
snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
if value >= 0
gain_text = "獲得"
else
gain_text = "失去"
end
case type
when 0
gain_type = "金錢"
if value >=0
Audio.se_play($gain_gold_se,80,100)
else
Audio.se_play("Audio/SE/"+"Item1",80,100)
end
when 1
gain_type = "物品"
string = $data_items[@params[0]]
if value >=0
Audio.se_play($gain_item_se,80,100)
else
Audio.se_play($loss_item_se,80,100)
end
when 2
gain_type = "武器"
string = $data_weapons[@params[0]]
if value >=0
Audio.se_play($gain_weapon_se,80,100)
else
Audio.se_play($loss_weapon_se,80,100)
end
when 3
gain_type = "裝備"
string = $data_armors[@params[0]]
if value >=0
Audio.se_play($gain_armor_se,80,100)
else
Audio.se_play($loss_armor_se,80,100)
end
end
snstar2006_66rpg.contents.draw_text(0,0,160,32,gain_text+gain_type+"：")
unless type == 0
@sprite = Sprite.new
#导入在system里的图片
@sprite.bitmap = Cache.system("GET_ITEM")
snstar2006_66rpg.draw_item_name(string, 28, 32, true)
snstar2006_66rpg.contents.draw_text(0, 28, 150, 32, "×"+value.abs.to_s, 2)
else
@sprite = Sprite.new
#导入在system里的图片
@sprite.bitmap = Cache.system("GET_ITEM")
snstar2006_66rpg.contents.draw_text(32,28,240,32,value.abs.to_s + " "+ Vocab::gold)
end
snstar2006_66rpg.opacity = 0
for i in 0..30
Graphics.update
end
for i in 0..10
# @sprite.bitmap.opacity -= 30
# @sprite.bitmap.contents_opacity -= 30
#snstar2006_66rpg.opacity -= 30
#snstar2006_66rpg.contents_opacity -= 30
Graphics.update
end
snstar2006_66rpg.dispose
@sprite.bitmap.dispose
end
def show_gain_level_window(actor,value)
lvstring = Vocab::level
snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
if value >= 0
gain_text = "提升"
Audio.se_play($gain_lv_se,80,100)
else
gain_text = "降低"
Audio.se_play($loss_lv_se,80,100)
end
snstar2006_66rpg.contents.draw_text(0, 0, 108, 32, actor.name)
string = lvstring+gain_text+value.abs.to_s+"级"
snstar2006_66rpg.contents.draw_text(32,32,160,32,string)
snstar2006_66rpg.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
snstar2006_66rpg.opacity -= 30
snstar2006_66rpg.contents_opacity -= 30
Graphics.update
end
snstar2006_66rpg.dispose
end
end
#==============================================================================
# 本腳本來自www.66RPG.com，使用和轉載請保留此信息
#==============================================================================

复制代码

帐号		自动登录	找回密码
密码			注册会员

[已经解决] 【1V悬赏】麻烦把这个得失物品脚本改成用图片来显示原来的

点评

评分

评分

点评

点评

开拓者

贵宾