【脚本】得失物品自动提示
rpgmaker吧
全部回复
仅看楼主
level 13
静茹♂鱼 楼主
#==============================================================================
# ■ 得失物品、金钱、武器、防具、技能自动提示(应变版)
#------------------------------------------------------------------------------
#     在对话后得到物品或技能,得失物品、金钱、武器、
#       防具、技能将自动提示。
#==============================================================================
#============================== 注意事项=======================================
#       在对话后得到物品或技能,请在对话后先用事件等待
#       1秒,否则对话框来不及消失。
#==============================================================================
#===================================作者=======================================
#       得失物品、金钱、武器、防具、自动提示 by 66rpg
#       技能自动提示 by 幻影RPG基地的会员:kwanhimshek2
#       应变修改 by 6R用户 RPG-XP
#==============================================================================
# 开关定义∶
$不显示技能视窗 = 40
$不显示金钱视窗 = 41
$不显示物品视窗 = 42
$不显示武器视窗 = 43
$不显示防具视窗 = 44
# 以上开关,当打开的时候,获得物品将不会提示,比如预设打开41号开关,获得金钱不再提示
# ————————————————————————————————————
class Interpreter
#--------------------------------------------------------------------------
# ● 增减金钱
#--------------------------------------------------------------------------
def command_125
value = operate_value(@parameters[0], @parameters[1], @parameters[2])
$game_party.gain_gold(value)
if $game_switches[$不显示金钱视窗]==false
carol3_66RPG = Window_Base.new((640-160)/2,128,180,100)
carol3_66RPG.contents = Bitmap.new(carol3_66RPG.width - 32, carol3_66RPG.height - 32)
if value >= 0
carol3_66RPG.contents.draw_text(0,0,240,32,"获得"+ $data_system.words.gold + "∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"006-System06",80,100)
else
carol3_66RPG.contents.draw_text(0,0,240,32,"失去" + $data_system.words.gold + "∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"005-System05",80,100)
end
carol3_66RPG.contents.draw_text(0,32,240,32,value.abs.to_s)
carol3_66RPG.contents.draw_text(0,32,140,32, $data_system.words.gold,2)
carol3_66RPG.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
carol3_66RPG.opacity -= 30
carol3_66RPG.contents_opacity -= 30
Graphics.update
end
carol3_66RPG.dispose
end
return true
end
#--------------------------------------------------------------------------
# ● 增减物品
#--------------------------------------------------------------------------
def command_126
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
$game_party.gain_item(@parameters[0], value)

2010年07月15日 14点07分 1
level 13
静茹♂鱼 楼主
if $game_switches[$不显示物品视窗]==false
carol3_66RPG_item = $data_items[@parameters[0]]
carol3_66RPG = Window_Base.new((640-300)/2,128,300,100)
carol3_66RPG.contents = Bitmap.new(carol3_66RPG.width - 32, carol3_66RPG.height - 32)
if value >= 0
carol3_66RPG.contents.draw_text(0,0,240,32,"获得" + $data_system.words.item + "∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"006-System06",80,100)
else
carol3_66RPG.contents.draw_text(0,0,240,32,"失去" + $data_system.words.item + "∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"005-System05",80,100)
end
carol3_66RPG_bitmap = RPG::Cache.icon(carol3_66RPG_item.icon_name)
carol3_66RPG.contents.blt(0, 32, carol3_66RPG_bitmap, Rect.new(0, 0, 24, 24), 255)
carol3_66RPG.contents.draw_text(0 + 28, 32, 212, 32, carol3_66RPG_item.name, 0)
carol3_66RPG.contents.draw_text(0, 32, 268, 32, "×"+value.abs.to_s, 2)
carol3_66RPG.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
carol3_66RPG.opacity -= 30
carol3_66RPG.contents_opacity -= 30
Graphics.update
end
carol3_66RPG.dispose
end
return true
end
#--------------------------------------------------------------------------
# ● 增减武器
#--------------------------------------------------------------------------
def command_127
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
$game_party.gain_weapon(@parameters[0], value)
if $game_switches[$不显示武器视窗]==false
carol3_66RPG_item = $data_weapons[@parameters[0]]
carol3_66RPG = Window_Base.new((640-300)/2,128,300,100)
carol3_66RPG.contents = Bitmap.new(carol3_66RPG.width - 32, carol3_66RPG.height - 32)
if value >= 0
carol3_66RPG.contents.draw_text(0,0,240,32,"获得" + $data_system.words.weapon + "∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"006-System06",80,100)
else
carol3_66RPG.contents.draw_text(0,0,240,32,"失去" + $data_system.words.weapon + "∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"005-System05",80,100)
end
carol3_66RPG_bitmap = RPG::Cache.icon(carol3_66RPG_item.icon_name)
carol3_66RPG.contents.blt(0, 32, carol3_66RPG_bitmap, Rect.new(0, 0, 24, 24), 255)
carol3_66RPG.contents.draw_text(0 + 28, 32, 212, 32, carol3_66RPG_item.name, 0)
carol3_66RPG.contents.draw_text(0, 32, 268, 32, "×"+value.abs.to_s, 2)
carol3_66RPG.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
carol3_66RPG.opacity -= 30
carol3_66RPG.contents_opacity -= 30
Graphics.update
end
carol3_66RPG.dispose
end
return true
end
#--------------------------------------------------------------------------
# ● 增减防具
#--------------------------------------------------------------------------
def command_128
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
$game_party.gain_armor(@parameters[0], value)
if $game_switches[$不显示防具视窗]==false
carol3_66RPG_item = $data_armors[@parameters[0]]
carol3_66RPG = Window_Base.new((640-300)/2,128,300,100)

2010年07月15日 14点07分 2
level 13
静茹♂鱼 楼主
carol3_66RPG.contents = Bitmap.new(carol3_66RPG.width - 32, carol3_66RPG.height - 32)
if value >= 0
carol3_66RPG.contents.draw_text(0,0,240,32,"获得防具∶")
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"006-System06",80,100)
else
carol3_66RPG.contents.draw_text(0,0,240,32,"失去防具∶")  
#——声效,可以自己改
Audio.se_play("Audio/SE/"+"005-System05",80,100)
end
carol3_66RPG_bitmap = RPG::Cache.icon(carol3_66RPG_item.icon_name)
carol3_66RPG.contents.blt(0, 32, carol3_66RPG_bitmap, Rect.new(0, 0, 24, 24), 255)
carol3_66RPG.contents.draw_text(0 + 28, 32, 212, 32, carol3_66RPG_item.name, 0)
carol3_66RPG.contents.draw_text(0, 32, 268, 32, "×"+value.abs.to_s, 2)
carol3_66RPG.opacity = 160
for i in 0..30
Graphics.update
end
for i in 0..10
carol3_66RPG.opacity -= 30
carol3_66RPG.contents_opacity -= 30
Graphics.update
end
carol3_66RPG.dispose
end
return true
end
#--------------------------------------------------------------------------
# ● 增减技能
#--------------------------------------------------------------------------
def command_318
     actor = $game_actors[@parameters[0]]
     if actor != nil
       if @parameters[1] == 0
         actor.learn_skill(@parameters[2])
       else
         actor.forget_skill(@parameters[2])
       end
     end
   
if $game_switches[$不显示技能视窗]==false
skill_item = $data_skills[@parameters[2]]
skill = Window_Base.new((640-300)/2,128,300,100)
skill.contents = Bitmap.new(skill.width - 32, skill.height - 32)
actor = $game_actors[@parameters[0]]
actor_bitmap = RPG::Cache.character(actor.character_name, actor.character_hue)
if @parameters[1] == 0
       skill.contents.blt(0, 0, actor_bitmap, Rect.new(0, 0, 24, 24), 255)
       skill.contents.draw_text(0 + 28,0,240,32,$game_actors[@parameters[0]].name + "习得" + $data_system.words.skill + "∶")
       #——声效,可以自己改
       Audio.se_play("Audio/SE/"+"007-System07",80,100)
     else
       skill.contents.blt(0, 0, actor_bitmap, Rect.new(0, 0, 24, 24), 255)
       skill.contents.draw_text(0 + 28,0,240,32,$game_actors[@parameters[0]].name + "遗忘" + $data_system.words.skill + "∶")
       #——声效,可以自己改
       Audio.se_play("Audio/SE/"+"008-System08",80,100)
       end
       skill_bitmap = RPG::Cache.icon(skill_item.icon_name)
       skill.contents.blt(0, 32, skill_bitmap, Rect.new(0, 0, 24, 24), 255)
       skill.contents.draw_text(0 + 28, 32, 212, 32, skill_item.name, 0)
       skill.opacity = 160
       for i in 0..30
       Graphics.update
       end
       for i in 0..10
       skill.opacity -= 30
       skill.contents_opacity -= 30
       Graphics.update
       end
       skill.dispose
end
return true
end
end

2010年07月15日 14点07分 3
level 13
静茹♂鱼 楼主
使用前请先详细看一下脚本前面的内容,这样才能更好地使用这个脚本。
2010年07月15日 14点07分 4
level 9
得失物品提示我也写过一个的[揉脸]
2010年07月16日 03点07分 5
level 13
静茹♂鱼 楼主
回复:5楼
O(∩_∩)O哈哈~,你把你写的脚本都发上来吧。
2010年07月16日 07点07分 6
1